fixed Basics

This commit is contained in:
Jakub Husak
2020-05-31 17:55:18 +02:00
parent 3e0f57c44e
commit 3cb9073427
3 changed files with 9 additions and 9 deletions
@@ -367,7 +367,7 @@ badcompare_tmp2 equ * +1
;------------
org _SOURCE
ins "BASIC XE 4.1.rom",+$2000,$1000
ins "BASIC XE 4.1.rom",+$0000+$0,$1000
ins "BASIC XE 4.1.rom",+$0000,$1000
;------------
org $2e2
dta a(MAIN_PROCESS)
@@ -344,30 +344,30 @@ badcompare_tmp2 equ * +1
dta b(1) ; Counter
;------------
org _SOURCE
ins "OSSBasicXL103.rom",0,$1000
ins "OSSBasicXL103.rom",+1*$1000+$0,$1000
ins "OSSBasicXL103.rom",+$1000,$1000
ins "OSSBasicXL103.rom",+$0000,$1000
;------------
org $2e2
dta a(MAIN_PROCESS)
;------------
org BankNum
dta b(9) ; d501
dta b(1) ; d501
dta b(1) ; Counter
;------------
org _SOURCE
ins "OSSBasicXL103.rom",0,$1000
ins "OSSBasicXL103.rom",+2*$1000+$0,$1000
ins "OSSBasicXL103.rom",+$3000,$1000
ins "OSSBasicXL103.rom",+$0000,$1000
;------------
org $2e2
dta a(MAIN_PROCESS)
;------------
org BankNum
dta b(1) ; $d509
dta b(9) ; $d509
dta b(1) ; Counter
;------------
org _SOURCE
ins "OSSBasicXL103.rom",0,$1000
ins "OSSBasicXL103.rom",+3*$1000+$0,$1000
ins "OSSBasicXL103.rom",+$2000,$1000
ins "OSSBasicXL103.rom",+$0000,$1000
;------------
org $2e2
dta a(MAIN_PROCESS)