2022-02-22 20:07:19 +00:00
|
|
|
%import textio
|
2022-04-23 00:15:51 +00:00
|
|
|
; %import floats
|
|
|
|
%import conv
|
2022-04-03 15:07:26 +00:00
|
|
|
%zeropage dontuse
|
|
|
|
|
2022-03-13 11:52:12 +00:00
|
|
|
|
2022-03-24 23:17:41 +00:00
|
|
|
; NOTE: meant to test to virtual machine output target (use -target vitual)
|
|
|
|
|
2021-10-30 13:15:11 +00:00
|
|
|
main {
|
2022-04-23 00:15:51 +00:00
|
|
|
sub newstring() -> str {
|
|
|
|
return "new"
|
|
|
|
}
|
|
|
|
|
2022-04-03 13:25:32 +00:00
|
|
|
sub start() {
|
2022-04-23 00:15:51 +00:00
|
|
|
str name = "irmen\n"
|
|
|
|
txt.print(name)
|
|
|
|
name = "pipo\n"
|
|
|
|
txt.print(name)
|
|
|
|
|
|
|
|
ubyte cc
|
|
|
|
ubyte[] array = [11,22,33,44]
|
|
|
|
for cc in array {
|
|
|
|
txt.print_ub(cc)
|
|
|
|
txt.spc()
|
|
|
|
}
|
|
|
|
txt.nl()
|
|
|
|
array = [99,88,77,66]
|
|
|
|
for cc in array {
|
|
|
|
txt.print_ub(cc)
|
|
|
|
txt.spc()
|
|
|
|
}
|
|
|
|
txt.nl()
|
|
|
|
|
|
|
|
txt.print_ub0(99)
|
|
|
|
txt.spc()
|
|
|
|
txt.print_ub(99)
|
|
|
|
txt.nl()
|
|
|
|
txt.print_uw0(9988)
|
|
|
|
txt.spc()
|
|
|
|
txt.print_uw(9988)
|
|
|
|
txt.nl()
|
2022-04-10 23:31:34 +00:00
|
|
|
|
2022-04-23 00:15:51 +00:00
|
|
|
; float f1 = 1.555
|
|
|
|
; floats.print_f(floats.sin(f1))
|
|
|
|
; txt.nl()
|
|
|
|
; floats.print_f(floats.cos(f1))
|
|
|
|
; txt.nl()
|
|
|
|
; floats.print_f(floats.tan(f1))
|
|
|
|
; txt.nl()
|
|
|
|
; floats.print_f(floats.atan(f1))
|
|
|
|
; txt.nl()
|
|
|
|
; floats.print_f(floats.ln(f1))
|
|
|
|
; txt.nl()
|
|
|
|
; floats.print_f(floats.log2(f1))
|
|
|
|
; txt.nl()
|
|
|
|
; floats.print_f(floats.sqrt(f1))
|
|
|
|
; txt.nl()
|
|
|
|
; floats.print_f(floats.rad(f1))
|
|
|
|
; txt.nl()
|
|
|
|
; floats.print_f(floats.deg(f1))
|
|
|
|
; txt.nl()
|
|
|
|
; floats.print_f(floats.round(f1))
|
|
|
|
; txt.nl()
|
|
|
|
; floats.print_f(floats.floor(f1))
|
|
|
|
; txt.nl()
|
|
|
|
; floats.print_f(floats.ceil(f1))
|
|
|
|
; txt.nl()
|
|
|
|
; floats.print_f(floats.rndf())
|
|
|
|
; txt.nl()
|
2022-04-21 22:45:54 +00:00
|
|
|
; "sin", "cos", "tan", "atan",
|
|
|
|
; "ln", "log2", "sqrt", "rad",
|
|
|
|
; "deg", "round", "floor", "ceil", "rndf"
|
2022-04-10 20:31:37 +00:00
|
|
|
|
2022-04-18 17:59:48 +00:00
|
|
|
; ; a "pixelshader":
|
|
|
|
; void syscall1(8, 0) ; enable lo res creen
|
|
|
|
; ubyte shifter
|
|
|
|
;
|
|
|
|
; ; pokemon(1,0)
|
|
|
|
;
|
|
|
|
; repeat {
|
|
|
|
; uword xx
|
|
|
|
; uword yy = 0
|
|
|
|
; repeat 240 {
|
|
|
|
; xx = 0
|
|
|
|
; repeat 320 {
|
|
|
|
; syscall3(10, xx, yy, xx*yy + shifter) ; plot pixel
|
|
|
|
; xx++
|
|
|
|
; }
|
|
|
|
; yy++
|
|
|
|
; }
|
|
|
|
; shifter+=4
|
|
|
|
; }
|
2022-03-04 21:26:46 +00:00
|
|
|
}
|
2022-02-17 23:40:31 +00:00
|
|
|
}
|