home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The C Users' Group Library 1994 August
/
wc-cdrom-cusersgrouplibrary-1994-08.iso
/
listings
/
v_02_06
/
2n06046a
< prev
next >
Wrap
Text File
|
1991-04-17
|
2KB
|
47 lines
Figure 5: Macro Disassembled Version of Figure 4.
00000:0E20496E732D L0000H DB 0EH,' Ins-InsLine '
0000F:0D44656C2D44 L000FH DB CR,'Del-DelLine '
0001D:0D1B18191A L001DH DB CR,1BH,18H,19H,EOF
00022:2D437572736F DB '-Cursor '
0002B:0E416C742D57 L002BH DB 0EH,'Alt-W-Window '
0003A:0E416C742D52 L003AH DB 0EH,'Alt-R-Random '
00049:084573632D45 L0049H DB 8,'Esc-Exit'
;
P_0001 PROC NEAR
;
00052:5589E5 L0052H _ENTER
00055:31C0 XOR AX,AX
00057:9A44029900 CALL FAR PTR L0BD4H
0005C:C606460000 MOV [L1126H],OFFSET 0
00061:A14A00A33E00 AsgnInt L112AH,L111EH;int assign, ARG2:=ARG1
00067:A04A0030E4 CvrtB2I L112AH ;cvrt byte var 2 int (AX)
0006C:050001 ADD AX,0100H
0006F:50 PUSH AX
00070:9A6D013700 CALL FAR PTR TxtMode
00075:A0500030E4 CvrtB2I L1130H ;cvrt byte var 2 int (AX)
0007A:40 INC AX
0007B:A34000 MOV WORD PTR [L1120H],AX
0007E:A0510030E4 CvrtB2I L1131H ;cvrt byte var 2 int (AX)
00083:40 INC AX
00084:A34200 MOV WORD PTR [L1122H],AX
00087:B00150A04200 GotoXY 1,L1122H ;gotoxy(ARG1,ARG2)
00093:B000509A7302 TextBackground 0 ;set background color
0009B:B00F509A5902 TextColor 0FH ;set foreground color
000A3:BF5A011E57BF WrtStrCnstF L123AH,L0000H;Write fst str cnst
000B5:BF0F000E5731 WrtStrCnst L000FH ;Write next str const.
000C2:BF1D000E5731 WrtStrCnst L001DH ;Write next str const.
000CF:BF2B000E5731 WrtStrCnst L002BH ;Write next str const.
000DC:BF3A000E5731 WrtStrCnst L003AH ;Write next str const.
000E9:BF49000E5731 WrtStrCnst L0049H ;Write next str const.
000F6:9A5C0699009A CheckIO_Result
00100:B85000 MOV AX,OFFSET 80
00103:31D2 XOR DX,DX
00105:F7364000 DIV WORD PTR [L1120H]
00109:29064200 SUB WORD PTR [L1122H],AX
0010D:9AE4029900 CALL FAR PTR L0C74H
00112:89EC5DC3 _LEAVE
P_0001 ENDP