EASY SCRIPT SYSTEM
誰でも簡単にWindowsプログラムが作れるシステムです。
まだ開発中ですが、次のようなリストでキャラクターが動きます。
VAR sp[10];
sp[0]=read_bitmap("s01.bmp");
sp[1]=read_bitmap("s02.bmp");
VAR b2=read_bitmap("star2.bmp");
VAR score=0;
set_textsize(32);
VAR sx[30],sy[30];
for(int a=0;a<30;++a){
sx[a]=random(640);
sy[a]=random(480);
}
VAR x,y;
VAR count;
loop(0){
count=count+1;
if(count>15)count=0;
VAR pa=count/8;
put_text("SCORE",100,0);
put_text(score,320,0);
++score;
call(scroll);
x=mouse_posx();
y=mouse_posy();
put_sprite(sp[pa],x,y);
put_sprite(b2,100,100);
update();
fill(0,0,640,480,RGB(0,0,0));
}
wait(100);
end();
scroll:
for(int b=0;b<30;++b){
put_sprite(b2,sx[b],sy[b]);
--sx[b];
if(sx[b]<-50)
sx[b]=640;
}
callreturn;
というものを実行すると以下のようにマウスでキャラクターを動かします。