Table of Contents
Advertisement
12FO
5F
3403
C
POP
01
;
RECOVER PO INTERS
12Fl
5E
3404
C
POP
SI
12F2
03 F3
3405
C
AOO
SI,BX
NEXT ROW
12F4
03 FB
3406
C
ADD
OI,BX
NEXT ROW
12f6
59
3407
C
POP
CX
RECOVER ROW COUNT
12F7
E2 EE
3408
C
LOOP
CRANK_A
DO MORE
12F9
5B
3409
C
POP
BX
12FA
C3
3410
C
RET
RETURN TO CALLER
12FB
3411
C
CRANK
ENOP
3412
C
12FB
3413
C
CRANK_ 4 PROC
NEAR
;
MOVE ROWS 0 F PELS DOWN
12FB
53
3414
C
PUSH
BX
3415
C
ASSUME
OS:ABSO
12FC
IE
3416
C
PUSH
OS
SAVE DATA SEGMENT
12FO
E8 0001 R
3417
C
CALL
DDS
;
SET DATA SEGMENT
1300
BB 1 E 044A R
3418
C
MOV
BX, CRT_COLS
1304
1F
3419
C
POp
OS
1305
3420
C
CRANK_B:
1305
51
3421
C
PUSH
CX
SAVE MOVE COUNT
1306
8A CA
3422
C
MOV
CL,OL
COLUMN COUNT
1308
2A ED
3423
C
SUB
CH,CH
CLEAR HIGH BYTE
130A
56
3424
C
PUSH
SI
SAVE PO INTERS
130B
57
3425
C
PUSH
01
130C
F3/ A4
3426
C
REP
MOVSB
MOVE THAT ROW
130E
5F
3427
C
POP
01
RECOVER PO INTERS
130F
5E
3428
C
POP
SI
1310
2B F3
3429
C
SUB
SI,BX
NEXT ROW
1312
2B FB
3430
C
SUB
01, BX
NEXT ROW
1314
59
3431
C
POP
CX
RECOVER ROW COUNT
1315
E2 EE
3432
C
LOOP
CRANK_B
DO MORE
1317
5B
3433
C
POP
BX
1318
C3
3434
C
RET
RETURN TO CALLER
1319
3435
C
CRANK_ 4 ENOP
3436
C
1319
3437
C
PART_l
PROC
NEAR
FILL ROW AFTER SCROLL
1319
52
3438
C
PUSH
OX
131A
B6 03
3439
C
mav
dh,3
131C
B2 C4
3440
C
MOV
OL, SEQ_AOOR
SEQUENCER
131E
B8 020F
3441
C
MOV
AX,020FH
MAP MASK
1321
E8 0018 R
3442
C
CALL
OUT_OX
;
ALL MAPS ON
1324
5A
3443
C
POP
OX
1325
2B CO
3444
C
SUB
AX,AX
ZERO
1327
8A CA
3445
C
MOV
CL,OL
COLUMN COUNT
1329
2A ED
3446
C
sub
ch, ch
132B
57
3447
C
PUSH
01
SAVE PO INTER
132C
F3/ AA
3448
C
REP
STOSB
CLEAR ONE ROW OF PELS
132E
5F
3449
C
POP
01
RECOVER PO INTER
132F
8A C6
3450
C
MOV
AL,OH
GET COLOR VALUE
1331
52
3451
C
PUSH
OX
1332
B6 03
3452
C
mav
dh,3
1334
B2 C4
3453
C
MOV
OL, SEQ_AOOR
SEQUENCER
1336
B4 02
3454
C
MOV
AH, 02H
MAP MASK
1338
E8 0018 R
3455
C
CALL
OUT OX
SET THE COLOR
133B
5A
3456
C
POP
OX -
133C
BO FF
31157
C
MOV
AL,OFFH
ALL BITS ON
133E
8A CA
3458
C
MOV
CL,OL
COLUMN COUNT
1340
57
3459
C
PUSH
01
SAVE PO INTER
1341
F3/ AA
3460
C
REP
STOS8
TURN ON THOSE BI TS IN
3461
C
ENABLED PLANES
1343
5F
3462
C
POP
01
RECOVER PO INTER
1344
C3
3463
C
RET
RETURN TO CALLER
1345
3464
C
PART_l
ENOP
3465
C
1345
3466
C
PART_2
PROC
NEAR
1345
B6 03
3467
C
mav
dh,3
1347
B2 C4
3468
C
MOV
OL,SEQ_AOOR
SEQUENCER
1349
B8 020F
3469
C
MOV
AX,020FH
MAP MASK, ALL MAPS
134C
E8 0018 R
3470
C
CALL
OUT_OX
ENABLE T,HE MAPS
134F
C3
3471
C
RET
RETURN TO CALLER
1350
3472
C
PART_2
ENOP
3473
C
1350
3474
C
BLNK_3
PROC
NEAR
BLANK FOR SCROLL UP
1350
IE
3475
C
PUSH
OS
SAVE DATA SEGMENT
3476
C
ASSUME
OS: ABSO
1351
E8 0001 R
3477
C
CALL
DOS
GET LOW MEMORY SEGMENT
1354
8A F7
3478
C
MOV
OH, BH
ATTRIBUTE FOR BLANK LINE
1356
2A FF
:>479
C
SUB
BH, BH
CLEAR HIGH BYTE
1358
50
3480
C
PUSH
AX
SAVE
1359
52
3481
C
PUSH
OX
SAVE BECAUSE OF MULT I PLY
135A
8B C3
3482
C
MOV
AX,BX
ROW COUNT
135C
F7 26 0485 R
3483
C
MUL
POINTS
CHARACTER HE I GHT
1360
8B 08
3484
C
MOV
BX,AX
NET VALUE TO BX
1362
5A
3485
C
POP
OX
RECOVER
1363
58
3486
C
POP
AX
3487
C
1364
1F
3488
C
POP
OS
3489
C
ASSUME
OS: NOTH I NG
1365
3490
C
S13:
1365
E8 1319 R
3491
C
CALL
PART 1
BLANK OUT ROW WITH COLOR
3492
C
ASSUME
OS: ASSO
1368
IE
3493
C
PUSH
OS
SAVE SEGMENT
1369
E8 0001 R
3494
C
CALL
DOS
LOW MEMORY SEGMENT
136C
03 3E 044A R
3495
C
ADD
OI,CRT_COLS
NEXT ROW
1370
1f
3496
C
POP
OS
RECOVER
1371
4B
3497
C
DEC
BX
NEXT
1372
75 Fl
3498
C
JNZ
513
DO MORE
1374
E8 1345 R
3499
C
CALL
PART_2
1377
C3
3500
C
RET
RETURN TO CALLER
1378
3501
C
BLNK_3
ENOP
3502
C
1378
3503
C
BLNK_ 4
PROC
NEAR
BLANK FOR SCROLL DOWN
1378
IE
3504
C
PUSH
OS
SAVE DATA SEGMENT
3505
C
ASSUME
OS: ABSO
1379
[8 0001 R
3506
C
CALL
DOS
GET LOW MEMORY SEGMENT
137C
8A F7
3507
C
MOV
OH, BH
ATTRIBUTE FOR BLANK LINE
137E
2A FF
3508
C
SUB
BH, BH
CLEAR HIGH BYTE
1380
50
3509
C
PUSH
AX
SAVE
1381
52
3510
C
PUSH
OX
SAVE BECAUSE OF MULTIPLY
1382
8B C3
3511
C
MOV
AX,BX
ROW COUNT
1384
F7 26 0485 R
3512
C
MUL
POI NTS
CHARACTER HE I GHT
1388
8B 08
3513
C
MOV
BX,AX
NET VALUE TO BX
138A
5A
3514
C
POP
OX
RECOVER
138B
58
3515
C
POP
AX
3516
C
138C
1F
3517
C
POP
OS
3518
C
ASSUME
OS: NOTH I NG
1380
3519
C
S13_4:
1380
E8 1319 R
3520
C
CALL
PART 1
BLANK OUT ROW WITH COLOR
3521
C
ASSUME
OS:ASSO
1390
IE
3522
C
PUSH
OS
SAVE SEGMENT
1391
E8 0001 R
3523
C
CALL
DDS
LOW MEMORY SEGMENT
1394
2B 3E 044A R
3524
C
SUB
OI,CRTJOLS
NEXT ROW
1398
1f
3525
C
POP
OS
RECOVER
1399
4B
3526
C
DEC
BX
NEXT
139A
75 Fl
3527
C
JNZ
S13 4
DO MORE
139C
E8 1345 R
3528
C
CALL
PART_2
IBM Enhanced Graphics Adapter 129
Advertisement
Chapters
Table of Contents
