You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

2430 lines
20 KiB

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