2018-01-11 23:55:47 +00:00
|
|
|
~ main {
|
2018-02-18 17:19:51 +00:00
|
|
|
var .float flt1 = 9.87e-21
|
2018-02-11 13:18:22 +00:00
|
|
|
var .float flt = -9.87e-21
|
2018-02-11 14:11:14 +00:00
|
|
|
const .word border = $0099
|
2018-02-13 21:14:59 +00:00
|
|
|
var counter = 1
|
2018-01-28 20:58:16 +00:00
|
|
|
|
2018-01-03 20:43:19 +00:00
|
|
|
start:
|
2018-02-13 21:14:59 +00:00
|
|
|
counter ++
|
|
|
|
main.counter ++
|
2018-02-25 15:43:00 +00:00
|
|
|
; @
|
|
|
|
|
|
|
|
todo float augassign
|
2018-02-11 14:11:14 +00:00
|
|
|
flt += 1000.1
|
|
|
|
flt *= 2.34
|
|
|
|
flt *= flt
|
|
|
|
|
|
|
|
;[border] &= 2 ; @todo augassign on dereference
|
|
|
|
|
|
|
|
XY*=3 ; @todo operator
|
|
|
|
XY=XY/0 ; @todo zerodiv (during expression to code generation) @todo operator
|
|
|
|
XY=XY//0 ; @todo zerodiv (during expression to code generation) @todo operator
|
|
|
|
|
|
|
|
; @todo incr by more than 1
|
|
|
|
[AX]++
|
|
|
|
[AX]++
|
|
|
|
A=0
|
|
|
|
; @todo decr by more than 1
|
|
|
|
[AX]--
|
|
|
|
[AX]--
|
|
|
|
|
2018-01-14 14:18:50 +00:00
|
|
|
|
2018-02-13 21:14:59 +00:00
|
|
|
block2.b2var++
|
|
|
|
block2.start()
|
2018-02-02 21:42:09 +00:00
|
|
|
return 44.123
|
2018-02-13 21:14:59 +00:00
|
|
|
|
|
|
|
sub goodbye ()->() {
|
|
|
|
var xxxxxx ; @todo vars in sub?
|
|
|
|
memory y = $c000 ; @todo memvars in sub?
|
|
|
|
const q = 22 ; @todo const in sub?
|
|
|
|
|
|
|
|
y++
|
|
|
|
return
|
|
|
|
}
|
|
|
|
|
2018-02-13 22:11:36 +00:00
|
|
|
|
2018-02-13 21:14:59 +00:00
|
|
|
sub derp ()->() {
|
|
|
|
const q = 22
|
|
|
|
A = q *4 ; @todo fix scope not found error
|
|
|
|
return
|
|
|
|
}
|
2018-01-07 18:14:21 +00:00
|
|
|
}
|
|
|
|
|
2018-02-13 21:14:59 +00:00
|
|
|
|
|
|
|
|
|
|
|
~ block2 {
|
|
|
|
var b2var = 0
|
|
|
|
|
|
|
|
start:
|
|
|
|
return
|
|
|
|
}
|