mirror of
https://github.com/irmen/prog8.git
synced 2024-10-18 16:24:26 +00:00
test example for fixed float ranges
This commit is contained in:
parent
1a06e7a16e
commit
5988ba76b5
@ -1,42 +1,37 @@
|
|||||||
%import textio
|
%import textio
|
||||||
|
%import floats
|
||||||
%zeropage dontuse
|
%zeropage dontuse
|
||||||
|
|
||||||
main {
|
main {
|
||||||
|
|
||||||
label:
|
label:
|
||||||
sub start() {
|
sub start() {
|
||||||
sub2(&label)
|
|
||||||
sub2(&label_local)
|
ubyte[6] ubs = 10 to 20 step 2
|
||||||
sub2(&main.sub2.label_in_sub2)
|
ubyte[] ubs2 = 10 to 20 step 2
|
||||||
uword xx = &label_local
|
float[6] fs = 10 to 20 step 2
|
||||||
txt.print_uwhex(xx, true)
|
float[] fs2 = 10 to 20 step 2
|
||||||
|
|
||||||
|
txt.print_ub(len(ubs))
|
||||||
txt.nl()
|
txt.nl()
|
||||||
xx = &label
|
txt.print_ub(len(ubs2))
|
||||||
txt.print_uwhex(xx, true)
|
|
||||||
txt.nl()
|
txt.nl()
|
||||||
xx = &main.label
|
txt.print_ub(len(fs))
|
||||||
txt.print_uwhex(xx, true)
|
|
||||||
txt.nl()
|
txt.nl()
|
||||||
xx = &main.sub2.label_in_sub2
|
txt.print_ub(len(fs2))
|
||||||
txt.print_uwhex(xx, true)
|
|
||||||
txt.nl()
|
|
||||||
xx = main.sub2.sub2var
|
|
||||||
txt.print_uwhex(xx, true)
|
|
||||||
txt.nl()
|
|
||||||
xx = &main.start.label_local
|
|
||||||
txt.print_uwhex(xx, true)
|
|
||||||
txt.nl()
|
txt.nl()
|
||||||
|
|
||||||
label_local:
|
ubyte ix
|
||||||
return
|
for ix in 0 to 5 {
|
||||||
}
|
txt.print_ub(ubs2[ix])
|
||||||
|
txt.spc()
|
||||||
sub sub2(uword ad) {
|
}
|
||||||
uword sub2var = 42
|
|
||||||
|
|
||||||
txt.print_uwhex(ad,true)
|
|
||||||
txt.nl()
|
txt.nl()
|
||||||
label_in_sub2:
|
for ix in 0 to 5 {
|
||||||
|
floats.print_f(fs2[ix])
|
||||||
|
txt.spc()
|
||||||
|
}
|
||||||
txt.nl()
|
txt.nl()
|
||||||
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
Loading…
Reference in New Issue
Block a user