-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathBUG_INVADE.asm
7100 lines (7097 loc) · 132 KB
/
BUG_INVADE.asm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
; Imported symbols
.global AUDCTL
.global SKCTL
.globalzp CLS
.globalzp DEGFLAG
.globalzp OPEN
; Exported symbols
.export bytecode_start
.exportzp NUM_VARS
.include "atari.inc"
; TOKENS:
.importzp TOK_NUM
.importzp TOK_BYTE
.importzp TOK_CSTRING
.importzp TOK_VAR_ADDR
.importzp TOK_VAR_SADDR
.importzp TOK_VAR_LOAD
.importzp TOK_0
.importzp TOK_1
.importzp TOK_PUSH
.importzp TOK_PUSH_VAR_LOAD
.importzp TOK_PUSH_NUM
.importzp TOK_PUSH_BYTE
.importzp TOK_PUSH_0
.importzp TOK_PUSH_1
.importzp TOK_ADD
.importzp TOK_SUB
.importzp TOK_MUL
.importzp TOK_DIV
.importzp TOK_MOD
.importzp TOK_ADD_VAR
.importzp TOK_BIT_AND
.importzp TOK_PEEK
.importzp TOK_DPEEK
.importzp TOK_BYTE_PEEK
.importzp TOK_RAND
.importzp TOK_L_NOT
.importzp TOK_L_OR
.importzp TOK_L_AND
.importzp TOK_LT
.importzp TOK_GT
.importzp TOK_NEQ
.importzp TOK_EQ
.importzp TOK_COMP_0
.importzp TOK_POKE
.importzp TOK_DPOKE
.importzp TOK_MOVE
.importzp TOK_VAR_STORE
.importzp TOK_SADDR
.importzp TOK_DECVAR
.importzp TOK_BYTE_POKE
.importzp TOK_NUM_POKE
.importzp TOK_VAR_STORE_0
.importzp TOK_POSITION
.importzp TOK_GRAPHICS
.importzp TOK_PMGRAPHICS
.importzp TOK_PRINT_STR
.importzp TOK_XIO
.importzp TOK_CLOSE
.importzp TOK_PUT
.importzp TOK_BGET
.importzp TOK_IOCHN
.importzp TOK_JUMP
.importzp TOK_CJUMP
.importzp TOK_CNJUMP
.importzp TOK_CALL
.importzp TOK_RET
.importzp TOK_CRET
.importzp TOK_FOR
.importzp TOK_FOR_NEXT
.importzp TOK_FOR_EXIT
.importzp TOK_DIM
.importzp TOK_USHL
.importzp TOK_INT_STR
.importzp TOK_PAUSE
.importzp TOK_USR_ADDR
.importzp TOK_USR_PARAM
.importzp TOK_USR_CALL
.importzp TOK_INT_FP
.importzp TOK_FP_NEG
.importzp TOK_FLOAT
.importzp TOK_FP_DIV
.importzp TOK_FP_MUL
.importzp TOK_FP_SUB
.importzp TOK_FP_ADD
.importzp TOK_FP_STORE
.importzp TOK_FP_LOAD
.importzp TOK_FP_INT
.importzp TOK_FP_CMP
.importzp TOK_FP_SIN
.importzp TOK_FP_COS
;-----------------------------
; Variables
NUM_VARS = 73
.import heap_start
.export fb_var_A
.export fb_var_B
.export fb_var_BUG_DATA1
.export fb_var_BUG_DATA2
.export fb_var_BUG_INDEX
.export fb_var_BUG_STATUS
.export fb_var_BUG_TYPE
.export fb_var_BUG_XDIR
.export fb_var_BUG_XPOS
.export fb_var_BUG_YDIR
.export fb_var_BUG_YPOS
.export fb_var_C
.export fb_var_C1
.export fb_var_CD
.export fb_var_CT
.export fb_var_D
.export fb_var_DL
.export fb_var_DL_ADDR_SET
.export fb_var_DMA
.export fb_var_E
.export fb_var_E1
.export fb_var_ED
.export fb_var_EM
.export fb_var_F
.export fb_var_G
.export fb_var_G1
.export fb_var_G2
.export fb_var_G3
.export fb_var_G4
.export fb_var_G5
.export fb_var_G6
.export fb_var_G7
.export fb_var_GM
.export fb_var_H
.export fb_var_H1
.export fb_var_H2
.export fb_var_H3
.export fb_var_L
.export fb_var_LIVES
.export fb_var_LM_ADDR
.export fb_var_LV
.export fb_var_M
.export fb_var_N
.export fb_var_O
.export fb_var_P
.export fb_var_PAGES
.export fb_var_PC
.export fb_var_PM
.export fb_var_PMBASE
.export fb_var_PMV
.export fb_var_QT
.export fb_var_RMV
.export fb_var_SC
.export fb_var_SCR_ADDR
.export fb_var_SND
.export fb_var_SP
.export fb_var_STK
.export fb_var_SU
.export fb_var_X
.export fb_var_Y
.export fb_var_Z
fb_var_A = heap_start + 82 ; Word variable
fb_var_B = heap_start + 84 ; Word variable
fb_var_BUG_DATA1 = heap_start + 72 ; Byte Array variable
fb_var_BUG_DATA2 = heap_start + 74 ; Byte Array variable
fb_var_BUG_INDEX = heap_start + 78 ; Word variable
fb_var_BUG_STATUS = heap_start + 76 ; Byte Array variable
fb_var_BUG_TYPE = heap_start + 62 ; Byte Array variable
fb_var_BUG_XDIR = heap_start + 68 ; Word Array variable
fb_var_BUG_XPOS = heap_start + 64 ; Word Array variable
fb_var_BUG_YDIR = heap_start + 70 ; Word Array variable
fb_var_BUG_YPOS = heap_start + 66 ; Word Array variable
fb_var_C = heap_start + 12 ; Float variable
fb_var_C1 = heap_start + 86 ; Word variable
fb_var_CD = heap_start + 36 ; Float variable
fb_var_CT = heap_start + 100 ; Word variable
fb_var_D = heap_start + 18 ; Float variable
fb_var_DL = heap_start + 140 ; Word variable
fb_var_DL_ADDR_SET = heap_start + 0 ; Word variable
fb_var_DMA = heap_start + 138 ; Word variable
fb_var_E = heap_start + 24 ; Float variable
fb_var_E1 = heap_start + 88 ; Word variable
fb_var_ED = heap_start + 42 ; Float variable
fb_var_EM = heap_start + 94 ; Word variable
fb_var_F = heap_start + 30 ; Float variable
fb_var_G = heap_start + 102 ; Word variable
fb_var_G1 = heap_start + 80 ; Word variable
fb_var_G2 = heap_start + 108 ; Word variable
fb_var_G3 = heap_start + 110 ; Word variable
fb_var_G4 = heap_start + 112 ; Word variable
fb_var_G5 = heap_start + 114 ; Word variable
fb_var_G6 = heap_start + 116 ; Word variable
fb_var_G7 = heap_start + 118 ; Word variable
fb_var_GM = heap_start + 128 ; Word variable
fb_var_H = heap_start + 104 ; Word variable
fb_var_H1 = heap_start + 56 ; Word variable
fb_var_H2 = heap_start + 58 ; Word variable
fb_var_H3 = heap_start + 60 ; Word variable
fb_var_L = heap_start + 142 ; Word variable
fb_var_LIVES = heap_start + 98 ; Word variable
fb_var_LM_ADDR = heap_start + 144 ; Word variable
fb_var_LV = heap_start + 54 ; Word variable
fb_var_M = heap_start + 122 ; Word variable
fb_var_N = heap_start + 120 ; Word variable
fb_var_O = heap_start + 92 ; Word variable
fb_var_P = heap_start + 106 ; Word variable
fb_var_PAGES = heap_start + 136 ; Word variable
fb_var_PC = heap_start + 48 ; Word variable
fb_var_PM = heap_start + 130 ; Word variable
fb_var_PMBASE = heap_start + 2 ; Word variable
fb_var_PMV = heap_start + 132 ; Word variable
fb_var_QT = heap_start + 10 ; Word variable
fb_var_RMV = heap_start + 134 ; Word variable
fb_var_SC = heap_start + 96 ; Word variable
fb_var_SCR_ADDR = heap_start + 52 ; Word variable
fb_var_SND = heap_start + 8 ; Word variable
fb_var_SP = heap_start + 4 ; Word variable
fb_var_STK = heap_start + 6 ; Word variable
fb_var_SU = heap_start + 50 ; Word variable
fb_var_X = heap_start + 124 ; Word variable
fb_var_Y = heap_start + 126 ; Word variable
fb_var_Z = heap_start + 90 ; Word variable
;-----------------------------
; Bytecode
.segment "BYTECODE"
bytecode_start:
@FastBasic_LINE_2: ; LINE 2
.byte TOK_VAR_STORE_0
.byte 0
@FastBasic_LINE_3: ; LINE 3
.byte TOK_VAR_STORE_0
.byte 1
@FastBasic_LINE_4: ; LINE 4
.byte TOK_VAR_STORE_0
.byte 2
@FastBasic_LINE_5: ; LINE 5
.byte TOK_VAR_STORE_0
.byte 3
@FastBasic_LINE_6: ; LINE 6
.byte TOK_NUM
.word 1702
.byte TOK_VAR_STORE
.byte 4
@FastBasic_LINE_7: ; LINE 7
.byte TOK_NUM
.word 1741
.byte TOK_VAR_STORE
.byte 5
@FastBasic_LINE_8: ; LINE 8
.byte TOK_VAR_SADDR
.byte 6
.byte TOK_FLOAT
.byte $00, $00, $00, $00, $00, $00
.byte TOK_FP_STORE
@FastBasic_LINE_9: ; LINE 9
.byte TOK_VAR_SADDR
.byte 9
.byte TOK_FLOAT
.byte $00, $00, $00, $00, $00, $00
.byte TOK_FP_STORE
@FastBasic_LINE_10: ; LINE 10
.byte TOK_VAR_SADDR
.byte 12
.byte TOK_FLOAT
.byte $00, $00, $00, $00, $00, $00
.byte TOK_FP_STORE
@FastBasic_LINE_11: ; LINE 11
.byte TOK_VAR_SADDR
.byte 15
.byte TOK_FLOAT
.byte $00, $00, $00, $00, $00, $00
.byte TOK_FP_STORE
@FastBasic_LINE_12: ; LINE 12
.byte TOK_VAR_SADDR
.byte 18
.byte TOK_FLOAT
.byte $00, $00, $00, $00, $00, $00
.byte TOK_FP_STORE
@FastBasic_LINE_13: ; LINE 13
.byte TOK_VAR_SADDR
.byte 21
.byte TOK_FLOAT
.byte $00, $00, $00, $00, $00, $00
.byte TOK_FP_STORE
@FastBasic_LINE_14: ; LINE 14
.byte TOK_VAR_STORE_0
.byte 24
@FastBasic_LINE_15: ; LINE 15
.byte TOK_VAR_STORE_0
.byte 25
@FastBasic_LINE_16: ; LINE 16
.byte TOK_VAR_STORE_0
.byte 26
@FastBasic_LINE_17: ; LINE 17
.byte TOK_VAR_STORE_0
.byte 27
@FastBasic_LINE_18: ; LINE 18
.byte TOK_CALL
.word fb_lbl_LOAD_AND_SET_UP
@FastBasic_LINE_19: ; LINE 19
.byte TOK_VAR_STORE_0
.byte 28
@FastBasic_LINE_20: ; LINE 20
.byte TOK_VAR_STORE_0
.byte 29
@FastBasic_LINE_21: ; LINE 21
.byte TOK_VAR_STORE_0
.byte 30
@FastBasic_LINE_23: ; LINE 23
.export jump_lbl_1
jump_lbl_1:
@FastBasic_LINE_26: ; LINE 26
.byte TOK_CALL
.word fb_lbl_DISPLAY_TITLE
@FastBasic_LINE_28: ; LINE 28
.byte TOK_BYTE
.byte 8
.byte TOK_DIM
.byte 31
@FastBasic_LINE_29: ; LINE 29
.byte TOK_BYTE
.byte 16
.byte TOK_DIM
.byte 32
@FastBasic_LINE_30: ; LINE 30
.byte TOK_BYTE
.byte 16
.byte TOK_DIM
.byte 33
@FastBasic_LINE_31: ; LINE 31
.byte TOK_BYTE
.byte 16
.byte TOK_DIM
.byte 34
@FastBasic_LINE_32: ; LINE 32
.byte TOK_BYTE
.byte 16
.byte TOK_DIM
.byte 35
@FastBasic_LINE_33: ; LINE 33
.byte TOK_BYTE
.byte 8
.byte TOK_DIM
.byte 36
@FastBasic_LINE_34: ; LINE 34
.byte TOK_BYTE
.byte 8
.byte TOK_DIM
.byte 37
@FastBasic_LINE_35: ; LINE 35
.byte TOK_BYTE
.byte 8
.byte TOK_DIM
.byte 38
@FastBasic_LINE_36: ; LINE 36
.byte TOK_VAR_STORE_0
.byte 39
@FastBasic_LINE_38: ; LINE 38
.byte TOK_CALL
.word fb_lbl_DRAW_FIELD
@FastBasic_LINE_40: ; LINE 40
.byte TOK_0
.byte TOK_BYTE_POKE
.byte 82
@FastBasic_LINE_41: ; LINE 41
.byte TOK_BYTE
.byte 6
.byte TOK_IOCHN
.byte TOK_BYTE
.byte CLS
.byte TOK_PUT
.byte TOK_0
.byte TOK_IOCHN
@FastBasic_LINE_43: ; LINE 43
.byte TOK_0
.byte TOK_NUM_POKE
.word 712
@FastBasic_LINE_44: ; LINE 44
.byte TOK_VAR_LOAD
.byte 2
.byte TOK_PUSH_NUM
.word 1048
.byte TOK_ADD_VAR
.byte 1
.byte TOK_PUSH_BYTE
.byte 8
.byte TOK_MOVE
@FastBasic_LINE_45: ; LINE 45
.byte TOK_BYTE
.byte 200
.byte TOK_ADD_VAR
.byte 2
.byte TOK_PUSH_NUM
.word 1304
.byte TOK_ADD_VAR
.byte 1
.byte TOK_PUSH_BYTE
.byte 8
.byte TOK_MOVE
@FastBasic_LINE_46: ; LINE 46
.byte TOK_BYTE
.byte 118
.byte TOK_NUM_POKE
.word 53248
@FastBasic_LINE_47: ; LINE 47
.byte TOK_BYTE
.byte 128
.byte TOK_NUM_POKE
.word 53249
@FastBasic_LINE_48: ; LINE 48
.byte TOK_BYTE
.byte 15
.byte TOK_NUM_POKE
.word 704
@FastBasic_LINE_49: ; LINE 49
.byte TOK_BYTE
.byte 15
.byte TOK_NUM_POKE
.word 705
@FastBasic_LINE_53: ; LINE 53
.byte TOK_VAR_STORE_0
.byte 40
@FastBasic_LINE_54: ; LINE 54
.byte TOK_BYTE
.byte 19
.byte TOK_VAR_STORE
.byte 41
@FastBasic_LINE_55: ; LINE 55
.byte TOK_BYTE
.byte 22
.byte TOK_VAR_STORE
.byte 42
@FastBasic_LINE_56: ; LINE 56
.byte TOK_VAR_STORE_0
.byte 43
@FastBasic_LINE_57: ; LINE 57
.byte TOK_VAR_STORE_0
.byte 44
@FastBasic_LINE_58: ; LINE 58
.byte TOK_BYTE
.byte 30
.byte TOK_NUM_POKE
.word 704
@FastBasic_LINE_59: ; LINE 59
.byte TOK_NUM
.word 1561
.byte TOK_USR_ADDR
.byte TOK_USR_CALL
.byte TOK_VAR_STORE
.byte 45
@FastBasic_LINE_60: ; LINE 60
.byte TOK_1
.byte TOK_BYTE_POKE
.byte DEGFLAG
@FastBasic_LINE_61: ; LINE 61
.byte TOK_1
.byte TOK_VAR_STORE
.byte 27
@FastBasic_LINE_62: ; LINE 62
.byte TOK_NUM
.word 512
.byte TOK_ADD_VAR
.byte 1
.byte TOK_SADDR
.byte TOK_BYTE
.byte 3
.byte TOK_POKE
@FastBasic_LINE_63: ; LINE 63
.byte TOK_NUM
.word 512
.byte TOK_ADD_VAR
.byte 1
.byte TOK_PUSH_NUM
.word 513
.byte TOK_ADD_VAR
.byte 1
.byte TOK_PUSH_BYTE
.byte 7
.byte TOK_MOVE
@FastBasic_LINE_64: ; LINE 64
.byte TOK_NUM
.word 520
.byte TOK_ADD_VAR
.byte 1
.byte TOK_SADDR
.byte TOK_0
.byte TOK_POKE
@FastBasic_LINE_65: ; LINE 65
.byte TOK_NUM
.word 520
.byte TOK_ADD_VAR
.byte 1
.byte TOK_PUSH_NUM
.word 521
.byte TOK_ADD_VAR
.byte 1
.byte TOK_PUSH_BYTE
.byte 8
.byte TOK_MOVE
@FastBasic_LINE_66: ; LINE 66
.byte TOK_1
.byte TOK_VAR_STORE
.byte 46
@FastBasic_LINE_67: ; LINE 67
.byte TOK_NUM
.word 1000
.byte TOK_VAR_STORE
.byte 47
@FastBasic_LINE_68: ; LINE 68
.byte TOK_VAR_STORE_0
.byte 48
@FastBasic_LINE_69: ; LINE 69
.byte TOK_BYTE
.byte 7
.byte TOK_VAR_STORE
.byte 49
@FastBasic_LINE_70: ; LINE 70
.byte TOK_CALL
.word fb_lbl_PRINT_SCORE
@FastBasic_LINE_71: ; LINE 71
.byte TOK_1
.byte TOK_VAR_STORE
.byte 50
@FastBasic_LINE_72: ; LINE 72
.byte TOK_VAR_LOAD
.byte 2
.byte TOK_PUSH_BYTE
.byte 8
.byte TOK_ADD_VAR
.byte 1
.byte TOK_PUSH_BYTE
.byte 8
.byte TOK_MOVE
@FastBasic_LINE_74: ; LINE 74
.export jump_lbl_2
jump_lbl_2:
@FastBasic_LINE_76: ; LINE 76
.byte TOK_VAR_LOAD
.byte 3
.byte TOK_USR_ADDR
.byte TOK_USR_CALL
.byte TOK_VAR_STORE
.byte 45
@FastBasic_LINE_77: ; LINE 77
.byte TOK_NUM
.word 53248
.byte TOK_SADDR
.byte TOK_NUM
.word 600
.byte TOK_PEEK
.byte TOK_POKE
@FastBasic_LINE_78: ; LINE 78
.byte TOK_VAR_LOAD
.byte 1
.byte TOK_PUSH_NUM
.word 1016
.byte TOK_ADD_VAR
.byte 1
.byte TOK_PUSH_NUM
.word 601
.byte TOK_PEEK
.byte TOK_ADD
.byte TOK_PUSH_BYTE
.byte 24
.byte TOK_MOVE
@FastBasic_LINE_79: ; LINE 79
.byte TOK_VAR_LOAD
.byte 46
.byte TOK_COMP_0
.byte TOK_L_NOT
.byte TOK_VAR_STORE
.byte 46
@FastBasic_LINE_80: ; LINE 80
.byte TOK_VAR_LOAD
.byte 43
.byte TOK_COMP_0
.byte TOK_CNJUMP
.word jump_lbl_3
@FastBasic_LINE_81: ; LINE 81
.byte TOK_CALL
.word fb_lbl_BUG_1_0
@FastBasic_LINE_82: ; LINE 82
.byte TOK_JUMP
.word jump_lbl_4
.export jump_lbl_3
jump_lbl_3:
.byte TOK_VAR_LOAD
.byte 43
.byte TOK_PUSH_1
.byte TOK_EQ
.byte TOK_CJUMP
.word jump_lbl_5
@FastBasic_LINE_83: ; LINE 83
.byte TOK_CALL
.word fb_lbl_BUG_1_1
@FastBasic_LINE_84: ; LINE 84
.byte TOK_JUMP
.word jump_lbl_4
.export jump_lbl_5
jump_lbl_5:
.byte TOK_VAR_LOAD
.byte 43
.byte TOK_PUSH_BYTE
.byte 2
.byte TOK_EQ
.byte TOK_CJUMP
.word jump_lbl_7
@FastBasic_LINE_85: ; LINE 85
.byte TOK_CALL
.word fb_lbl_BUG_1_2
@FastBasic_LINE_86: ; LINE 86
.byte TOK_JUMP
.word jump_lbl_4
.export jump_lbl_7
jump_lbl_7:
.byte TOK_VAR_LOAD
.byte 43
.byte TOK_PUSH_BYTE
.byte 3
.byte TOK_EQ
.byte TOK_CJUMP
.word jump_lbl_9
@FastBasic_LINE_87: ; LINE 87
.byte TOK_CALL
.word fb_lbl_BUG_1_3
@FastBasic_LINE_88: ; LINE 88
.byte TOK_JUMP
.word jump_lbl_4
.export jump_lbl_9
jump_lbl_9:
.byte TOK_VAR_LOAD
.byte 43
.byte TOK_PUSH_BYTE
.byte 4
.byte TOK_EQ
.byte TOK_CJUMP
.word jump_lbl_4
@FastBasic_LINE_89: ; LINE 89
.byte TOK_CALL
.word fb_lbl_BUG_1_4
@FastBasic_LINE_90: ; LINE 90
.export jump_lbl_4
jump_lbl_4:
@FastBasic_LINE_93: ; LINE 93
.byte TOK_VAR_LOAD
.byte 44
.byte TOK_COMP_0
.byte TOK_CNJUMP
.word jump_lbl_12
@FastBasic_LINE_94: ; LINE 94
.byte TOK_CALL
.word fb_lbl_BUG_2_0
@FastBasic_LINE_95: ; LINE 95
.byte TOK_JUMP
.word jump_lbl_13
.export jump_lbl_12
jump_lbl_12:
.byte TOK_VAR_LOAD
.byte 44
.byte TOK_PUSH_1
.byte TOK_EQ
.byte TOK_CJUMP
.word jump_lbl_14
@FastBasic_LINE_96: ; LINE 96
.byte TOK_CALL
.word fb_lbl_BUG_2_1
@FastBasic_LINE_97: ; LINE 97
.byte TOK_JUMP
.word jump_lbl_13
.export jump_lbl_14
jump_lbl_14:
.byte TOK_VAR_LOAD
.byte 44
.byte TOK_PUSH_BYTE
.byte 2
.byte TOK_EQ
.byte TOK_CJUMP
.word jump_lbl_16
@FastBasic_LINE_98: ; LINE 98
.byte TOK_CALL
.word fb_lbl_BUG_2_2
@FastBasic_LINE_99: ; LINE 99
.byte TOK_JUMP
.word jump_lbl_13
.export jump_lbl_16
jump_lbl_16:
.byte TOK_VAR_LOAD
.byte 44
.byte TOK_PUSH_BYTE
.byte 3
.byte TOK_EQ
.byte TOK_CJUMP
.word jump_lbl_18
@FastBasic_LINE_100: ; LINE 100
.byte TOK_CALL
.word fb_lbl_BUG_2_3
@FastBasic_LINE_101: ; LINE 101
.byte TOK_JUMP
.word jump_lbl_13
.export jump_lbl_18
jump_lbl_18:
.byte TOK_VAR_LOAD
.byte 44
.byte TOK_PUSH_BYTE
.byte 4
.byte TOK_EQ
.byte TOK_CJUMP
.word jump_lbl_13
@FastBasic_LINE_102: ; LINE 102
.byte TOK_CALL
.word fb_lbl_BUG_2_4
@FastBasic_LINE_103: ; LINE 103
.export jump_lbl_13
jump_lbl_13:
@FastBasic_LINE_105: ; LINE 105
.byte TOK_VAR_LOAD
.byte 40
.byte TOK_COMP_0
.byte TOK_CNJUMP
.word jump_lbl_21
@FastBasic_LINE_106: ; LINE 106
.byte TOK_NUM
.word 644
.byte TOK_PEEK
.byte TOK_COMP_0
.byte TOK_CNJUMP
.word jump_lbl_23
@FastBasic_LINE_107: ; LINE 107
.byte TOK_1
.byte TOK_VAR_STORE
.byte 40
@FastBasic_LINE_108: ; LINE 108
.byte TOK_NUM
.word 600
.byte TOK_PEEK
.byte TOK_PUSH_BYTE
.byte 46
.byte TOK_SUB
.byte TOK_PUSH_BYTE
.byte 4
.byte TOK_DIV
.byte TOK_VAR_STORE
.byte 51
@FastBasic_LINE_109: ; LINE 109
.byte TOK_NUM
.word 601
.byte TOK_PEEK
.byte TOK_PUSH_BYTE
.byte 13
.byte TOK_SUB
.byte TOK_PUSH_BYTE
.byte 8
.byte TOK_DIV
.byte TOK_VAR_STORE
.byte 52
@FastBasic_LINE_110: ; LINE 110
.byte TOK_VAR_LOAD
.byte 24
.byte TOK_USR_ADDR
.byte TOK_1
.byte TOK_USR_PARAM
.byte TOK_NUM
.word 768
.byte TOK_ADD_VAR
.byte 1
.byte TOK_USR_PARAM
.byte TOK_USR_CALL
.byte TOK_VAR_STORE
.byte 45
@FastBasic_LINE_112: ; LINE 112
.byte TOK_VAR_LOAD
.byte 4
.byte TOK_USR_ADDR
.byte TOK_1
.byte TOK_USR_PARAM
.byte TOK_BYTE
.byte 56
.byte TOK_USR_PARAM
.byte TOK_NUM
.word 1536
.byte TOK_ADD_VAR
.byte 25
.byte TOK_USR_PARAM
.byte TOK_1
.byte TOK_USR_PARAM
.byte TOK_USR_CALL
.byte TOK_VAR_STORE
.byte 45
@FastBasic_LINE_113: ; LINE 113
.byte TOK_NUM
.word 53252
.byte TOK_SADDR
.byte TOK_BYTE
.byte 49
.byte TOK_PUSH_VAR_LOAD
.byte 51
.byte TOK_USHL
.byte TOK_USHL
.byte TOK_ADD
.byte TOK_POKE
@FastBasic_LINE_115: ; LINE 115
.byte TOK_JUMP
.word jump_lbl_23
.export jump_lbl_21
jump_lbl_21:
@FastBasic_LINE_117: ; LINE 117
.byte TOK_DECVAR
.byte 52
@FastBasic_LINE_118: ; LINE 118
.byte TOK_VAR_LOAD
.byte 52
.byte TOK_PUSH_0
.byte TOK_LT
.byte TOK_CJUMP
.word jump_lbl_24
@FastBasic_LINE_119: ; LINE 119
.byte TOK_VAR_STORE_0
.byte 40
@FastBasic_LINE_120: ; LINE 120
.byte TOK_VAR_LOAD
.byte 24
.byte TOK_USR_ADDR
.byte TOK_1
.byte TOK_USR_PARAM
.byte TOK_NUM
.word 768
.byte TOK_ADD_VAR
.byte 1
.byte TOK_USR_PARAM
.byte TOK_USR_CALL
.byte TOK_VAR_STORE
.byte 45
@FastBasic_LINE_121: ; LINE 121
.byte TOK_JUMP
.word jump_lbl_23
.export jump_lbl_24
jump_lbl_24:
@FastBasic_LINE_122: ; LINE 122
.byte TOK_NUM
.word 53252
.byte TOK_SADDR
.byte TOK_BYTE
.byte 49
.byte TOK_PUSH_VAR_LOAD
.byte 51
.byte TOK_USHL
.byte TOK_USHL
.byte TOK_ADD
.byte TOK_POKE
@FastBasic_LINE_123: ; LINE 123
.byte TOK_NUM
.word 512
.byte TOK_ADD_VAR
.byte 1
.byte TOK_PUSH_NUM
.word 789
.byte TOK_ADD_VAR
.byte 1
.byte TOK_PUSH_BYTE
.byte 8
.byte TOK_PUSH_VAR_LOAD
.byte 52
.byte TOK_MUL
.byte TOK_ADD
.byte TOK_PUSH_BYTE
.byte 16
.byte TOK_MOVE
@FastBasic_LINE_124: ; LINE 124
.byte TOK_VAR_LOAD
.byte 26
.byte TOK_ADD_VAR
.byte 51
.byte TOK_PUSH_BYTE
.byte 40
.byte TOK_PUSH_VAR_LOAD
.byte 52
.byte TOK_MUL
.byte TOK_ADD
.byte TOK_PEEK
.byte TOK_PUSH_0
.byte TOK_GT
.byte TOK_CJUMP
.word jump_lbl_26
.byte TOK_CALL
.word fb_lbl_BULLET_PLAYFIELD
.export jump_lbl_26
jump_lbl_26:
@FastBasic_LINE_125: ; LINE 125
.byte TOK_NUM
.word 53256
.byte TOK_PEEK
.byte TOK_PUSH_BYTE
.byte 6
.byte TOK_BIT_AND
.byte TOK_PUSH_0
.byte TOK_GT
.byte TOK_CJUMP
.word jump_lbl_23
.byte TOK_CALL
.word fb_lbl_BULLET_HIT_BUG
@FastBasic_LINE_127: ; LINE 127
.export jump_lbl_23
jump_lbl_23:
@FastBasic_LINE_128: ; LINE 128
.byte TOK_VAR_LOAD
.byte 49
.byte TOK_PUSH_0
.byte TOK_LT
.byte TOK_CJUMP
.word jump_lbl_2
@FastBasic_LINE_129: ; LINE 129
.byte TOK_JUMP
.word jump_lbl_1
@FastBasic_LINE_131: ; LINE 131
.export fb_lbl_BUG_1_0
fb_lbl_BUG_1_0:
@FastBasic_LINE_132: ; LINE 132
.byte TOK_VAR_LOAD
.byte 25
.byte TOK_PUSH_NUM
.word 1292
.byte TOK_ADD_VAR
.byte 1
.byte TOK_PUSH
.byte TOK_FLOAT
.byte $40, $08, $00, $00, $00, $00
.byte TOK_VAR_ADDR
.byte 9
.byte TOK_FP_LOAD
.byte TOK_FP_MUL
.byte TOK_FP_INT
.byte TOK_ADD
.byte TOK_PUSH_BYTE
.byte 8
.byte TOK_MOVE
@FastBasic_LINE_133: ; LINE 133
.byte TOK_VAR_SADDR
.byte 6
.byte TOK_VAR_ADDR
.byte 6
.byte TOK_FP_LOAD
.byte TOK_VAR_ADDR
.byte 18
.byte TOK_FP_LOAD
.byte TOK_FLOAT
.byte $40, $02, $00, $00, $00, $00
.byte TOK_FP_DIV
.byte TOK_FP_ADD
.byte TOK_FP_STORE
@FastBasic_LINE_134: ; LINE 134
.byte TOK_VAR_ADDR
.byte 6
.byte TOK_FP_LOAD
.byte TOK_FLOAT
.byte $00, $00, $00, $00, $00, $00
.byte TOK_FP_CMP
.byte TOK_LT
.byte TOK_CJUMP
.word jump_lbl_30
@FastBasic_LINE_135: ; LINE 135
.byte TOK_VAR_SADDR
.byte 6
.byte TOK_FLOAT
.byte $3F, $50, $00, $00, $00, $00
.byte TOK_FP_STORE
@FastBasic_LINE_136: ; LINE 136
.byte TOK_VAR_SADDR
.byte 18
.byte TOK_FLOAT
.byte $40, $01, $00, $00, $00, $00
.byte TOK_FP_STORE
@FastBasic_LINE_137: ; LINE 137
.byte TOK_VAR_SADDR
.byte 9
.byte TOK_VAR_ADDR
.byte 9
.byte TOK_FP_LOAD
.byte TOK_FLOAT
.byte $3F, $50, $00, $00, $00, $00
.byte TOK_FP_ADD
.byte TOK_VAR_LOAD
.byte 27
.byte TOK_PUSH_BYTE
.byte 5
.byte TOK_DIV
.byte TOK_INT_FP
.byte TOK_FP_ADD
.byte TOK_FP_STORE
@FastBasic_LINE_138: ; LINE 138
.export jump_lbl_30
jump_lbl_30:
@FastBasic_LINE_139: ; LINE 139
.byte TOK_VAR_ADDR
.byte 6
.byte TOK_FP_LOAD
.byte TOK_FLOAT
.byte $40, $39, $00, $00, $00, $00
.byte TOK_FP_CMP
.byte TOK_GT
.byte TOK_CJUMP
.word jump_lbl_31
@FastBasic_LINE_140: ; LINE 140