mirror of
https://github.com/irmen/prog8.git
synced 2024-10-25 00:24:16 +00:00
46 lines
990 B
Lua
46 lines
990 B
Lua
%import textio
|
|
%zeropage basicsafe
|
|
|
|
main {
|
|
|
|
sub start() {
|
|
|
|
str string1 = "irmen"
|
|
str string2 = "hello"
|
|
|
|
uword xx = $f000
|
|
word ww
|
|
|
|
ubyte[] arr = [1,2,3]
|
|
arr = ~ arr
|
|
cx16.r0 = ~cx16.r0
|
|
ww = -cx16.r0
|
|
cx16.r0 = not cx16.r0
|
|
|
|
|
|
; ubyte[] array = [1,2,3,4]
|
|
; ubyte ix
|
|
;
|
|
; ubyte a = array[1] + array[ix]
|
|
; a = array[ix] + array[ix]
|
|
; a = array[ix+1] + array[ix]
|
|
; uword multiple=0
|
|
; a = array[lsb(multiple)] + array[ix]
|
|
|
|
|
|
; str filename = "titlescreen.bin"
|
|
; ubyte success = cx16.vload(filename, 8, 0, $0000)
|
|
; if success {
|
|
; txt.print("load ok")
|
|
; cx16.VERA_DC_HSCALE = 64
|
|
; cx16.VERA_DC_VSCALE = 64
|
|
; cx16.VERA_L1_CONFIG = %00011111 ; 256c bitmap mode
|
|
; cx16.VERA_L1_MAPBASE = 0
|
|
; cx16.VERA_L1_TILEBASE = 0
|
|
; } else {
|
|
; txt.print("load fail")
|
|
; }
|
|
}
|
|
}
|
|
|