Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ascent(i in 0..Shells)
- {
- let ShellID = ShellCount[i];
- if(ShellXDir[i] == 0)
- {
- ShellXDir[i] = ShellXDir[i] - 1;
- }
- if(ShellTimer%16<4)
- {
- ObjSprite2D_SetSourceRect(ShellID, 2, 74, 34, 106);
- }
- else if(ShellTimer%16<8)
- {
- ObjSprite2D_SetSourceRect(ShellID, 38, 74, 70, 106);
- }
- else if(ShellTimer%16<12)
- {
- ObjSprite2D_SetSourceRect(ShellID, 74, 74, 106, 106);
- }
- else
- {
- ObjSprite2D_SetSourceRect(ShellID, 110, 74, 142, 106);
- }
- ObjSprite2D_SetDestCenter(ShellID);
- ObjMove_SetX(ShellID, ObjMove_GetX(ShellID)+6*ShellXDir[i]);
- ObjMove_SetY(ShellID, ObjMove_GetY(ShellID)+ShellVelocityY[i]);
- ShellVelocityY[i]=ShellVelocityY[i]+0.25;
- if(ShellVelocityY[i] > 15)
- {
- ShellVelocityY[i] = 15;
- }
- if(ObjMove_GetY(ShellID) >= GetStgFrameHeight-5)
- {
- ShellVelocityY[i] = -13;
- ObjMove_SetY(ShellID, GetStgFrameHeight-6);
- }
- if(ObjMove_GetX(ShellID) <= 0)
- {
- ShellXDir[i] = -(ShellXDir[i]);
- ObjMove_SetX(ShellID, 1);
- }
- else if(ObjMove_GetX(ShellID) >= GetStgFrameWidth)
- {
- ShellXDir[i] = -(ShellXDir[i]);
- ObjMove_SetX(ShellID, GetStgFrameWidth-1);
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment