mirror of
https://github.com/irmen/prog8.git
synced 2024-09-07 19:54:26 +00:00
33 lines
591 B
Lua
33 lines
591 B
Lua
%import c64utils
|
|
%zeropage basicsafe
|
|
%import c64flt
|
|
|
|
|
|
~ main {
|
|
|
|
sub start() {
|
|
|
|
|
|
float[] xcoor = [ -1.0, -1.0, -1.0, -1.0, 1.0, 1.0, 1.0, 1.0 ]
|
|
|
|
; storage for rotated coordinates
|
|
ubyte[len(xcoor)] xx = 2
|
|
float[len(xcoor)] rotatedx=0.0
|
|
|
|
ubyte[4] x = 23
|
|
float[4] yy = 4.4
|
|
|
|
; c64flt.print_f(xcoor[1])
|
|
; c64.CHROUT(',')
|
|
; c64flt.print_f(xcoor[2])
|
|
; c64.CHROUT('\n')
|
|
; swap(xcoor[1], xcoor[2])
|
|
; c64flt.print_f(xcoor[1])
|
|
; c64.CHROUT(',')
|
|
; c64flt.print_f(xcoor[2])
|
|
; c64.CHROUT('\n')
|
|
|
|
|
|
}
|
|
}
|