不可思议的数

展开阅读全文

不可思议的问题

08-22

请看下面这段程序代码:rnrn<%rn Set rs=Server.CreateObject("ADODB.RecordSet")rn Set rs1=Server.CreateObject("ADODB.RecordSet")rn Set rs2=Server.CreateObject("ADODB.RecordSet")rn Set rs3=Server.CreateObject("ADODB.RecordSet")rn Set rs4=Server.CreateObject("ADODB.RecordSet")rn SQLStr="Select * from grssq Order By grid DESC"rn rs.open SQLStr,Conn,3,3,1rn If rs.Eof=True Thenrn ''没有操作rn Elsern for i=1 To rs.RecordCountrn Str=" sjgz Like '%"&rs.Fields("gjz")&"%'"rn If rs.Fields("xb")<>"不限" Thenrn If rs.Fields("xb")="男" Thenrn Str=Str&" and (xb='男' or xb='不限')"rn ElseIf rs.Fields("xb")="女" Thenrn Str=Str&" and (xb='女' or xb='不限')"rn End Ifrn End Ifrn nl=DateAdd("yyyy",-rs.Fields("nl"),Date)rn Str=Str&" and (Int(nl1)>="&nl&" or Int(nl2)<="&nl&" or (Int(nl1)=0 and Int(nl2)=0))"rn If rs.Fields("xl")<>"9" Thenrn Str=Str&" and whchd>="&rs.Fields("xl")&"" rn End Ifrn SQLStr2="Select * from qyzhpb where"&Strrn Set rs2=Conn.Execute(SQLStr2)rn While Not rs2.Eof=Truern SQLStr4="Select * from qyqkb where id="&rs2.Fields("qyid")&""rn Set rs4=Conn.Execute(SQLStr4)rn SQLStr3="Select * from grqkb where id="&rs.Fields("grid")&""rn Set rs3=Conn.Execute(SQLStr3)rn If rs4.Fields("mshdzh")<>"" Thenrn dzh=rs4.Fields("mshdzh")rn Elsern If rs4.Fields("gzdzh")<>"" Thenrn dzh=rs4.Fields("gzdzh")rn Elsern dzh=""rn End Ifrn End Ifrn Conn.Execute ("Insert into ssqzhpb (sjgz,gsmch,dzh,dh,lxr,sjh) values('"&rs2.Fields("sjgz")&"','"&rs4.Fields("qymch")&"','"&dzh&"','"&rs4.Fields("lxdh")&"','"&rs4.Fields("lxr")&"','"&rs3.Fields("dwdh")&"')")rn idjh=rs2.Fields("dxfsjh")&";"&rs3.Fields("id")&";"rn Conn.Execute ("Update qyzhpb Set dxfsjh='"&idjh&"' where id="&rs2.Fields("id")&"")rn rs2.MoveNextrn Wendrn rs.MoveNextrn If rs.Eof=True Thenrn Exit Forrn End Ifrn Nextrn rs.closern set rs=nothingrn rs1.closern set rs1=nothingrn rs2.closern set rs2=nothingrn rs3.closern set rs3=nothingrn rs4.closern set rs4=nothingrn conn.closern set conn=nothingrn End Ifrn%>rn第46行报错:Microsoft JET Database Engine 错误 '80004005' rnrn标准表达式中数据类型不匹配。 rnrn/dx/save_qzssq.asp,行46rnrn第46行语句是:rs2.MoveNextrn如注释这行,则程序运行良好,但由于进入死循环,会不断添加同一条记录。并且即使将rs2.MoveNext语句移到rn SQLStr2="Select * from qyzhpb where"&Strrn Set rs2=Conn.Execute(SQLStr2)rn下也还报同样的错误。rn是不是很不可思议的问题?高手解决!rn 论坛

不可思议!!!!不可思议,一个关于数据采集的源程序费解!!!

11-03

