mirror of
https://github.com/irmen/prog8.git
synced 2024-08-17 17:29:01 +00:00
42 lines
546 B
Plaintext
42 lines
546 B
Plaintext
~ main {
|
|
|
|
var .float flt = -9.87e-21
|
|
var bytevar = 22 + 23
|
|
const .word border = $d020
|
|
var .word border2 = $d020
|
|
memory screenm = $d021
|
|
|
|
start:
|
|
; @todo float incrdecr/augassign
|
|
; flt += 0.1
|
|
; flt += 1.1
|
|
; flt += 10.1
|
|
; flt += 100.1
|
|
; flt += 1000.1
|
|
; flt *= 2.34
|
|
|
|
screenm ++
|
|
screenm ++
|
|
border2 ++
|
|
border2 ++
|
|
screenm --
|
|
border2 --
|
|
|
|
[$55 .float] ++
|
|
[screenm .float]--
|
|
|
|
[border] ++
|
|
[border] ++
|
|
[border] --
|
|
[$d020] ++
|
|
[$d020] ++
|
|
[$d020] --
|
|
[border2 .word] ++
|
|
[border2 .float] ++
|
|
[border2] --
|
|
[XY] ++
|
|
|
|
return 44.123
|
|
}
|
|
|