mirror of
https://github.com/irmen/prog8.git
synced 2024-10-19 07:23:56 +00:00
19 lines
249 B
Lua
19 lines
249 B
Lua
%option enable_floats
|
|
|
|
~ main {
|
|
sub start() -> () {
|
|
|
|
A = calcIt(12345, 99)
|
|
;A = 99/5 + lsb(12345)
|
|
_vm_write_num(A)
|
|
_vm_write_char($8d)
|
|
return
|
|
|
|
}
|
|
|
|
sub calcIt(length: XY, control: A) -> (Y) {
|
|
|
|
return control/5 +lsb(length)
|
|
}
|
|
}
|