mirror of
https://github.com/irmen/prog8.git
synced 2024-11-26 11:49:22 +00:00
32 lines
614 B
Lua
32 lines
614 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')
|
|
|
|
|
|
}
|
|
}
|