crc校驗程序源代碼

1、程序源代碼disp macro m lea dx,m mov ah,9 int 21hODH endm:顯示字符的宏定義stack1 segment para stack stack db 200 dup (0)stack1 endsdata1 segmentstr0 DB OAH,ODH,*Sstr1 DB 0AH,0DH * *Sstr2 DB 0AH,0DH, * NNNNNNNNN s NNNNNNNNNNNNNNNNNNNN *$str3 DB 0AH,0DH, * DNBNN=- zNNN- (NNNNKsNNNNz- *$str4 DB 0AH,0DH, * =NNNB sNNN

2、 zNNN= NNNN+*Sstr5 DB 0AH,0DH, * BNNN< zNNN +NBN= zNBNz*Sstr6 DB 0AH,0DH, * NND sNNN hNNN( BNNN-*Sstr7 DB 0AH,0DH, * -NBN zNNN- +NNND NNND*Sstr8 DB 0AH,0DH, * sNNN< zNNNhzzDNNNB <NNNz *Sstr9 DB 0AH,0DH, * zNBN< zNNNNNNNBBz- <NNNz*SStr10 DB 0AH,0DH, * sNNN+ zNNNNNNNND <NNNz*SStr11 D

3、B 0AH,0DH, * =NNNz zNNN=<sNNND (NNNB*SStr12 DB 0AH,0DH, * <NNNB sNBN- =NNNhNNNN( *SStr13 DB 0AH,0DH, * BBNNz sNNN DNNN+ hNNND*SStr14 DB 0AH,0DH, * =NNNNs zNNN NNN- NNND-*SStr15 DB 0AH,0DH, * NNNNNNNNNN sNNN BNBNKNNNNNNNNNN *SStr16 DB 0AH,0DH *SStr17 DB 0AH,0DH,*SStr18 DB 0AH,0DH， *SStr19 DB 0A

4、H,0DH, * Press s to start the programme*SStr20 DB 0AH,0DH, * Press q to quit the programme*SStr21 DB 0AH,0DH, * Press c to clear the programme*SStr22 DB 0AH,0DH, * Cyclic Redundancy Check Programme BULID BY tl*SStr23 DB 0AH,0DH,*S:LOGO及提示Str_enter db 0ah,0dh,$Crc16 table label word :00h dw 00000h, 0

5、C0C1h, 0C181h, 00140h, 0C301h, 003C0h, 00280h, 0C241h dw 0C601h, 006C0h, 00780h, 0C741h, 00500h, 0C5C1h, 0C481h, 00440h dw 0CC01h, 00CC0h, 00D80h, 0CD41h, 00F00h, 0CFC1h, 0CE81h, 00E40h dw 00A00h, 0CAC1h, 0CB81h, 00B40h, 0C901h, 009C0h, 00880h, 0C841h : 20hdw 0D801B, 018C0H, 01980H, 0D941H, 01B00H,

6、0DBC1H, 0DA81H, 01A40H dw 01E00H, 0DEC1H, 0DF81H, 01F40H, 0DD01H, 01DC0H, 01C80H, 0DC41H dw 01400H, 0D4C1H, 0D581H, 01540H, 0D701H, 017C0H, 01680H, 0D641H dw 0D201H, 012C0H, 01380H, 0D341H, 01100H, 0D1C1H, 0D081H, 01040H : 40hdw 0F001H, 030C0H, 03180H, 0F141H, 03300H, 0F3C1H, 0F281H, 03240H dw 03600

7、H, 0F6C1H, 0F781H, 03740H, 0F501H, 035C0H, 03480H, 0F441H dw 03C00H, 0FCC1H, 0FD81H, 03D40H, 0FF01H, 03FC0H, 03E80H, 0FE41H dw 0FA01H, 03AC0H, 03B80H, 0FB41H, 03900H, 0F9C1H, 0F881H, 03840H: 60hdw 02800H, 0E8C1H, 0E981H, 0294OH, 0EB01H, 02BC0H, 02A80H, 0EA41H dw 0EE01H, 02EC0H, 02F80H, 0EF41H, 02D00

8、H, 0EDC1H, 0EC81H, 02C40H dw 0E401H, 024C0H, 02580H, 0E541H, 02700H, 0E7C1H, 0E681H, 02640H dw 02200H, 0E2C1H, 0E2C1H, 0E381H, 02340H, 0E101H, 021COH, 02080H, 0E041H: 80hdw 0A001H, 060C0H, 06180H, 0A141H, 06300H, 0A3C1H, 0A281H, 06240H dw 06600H, 0A6C1H, 0A781H, 06740H, 0A501H, 065C0H, 06480H, 0A441

9、H dw 06C00H, 0ACC1H, 0AD81H, 06D40H, 0AF01H, 06FC0H, 06E80H, 0AE41H dw 0AA01H, 06AC0H, 06B80H, 0AB41H, 06900H, 0A9C1H, 0A881H, 06840H:A0hdw 07800H, 0B8C1H, 0B981H, 07940H, 0BB01H, 07BC0H, 07A80H, 0BA41H dw 0BE01H, 07EC0H, 07F80H, 0BF41H, 07D00H, 0BDC1H, 0BC81H, 07C40H dw 0B401H, 074C0H, 07580H, 0B54

10、1H, 07700H, 0B7C1H, 0B681H, 07640H dw 07200H, 0B2C1H, 0B381H, 07340H, 0B101H, 071C0H, 07080H, 0B041H:C0hdw 05000H,090C1H,09181H,05140H,09301H,053C0H,05280H,09241Hdw 09601H,056C0H,05780H,09741H,05500H,095C1H,09481H,05440Hdw 09C01H,05CC0H,05D80H,09D41H,05F00H,09FC1H,09E81H,05E40Hdw 05A00H,09AC1H,09B81

11、H,05B40H,09901H,059C0H,05880H,09841H:E0hdw 08801H,048C0H,04980H,08941H,04B00H,08BC1H,08A81H,04A40Hdw 04E00H,08EC1H,08F81H,04F30H,08D01H,04DC0H,04C80H,08C41Hdw 04E00H,084C1H,08581H,04540H,08701H,047C0H,04680H,08641Hdw 08201H,042C0H,04380H,08341H,04100H,081C1H,08081H,04040H;CRC16 TABLEdata_buf DB 200

12、dup(?),$crc dw ?len dw ?info db 0AH,0DH,The CRC Code is : $info_input db 0AH,0DH,Please input the string :$data1 endscode segmentassume cs:code,ds:data1,ss:stack1STARTMain proc fardisplay_logmov ax,data1mov ds,axdisp str0disp str1disp str2disp str3disp str4disp str5disp str6disp str7disp str8disp st

13、r9disp str10disp str11disp str12disp str13disp str14disp str15disp str16disp str17disp str18disp str19disp str20disp str21disp str22disp str23;顯示LOGO及提示信息choose_function:mov ah,8int 21h;cmp al,sjz startp;為s則跳到startpcmp al,pjz quit;為q則跳到quitcmp al cjz clear;為c則跳到cleardisp str_error否則顯示錯誤信息jmp display

14、_logstartp:disp info_input;提示輸入call windows_main；調(diào)用windows_main開始計算jmp display_logclear:call clear_screen；調(diào)用clear_screen清屏jmp display_logquit: mov ah,4chint 21h；結(jié)束retmain endpclear_screen proc naer；清屏push axpush bxpush cxpush dxmov ah,6mov al,0mov ch,0mov cl,0mov dh,24mov dl,79mov bh,7int 10hmov dh,

15、1mov dl,1mov ah,2mov bh,0int 10hpop dxpop cxpop bxpop axretclear_screen endpwindows_main proc nearlea di,data_bufcall get_string ;調(diào)用get_string讀取輸入字符lea si,data_bufcall cal_len ；調(diào)用cal_len計算讀取字符長度lea si,data_bufcall cal_crc16 ；調(diào)用cal_crc計算CRCdisp infomov bx,crccall Hex_Ascii ;調(diào)用Hex_Ascii轉(zhuǎn)化成16進(jìn)制cal:mov

16、ah,6hmov dl,0ffhint 21hcmp al,0dh;如果檢測到回車則跳出jz exit2jmp calexit2:retwindows_main endp；查表法計算CRC；入口：DS：SI=buffer地址； CX buffer=長度 ； DX= CRC的初始值；出口：DX=CRCcal_crc16 proc nearpush cxpush dxmov cx,lenmov dx,0call crc16mov crc,dx;初始化入口出口pop dxpop cxretcal_crc16 endpcrc16 proc nearpush cxpush bxpush sicrc16_

17、loop:xor ax,axmov al,siinc sixor al,dlshl ax,1mov bx,axmov ax,bx+crc16_tablexor al dhmov dx,axdec cxjnz crc16_loop;查表pop sipop bxpop cxretcrc16 endpget_string proc near;讀取字符串input:mov ah,1int 21hcmp al,0dhjz exit3mov di,alinc dijmp inputexit3:inc dimov DS:di,$retget_string endpcal_len proc nearpush bxpush axpush simov bx,0continue:mov al,sicmp al,$jz exit1inc siinc bxjmp continueexit1:mov len,bxpop sipop axpop bxretcal_len e