不可思议!!!!不可思议,一个关于数据采集的源程序费解!!!rn下面这段代码,是在很早以前在bc3.1下写的,一个通过硬件卡采集电子衡称的数据rn在普通的奔腾机器,或则486机器上的读数都正确,可是现在机器升级用P2,或者P3rn读取的数据相差太大,可以帮我看看为何嘛?我现在想把他移植到vc下,各位大哥,帮帮我啊!rn下面是这个采集程序的源代码.对了,这样的实现数据采集的方式,还可以吗(在win98下)rn有谁可以教我另外的处理办法?rn我现在通过在主程序里面开辟一个中断,让后调用这个采集程序已达到实时的目的,然后通过DDE和我的数据库程序交换数据,以前在老机器上还好,现在用奔腾3(HP),结果就不行了rn采集的数据不对,现在很着急,各位给我想想办法,下面是采集的源程序:rn//头文件tw.hrn#define M_WAITrn//#undef M_WAITrn#define LOOPNUM 500rn#ifdef M_WAITrn #define CJPL 128.0rn #define TICKNUM 128rn #define IOKEY 0x29rn#elsern #define CJPL 102.4rn #define TICKNUM 512 rn #define IOKEY 0x27rn#endifrnrn//采集程序ybstw.crn#include "windows.h"rn#include "tw.h"rnrn#define b_adjustbase 3 // 参与台值校正的上限值 n*20公斤rn#define freq_adjustbase 15 // 无车时台值校正的周期 n次rn#define b_havtrk 40 // 认为有车的下限比较值 n*20公斤rn#define b_trkgone 15 // 认为过车的下限比较值 n*20公斤rn#define b_pulse 3 // 变化梯度/脉动幅值的比较值rn#define b_minus 50 // 单调段均值与已有的当前平稳值之差额的 比较值rn#define jjb_pulse 2 // 静计脉动幅值的比较值rn#define jjnum_repeat 5 // 静计(近似重量)的重复次数(从而得出结果)rnrnvoid inicj(void); //初始化采集rnvoid setcj(int option); //设置采集方式 (动态,静态)rnvoid chaiji(void);rnint getcj(void);rnvoid delaycj(void);rnrn/*** Global Variables ***/rnunsigned int sample=0;rnunsigned int m_option=0;rnunsigned int d_cjpl=0;rnunsigned int min_smoothnum=0;rnunsigned int d_base=0;rnfloat d_adjust=0.0;rnunsigned int m_taizhi=0;rnint d_taizhi=0;rnunsigned int m_weight=0,d_weight=0,num_weight=0,num_pick=0;rnfloat weight=0.0,speed=0.0;rnrn// pickworkrn#ifdef M_WAITrn#elsern unsigned int num_delay=0;rn unsigned char high8byte=0;rn#endifrnrnunsigned int d_fromcj=0;rn// preworkrnunsigned int d_temp[5]=0;rnunsigned int d_filter=0;rnunsigned int d_prework=0;rn// jztzrnunsigned int sum_base=0;rnunsigned int cfsum_base=0;rnunsigned int num_base=0;rnunsigned int d_periodbase=0;rnunsigned int num_repeatbase=0;rnunsigned int sum_repeatbase=0;rn// dtcjrnunsigned char d_flag=0;rnunsigned int d_seghead=0;rnunsigned int d_segend=0;rnunsigned int sum_singleseg=0;rnunsigned int cfsum_singleseg=0;rnunsigned int num_singleseg=0;rnunsigned int sum_newtempseg=0;rnunsigned int cfsum_newtempseg=0;rnunsigned int num_newtempseg=0;rnunsigned int sum_oldtempseg=0;rnunsigned int cfsum_oldtempseg=0;rnunsigned int num_oldtempseg=0;rnunsigned int num_repeatseg=0;rnunsigned int m_picksmooth=0;rnunsigned int sum_smooth=0;rnunsigned int cfsum_smooth=0;rnunsigned int num_smooth=0;rnunsigned int d_smooth=0;rn// jtcjrnunsigned int jjsum_period=0;rnunsigned int jjcfsum_period=0;rnunsigned int jjnum_period=0;rnunsigned int jjd_period=0;rnunsigned int jjd_tempweight;rnunsigned int jjsum_repeatnear=0;rnunsigned int jjnum_repeatnear=0;rnrnrn// Sample segmentrn/**************************************************/rnrnrnvoid delaycj(void)rnrnloop_dly:rn asm noprn asm loop loop_dlyrnrnrnvoid iniprework(void)rnrn asm // 初始化 采集卡rn mov dx,13a3hrn mov al,92hrn out dx,alrn mov cx,LOOPNUM*3rn rn delaycj(); //; delay0: about n * 20rn asm rn mov dx,13a2hrn mov al,0efhrn out dx,alrn mov cx,LOOPNUM // 注意: LOOPNUM必须为预定义整数rn rn delaycj(); //; delay0: about n * 20rn asm rn mov dx,13a2hrn mov al,0ffhrn out dx,alrn mov cx,LOOPNUM*3rn rn delaycj(); //; delay1: about n * 20rn asm rn mov dx,13a2hrn mov al,0fahrn out dx,alrn mov cx,LOOPNUM*3rn rn delaycj(); //; delay2: about n * 20rn asm rn mov dx,13a0hrn in al,dxrn mov ah,alrn mov dx,13a2hrn mov al,0f5hrn out dx,alrn mov cx,LOOPNUM*3rn rn delaycj(); //; delay3: about n * 20rn asm rn mov dx,13a0h //; execute program then exit == delay4rn in al,dxrn rn asm rn mov cl,4rn shr ax,clrn mov di,offset d_temprn mov cx,5rn rnl_ini_prew:rn asm rn mov [di],axrn inc dirn inc dirn loop l_ini_prewrn rn return;rnrnrnrnrnvoid inicj(void)rnrn d_base=GetProfileInt("FCMS","BaseWeight",920);rn d_adjust=((float)GetProfileInt("FCMS","AdjustParameter",1000)) / 1000.000;rn d_cjpl=2*(int)(CJPL);rn min_smoothnum=(int)(CJPL);rnrn asm // 初始化 采集卡rn mov dx,13a3hrn mov al,92hrn out dx,alrn rnrn return;rnrnrnrnvoid setcj (int option )rnrn m_option=option; // 置采集方式rnrn d_weight=0; // 复位结果传送变量rn m_weight=0;rn num_weight=0;rn num_pick=0;rn iniprework(); // 初始化预处理部分rn sum_base=0; // 复位台基值有关变量rn cfsum_base=0;rn num_base=0;rn d_periodbase=0;rn num_repeatbase=0;rn sum_repeatbase=0;rnrn d_flag=0; // 复位动态计量部分的有关变量rn num_repeatseg=0;rn m_picksmooth=0;rn d_smooth=0;rn sum_smooth=0;rn cfsum_smooth=0;rn num_smooth=0;rnrn jjsum_period=0; // 复位静态计量部分的有关变量rn jjcfsum_period=0;rn jjnum_period=0;rn jjd_period=0;rn jjd_tempweight=0;rn jjsum_repeatnear=0;rn jjnum_repeatnear=0;rn sample=1;rnrn return;rnrnrnrnvoid chaiji(void)rnrn asm push sirn asm push dirn/******************** pickwork **************************/rn#ifdef M_WAITrn asm rn mov dx,13a2hrn mov al,0efhrn out dx,alrn mov cx,LOOPNUM // 注意: LOOPNUM必须为预定义整数rn rn delaycj(); //; delay0: about n * 20rn asm rn mov dx,13a2hrn mov al,0ffhrn out dx,alrn mov cx,LOOPNUM*3rn rn delaycj(); //; delay1: about n * 20rn asm rn mov dx,13a2hrn mov al,0fahrn out dx,alrn mov cx,LOOPNUM*3rn rn delaycj(); //; delay2: about n * 20rn asm rn mov dx,13a0hrn in al,dxrn mov ah,alrn mov dx,13a2hrn mov al,0f5hrn out dx,alrn mov cx,LOOPNUM*3rn rn delaycj(); //; delay3: about n * 20rn asm rn mov dx,13a0h //; execute program then exit == delay4rn in al,dxrn mov d_fromcj,axrn rn#elsern asm rn cmp num_delay,2rn ja testabovern je equ2rn cmp num_delay,0rn jne delay1rn mov dx,13a2hrn mov al,0efhrn out dx,alrn mov num_delay,1rn jmp end_chaiji //; ==delay0: about 1000/512 msrn rndelay1:rn asm rn mov dx,13a2hrn mov al,0ffhrn out dx,alrn mov num_delay,2rn jmp end_chaiji //; ==delay1: about 1000/512 msrn rnequ2:rn asm rn mov dx,13a2hrn mov al,0fahrn out dx,alrn mov num_delay,3rn jmp end_chaiji //; ==delay2: about 1000/512 msrn rntestabove:rn asm rn cmp num_delay,3rn jne delay4rn mov dx,13a0hrn in al,dxrn mov high8byte,alrn mov dx,13a2hrn mov al,0f5hrn out dx,alrn mov num_delay,4rn jmp end_chaiji //; ==delay3: about 1000/512 msrn rndelay4:rn asm rn mov dx,13a0h //; execute program then exit == delay4rn in al,dxrn mov ah,high8bytern mov d_fromcj,axrn mov num_delay,0rn rn#endifrnrn/************************** prework *****************************/rn// 预处理: 先去掉最低 4位无效位,再作均值滤波,再减去台值取相对重量rn asm rn mov cl,4rn mov ax,d_fromcjrn shr ax,clrn mov bx,ax // 取当前数与最后五个数(在先进先出的'队'中)rn mov di,offset d_temp // 作均值滤波rn mov cx,5rn rnl_prework:rn asm rn xchg bx,[di]rn add ax,bxrn inc dirn inc dirn loop l_preworkrn mov cx,6rn xor dx,dxrn div cxrn shr cx,1rn cmp dx,cxrn jb filt_nocfrn inc axrn rnfilt_nocf:rn asm rn mov d_filter,ax // 绝对重量数送至d_filterrn sub ax,d_base rn jg exit_abs1rn neg axrn rnexit_abs1:rn asm mov d_prework,ax // 减去台值的相对重量数送至 d_preworkrnrn/**********************************************************************/rn asm rn cmp d_weight,0rn je notrackrn jmp havetrackrn rnrn/********************* there is no-track... **********************/rn/*** 无车时,每两秒作一次均值,与台值的差额作为台值误差显示;rn当差额大于 b_havtrk(800公斤)时, 判断为车上台,置d_weight为 b_havtrk;rn如果连续有 freq_adjustbase(15)个差额小于 b_adjustbase(40公斤),则作台值校正***/rnrnnotrack:rn asm rn mov ax,d_filter // 作和及个数的累加rn add sum_base,ax // 注意: 此处为d_filter(绝对重量数)累加rn adc cfsum_base,0rn inc num_basern mov cx,d_cjplrn cmp num_base,cxrn je get_perioddatarn jmp end_chaijirn rnget_perioddata: // 到两秒时取出均值rn asm rn mov dx,cfsum_basern mov ax,sum_basern mov cx,num_basern div cxrn shr cx,1rn cmp dx,cxrn jb get_prdata_nocfrn add ax,1rn rnget_prdata_nocf:rn asm rn mov sum_base,0 // 复位两秒时间段的和累加器与数目累加器rn mov cfsum_base,0rn mov num_base,0rn mov d_periodbase,axrn sub ax,d_basern mov d_taizhi,ax // 显示台值误差rn mov m_taizhi,1rn jg exit_abs2rn neg axrn rnexit_abs2:rn asm rn cmp ax,b_adjustbase // 判断是否满足校正幅值范围rn jbe adjustbase // 只要一次不满足,则复位 近似台值组rn mov num_repeatbase,0 // 的和累加器与数目累加器rn mov sum_repeatbase,0rn cmp ax,b_havtrk // 判断是否有车rn jb true_notrkrn mov d_weight,axrn jmp end_chgdirect // 有车时, 转至 end_chgdirect, 初始化另一部分变量rn rntrue_notrk:rn asm jmp end_chaijirnadjustbase:rn asm rn mov ax,d_periodbasern add sum_repeatbase,axrn inc num_repeatbasern cmp num_repeatbase,freq_adjustbase // 判断是否满足校正rn je get_newbase // 所要求的连续次数rn jmp end_chaijirn rnget_newbase:rn asm rn xor dx,dx // 取出新校正值,置换旧台值rn mov ax,sum_repeatbase // 复位近似台值组的和累加器与数目累加器rn mov cx,num_repeatbasern div cxrn shr cx,1rn cmp dx,cxrn jb getnew_nocfrn add ax,1rn rngetnew_nocf:rn asm rn mov d_base,axrn mov sum_repeatbase,0rn mov num_repeatbase,0rn jmp end_chaijirn rnrn/********************* there is have-track... **********************/rn// 过车时完成重量的动态采集或静态采集...rnhavetrack:rn asm rn cmp m_option,2 // 判断是否动态计量rn je dynaworkrn jmp staticworkrn rn/********************** dong tai chai ji ******************************/rndynawork:rnrn asm rn inc num_pickrn cmp num_pick,7fffhrn jb do_nextrn jmp exit_cjrn rndo_next:rn asm rn mov ax,d_segendrn cmp d_prework,axrn jne testdirectrn jmp singlerect // 二者相等时按单调处理rn rntestdirect:rn asm rn lahf // 取其CF进位,判断是否与当前进位(d_flag)相等rn and ah,01 // 相等,为保持单调性;rn cmp ah,d_flag // 不等,为改变单调性;并保存此进位为下次比较进位(d_flag)rn jne mustchgdirectrn rnrnsinglerect:rn asm rn mov ax,d_prework // 对单调段作累加rn mov d_segend,axrn add sum_singleseg,axrn adc cfsum_singleseg,0rn inc num_singlesegrn jmp end_chaijirn rnrnmustchgdirect:rn asm mov d_flag,ahrnrnchg_direct:rnrn asm rn mov ax,d_segendrn mov bx,d_segheadrn sub ax,bxrn jg exit_abs3rn neg axrn rnexit_abs3:rn asm rn mov bx,ax // 认为段高小于80公斤时 rn cmp ax,4 // 则此段满足段高比较的条件rn jbe retry_testsmoothrnrn shl ax,1rn mov dx,axrn shl ax,1rn shl ax,1rn mov dx,d_segend // 改为 较高端点的1/8作比较rn cmp dx,d_segheadrn ja use_segendrn mov dx,d_segheadrn rnuse_segend:rn asm rn cmp ax,dxrn jbe retry_testsmoothrn jmp not_smoothrn rnretry_testsmooth:rn asm rn mov ax,bxrn xor dx,dx // 取单调段每步幅值(头尾差额除以个数)rn mov cx,num_singleseg // 如变化梯度大于此比较值,则认为不平滑rn div cxrn cmp ax,b_pulsern jbe retest_smoothrn jmp not_smoothrn rnretest_smooth:rn asm // 如果自上次不平滑后,所得单调段已够rn cmp d_smooth,0 // 组成一个平滑组,已求得当前平滑值时;rn je smooth // 求出此段均值与平滑值的差额, 并且与其限定值比较rn mov dx,cfsum_singleseg rn mov ax,sum_singlesegrn mov cx,num_singlesegrn div cxrn sub ax,d_smoothrn jg exit_abs4rn neg axrn rn exit_abs4:rn asm rn cmp ax,b_minusrn jbe smoothrn jmp not_smoothrn rnrn//能作平滑累加的单调段...rnsmooth:rn asm rn mov ax,sum_singleseg // 为平滑单调段设置二组临时缓存区:rn xchg ax,sum_newtempseg // 包括和累加器(sum_),和的进位rn mov sum_oldtempseg,ax // 累加器(cfsum_),个数累加器(num_)rn mov ax,cfsum_singleseg rn xchg ax,cfsum_newtempseg // 每来一个平滑单调段时rn mov cfsum_oldtempseg,ax // 则串移此缓存区rn mov ax,num_singlesegrn xchg ax,num_newtempsegrn mov num_oldtempseg,axrn inc num_repeatseg // 判断连续平滑单调段的个数rn cmp num_repeatseg,4 // 大于 4 时,认为够组成一个平滑组rn jae can_addsegrn rntempexit:rn asm jmp end_chgdirectrncan_addseg:rn asm rn mov m_picksmooth,1 // 置采到平滑组的标志rn mov ax,sum_oldtempseg // 作平滑组的累加rn add sum_smooth,axrn mov ax,cfsum_oldtempsegrn adc cfsum_smooth,ax rn mov ax,num_oldtempsegrn add num_smooth,axrn rn asm // 如平滑数大于2048 (16秒)rn cmp num_smooth,2048 // 则以当前平滑值为重量结果rn jb nothave_largesmooth // 以当前采集个数的2倍为预计总采集数rn mov dx,cfsum_smooth // 然后退出rn mov ax,sum_smoothrn mov cx,num_smoothrn div cxrn shr cx,1rn cmp dx,cxrn jb largesmooth_nocfrn add ax,1rn rnlargesmooth_nocf:rn asm rn mov d_weight,ax rn mov cx,num_smoothrn mov num_weight,cxrn mov ax,num_pickrn shl ax,1rn mov num_pick,axrn jmp exit_cjrn rnnothave_largesmooth:rn asm rn mov dx,cfsum_smooth // 求当前平滑值rn mov ax,sum_smoothrn mov cx,num_smoothrn div cxrn shr cx,1rn cmp dx,cxrn jb tempsmooth_nocfrn add ax,1rn rntempsmooth_nocf:rn asm rn mov d_smooth,axrn mov cx,min_smoothnum // 分析 是否采到大于0.5秒长度的rn shr cx,1 // 并且小于车下台下限值的数据rn cmp num_smooth,cx // 如是, 退出rn jae cnt_test_num_trkgonern jmp tempexitrn rncnt_test_num_trkgone:rn asm rn mov ax,d_smoothrn cmp ax,b_trkgonern jbe exit_cjrn jmp tempexitrn rnexit_cj:rnrn asm rn cmp num_pick, 640 // 如果采集数总共不超过 5秒 rn ja realy_exit // 不退出rn jmp do_new_smoothrn rnrealy_exit:rnrn asm rn mov m_weight,1rn mov sample,0rn jmp end_chaijirn rnrnrn// 遇到不在平滑范围内的单调段,舍弃它;rn// 算出最近平稳值,并与已有暂存重量比较,直到得到结果rnnot_smooth:rnrn asm rn cmp m_picksmooth,1 // 判断是否采到平滑组rn je retest_havsmoodatarn jmp do_new_smoothrn rnretest_havsmoodata:rn asm rn mov cx,min_smoothnum // 判断平滑组时间是否超过1秒rn cmp num_smooth,cx // 如小于,不作比较处理rn jae have_smoothdatarn jmp do_new_smoothrn rnhave_smoothdata:rn asm rn mov dx,cfsum_smooth // 求当前平滑值rn mov ax,sum_smoothrn mov cx,num_smoothrn div cxrn shr cx,1rn cmp dx,cxrn jb smooth_nocfrn add ax,1rn rnsmooth_nocf:rn asm rn mov d_smooth,ax rn cmp ax,d_weight // 如当前平滑值较大,则更新暂存重量rn ja renew_smoothrn mov bx,d_weightrn sub bx,axrn cmp bx,4rn jbe testnumrn jmp exit_cj // 如平滑均值下降大于80公斤,则退出rn rntestnum:rn asm rn mov cx,num_smoothrn cmp cx,num_weight // 如平滑均值下降小于80公斤rn ja renew_smooth // 取数据较长者为暂存重量rn jmp do_new_smoothrn rnrenew_smooth:rn asm rn mov ax,d_smoothrn mov d_weight,axrn mov ax,num_smoothrn mov num_weight,axrn rndo_new_smooth:rn asm // 复位有关平滑组变量rn mov d_smooth,0rn mov sum_smooth,0rn mov cfsum_smooth,0rn mov num_smooth,0rn mov m_picksmooth,0rn mov num_repeatseg,0rn rnend_chgdirect: // 复位有关单调段变量rn asm rn mov ax,d_preworkrn mov d_seghead,axrn mov d_segend,axrn mov sum_singleseg,axrn mov cfsum_singleseg,0rn mov num_singleseg,1rn jmp end_chaijirn rn /************************* jtcj ***********************************/rnrnstaticwork:rn asm rn mov ax,d_prework // 作和及个数的累加rn add jjsum_period,axrn adc jjcfsum_period,0rn inc jjnum_periodrn mov cx,d_cjplrn cmp jjnum_period,cxrn je cmp_period_datarn jmp end_chaijirn rncmp_period_data:rn asm // 到2秒时取出均值rn mov dx,jjcfsum_periodrn mov ax,jjsum_periodrn mov cx,jjnum_periodrn div cxrn shr cx,1rn cmp dx,cxrn jb jjperiod_nocfrn add ax,1rn rnjjperiod_nocf:rn asm rn mov jjsum_period,0 // 复位和及个数累加器rn mov jjcfsum_period,0rn mov jjnum_period,0rn mov d_taizhi,ax // 此均值作为台值差显示,rn mov m_taizhi,1 // 以表示车上台的动态过程rn mov jjd_period,axrn sub ax,jjd_tempweight // 此均值与当前暂存重量比较rn jg exit_abs5 // 二者偏差小于jjb_pulse时rn neg ax // 认为处于停稳状态rn rnexit_abs5:rn asm rn cmp ax,jjb_pulsern jbe jjbe_smoothrn jmp jjnot_smoothrn rnjjbe_smooth:rn asm rn mov ax,jjd_periodrn add jjsum_repeatnear,axrn inc jjnum_repeatnear // 判断连续的近似均值组个数rnrn xor dx,dxrn mov ax,jjsum_repeatnearrn mov cx,jjnum_repeatnearrn div cxrn shr cx,1rn cmp dx,cxrn jb jjresult_nocfrn add ax,1rn rnjjresult_nocf:rn asm rn mov jjd_tempweight,ax rn cmp jjnum_repeatnear,jjnum_repeat //达到jjnum_repeat(10)个时rn je jjhav_result // 认为采到结果rn jmp end_chaijirn rnjjhav_result:rn asm rn mov ax,jjd_tempweight // 取采集结果,置有关标志rn mov d_weight,axrn mov m_weight,1rn mov sample,0rn jmp end_chaijirn rnjjnot_smooth:rn asm rn mov ax,jjd_period // 只要一次不平滑,rn mov jjd_tempweight,ax // 则更新暂存重量rn mov jjsum_repeatnear,0 // 并复位近似均值组的累加器rn mov jjnum_repeatnear,0rn rnend_chaiji:rn asm pop dirn asm pop sirnrnrnint getcj(void)rn/***取采集结果: 返回值为 0 时, 无结果; 为 1 时, 静态计量的重量结果 rn 为 2 时, 动态计量的重量和速度结果; 为 3 时, 台值误差结果 ****/rnrn weight=0.0;rn speed=0.0;rn if(m_weight==1) rn m_weight=0;rn d_weight=(int)(d_weight*d_adjust); // 校正处理rn weight=d_weight*0.02;rn if(m_option==2) rn if( num_weight < 2*min_smoothnum )rn speed=9.0;rn elsern speed=CJPL*3.6*18.0/num_pick;rn return 2;rn rn else rn return 1;rn rn elsern if(m_taizhi==1) rn m_taizhi= 0;rn weight=d_taizhi*0.02;rn return 3;rn rn elsern return 0;rnrn// End Of Applications.rnrn 论坛

