mirror of
https://github.com/wwarthen/RomWBW.git
synced 2026-02-06 14:11:48 -06:00
480 lines
6.9 KiB
NASM
480 lines
6.9 KiB
NASM
extrn .begin,.chl,.swt
|
||
extrn csave,cret,.move
|
||
global cache_,17
|
||
PUBLIC cnamept2_
|
||
cnamept2_: lxi d,.2
|
||
call csave
|
||
LXI H,.1+0
|
||
PUSH H
|
||
LXI H,cache_
|
||
PUSH H
|
||
CALL strcpy_
|
||
POP D
|
||
POP D
|
||
LXI H,cache_
|
||
PUSH H
|
||
LXI H,.1+17
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
POP D
|
||
LXI H,8-.2
|
||
DAD SP
|
||
MOV E,M
|
||
INX H
|
||
MOV D,M
|
||
LXI H,31
|
||
DAD D
|
||
MOV E,M
|
||
MVI D,0
|
||
XCHG
|
||
JMP .3
|
||
.5:
|
||
LXI H,.1+37
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .4
|
||
.6:
|
||
LXI H,.1+47
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .4
|
||
.7:
|
||
LXI H,.1+56
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .4
|
||
.3:
|
||
CALL .swt
|
||
DW 3
|
||
DW 0,.5
|
||
DW 1,.6
|
||
DW 2,.7
|
||
DW .4
|
||
.4:
|
||
CALL pager_
|
||
LXI H,cache_
|
||
PUSH H
|
||
LXI H,.1+68
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
POP D
|
||
LXI H,8-.2
|
||
DAD SP
|
||
MOV E,M
|
||
INX H
|
||
MOV D,M
|
||
LXI H,32
|
||
DAD D
|
||
MOV E,M
|
||
MVI D,0
|
||
XCHG
|
||
JMP .8
|
||
.10:
|
||
LXI H,.1+88
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .9
|
||
.11:
|
||
LXI H,.1+93
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .9
|
||
.8:
|
||
CALL .swt
|
||
DW 2
|
||
DW 0,.11
|
||
DW 1,.10
|
||
DW .9
|
||
.9:
|
||
CALL pager_
|
||
LXI H,cache_
|
||
PUSH H
|
||
LXI H,.1+99
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
POP D
|
||
LXI H,8-.2
|
||
DAD SP
|
||
MOV E,M
|
||
INX H
|
||
MOV D,M
|
||
LXI H,33
|
||
DAD D
|
||
MOV E,M
|
||
MVI D,0
|
||
XCHG
|
||
JMP .12
|
||
.14:
|
||
LXI H,.1+119
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .13
|
||
.15:
|
||
LXI H,.1+124
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .13
|
||
.12:
|
||
CALL .swt
|
||
DW 2
|
||
DW 0,.15
|
||
DW 1,.14
|
||
DW .13
|
||
.13:
|
||
CALL pager_
|
||
LXI H,cache_
|
||
PUSH H
|
||
LXI H,.1+130
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
POP D
|
||
LXI H,8-.2
|
||
DAD SP
|
||
MOV E,M
|
||
INX H
|
||
MOV D,M
|
||
LXI H,34
|
||
DAD D
|
||
MOV E,M
|
||
MVI D,0
|
||
XCHG
|
||
JMP .16
|
||
.18:
|
||
LXI H,.1+150
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .17
|
||
.19:
|
||
LXI H,.1+155
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .17
|
||
.16:
|
||
CALL .swt
|
||
DW 2
|
||
DW 0,.19
|
||
DW 1,.18
|
||
DW .17
|
||
.17:
|
||
CALL pager_
|
||
LXI H,cache_
|
||
PUSH H
|
||
LXI H,.1+161
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
POP D
|
||
LXI H,8-.2
|
||
DAD SP
|
||
MOV E,M
|
||
INX H
|
||
MOV D,M
|
||
LXI H,35
|
||
DAD D
|
||
MOV E,M
|
||
MVI D,0
|
||
XCHG
|
||
JMP .20
|
||
.22:
|
||
LXI H,.1+181
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .21
|
||
.23:
|
||
LXI H,.1+186
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .21
|
||
.20:
|
||
CALL .swt
|
||
DW 2
|
||
DW 0,.23
|
||
DW 1,.22
|
||
DW .21
|
||
.21:
|
||
CALL pager_
|
||
LXI H,8-.2
|
||
DAD SP
|
||
MOV E,M
|
||
INX H
|
||
MOV D,M
|
||
LXI H,35
|
||
DAD D
|
||
MOV E,M
|
||
MVI D,0
|
||
PUSH D
|
||
LXI H,1
|
||
POP D
|
||
CALL .eq
|
||
JZ .24
|
||
LXI H,cache_
|
||
PUSH H
|
||
LXI H,.1+192
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
POP D
|
||
LXI H,8-.2
|
||
DAD SP
|
||
MOV E,M
|
||
INX H
|
||
MOV D,M
|
||
LXI H,36
|
||
DAD D
|
||
MOV E,M
|
||
MVI D,0
|
||
XCHG
|
||
JMP .25
|
||
.27:
|
||
LXI H,.1+212
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .26
|
||
.28:
|
||
LXI H,.1+219
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .26
|
||
.29:
|
||
LXI H,.1+232
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .26
|
||
.30:
|
||
LXI H,.1+243
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .26
|
||
.31:
|
||
LXI H,.1+254
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .26
|
||
.25:
|
||
CALL .swt
|
||
DW 4
|
||
DW 0,.27
|
||
DW 1,.28
|
||
DW 2,.29
|
||
DW 3,.30
|
||
DW .31
|
||
.26:
|
||
CALL pager_
|
||
LXI H,cache_
|
||
PUSH H
|
||
LXI H,.1+264
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
POP D
|
||
LXI H,8-.2
|
||
DAD SP
|
||
MOV E,M
|
||
INX H
|
||
MOV D,M
|
||
LXI H,37
|
||
DAD D
|
||
MOV E,M
|
||
MVI D,0
|
||
XCHG
|
||
JMP .32
|
||
.34:
|
||
LXI H,.1+284
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
LXI H,.1+291
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .33
|
||
.35:
|
||
LXI H,.1+329
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
LXI H,.1+336
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .33
|
||
.36:
|
||
LXI H,.1+376
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
LXI H,.1+383
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .33
|
||
.37:
|
||
LXI H,.1+422
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
LXI H,.1+429
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .33
|
||
.38:
|
||
LXI H,.1+468
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .33
|
||
.32:
|
||
CALL .swt
|
||
DW 4
|
||
DW 0,.34
|
||
DW 1,.35
|
||
DW 2,.36
|
||
DW 3,.37
|
||
DW .38
|
||
.33:
|
||
CALL pager_
|
||
LXI H,cache_
|
||
PUSH H
|
||
LXI H,.1+478
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
POP D
|
||
LXI H,8-.2
|
||
DAD SP
|
||
MOV E,M
|
||
INX H
|
||
MOV D,M
|
||
LXI H,38
|
||
DAD D
|
||
MOV E,M
|
||
MVI D,0
|
||
XCHG
|
||
JMP .39
|
||
.41:
|
||
LXI H,.1+498
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
LXI H,.1+505
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .40
|
||
.42:
|
||
LXI H,.1+543
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
LXI H,.1+550
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .40
|
||
.43:
|
||
LXI H,.1+590
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
LXI H,.1+597
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .40
|
||
.44:
|
||
LXI H,.1+636
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
LXI H,.1+643
|
||
PUSH H
|
||
CALL printf_
|
||
POP D
|
||
JMP .40
|
||
.39:
|
||
CALL .swt
|
||
DW 4
|
||
DW 0,.41
|
||
DW 1,.42
|
||
DW 2,.43
|
||
DW 3,.44
|
||
DW .40
|
||
.40:
|
||
CALL pager_
|
||
.24:
|
||
RET
|
||
.2 EQU 0
|
||
.1:
|
||
DB 115,121,115,99,102,103,45,62,99,110,102,103,100,97,116
|
||
DB 97,0,37,115,46,99,108,114,114,97,109,100,107,32,32
|
||
DB 32,32,32,32,61,32,0,67,76,82,95,78,69,86,69
|
||
DB 82,0,67,76,82,95,65,85,84,79,0,67,76,82,95
|
||
DB 65,76,76,87,65,89,83,0,37,115,46,100,115,107,121
|
||
DB 101,110,97,98,108,101,32,32,32,32,61,32,0,84,82
|
||
DB 85,69,0,70,65,76,83,69,0,37,115,46,117,97,114
|
||
DB 116,101,110,97,98,108,101,32,32,32,32,61,32,0,84
|
||
DB 82,85,69,0,70,65,76,83,69,0,37,115,46,118,100
|
||
DB 117,101,110,97,98,108,101,32,32,32,32,32,61,32,0
|
||
DB 84,82,85,69,0,70,65,76,83,69,0,37,115,46,102
|
||
DB 100,101,110,97,98,108,101,32,32,32,32,32,32,61,32
|
||
DB 0,84,82,85,69,0,70,65,76,83,69,0,37,115,46
|
||
DB 102,100,116,114,97,99,101,32,32,32,32,32,32,32,61
|
||
DB 32,0,83,105,108,101,110,116,0,70,97,116,97,108,32
|
||
DB 69,114,114,111,114,115,0,65,108,108,32,69,114,114,111
|
||
DB 114,115,0,69,118,101,114,121,116,104,105,110,103,0,85
|
||
DB 110,107,110,111,119,110,33,33,0,37,115,46,102,100,109
|
||
DB 101,100,105,97,32,32,32,32,32,32,32,61,32,0,70
|
||
DB 68,77,55,50,48,0,32,32,51,46,53,32,55,50,48
|
||
DB 75,66,32,50,45,115,105,100,101,100,32,56,48,32,84
|
||
DB 114,107,115,32,57,32,83,101,99,116,111,114,115,0,70
|
||
DB 68,77,49,52,52,0,32,32,51,46,53,32,49,46,52
|
||
DB 52,77,66,32,50,45,115,105,100,101,100,32,56,48,32
|
||
DB 84,114,107,115,32,49,56,32,83,101,99,116,111,114,115
|
||
DB 0,70,68,77,51,54,48,0,32,32,53,46,50,53,32
|
||
DB 51,54,48,75,66,32,50,45,115,105,100,101,100,32,52
|
||
DB 48,32,84,114,107,115,32,57,32,83,101,99,116,111,114
|
||
DB 115,0,70,68,77,49,50,48,0,32,32,51,46,53,32
|
||
DB 49,46,50,77,66,32,50,45,115,105,100,101,100,32,56
|
||
DB 48,32,84,114,107,115,32,49,53,32,83,101,99,116,111
|
||
DB 114,115,0,85,110,107,110,111,119,110,33,33,0,37,115
|
||
DB 46,102,100,109,101,100,105,97,97,108,116,32,32,32,32
|
||
DB 61,32,0,70,68,77,55,50,48,0,32,32,51,46,53
|
||
DB 32,55,50,48,75,66,32,50,45,115,105,100,101,100,32
|
||
DB 56,48,32,84,114,107,115,32,57,32,83,101,99,116,111
|
||
DB 114,115,0,70,68,77,49,52,52,0,32,32,51,46,53
|
||
DB 32,49,46,52,52,77,66,32,50,45,115,105,100,101,100
|
||
DB 32,56,48,32,84,114,107,115,32,49,56,32,83,101,99
|
||
DB 116,111,114,115,0,70,68,77,51,54,48,0,32,32,53
|
||
DB 46,50,53,32,51,54,48,75,66,32,50,45,115,105,100
|
||
DB 101,100,32,52,48,32,84,114,107,115,32,57,32,83,101
|
||
DB 99,116,111,114,115,0,70,68,77,49,50,48,0,32,32
|
||
DB 51,46,53,32,49,46,50,77,66,32,50,45,115,105,100
|
||
DB 101,100,32,56,48,32,84,114,107,115,32,49,53,32,83
|
||
DB 101,99,116,111,114,115,0
|
||
extrn printf_
|
||
extrn strcpy_
|
||
extrn pager_
|
||
extrn .eq
|
||
END
|
||
|