2020-03-24 23:32:54 +00:00
|
|
|
%import c64lib
|
2020-03-14 23:47:21 +00:00
|
|
|
%import c64utils
|
2020-03-24 23:32:54 +00:00
|
|
|
%zeropage basicsafe
|
2019-08-09 00:15:31 +00:00
|
|
|
|
2020-03-24 18:37:54 +00:00
|
|
|
|
2020-03-24 23:32:54 +00:00
|
|
|
main {
|
2020-03-25 00:23:40 +00:00
|
|
|
uword[2] array1 = 1
|
2020-03-24 18:37:54 +00:00
|
|
|
|
2020-03-24 21:02:50 +00:00
|
|
|
|
2020-03-24 23:32:54 +00:00
|
|
|
sub start() {
|
|
|
|
|
uword addr = $c000
|
|
|
|
|
&uword addr2 = $c100
|
2020-03-24 21:02:50 +00:00
|
|
|
|
2020-03-24 23:32:54 +00:00
|
|
|
; not sure if these are okay:
|
|
|
|
|
addr2 = 0
|
|
|
|
|
addr2 |= 128
|
|
|
|
|
addr2 += 1
|
2020-03-24 18:37:54 +00:00
|
|
|
|
2020-03-24 23:32:54 +00:00
|
|
|
@(addr) = 0
|
|
|
|
|
@(addr) |= 128 ; TODO FIX result of memory-OR/XOR and probably AND as well
|
|
|
|
|
@(addr) += 1 ; TODO fix result of memory += 1
|
2020-03-24 18:37:54 +00:00
|
|
|
|
2020-03-13 01:05:15 +00:00
|
|
|
}
|
2020-03-21 17:39:36 +00:00
|
|
|
}
|
2020-03-24 21:02:50 +00:00
|
|
|
|
2020-03-24 23:32:54 +00:00
|
|
|
|
