2018-10-11 07:54:26 +00:00
|
|
|
%option enable_floats
|
2018-08-16 21:10:28 +00:00
|
|
|
|
2018-10-02 22:25:04 +00:00
|
|
|
|
2018-09-15 22:59:12 +00:00
|
|
|
~ main {
|
2018-10-01 18:05:32 +00:00
|
|
|
|
2018-10-01 20:23:16 +00:00
|
|
|
sub start() {
|
2018-10-07 19:20:04 +00:00
|
|
|
|
2018-10-12 12:01:29 +00:00
|
|
|
byte bvar = -88
|
|
|
|
ubyte ubvar = 222
|
|
|
|
word wvar = -12345
|
|
|
|
uword uwvar = 55555
|
|
|
|
|
|
|
|
|
|
|
|
byte bv2
|
|
|
|
ubyte ubv2
|
|
|
|
word wv2
|
|
|
|
uword uwv2
|
|
|
|
|
2018-10-13 23:55:39 +00:00
|
|
|
X=X
|
|
|
|
X=X
|
|
|
|
Y=Y
|
|
|
|
X=A
|
|
|
|
A=Y
|
|
|
|
A=ubvar
|
|
|
|
AX=XY
|
|
|
|
XY=XY
|
|
|
|
AY=uwvar
|
|
|
|
XY=uwvar
|
2018-10-12 12:01:29 +00:00
|
|
|
|
|
|
|
bv2 = ub2b(ubvar)
|
|
|
|
ubv2 = b2ub(bvar)
|
|
|
|
wv2 = wrd(uwvar)
|
|
|
|
uwv2 = uwrd(wvar)
|
|
|
|
wv2 = wrd(ubvar)
|
|
|
|
wv2 = wrd(bvar)
|
|
|
|
uwv2 = uwrd(ubvar)
|
|
|
|
uwv2 = uwrd(bvar)
|
2018-10-07 23:20:53 +00:00
|
|
|
|
2018-10-07 21:08:34 +00:00
|
|
|
return
|
2018-10-07 19:20:04 +00:00
|
|
|
|
2018-09-27 21:58:14 +00:00
|
|
|
}
|
2018-10-04 18:47:52 +00:00
|
|
|
|
2018-08-12 21:09:59 +00:00
|
|
|
}
|
2018-10-13 14:09:10 +00:00
|
|
|
|
|
|
|
|
|
|
|
~ block2 $c000 {
|
|
|
|
|
|
|
|
str derp="hello"
|
|
|
|
byte v =44
|
|
|
|
return
|
|
|
|
}
|