Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;Loading external character sets into Assembly.
- ;Character Sets exported as raw binary from Charpad
- * = $3800
- chars
- !bin "./chars/charset.bin",512
- ;Boot loader
- !source "./libs/loader.asm"
- +start_at $1000
- ;*** Define some useful calls in English
- setcursor = $e50c
- print = $ab1e
- printchar = $ffd2
- ;Switch charset pointer to here
- ;$3000 is set by last 3 buts to %110
- ;12288 - 14335
- lda #%00011110
- sta $d018
- ; **** Set up the initial screen ****
- lda #147 ; Clear Screen
- jsr printchar
- lda #$00 ; Change Screen/Border Colors
- sta $d020
- sta $d021
- ldx #1 ; Select row
- ldy #25 ; Select column
- jsr setcursor ; Set cursor
- lda #<prginfo ; Load lo-byte of string adress
- ldy #>prginfo ; Load hi-byte of string adress
- jsr print ; Print Program Info
- rts
- prginfo
- !byte $05
- !text "FONT TEST"
- !byte $0d
- !byte $99
- !text " "
- !text "BY JEFF LEDGER"
- !byte $00
Add Comment
Please, Sign In to add comment