Add some more complex programs.
This commit is contained in:
parent
eb32577d38
commit
d40ea2a8ae
39
programs/comb_sprite.chalk
Normal file
39
programs/comb_sprite.chalk
Normal file
|
@ -0,0 +1,39 @@
|
|||
sprite dum [
|
||||
` x x `
|
||||
` x x `
|
||||
` x x `
|
||||
` `
|
||||
`x x`
|
||||
` xxxxxx `
|
||||
]
|
||||
|
||||
fun main(): u8 {
|
||||
var x = 0;
|
||||
var y = 5;
|
||||
var vy = 0;
|
||||
var ay = 1;
|
||||
var mode = 0;
|
||||
while(1) {
|
||||
draw_sprite(dum, x, y);
|
||||
set_delay(1);
|
||||
while(get_delay()){}
|
||||
draw_sprite(dum, x, y);
|
||||
if(5 - y) {
|
||||
|
||||
} else {
|
||||
mode = 0;
|
||||
}
|
||||
if(26 - y) {
|
||||
|
||||
} else {
|
||||
mode = 1;
|
||||
}
|
||||
if(mode) {
|
||||
vy = vy - ay;
|
||||
y = y - vy;
|
||||
} else {
|
||||
y = y + vy;
|
||||
vy = vy + ay;
|
||||
}
|
||||
}
|
||||
}
|
34
programs/comb_sprite_2.chalk
Normal file
34
programs/comb_sprite_2.chalk
Normal file
|
@ -0,0 +1,34 @@
|
|||
sprite dum [
|
||||
` x x `
|
||||
` x x `
|
||||
` x x `
|
||||
` `
|
||||
`x x`
|
||||
` xxxxxx `
|
||||
]
|
||||
|
||||
fun main(): u8 {
|
||||
var x = 0;
|
||||
var y = 27;
|
||||
var vx = 1;
|
||||
var vy = 0;
|
||||
var a = 1;
|
||||
while(1) {
|
||||
var draw_y = 32 - y;
|
||||
draw_sprite(dum, x, draw_y);
|
||||
set_delay(1);
|
||||
while(get_delay()){}
|
||||
|
||||
vy = vy - a;
|
||||
y = y + vy;
|
||||
x = x + vx;
|
||||
if(6-y) {
|
||||
|
||||
} else {
|
||||
var vtemp = vy;
|
||||
vy = 0 - vtemp;
|
||||
vy = vy + 1;
|
||||
}
|
||||
clear();
|
||||
}
|
||||
}
|
Loading…
Reference in New Issue
Block a user