Add tasks for all the new languages
This commit is contained in:
parent
9dc3c2bb62
commit
bba7bfd280
13208 changed files with 134745 additions and 0 deletions
43
Task/Image-noise/Axe/image-noise.axe
Normal file
43
Task/Image-noise/Axe/image-noise.axe
Normal file
|
|
@ -0,0 +1,43 @@
|
|||
.Enable 15 MHz full speed mode
|
||||
Full
|
||||
.Disable memory access delays (adds 1 FPS)
|
||||
Fullʳ
|
||||
|
||||
.Flush key presses
|
||||
While getKey(0)
|
||||
End
|
||||
|
||||
.Setup
|
||||
0→F
|
||||
0→N
|
||||
Fix 5
|
||||
fnInt(FPS,6)
|
||||
|
||||
Repeat getKey(0)
|
||||
NOISE()
|
||||
F++
|
||||
.Reset the FPS counter before it overflows
|
||||
F>606?0→F→N
|
||||
Text(0,0,F*108/N▶Dec)
|
||||
DispGraph
|
||||
End
|
||||
|
||||
.Clean up
|
||||
LnRegʳ
|
||||
Fix 4
|
||||
Return
|
||||
|
||||
.Draws random noise to the buffer
|
||||
Lbl NOISE
|
||||
ClrDraw
|
||||
For(I,0,5)
|
||||
For(J,0,63)
|
||||
rand→{J*12+(I*2)+L₆}ʳ
|
||||
End
|
||||
End
|
||||
Return
|
||||
|
||||
.Increments the tick counter
|
||||
Lbl FPS
|
||||
N++
|
||||
Return
|
||||
Loading…
Add table
Add a link
Reference in a new issue