Apple-2gs-SW/mrbuffer
1
0
Fork 0
mirror of https://github.com/mach-kernel/mrbuffer.git synced 2024-11-24 02:34:00 +00:00
Code Issues Projects Releases Wiki Activity

show last key

Browse Source
This commit is contained in:
David Stancu 2018-01-28 19:57:31 -05:00
parent 3d01ea6af6
commit 907f10a4ac
1 changed files with 15 additions and 377 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

392
src/main.S
View File

@ -2,7 +2,7 @@
typ $B3 typ $B3
dsk main.l dsk main.l
; ensure 16-bit mode (unnecessary?) ; ensure 16-bit mode (unnecessary?)
clc clc
xce xce
rep #$20 rep #$20
@ -11,7 +11,6 @@
plb plb
; half bank for accumulator, you don't want to toggle them on then back off, right? ; half bank for accumulator, you don't want to toggle them on then back off, right?
sep #$30 sep #$30
; toggle the softswitches; they don't take any values. some are only triggered ; toggle the softswitches; they don't take any values. some are only triggered
@ -25,13 +24,21 @@
ldal $00C056 ; select "low res" graphics ldal $00C056 ; select "low res" graphics
rep #$30 ; go back to 16-bit mode rep #$30 ; go back to 16-bit mode
ldx #hithere+2 ; strl, first two bytes are strlen, # denotes immediate addr val ; show the current char on screen
ldy #$0400 ; start of text buffer on 00 ; first check and discard to clear strobe, then enter loop
ldal hithere ldal $00C010
dec :eloop ldal $00C010
stal $000400
jmp :eloop
mvn $02, $00 ; working text blit
brk * ldx #hithere+2 ; strl, first two bytes are strlen, # denotes immediate addr val
* ldy #$0400 ; start of text buffer on 00
* ldal hithere
* dec
* mvn $02, $00
* brk
; Important locations ; Important locations
SPEAKER equ $E0C030 SPEAKER equ $E0C030
@ -55,372 +62,3 @@ hithere strl "this was excruciating"