Fixed RECTANGLE ... TO
This commit is contained in:
1 parent
7b4e18acc4
commit
5af83df4d5
2 files changed
+1
-2
No files matched your search
Binary file not shown.
+1
-2
@@ -3,7 +3,7 @@
|
|||||||
;PATCH FOR BBC BASIC TO CP/M 2.2 & 3.0
|
;PATCH FOR BBC BASIC TO CP/M 2.2 & 3.0
|
||||||
;* ACORN COMPUTERS Z80 TUBE VERSION *
|
;* ACORN COMPUTERS Z80 TUBE VERSION *
|
||||||
;(C) COPYRIGHT R.T.RUSSELL, 02-01-1984
|
;(C) COPYRIGHT R.T.RUSSELL, 02-01-1984
|
||||||
;VERSION 5.0, 16-06-2024
|
;VERSION 5.0, 18-06-2024
|
||||||
;
|
;
|
||||||
OSWRCH EQU 0FFEEH
|
OSWRCH EQU 0FFEEH
|
||||||
OSWORD EQU 0FFF1H
|
OSWORD EQU 0FFF1H
|
||||||
@@ -556,7 +556,6 @@ RECTTO: INC IY ; Bump over TO
|
|||||||
POP DE ;w
|
POP DE ;w
|
||||||
EX (SP),HL ;HL <- h, (SP) <- newy
|
EX (SP),HL ;HL <- h, (SP) <- newy
|
||||||
PUSH BC
|
PUSH BC
|
||||||
EX DE,HL
|
|
||||||
LD C,0
|
LD C,0
|
||||||
CALL VDU25
|
CALL VDU25
|
||||||
POP DE ;newx
|
POP DE ;newx
|
||||||
|
|||||||
Reference in new issue
Block a user