mirror of
https://github.com/irmen/prog8.git
synced 2024-06-01 06:41:42 +00:00
33 lines
669 B
Lua
33 lines
669 B
Lua
%import textio
|
|
%zeropage basicsafe
|
|
%option no_sysinit
|
|
|
|
main {
|
|
sub start() {
|
|
uword[3] ubarr
|
|
bool[3] barr
|
|
bool @shared bb
|
|
|
|
; ubarr[1] = ubarr[1] + 2
|
|
; ubarr[1] = ubarr[1] * 3
|
|
|
|
; barr[1] = barr[0] and barr[2]
|
|
; barr[1] = barr[0] or barr[2]
|
|
; barr[1] = barr[0] xor barr[2]
|
|
; barr[1] = not barr[0]
|
|
|
|
ubarr[1] = 999
|
|
ubarr[1] = ubarr[1]==999
|
|
txt.print_uw(ubarr[1])
|
|
|
|
; barr[1] = barr[1] and bb
|
|
; barr[1] = barr[1] or bb
|
|
; barr[1] = barr[1] xor bb
|
|
|
|
; bb = bb and barr[1]
|
|
; bb = bb or barr[1]
|
|
; bb = bb xor barr[1]
|
|
; bb = not bb
|
|
}
|
|
}
|