1 assume cs:code 2 code segment 3 start: 4 mov bx,0b800h 5 mov es,bx 6 mov bx,20*2 7 ;年开始 8 mov al,9 9 out 70h,al 10 in al,71h 11 call zh 12 call xg 13 ;年结束 14 15 16 ;月开始 17 mov al,8 18 out 70h,al 19 in al,71h 20 call zh 21 call xg 22 ;月结束 23 24 ;日开始 25 mov al,7 26 out 70h,al 27 in al,71h 28 call zh 29 ;日结束 30 ;============================================= 31 ;年月日完毕 32 ;============================================= 33 mov byte ptr es:[160*12+bx],20H 34 add bx,2 35 36 ;时开始 37 mov al,4 38 out 70h,al 39 in al,71h 40 call zh 41 call mh 42 ;时结束 43 44 ;分开始 45 mov al,2 46 out 70h,al 47 in al,71h 48 call zh 49 call mh 50 ;分结束 51 52 ;秒开始 53 mov al,0 54 out 70h,al 55 in al,71h 56 call zh 57 ;秒结束 58 59 mov ax,4c00h 60 int 21h 61 62 63 zh: 64 mov ah,al 65 mov cl,4 66 shr ah,cl 67 and al,00001111b 68 69 add ah,30h 70 add al,30h 71 72 mov byte ptr es:[160*12+bx],ah 73 inc bx 74 mov byte ptr es:[160*12+bx],02H 75 inc bx 76 mov byte ptr es:[160*12+bx],al 77 inc bx 78 mov byte ptr es:[160*12+bx],02H 79 inc bx 80 81 ret 82 83 xg: 84 mov byte ptr es:[160*12+bx],2fh 85 inc bx 86 mov byte ptr es:[160*12+bx],02H 87 inc bx 88 ret 89 90 mh: 91 mov byte ptr es:[160*12+bx],3ah 92 inc bx 93 mov byte ptr es:[160*12+bx],02H 94 inc bx 95 ret 96 code ends 97 end start
与您一同分享精彩的网络世界
-486174组织成员
