prog8/examples/test.p8

32 lines
614 B
Plaintext
Raw Normal View History

2019-07-01 11:43:14 +00:00
;%import c64utils
;%zeropage basicsafe
;%import c64flt
2019-06-25 21:36:54 +00:00
2019-03-29 01:13:28 +00:00
~ main {
2019-02-21 00:31:33 +00:00
sub start() {
2019-06-28 20:10:01 +00:00
2019-07-01 11:43:14 +00:00
float[] xcoor = [ -1.0, -1.0, -1.0, -1.0, 1.0, 1.0, 1.0, 1.0 ]
2019-06-28 20:10:01 +00:00
2019-07-01 11:43:14 +00:00
; storage for rotated coordinates
; ubyte[len(xcoor)] xx = 2
; float[len(xcoor)] rotatedx=0.0
;
; ubyte[4] x = 23
; float[4] yy = 4.4
2019-06-30 16:06:11 +00:00
2019-06-30 18:10:53 +00:00
; 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')
2019-06-30 16:06:11 +00:00
2019-06-28 20:10:01 +00:00
2019-06-27 23:21:31 +00:00
}
}