mirror of
https://github.com/wwarthen/RomWBW.git
synced 2026-02-06 22:23:13 -06:00
2430 lines
20 KiB
NASM
2430 lines
20 KiB
NASM
extrn .begin,.chl,.swt
|
||
extrn csave,cret,.move
|
||
global c_,2
|
||
global d_,2
|
||
global v_,2
|
||
DSEG
|
||
public data_
|
||
data_:
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 60
|
||
DB 60
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 240
|
||
DB 240
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 60
|
||
DB 60
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 240
|
||
DB 240
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 255
|
||
DB 255
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 32
|
||
DB 112
|
||
DB 248
|
||
DB 112
|
||
DB 32
|
||
DB 0
|
||
DB 0
|
||
DB 248
|
||
DB 216
|
||
DB 136
|
||
DB 0
|
||
DB 136
|
||
DB 216
|
||
DB 248
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 24
|
||
DB 24
|
||
DB 32
|
||
DB 96
|
||
DB 144
|
||
DB 96
|
||
DB 0
|
||
DB 0
|
||
DB 32
|
||
DB 80
|
||
DB 32
|
||
DB 32
|
||
DB 112
|
||
DB 32
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 168
|
||
DB 80
|
||
DB 80
|
||
DB 216
|
||
DB 80
|
||
DB 80
|
||
DB 168
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 252
|
||
DB 252
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 16
|
||
DB 48
|
||
DB 112
|
||
DB 240
|
||
DB 112
|
||
DB 48
|
||
DB 16
|
||
DB 0
|
||
DB 32
|
||
DB 112
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 112
|
||
DB 32
|
||
DB 0
|
||
DB 80
|
||
DB 80
|
||
DB 80
|
||
DB 80
|
||
DB 0
|
||
DB 80
|
||
DB 0
|
||
DB 0
|
||
DB 120
|
||
DB 168
|
||
DB 168
|
||
DB 104
|
||
DB 40
|
||
DB 40
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 252
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 252
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 240
|
||
DB 240
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 32
|
||
DB 112
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 60
|
||
DB 60
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 0
|
||
DB 16
|
||
DB 24
|
||
DB 252
|
||
DB 24
|
||
DB 16
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 32
|
||
DB 96
|
||
DB 252
|
||
DB 96
|
||
DB 32
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 120
|
||
DB 120
|
||
DB 48
|
||
DB 0
|
||
DB 48
|
||
DB 0
|
||
DB 0
|
||
DB 216
|
||
DB 216
|
||
DB 80
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 72
|
||
DB 72
|
||
DB 252
|
||
DB 72
|
||
DB 72
|
||
DB 252
|
||
DB 72
|
||
DB 72
|
||
DB 32
|
||
DB 120
|
||
DB 160
|
||
DB 120
|
||
DB 36
|
||
DB 248
|
||
DB 32
|
||
DB 0
|
||
DB 0
|
||
DB 200
|
||
DB 208
|
||
DB 32
|
||
DB 88
|
||
DB 152
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 72
|
||
DB 72
|
||
DB 80
|
||
DB 96
|
||
DB 144
|
||
DB 120
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 64
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 16
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 16
|
||
DB 0
|
||
DB 32
|
||
DB 16
|
||
DB 16
|
||
DB 16
|
||
DB 16
|
||
DB 16
|
||
DB 32
|
||
DB 0
|
||
DB 32
|
||
DB 168
|
||
DB 112
|
||
DB 248
|
||
DB 112
|
||
DB 168
|
||
DB 32
|
||
DB 0
|
||
DB 0
|
||
DB 32
|
||
DB 32
|
||
DB 248
|
||
DB 32
|
||
DB 32
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 64
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 0
|
||
DB 4
|
||
DB 8
|
||
DB 16
|
||
DB 32
|
||
DB 64
|
||
DB 128
|
||
DB 0
|
||
DB 0
|
||
DB 112
|
||
DB 152
|
||
DB 168
|
||
DB 168
|
||
DB 168
|
||
DB 200
|
||
DB 112
|
||
DB 0
|
||
DB 32
|
||
DB 96
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 248
|
||
DB 0
|
||
DB 32
|
||
DB 80
|
||
DB 16
|
||
DB 32
|
||
DB 64
|
||
DB 128
|
||
DB 248
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 8
|
||
DB 112
|
||
DB 8
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 48
|
||
DB 80
|
||
DB 144
|
||
DB 248
|
||
DB 16
|
||
DB 16
|
||
DB 16
|
||
DB 0
|
||
DB 248
|
||
DB 128
|
||
DB 128
|
||
DB 240
|
||
DB 8
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 56
|
||
DB 64
|
||
DB 128
|
||
DB 240
|
||
DB 136
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 248
|
||
DB 8
|
||
DB 16
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 136
|
||
DB 112
|
||
DB 136
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 136
|
||
DB 120
|
||
DB 8
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 96
|
||
DB 0
|
||
DB 16
|
||
DB 32
|
||
DB 64
|
||
DB 128
|
||
DB 64
|
||
DB 32
|
||
DB 16
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 64
|
||
DB 32
|
||
DB 16
|
||
DB 8
|
||
DB 16
|
||
DB 32
|
||
DB 64
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 8
|
||
DB 48
|
||
DB 32
|
||
DB 0
|
||
DB 32
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 184
|
||
DB 176
|
||
DB 128
|
||
DB 128
|
||
DB 112
|
||
DB 0
|
||
DB 32
|
||
DB 80
|
||
DB 136
|
||
DB 248
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 0
|
||
DB 240
|
||
DB 72
|
||
DB 72
|
||
DB 112
|
||
DB 72
|
||
DB 72
|
||
DB 240
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 128
|
||
DB 128
|
||
DB 128
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 240
|
||
DB 72
|
||
DB 72
|
||
DB 72
|
||
DB 72
|
||
DB 72
|
||
DB 240
|
||
DB 0
|
||
DB 248
|
||
DB 136
|
||
DB 128
|
||
DB 224
|
||
DB 128
|
||
DB 136
|
||
DB 248
|
||
DB 0
|
||
DB 248
|
||
DB 136
|
||
DB 128
|
||
DB 240
|
||
DB 128
|
||
DB 128
|
||
DB 128
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 128
|
||
DB 184
|
||
DB 136
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 248
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 0
|
||
DB 248
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 248
|
||
DB 0
|
||
DB 28
|
||
DB 8
|
||
DB 8
|
||
DB 8
|
||
DB 8
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 136
|
||
DB 144
|
||
DB 160
|
||
DB 192
|
||
DB 160
|
||
DB 144
|
||
DB 136
|
||
DB 0
|
||
DB 128
|
||
DB 128
|
||
DB 128
|
||
DB 128
|
||
DB 128
|
||
DB 136
|
||
DB 248
|
||
DB 0
|
||
DB 136
|
||
DB 216
|
||
DB 168
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 0
|
||
DB 136
|
||
DB 200
|
||
DB 168
|
||
DB 168
|
||
DB 168
|
||
DB 152
|
||
DB 136
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 240
|
||
DB 136
|
||
DB 136
|
||
DB 240
|
||
DB 128
|
||
DB 128
|
||
DB 128
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 168
|
||
DB 152
|
||
DB 120
|
||
DB 4
|
||
DB 240
|
||
DB 136
|
||
DB 136
|
||
DB 240
|
||
DB 160
|
||
DB 144
|
||
DB 136
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 64
|
||
DB 32
|
||
DB 16
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 248
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 112
|
||
DB 0
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 80
|
||
DB 80
|
||
DB 80
|
||
DB 32
|
||
DB 0
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 168
|
||
DB 168
|
||
DB 168
|
||
DB 80
|
||
DB 0
|
||
DB 136
|
||
DB 136
|
||
DB 80
|
||
DB 32
|
||
DB 80
|
||
DB 136
|
||
DB 136
|
||
DB 0
|
||
DB 136
|
||
DB 136
|
||
DB 80
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 0
|
||
DB 248
|
||
DB 136
|
||
DB 16
|
||
DB 32
|
||
DB 64
|
||
DB 136
|
||
DB 248
|
||
DB 0
|
||
DB 120
|
||
DB 64
|
||
DB 64
|
||
DB 64
|
||
DB 64
|
||
DB 64
|
||
DB 120
|
||
DB 0
|
||
DB 0
|
||
DB 128
|
||
DB 64
|
||
DB 32
|
||
DB 16
|
||
DB 8
|
||
DB 0
|
||
DB 0
|
||
DB 120
|
||
DB 8
|
||
DB 8
|
||
DB 8
|
||
DB 8
|
||
DB 8
|
||
DB 120
|
||
DB 0
|
||
DB 32
|
||
DB 80
|
||
DB 136
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 96
|
||
DB 96
|
||
DB 16
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 240
|
||
DB 8
|
||
DB 120
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 128
|
||
DB 128
|
||
DB 128
|
||
DB 240
|
||
DB 136
|
||
DB 136
|
||
DB 240
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 112
|
||
DB 128
|
||
DB 128
|
||
DB 112
|
||
DB 0
|
||
DB 8
|
||
DB 8
|
||
DB 8
|
||
DB 120
|
||
DB 136
|
||
DB 136
|
||
DB 120
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 248
|
||
DB 128
|
||
DB 112
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 72
|
||
DB 224
|
||
DB 64
|
||
DB 64
|
||
DB 64
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 56
|
||
DB 72
|
||
DB 72
|
||
DB 56
|
||
DB 8
|
||
DB 112
|
||
DB 0
|
||
DB 128
|
||
DB 128
|
||
DB 176
|
||
DB 200
|
||
DB 136
|
||
DB 136
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 32
|
||
DB 0
|
||
DB 96
|
||
DB 32
|
||
DB 112
|
||
DB 0
|
||
DB 0
|
||
DB 8
|
||
DB 0
|
||
DB 24
|
||
DB 8
|
||
DB 8
|
||
DB 72
|
||
DB 48
|
||
DB 128
|
||
DB 128
|
||
DB 144
|
||
DB 160
|
||
DB 192
|
||
DB 160
|
||
DB 144
|
||
DB 0
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 80
|
||
DB 168
|
||
DB 168
|
||
DB 136
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 176
|
||
DB 200
|
||
DB 136
|
||
DB 136
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 112
|
||
DB 72
|
||
DB 72
|
||
DB 112
|
||
DB 64
|
||
DB 64
|
||
DB 0
|
||
DB 96
|
||
DB 56
|
||
DB 72
|
||
DB 72
|
||
DB 56
|
||
DB 8
|
||
DB 8
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 176
|
||
DB 200
|
||
DB 128
|
||
DB 128
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 96
|
||
DB 128
|
||
DB 96
|
||
DB 16
|
||
DB 96
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 64
|
||
DB 224
|
||
DB 64
|
||
DB 64
|
||
DB 32
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 144
|
||
DB 144
|
||
DB 144
|
||
DB 104
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 136
|
||
DB 136
|
||
DB 80
|
||
DB 32
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 136
|
||
DB 168
|
||
DB 168
|
||
DB 80
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 72
|
||
DB 48
|
||
DB 48
|
||
DB 72
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 136
|
||
DB 80
|
||
DB 32
|
||
DB 64
|
||
DB 128
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 248
|
||
DB 16
|
||
DB 32
|
||
DB 64
|
||
DB 248
|
||
DB 0
|
||
DB 16
|
||
DB 32
|
||
DB 32
|
||
DB 64
|
||
DB 32
|
||
DB 32
|
||
DB 16
|
||
DB 0
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 0
|
||
DB 32
|
||
DB 32
|
||
DB 32
|
||
DB 0
|
||
DB 64
|
||
DB 32
|
||
DB 32
|
||
DB 16
|
||
DB 32
|
||
DB 32
|
||
DB 64
|
||
DB 0
|
||
DB 108
|
||
DB 144
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 112
|
||
DB 80
|
||
DB 80
|
||
DB 80
|
||
DB 80
|
||
DB 80
|
||
DB 112
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 32
|
||
DB 64
|
||
DB 240
|
||
DB 8
|
||
DB 120
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 16
|
||
DB 32
|
||
DB 0
|
||
DB 96
|
||
DB 32
|
||
DB 32
|
||
DB 248
|
||
DB 0
|
||
DB 16
|
||
DB 32
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 16
|
||
DB 32
|
||
DB 0
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 116
|
||
DB 0
|
||
DB 16
|
||
DB 32
|
||
DB 0
|
||
DB 176
|
||
DB 200
|
||
DB 136
|
||
DB 136
|
||
DB 0
|
||
DB 16
|
||
DB 32
|
||
DB 0
|
||
DB 200
|
||
DB 168
|
||
DB 152
|
||
DB 136
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 136
|
||
DB 124
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 32
|
||
DB 0
|
||
DB 32
|
||
DB 32
|
||
DB 64
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 128
|
||
DB 128
|
||
DB 128
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 4
|
||
DB 4
|
||
DB 4
|
||
DB 136
|
||
DB 144
|
||
DB 168
|
||
DB 84
|
||
DB 136
|
||
DB 28
|
||
DB 0
|
||
DB 0
|
||
DB 136
|
||
DB 144
|
||
DB 168
|
||
DB 88
|
||
DB 184
|
||
DB 8
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 0
|
||
DB 48
|
||
DB 120
|
||
DB 120
|
||
DB 48
|
||
DB 0
|
||
DB 0
|
||
DB 20
|
||
DB 40
|
||
DB 80
|
||
DB 160
|
||
DB 80
|
||
DB 40
|
||
DB 20
|
||
DB 0
|
||
DB 160
|
||
DB 80
|
||
DB 40
|
||
DB 20
|
||
DB 40
|
||
DB 80
|
||
DB 160
|
||
DB 0
|
||
DB 84
|
||
DB 170
|
||
DB 84
|
||
DB 170
|
||
DB 84
|
||
DB 170
|
||
DB 84
|
||
DB 170
|
||
DB 170
|
||
DB 84
|
||
DB 170
|
||
DB 84
|
||
DB 170
|
||
DB 84
|
||
DB 170
|
||
DB 84
|
||
DB 182
|
||
DB 108
|
||
DB 218
|
||
DB 182
|
||
DB 108
|
||
DB 218
|
||
DB 182
|
||
DB 108
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 248
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 24
|
||
DB 248
|
||
DB 24
|
||
DB 248
|
||
DB 24
|
||
DB 24
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 236
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 108
|
||
DB 236
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 236
|
||
DB 12
|
||
DB 236
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 14
|
||
DB 238
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 108
|
||
DB 236
|
||
DB 12
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 100
|
||
DB 100
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 240
|
||
DB 48
|
||
DB 48
|
||
DB 240
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 240
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 60
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 60
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 252
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 60
|
||
DB 48
|
||
DB 60
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 216
|
||
DB 216
|
||
DB 220
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 220
|
||
DB 192
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 192
|
||
DB 220
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 220
|
||
DB 192
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 220
|
||
DB 192
|
||
DB 220
|
||
DB 216
|
||
DB 216
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 220
|
||
DB 0
|
||
DB 220
|
||
DB 216
|
||
DB 216
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 48
|
||
DB 48
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 60
|
||
DB 48
|
||
DB 48
|
||
DB 60
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 62
|
||
DB 48
|
||
DB 62
|
||
DB 48
|
||
DB 48
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 220
|
||
DB 216
|
||
DB 216
|
||
DB 216
|
||
DB 48
|
||
DB 48
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 240
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 60
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 192
|
||
DB 192
|
||
DB 192
|
||
DB 192
|
||
DB 192
|
||
DB 192
|
||
DB 192
|
||
DB 192
|
||
DB 192
|
||
DB 192
|
||
DB 12
|
||
DB 12
|
||
DB 12
|
||
DB 12
|
||
DB 12
|
||
DB 12
|
||
DB 12
|
||
DB 12
|
||
DB 12
|
||
DB 12
|
||
DB 12
|
||
DB 12
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 104
|
||
DB 144
|
||
DB 144
|
||
DB 104
|
||
DB 0
|
||
DB 112
|
||
DB 136
|
||
DB 136
|
||
DB 176
|
||
DB 136
|
||
DB 136
|
||
DB 240
|
||
DB 64
|
||
DB 240
|
||
DB 144
|
||
DB 128
|
||
DB 128
|
||
DB 128
|
||
DB 128
|
||
DB 128
|
||
DB 0
|
||
DB 248
|
||
DB 80
|
||
DB 80
|
||
DB 80
|
||
DB 80
|
||
DB 72
|
||
DB 0
|
||
DB 0
|
||
DB 248
|
||
DB 136
|
||
DB 64
|
||
DB 32
|
||
DB 64
|
||
DB 136
|
||
DB 248
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 124
|
||
DB 136
|
||
DB 136
|
||
DB 112
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 136
|
||
DB 136
|
||
DB 136
|
||
DB 112
|
||
DB 128
|
||
DB 0
|
||
DB 0
|
||
DB 116
|
||
DB 152
|
||
DB 16
|
||
DB 16
|
||
DB 28
|
||
DB 0
|
||
DB 252
|
||
DB 16
|
||
DB 56
|
||
DB 68
|
||
DB 56
|
||
DB 16
|
||
DB 252
|
||
DB 0
|
||
DB 48
|
||
DB 204
|
||
DB 204
|
||
DB 252
|
||
DB 204
|
||
DB 204
|
||
DB 56
|
||
DB 0
|
||
DB 120
|
||
DB 132
|
||
DB 132
|
||
DB 132
|
||
DB 72
|
||
DB 72
|
||
DB 132
|
||
DB 0
|
||
DB 60
|
||
DB 64
|
||
DB 56
|
||
DB 68
|
||
DB 68
|
||
DB 68
|
||
DB 56
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 108
|
||
DB 146
|
||
DB 146
|
||
DB 108
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 56
|
||
DB 88
|
||
DB 104
|
||
DB 112
|
||
DB 0
|
||
DB 56
|
||
DB 64
|
||
DB 128
|
||
DB 248
|
||
DB 128
|
||
DB 64
|
||
DB 56
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 48
|
||
DB 204
|
||
DB 204
|
||
DB 204
|
||
DB 204
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 16
|
||
DB 16
|
||
DB 124
|
||
DB 16
|
||
DB 16
|
||
DB 0
|
||
DB 254
|
||
DB 0
|
||
DB 32
|
||
DB 16
|
||
DB 8
|
||
DB 16
|
||
DB 32
|
||
DB 0
|
||
DB 254
|
||
DB 0
|
||
DB 16
|
||
DB 32
|
||
DB 64
|
||
DB 32
|
||
DB 16
|
||
DB 0
|
||
DB 254
|
||
DB 0
|
||
DB 24
|
||
DB 52
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 48
|
||
DB 176
|
||
DB 112
|
||
DB 48
|
||
DB 48
|
||
DB 0
|
||
DB 252
|
||
DB 0
|
||
DB 48
|
||
DB 48
|
||
DB 0
|
||
DB 0
|
||
DB 100
|
||
DB 152
|
||
DB 0
|
||
DB 100
|
||
DB 152
|
||
DB 0
|
||
DB 0
|
||
DB 56
|
||
DB 68
|
||
DB 68
|
||
DB 56
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 56
|
||
DB 56
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 56
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 14
|
||
DB 8
|
||
DB 8
|
||
DB 72
|
||
DB 40
|
||
DB 24
|
||
DB 8
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 176
|
||
DB 72
|
||
DB 72
|
||
DB 72
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 240
|
||
DB 60
|
||
DB 64
|
||
DB 128
|
||
DB 248
|
||
DB 0
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 252
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
DB 0
|
||
CSEG
|
||
PUBLIC func50_
|
||
func50_: lxi d,.2
|
||
call csave
|
||
LXI H,0
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
LXI H,64
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
RET
|
||
.2 EQU 0
|
||
PUBLIC func80_
|
||
func80_: lxi d,.3
|
||
call csave
|
||
LXI H,0
|
||
XCHG
|
||
LXI H,2-.3
|
||
DAD SP
|
||
MOV M,E
|
||
INX H
|
||
MOV M,D
|
||
JMP .5
|
||
.4:
|
||
LXI H,2-.3
|
||
DAD SP
|
||
PUSH H
|
||
MOV A,M
|
||
INX H
|
||
MOV H,M
|
||
MOV L,A
|
||
INX H
|
||
XCHG
|
||
POP H
|
||
MOV M,E
|
||
INX H
|
||
MOV M,D
|
||
.5:
|
||
LXI H,2-.3
|
||
DAD SP
|
||
MOV E,M
|
||
INX H
|
||
MOV D,M
|
||
LXI H,16384
|
||
CALL .ul
|
||
JZ .6
|
||
LXI H,0
|
||
PUSH H
|
||
LXI H,152
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
JMP .4
|
||
.6:
|
||
RET
|
||
.3 EQU -2
|
||
PUBLIC func140_
|
||
func140_: lxi d,.7
|
||
call csave
|
||
LXI H,0
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
LXI H,128
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
RET
|
||
.7 EQU 0
|
||
PUBLIC func210_
|
||
func210_: lxi d,.8
|
||
call csave
|
||
LXI H,80
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
LXI H,129
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
RET
|
||
.8 EQU 0
|
||
PUBLIC func250_
|
||
func250_: lxi d,.9
|
||
call csave
|
||
LXI H,0
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
LXI H,130
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
RET
|
||
.9 EQU 0
|
||
PUBLIC func290_
|
||
func290_: lxi d,.10
|
||
call csave
|
||
LXI H,1
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
LXI H,132
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
RET
|
||
.10 EQU 0
|
||
PUBLIC func360_
|
||
func360_: lxi d,.11
|
||
call csave
|
||
LXI H,240
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
LXI H,135
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
RET
|
||
.11 EQU 0
|
||
PUBLIC func400_
|
||
func400_: lxi d,.12
|
||
call csave
|
||
LXI H,0
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
LXI H,72
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
RET
|
||
.12 EQU 0
|
||
PUBLIC func450_
|
||
func450_: lxi d,.13
|
||
call csave
|
||
LXI H,0
|
||
XCHG
|
||
LXI H,2-.13
|
||
DAD SP
|
||
MOV M,E
|
||
INX H
|
||
MOV M,D
|
||
LXI H,0
|
||
SHLD c_
|
||
JMP .15
|
||
.14:
|
||
LHLD c_
|
||
INX H
|
||
SHLD c_
|
||
.15:
|
||
LHLD c_
|
||
LXI D,256
|
||
XCHG
|
||
CALL .lt
|
||
JZ .16
|
||
LXI H,0
|
||
SHLD d_
|
||
JMP .18
|
||
.17:
|
||
LHLD d_
|
||
INX H
|
||
SHLD d_
|
||
.18:
|
||
LHLD d_
|
||
LXI D,8
|
||
XCHG
|
||
CALL .lt
|
||
JZ .19
|
||
LXI H,2-.13
|
||
DAD SP
|
||
PUSH H
|
||
MOV A,M
|
||
INX H
|
||
MOV H,M
|
||
MOV L,A
|
||
INX H
|
||
XCHG
|
||
POP H
|
||
MOV M,E
|
||
INX H
|
||
MOV M,D
|
||
XCHG
|
||
DCX H
|
||
LXI D,data_
|
||
DAD D
|
||
MOV E,M
|
||
MVI D,0
|
||
PUSH D
|
||
LXI H,152
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
JMP .17
|
||
.19:
|
||
JMP .14
|
||
.16:
|
||
RET
|
||
.13 EQU -2
|
||
PUBLIC func540_
|
||
func540_: lxi d,.20
|
||
call csave
|
||
LXI H,0
|
||
SHLD d_
|
||
LXI H,0
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
LXI H,64
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
RET
|
||
.20 EQU 0
|
||
PUBLIC func580_
|
||
func580_: lxi d,.21
|
||
call csave
|
||
LXI H,0
|
||
SHLD c_
|
||
JMP .23
|
||
.22:
|
||
LHLD c_
|
||
INX H
|
||
SHLD c_
|
||
.23:
|
||
LHLD c_
|
||
LXI D,960
|
||
XCHG
|
||
CALL .lt
|
||
JZ .24
|
||
LHLD d_
|
||
PUSH H
|
||
LXI H,152
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
LHLD d_
|
||
INX H
|
||
SHLD d_
|
||
LXI H,128
|
||
XCHG
|
||
LHLD d_
|
||
CALL .eq
|
||
JZ .25
|
||
LXI H,0
|
||
SHLD d_
|
||
.25:
|
||
JMP .22
|
||
.24:
|
||
RET
|
||
.21 EQU 0
|
||
PUBLIC func700_
|
||
func700_: lxi d,.26
|
||
call csave
|
||
LXI H,0
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
LXI H,0
|
||
PUSH H
|
||
LXI H,153
|
||
PUSH H
|
||
CALL out_
|
||
POP D
|
||
POP D
|
||
RET
|
||
.26 EQU 0
|
||
PUBLIC func750_
|
||
func750_: lxi d,.27
|
||
call csave
|
||
LXI H,0
|
||
SHLD c_
|
||
JMP .29
|
||
.28:
|
||
LHLD c_
|
||
INX H
|
||
SHLD c_
|
||
.29:
|
||
LHLD c_
|
||
LXI D,17
|
||
XCHG
|
||
CALL .lt
|
||
JZ .30
|
||
LXI H,152
|
||
PUSH H
|
||
CALL in_
|
||
POP D
|
||
SHLD v_
|
||
JMP .28
|
||
.30:
|
||
RET
|
||
.27 EQU 0
|
||
PUBLIC main_
|
||
main_: lxi d,.31
|
||
call csave
|
||
CALL func50_
|
||
CALL func80_
|
||
CALL func140_
|
||
CALL func210_
|
||
CALL func250_
|
||
CALL func290_
|
||
CALL func360_
|
||
CALL func400_
|
||
CALL func450_
|
||
CALL func540_
|
||
CALL func580_
|
||
CALL func700_
|
||
CALL func750_
|
||
RET
|
||
.31 EQU 0
|
||
extrn in_
|
||
extrn out_
|
||
extrn .eq
|
||
extrn .lt
|
||
extrn .ul
|
||
END
|
||
|