2018-01-12 00:55:47 +01:00
|
|
|
~ main {
|
2018-02-18 18:19:51 +01:00
|
|
|
var .float flt1 = 9.87e-21
|
2018-02-11 14:18:22 +01:00
|
|
|
var .float flt = -9.87e-21
|
2018-02-11 15:11:14 +01:00
|
|
|
const .word border = $0099
|
2018-02-13 22:14:59 +01:00
|
|
|
var counter = 1
|
2018-01-28 21:58:16 +01:00
|
|
|
|
2018-01-03 21:43:19 +01:00
|
|
|
start:
|
2018-02-13 22:14:59 +01:00
|
|
|
counter ++
|
|
|
|
main.counter ++
|
2018-02-25 16:43:00 +01:00
|
|
|
; @
|
|
|
|
|
|
|
|
todo float augassign
|
2018-02-11 15:11:14 +01: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 15:18:50 +01:00
|
|
|
|
2018-02-13 22:14:59 +01:00
|
|
|
block2.b2var++
|
|
|
|
block2.start()
|
2018-02-02 22:42:09 +01:00
|
|
|
return 44.123
|
2018-02-13 22:14:59 +01: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 23:11:36 +01:00
|
|
|
|
2018-02-13 22:14:59 +01:00
|
|
|
sub derp ()->() {
|
|
|
|
const q = 22
|
|
|
|
A = q *4 ; @todo fix scope not found error
|
|
|
|
return
|
|
|
|
}
|
2018-01-07 19:14:21 +01:00
|
|
|
}
|
|
|
|
|
2018-02-13 22:14:59 +01:00
|
|
|
|
|
|
|
|
|
|
|
~ block2 {
|
|
|
|
var b2var = 0
|
|
|
|
|
|
|
|
start:
|
|
|
|
return
|
|
|
|
}
|