Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2025-08-14 22:27:48 +00:00
Code Issues Projects Releases Wiki Activity

layout

Browse Source
This commit is contained in:
Irmen de Jong
2017-12-26 02:15:25 +01:00
parent 07d6856485
commit 9e87001ddb
1 changed files with 114 additions and 111 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
lib/c64lib.ill
View File

@@ -3,6 +3,9 @@
; ;
; Written by Irmen de Jong (irmen@razorvine.net) ; Written by Irmen de Jong (irmen@razorvine.net)
; License: GNU GPL 3.0, see LICENSE ; License: GNU GPL 3.0, see LICENSE
;
; indent format: TABS, size=8
output raw output raw
@@ -225,7 +228,7 @@ sub FREADS32 () -> (A?, X?, Y?) {
asl a asl a
lda #0 lda #0
ldx #$a0 ldx #$a0
jmp $bc4f jmp $bc4f ; internal BASIC routine
} }
} }
@@ -235,7 +238,7 @@ sub FREADUS32 () -> (A?, X?, Y?) {
sec sec
lda #0 lda #0
ldx #$a0 ldx #$a0
jmp $bc4f jmp $bc4f ; internal BASIC routine
} }
} }
@@ -252,7 +255,7 @@ sub FREADS24AXY (lo: A, mid: X, hi: Y) -> (A?, X?, Y?) {
lda #0 lda #0
sta $65 sta $65
ldx #$98 ldx #$98
jmp $bc4f jmp $bc4f ; internal BASIC routine
} }
} }
@@ -263,7 +266,7 @@ sub GIVUAYF (uword: AY) -> (A?, X?, Y?) {
sta $63 sta $63
ldx #$90 ldx #$90
sec sec
jmp $bc49 jmp $bc49 ; internal BASIC routine
} }
} }