不可思议的方法!

11-28

rn网赚 一边看美女看免费电影,一边在赚美元赚人民币,爽!爽!爽!爽死了!rn今天我给大家介绍1个外国和1个国内的确实会付给你钱的网站(免费注册),有些网友rn一看到国外的就没兴趣了,原因大家也都很明白,但是我要告诉你的是,这个国外的网站rn只要你认识26个英文字母就可以了,是不是有点兴趣了,好,我现在就把这个不懂英语也rn能赚美元的方法讲解一下: rnrn这个网站其中有一种看广告赚美元的方法,当然你更本不用去看他的广告,也没什么好看rn的总是也就重复10几张只要打开广告条(即一个很小的程序,它占用很少的系统资源),每在rn线1小时就得到1000点,1000点可兑换1美元,当然你在线的每一秒他都会折成相应的点数,rn不必非要在线几小时那么死板,另外他时常会奖励你1000-7000点,刚开始我第一天和第rn二天共获得2100多点,当我第三天登陆他的网站发现他已经奖励我1000点,后来不断有不rn同点数的奖励。现在你自己算算你每天大概上网多少时间,再算算一个月能有多少点,折rn合多少美元,多少人民币!你一年的宽带费早就出来了,拨号上网的用户也可以用上宽带rn了,并且还大有盈余。这个广告条的大小只是你电脑上的任务栏最小宽的2倍,并且不影响rn你上网聊天,看图片,浏览网页,上论坛发帖子,听音乐,看电影,玩棋牌游戏,至于玩rn大型的网络游戏,你可能觉得不太舒服,那你就得想一下是看广告赚钱快,还是卖装备赚钱rn快或是打游戏更重要一些。你帐户上的未付资金达到$50,就可以支付给你了,他会以支票rn的方式寄给你。而且他支持8层下线(15%,7%,5%,5%,5%,3%,1%),让你赚得更多。所以我rn说不懂英语也能赚美元,因为你要做的就是打开广告条让它在线,唯一要使用26个英文字母rn的地方就是注册了,你不必担心,我已经为你翻译好了: rnrn先登陆他的网址(可粘贴在地址栏中) : rnrnhttp://www.cashfiesta.com/php/join.php?ref=luoqintaornrn最新推出多线程挂机赚钱,可以同时作多挂到30个,让您以30倍的速度赚钱,而且该软件可采取rn后台运行,丝毫不影响您作其他的事情。您就等着收钱吧。:-)详情请看:rnhttp://cashlover.91x.netrnrn申请时姓名、住址、邮编等一定要真实,清楚,否则收不到支票了。进入注册页面。以下为rn注册页的中文注释,填写时请用英文或拼音填写!您可别把中文填上哟。 rnLogin:(用户名,用易记,常用的,可以自己取) rnpassword:(密码) rnVerify password:(重复密码) rnFirst name:(用来拿支票的身份证上的名字,用拼音拼写,例如你叫张地艰,就填 dijian) rnLast name: (你身份证上的姓氏,请用拼音拼写,这里就填 zhang ) rnStreet Address:(您的住址,可以用拼音,按外国人习惯,从小到大写清楚rn,至少要中国的邮递员明白,例如:广东省广州中山路3号,No.3,ZhongShan Road,Guangzhou,rnGuangDong,如英文实在差,可写拼音 China,GuangDongSheng,GuangZhouShi,ZhongShanLu,3Hao) rnCity:(居住城市,请用拼音拼写) rnZip/Postal Code:(邮编,一定要写正确哦。) rnState:(居住的州,中国选[Not Selected]) rnProvince:(请填您居住的省份,请用拼音拼写) rnCountry:(国籍,选择CHINA) rnE-Mail Address:(你的能收到信的邮箱,建议使用雅虎的) rnVerify E-Mail Address:(校验邮箱,将邮箱地址再填一遍)注意:为了减少自己常用的邮箱的垃圾rn,建议申请一个新的邮箱。 rnAge:(年龄,请输入数字) rnGender:(性别,Male男,Female女) rnEducation:受教育程度,随便选就可以了 rnAnnual household income:你的年薪,填大些,让美国人羡慕去吧! rnPlease tell us why you use Internet: (check all that apply) 你用Internet做什么,随便选就可以rn了 rnWhat do you search for or buy online: (check all that apply) 你在网上找什么或者购买什么,rn随便选就可以 rnPreferred check size:(选择多少美元起付款) 看你喜欢了,一般选$50 rnReferred by: 不能修改。修改后会被视为无效账号。 rnrn在“I have read and understand the Member Agreement.”前打钩,同意协议,一定要选上 。rn填完后检查一遍(除了Name和Referrer外,其他都可以以后修改),按一下“Submit Registr ation”,rn就进行注册了。 rn申请后就可以下载广告条开始赚钱了!rn下载广告条软件的地址:http://www.cashfiesta.com/download/Cashfiesta.exe 到该文件夹,rn再点击图标便会自动安装,你上网后可打开赚钱了。 rnrn当然发展下线也是增加财富的重要途径,你可以用论坛、聊天室、留言簿、QQ等方式,广泛宣传rnCashfiestarn和你的发展下线链接http://www.cashfiesta.com/php/join.php?ref=luoqintao,邀请网友注册,rn系统会自动识别、添加使他/她成为你的下线,完全不用你来操心! rnrn如果对注册还是有困难,可以将你不会填的项目名称及你的资料发电子邮件给我:tooluck@tom.com rnrn如果你英语还可以想知道这个网站的其他赚钱方式或在使用中碰到问题,可以登陆下面的网址:rnhttp://cashlover.91x.netrnrn最后提醒大家一点的就是cashfiesta公司会定期对帐户进行清理,如果它发现你的帐户采用作弊软件自动rn值rn班,可能会自动删除你的帐户!所以到底采不采用自动值班软件自己看着办。我的建议是一开始采用,后rn来rn等到自己等级高了,下线多了,就不要用了,否则一失足成千古恨啊。由于我积极宣传,第一个月我就有rn112rn个下线,所以我没有用过任何作弊工具,请不要来问我这方面的问题,如果下面的网址(我从网上为大家rn找的)rn无法登陆,请用搜索工具输入'自动值班软件,作弊器,注册工具,cashfiesta,offer'等等关于这方面的rn关键rn词进行查找。rnrn下载地:http://cashlover.91x.net,网站上比较全面,据说还有多挂机软件,建议用一下。rnrn(另外,我想告诉你的是在输入这篇文章时,我正在用广告条,等我输入好了,我又赚了1美元多,想想rn如果rn你把这篇文章交到报社,唯一的去处就是废纸篓,但现在我在网上一发表,不但已经拿到了十块多人民币rn,还rn能给我带来不段的下线!真是爽!) rnrnrn---------------------------------- rnrn下面介绍国内的网站: rnrnrn登陆下面的网址(可粘贴在地址栏中) rnrnhttp://www.ads4cn.com/newsbar/refferer.asp?luoqintaornrn这是一个中文网站(不需要你懂英语),免费注册成为该站会员后,下载NewsBar(广告新闻条)。rn安装NewsBar(只有28k,占用很少的系统资源)后,就可以一边上网做你喜欢做的事,一边赚钱了。rn支持 5 层下线,收益提成分别为:10%、5%、3%、3%、3%,让你赚得更多更轻松。在每个月的月底,rn当你的帐户余额超过30元时,就会寄给你,刚开始不会很多,慢慢地就会越来越多,第一月我就得rn到了278.54元。其实你根本不必看广告新闻,你可以打开NewsBar后,把它最小化,当听见‘咚’的rn滴水声,再打开NewsBar后,点击指定图标,就赚到了属于你的钱,用时不超过2秒钟,就这么简单!rn绝对不会影响你上网聊天游戏浏览网页等等,甚至用winamp听音乐用media player看电影都没问题,rn还不快试试! 在每月1号都会公布上月的广告佣金分配情况:rn*****************************************rn附: 2004年8月份,新闻点兑换报表 rnrn会员数目 135978 人 rn总个人新闻点 22303604 点 rn总下线收益 2111450.7 点 rn总新闻点 24415054.7 点 rn总广告收益 26800.00 元 rn系统维护截留 0.00 元 rn系统佣金补贴 0.00 元 rn本月总计发放佣金 26800.00 元 rn1万新闻点兑换现金 10.9768 元 rn最高佣金获得者 用户名 x****** rn姓名 薛 × × rn佣金额 823.14 元 rnrnrn*****************************************rn2004年7月份,新闻点兑换报表 rnrn会员数目 84954 人 rn总个人新闻点 19332581 点rn总下线收益 1871499.7 点rn总新闻点 21204080.7 点rn总广告收益 20600.00 元rn系统维护截留 0.00 元rn系统佣金补贴 0.00 元rn本月总计发放佣金 20600.00 元rn1万新闻点兑换现金 9.7151 元rn最高佣金获得者 用户名 a****** rn姓名 朱 × ×rn佣金额 530.59 元rn奖金 500.00 元rn合计 1030.59 元rn**************************************** rnrn比较一下就会发现会员数目一个月就增加了51024人,惊人啊,原因很简单他确确实实会寄钱给你,rn1万新闻点兑换现金也由9.7151升到了10.9768,增加了1.2617元,最高佣金获得者的佣金额由530.59rn元上升至823.14,整整多了292.55元。另外7月份有奖金500元,是在推荐下线比赛[第2期]中截止到rn2004-8-1 ,00:00:00止,下线收益最高者,可以获得额外的500.00元奖金!这样的比赛还将不定期rn推出,既可以发展下线赚得更多,又有机会赢得奖金,何乐而不为呢,我第一个月就发展了近200名下线,rn现在只有13.5万名会员,要知道中国上网人数有8000万呢,发展空间非常巨大! rnrnrn现在加入立即送你200点,只要免费注册后用你的用户名和密码登陆,点击智力问答,输入'剩余时间',rn即可获得200点,这是我对大家的奖励哟,心动了吧,现在就登陆下面的网址(可粘贴在地址栏中): rnrnhttp://www.ads4cn.com/newsbar/refferer.asp?luoqintao rnrnrn此外要告诉你的是这个广告条可以和cashfiesta同时打开赚钱,互不干扰,在同一个时点上能赚2笔钱,rn真是爽死了! rnrnrn如果你说这还是要干活的,那我推荐你上这个网址: rnrnhttp://cashlover.91x.netrnrn其中一个符合你的要求,你要做的就是免费注册,然后什么也不必做,也不用登陆该网站,rn就等着收美元,除了你向他申请支付!还有好多轻松赚钱的方法! rnrnrn想了解更多请登陆我的网站:http://cashlover.91x.net rnrn如无法登陆我的网址,可发e-mail: tooluck@tom.comrnrn不要忘了,好东西要告诉好朋友,不能独自享用哟 !也欢迎广大网友转载转帖 ! rnrn 论坛

没有更多推荐了,返回首页