0 Members and 5 Guests are viewing this topic.
Due to the rand calc reset, about half of the files are gone... I backed it up, but it was long time ago...So I'm thinking about not giving up and try with axe this time since the games started to get slower even with the optimization anyway. One question: how do you draw rectangle while still keeping a picture on screen?
:.DEMO:prgmA0000001 //Tilemap Sprite:prgmA0000003 //Character Sprite:[060606060606060606060606 -> GDB1:[060606060606060606060006:[060606060606060602020206:[060606060606060602020206:[010101010301010101010101:[010101010301010101010101:[060606060606060606060606:[060606060606060606060606:0->A->B->C:Repeat getKey(15):sub(MP:Pt-Off(A,B,C*8+Pic201:DispGraph:If getKey(2) and (A!=0) //!= not equal sign but I don't know how to write it, so...:2->C:A-8->A:Pause 100:End:If getKey(3) and (A!=88) :3->C:A+8->A:Pause 100:End:If getKey(4) and (B!=0) :1->C:B-8->B:Pause 100:End:If getKey(1) and (B!=56):0->C:B+8->B:Pause 100:End:End:Lbl MP:For(Y,0,7:For(X,0,11:Pt-Off(X*8,Y*8,{Y*12+x+GBD1}*8+Pic101:End:End:DispGraph
Remove the MP at the end of the Lbl MP block and replace it with a return. That should help the blinking.
I'll look at the collision later.Edit: One away.
Data(0,1,2,3,4,5,6)->GDB1: Copy(GDB1,7,L1)
For(A,0,6):Text(0,,{L1+A}>Char):End
{L1}+1->{L1}