Hi im having problems removing my sprites when someone loses a life or completes the game and tries to play again without exiting the game.
Ive tried to use a varible to increase the sprite number when someone dies/loses a life because when i reuse the same sprite number it refuses to move.
Thanks for any help
`SheepInvaders Started 11/11/09
`Sets environment
gosub setupenvironment
`Loads images
gosub loadimages
`Loads music
gosub loadmusic
`************************************************
`Menu Code
`************************************************
`Sets gosub for main menu
gosub main_menu
`Loads the main menu
main_menu:
`Loops music 1 for the introduction
loop music 1
`Loads image 1 at postion 0,0
paste image 1,0,0
`Sets text size to 12
set text size 12
`Sets the value of white to RGB 255,255,255
white=RGB(255,255,255)
`Sets value of black to RGB 0,0,0
black=RGB(0,0,0)
`Sets value of selecteditem to 1
selectedItem=1
`Starts a DO loop
do
cls
paste image 1,0,0
`print menu items
if selectedItem=1 then ink white,0 else ink black,0
text 140,390,"Play Game"
if selectedItem=2 then ink white,0 else ink black,0
text 140,410,"Instructions"
if selectedItem=3 then ink white,0 else ink black,0
text 140,430,"Exit"
`select menu items
if upkey()=1 and hold=0 then dec selectedItem : hold=1
if downkey()=1 and hold=0 then inc selectedItem : hold=1
if upkey()=0 and downkey()=0 then hold=0
if selectedItem>3 then selectedItem=1
if selectedItem<1 then selectedITem=3
`choose what to do when an item is selected
if returnkey()=1
`play game
if selectedItem=1 then gosub LoadGame
`display instructions
if selectedItem=2
paste image 2,0,0
sync : sync
suspend()
`clear up after myself
delete image 2
endif
`quit the game
if selectedItem=3
end
endif
endif
sync
loop
`------------------------------
`custom suspend for key command
`------------------------------
function suspend()
hold=1
repeat
if scancode()=0 then hold=0
until scancode()<>0 and hold=0
endfunction
`************************************************
`Game Code
`************************************************
`Loads the main game code
LoadGame:
paste image 10,0,0
wait 2000
paste image 13,0,0
wait 1000
paste image 12,0,0
wait 1000
paste image 11,0,0
wait 1000
paste image 14,0,0
wait 2000
`Sets direction to 0
direction = 0
Diecount = 0
Lives = 3
`sets position of farmer/player
FarmerX = 500
FarmerY = 510
`Amount of sheeps to start with
SheepsStart = 80+(DieCount*100)
SheepsEnd = 87+(DieCount*100)
`Sets amount of sheep
Sheeps_On_Screen = 8
`sets variables for bullet
BulletX = 0
BulletY = 0
MoveBullet = 0
`Set boundaries for farmer
FarmerMaxX = 760
FarmerMaxY = 560
`level 1
gosub Level1
return
`******************************************************************************************
`procedure: level 1
`purpose: Plays level 1
`author: Leighton James Lewis
`Created: 28/01/10
`mod history:
`******************************************************************************************
Level1:
`loads background image
paste image 3,0,0
`Sets Sheeps position
gosub Sheeplevel1
`Loops game for level 1
do
if mouseclick() > 0
print DieCount
endif
`Checks for movement of farmer
gosub MovementFarmer
`Moves the sheep
gosub MovementSheep
`Checks if sheep hits bottom
gosub Gameover
`Checks for bullet on game
If MoveBullet = 0
gosub FireBullet
endif
`Moves bullet if its being fired
If MoveBullet = 1
gosub MoveBullet
`Checks for collision of the bullet
Gosub CheckforCollision
endif
`Farmer
sprite 1, FarmerX,FarmerY,4
`If sheeps equal to 0 then go to level 2
If sheeps_on_screen = 0
gosub Level2
endif
sync
loop
return
`******************************************************************************************
`procedure: level2
`purpose: Plays level 2
`author: Leighton James Lewis
`Created: 28/01/10
`mod history:
`******************************************************************************************
Level2:
`Sets sheep start to 84 to 92
SheepsStart = 88+(DieCount*100)
SheepsEnd = 103+(DieCount*100)
`Sets sheep on screen to 9
Sheeps_On_Screen = 16
`sets direction to 0
direction = 0
`Paste Level 2 image
delete sprite 1
paste image 15,0,0
`Wait 2 seconds
wait 2000
`Paste image 3
paste image 3,0,0
BulletX = 0
BulletY = 0
MoveBullet = 0
FarmerMaxX = 760
FarmerMaxY = 560
gosub Sheeplevel2
do
`Checks for movement of farmer
gosub MovementFarmer
`Moves the sheep
gosub MovementSheep
`Checks if sheep hits bottom
gosub Gameover
`Checks for bullet on game
If MoveBullet = 0
gosub FireBullet
endif
`Moves bullet if its being fired
If MoveBullet = 1
gosub MoveBullet
`Checks for collision of the bullet
Gosub CheckforCollision
endif
`Farmer
sprite 1, FarmerX,FarmerY,4
If sheeps_on_screen = 0
gosub Level3
endif
sync
loop
return
`******************************************************************************************
`procedure: level3
`purpose: Plays level 3
`author: Leighton James Lewis
`Created: 28/01/10
`mod history:
`******************************************************************************************
Level3:
`Sets sheep start to 84 to 92
SheepsStart = 104+(DieCount*100)
SheepsEnd = 135+(DieCount*100)
`Sets sheep on screen to 9
Sheeps_On_Screen = 32
`sets direction to 0
Direction = 0
`Paste Level 2 image
delete sprite 1
paste image 16,0,0
`Wait 2 seconds
wait 2000
`Paste image 3
paste image 3,0,0
BulletX = 0
BulletY = 0
MoveBullet = 0
FarmerMaxX = 760
FarmerMaxY = 560
gosub Sheeplevel3
do
`Checks for movement of farmer
gosub MovementFarmer
`Moves the sheep
gosub MovementSheep
`Checks if sheep hits bottom
gosub Gameover
`Checks for bullet on game
If MoveBullet = 0
gosub FireBullet
endif
`Moves bullet if its being fired
If MoveBullet = 1
gosub MoveBullet
`Checks for collision of the bullet
Gosub CheckforCollision
endif
`Farmer
sprite 1, FarmerX,FarmerY,4
If Sheeps_On_Screen = 0
delete sprite 1
paste image 21,0,0
wait 3000
gosub main_menu
endif
sync
loop
return
`******************************************************************************************
`procedure: SheepPos
`purpose: Sets sheep pos
`author: Leighton James Lewis
`Created: 25/11/09
`mod history:
`******************************************************************************************
Sheeplevel1:
sprite 80+(DieCount*100),220,100,6
sprite 81+(DieCount*100),320,100,6
sprite 82+(DieCount*100),420,100,6
sprite 83+(DieCount*100),520,100,6
sprite 84+(DieCount*100),220,220,6
sprite 85+(DieCount*100),320,220,6
sprite 86+(DieCount*100),420,220,6
sprite 87+(DieCount*100),520,220,6
return
Sheeplevel2:
sprite 88+(DieCount*100),220,10,6
sprite 89+(DieCount*100),320,10,6
sprite 90+(DieCount*100),420,10,6
sprite 91+(DieCount*100),520,10,6
sprite 92+(DieCount*100),220,80,6
sprite 93+(DieCount*100),320,80,6
sprite 94+(DieCount*100),420,80,6
sprite 95+(DieCount*100),520,80,6
sprite 96+(DieCount*100),220,150,6
sprite 97+(DieCount*100),320,150,6
sprite 98+(DieCount*100),420,150,6
sprite 99+(DieCount*100),520,150,6
sprite 100+(DieCount*100),220,220,6
sprite 101+(DieCount*100),320,220,6
sprite 102+(DieCount*100),420,220,6
sprite 103+(DieCount*100),520,220,6
return
Sheeplevel3:
sprite 104+(DieCount*100),40,0,6
sprite 105+(DieCount*100),100,0,6
sprite 106+(DieCount*100),160,0,6
sprite 107+(DieCount*100),220,0,6
sprite 108+(DieCount*100),280,0,6
sprite 109+(DieCount*100),340,0,6
sprite 110+(DieCount*100),400,0,6
sprite 111+(DieCount*100),460,0,6
sprite 112+(DieCount*100),40,60,6
sprite 113+(DieCount*100),100,60,6
sprite 114+(DieCount*100),160,60,6
sprite 115+(DieCount*100),220,60,6
sprite 116+(DieCount*100),280,60,6
sprite 117+(DieCount*100),340,60,6
sprite 118+(DieCount*100),400,60,6
sprite 119+(DieCount*100),460,60,6
sprite 120+(DieCount*100),40,120,6
sprite 121+(DieCount*100),100,120,6
sprite 122+(DieCount*100),160,120,6
sprite 123+(DieCount*100),220,120,6
sprite 124+(DieCount*100),280,120,6
sprite 125+(DieCount*100),340,120,6
sprite 126+(DieCount*100),400,120,6
sprite 127+(DieCount*100),460,120,6
sprite 128+(DieCount*100),40,180,6
sprite 129+(DieCount*100),100,180,6
sprite 130+(DieCount*100),160,180,6
sprite 131+(DieCount*100),220,180,6
sprite 132+(DieCount*100),280,180,6
sprite 133+(DieCount*100),340,180,6
sprite 134+(DieCount*100),400,180,6
sprite 135+(DieCount*100),460,180,6
return
`******************************************************************************************
`procedure: setupenvironment
`purpose: setup the graphical environment for the game
`author: Leighton James Lewis
`Created: 25/11/09
`mod history:
`******************************************************************************************
setupenvironment:
`set up environment
set display mode 800,600,32
`let this program handle any screen updates, Sets sync on and sync rates to 40
Sync on
sync rate 40
`hide the mouse
hide mouse
return
`******************************************************************************************
`procedure: loadimages
`purpose: load images for the game
`author: Leighton James Lewis
`Created: 25/11/09
`mod history:
`******************************************************************************************
loadimages:
`Loads introduction images
Load image "Images\Intro.bmp",1
Load image "Images\instructions.bmp",2
Load image "Images\Background.bmp",3
`loads game images
Load image "Images\Farmer.png",4
Load image "Images\Bullet.png",5
Load image "Images\Sheep.png",6
`Loads level covers images
Load image "Images\GetReady.bmp",10
Load image "Images\GetReady1.bmp",11
Load image "Images\GetReady2.bmp",12
Load image "Images\GetReady3.bmp",13
Load image "Images\Level1.bmp",14
Load image "Images\Level2.bmp",15
Load image "Images\Level3.bmp",16
Load image "Images\Gameover.bmp",20
Load image "Images\GameComplete.bmp",21
Load image "Images\LifeLost.bmp",22
return
`******************************************************************************************
`procedure: loadMusic
`purpose: load music for the game
`author: Leighton James Lewis
`Created: 25/11/09
`mod history:
`******************************************************************************************
loadmusic:
Load music "Sounds\Music1.mp3",1
Load sound "Sounds\Gunshot.mp3",2
Load sound "Sounds\SheepBaa1.wav",3
return
`******************************************************************************************
`procedure: MovementFarmer
`purpose: Check for movement of the farmer
`author: Leighton James Lewis
`Created: 25/11/09
`mod history:
`******************************************************************************************
MovementFarmer:
`check for keyboard operation
if leftkey() = 1
FarmerX = FarmerX - 5
if FarmerX < 0
FarmerX = 0
endif
endif
if rightkey() = 1
FarmerX = FarmerX + 5
if FarmerX > FarmerMaxX
FarmerX = FarmerMaxX
endif
endif
return
`******************************************************************************************
`procedure: firebullet
`purpose: checks for player pressing space key and then to fire a bullet
`author: Leighton James Lewis
`Created: 25/11/09
`mod history:
`******************************************************************************************
firebullet:
if spacekey() = 1
play sound 2
BulletX = FarmerX
BulletY = 520
Sprite 3, BulletX, BulletY, 5
Movebullet = 1
endif
return
`******************************************************************************************
`procedure: firebullet
`purpose: checks for player pressing space key and then to fire a bullet
`author: Leighton James Lewis
`Created: 25/11/09
`mod history:
`******************************************************************************************
MoveBullet:
BulletY = BulletY - 20
Sprite 3, BulletX, BulletY, 5
If Bullety < 0
delete sprite 3
Movebullet = 0
Endif
Return
`******************************************************************************************
`procedure:CheckforCollision
`purpose: check for collision and remove from screen
`author: Leighton James Lewis
`Created: 25/11/09
`mod history:
`******************************************************************************************
CheckforCollision:
FOR i = SheepsStart to SheepsEnd
` sprites between 80 and 100 are sheeps
If sprite collision(3,i) > 0
play sound 3
delete sprite 3
delete sprite i
Movebullet = 0
Sheeps_on_screen = Sheeps_on_screen - 1
endif
next i
return
`******************************************************************************************
`procedure: MovesmentSheep
`purpose: Moves the sheep
`author: Leighton James Lewis
`Created: 25/11/09
`mod history:
`******************************************************************************************
MovementSheep:
Mukka = direction
`Moves sheep right to left
FOR i = SheepsStart to SheepsEnd
SheepY = Sprite y(i)
SheepX = Sprite x(i)
If direction = 0
SheepX = sprite x(i) +5
if sprite x(i)>=720
direction = 1
endif
endif
if direction = 1
SheepX = sprite x(i) -5
if sprite x(i)<=20
direction = 2
endif
endif
if direction = 2
SheepX = sprite x(i) +7
if sprite x(i)>=710
direction = 3
endif
endif
if direction = 3
SheepX = sprite x(i) -7
if sprite x(i)<=30
direction = 4
endif
endif
if direction = 4
SheepX = sprite x(i) +9
if sprite x(i)>=700
direction = 5
endif
endif
if direction = 5
SheepX = sprite x(i) -9
if sprite x(i)<=40
direction = 4
endif
endif
if sprite exist(i)
sprite i ,SheepX,SheepY,6
endif
next i
`Moves sheep down
if mukka <> direction
FOR i = SheepsStart to SheepsEnd
SheepY = sprite y(i)+10
SheepX = sprite x(i)
if sprite exist(i)
sprite i ,SheepX,SheepY,6
endif
next i
endif
return
`******************************************************************************************
`procedure: Game over
`purpose: Checks if sheep have hit the bottom limit
`author: Leighton James Lewis
`Created: 25/11/09
`mod history:
`******************************************************************************************
Gameover:
FOR i = SheepsStart to SheepsEnd
SheepY = sprite y(i)
If sprite y(i)>=400
Lives = Lives -1
Paste image 22,0,0
wait 2000
if sprite exist(80+(DieCount*100))
delete sprite 80+(DieCount*100)
endif
if sprite exist(81+(DieCount*100))
delete sprite 81+(DieCount*100)
endif
if sprite exist(82+(DieCount*100))
delete sprite 82+(DieCount*100)
endif
if sprite exist(83+(DieCount*100))
delete sprite 83+(DieCount*100)
endif
if sprite exist(84+(DieCount*100))
delete sprite 84+(DieCount*100)
endif
if sprite exist(85+(DieCount*100))
delete sprite 85+(DieCount*100)
endif
if sprite exist(86+(DieCount*100))
delete sprite 86+(DieCount*100)
endif
if sprite exist(87+(DieCount*100))
delete sprite 87+(DieCount*100)
endif
if sprite exist(88+(DieCount*100))
delete sprite 88+(DieCount*100)
endif
if sprite exist(89+(DieCount*100))
delete sprite 89+(DieCount*100)
endif
if sprite exist(90+(DieCount*100))
delete sprite 90+(DieCount*100)
endif
if sprite exist(91+(DieCount*100))
delete sprite 91+(DieCount*100)
endif
if sprite exist(92+(DieCount*100))
delete sprite 92+(DieCount*100)
endif
if sprite exist(93+(DieCount*100))
delete sprite 93+(DieCount*100)
endif
if sprite exist(94+(DieCount*100))
delete sprite 94+(DieCount*100)
endif
if sprite exist(95+(DieCount*100))
delete sprite 95+(DieCount*100)
endif
if sprite exist(96+(DieCount*100))
delete sprite 96+(DieCount*100)
endif
if sprite exist(97+(DieCount*100))
delete sprite 97+(DieCount*100)
endif
if sprite exist(98+(DieCount*100))
delete sprite 98+(DieCount*100)
endif
if sprite exist(99+(DieCount*100))
delete sprite 99+(DieCount*100)
endif
if sprite exist(100+(DieCount*100))
delete sprite 100+(DieCount*100)
endif
if sprite exist(101+(DieCount*100))
delete sprite 101+(DieCount*100)
endif
if sprite exist(102+(DieCount*100))
delete sprite 102+(DieCount*100)
endif
if sprite exist(103+(DieCount*100))
delete sprite 103+(DieCount*100)
endif
if sprite exist(104+(DieCount*100))
delete sprite 104+(DieCount*100)
endif
if sprite exist(105+(DieCount*100))
delete sprite 105+(DieCount*100)
endif
if sprite exist(106+(DieCount*100))
delete sprite 106+(DieCount*100)
endif
if sprite exist(107+(DieCount*100))
delete sprite 107+(DieCount*100)
endif
if sprite exist(108+(DieCount*100))
delete sprite 108+(DieCount*100)
endif
if sprite exist(109+(DieCount*100))
delete sprite 109+(DieCount*100)
endif
if sprite exist(110+(DieCount*100))
delete sprite 110+(DieCount*100)
endif
if sprite exist(111+(DieCount*100))
delete sprite 111+(DieCount*100)
endif
if sprite exist(112+(DieCount*100))
delete sprite 112+(DieCount*100)
endif
if sprite exist(113+(DieCount*100))
delete sprite 113+(DieCount*100)
endif
if sprite exist(114+(DieCount*100))
delete sprite 114+(DieCount*100)
endif
if sprite exist(115+(DieCount*100))
delete sprite 115+(DieCount*100)
endif
if sprite exist(116+(DieCount*100))
delete sprite 116+(DieCount*100)
endif
if sprite exist(117+(DieCount*100))
delete sprite 117+(DieCount*100)
endif
if sprite exist(118+(DieCount*100))
delete sprite 118+(DieCount*100)
endif
if sprite exist(119+(DieCount*100))
delete sprite 119+(DieCount*100)
endif
if sprite exist(120+(DieCount*100))
delete sprite 120+(DieCount*100)
endif
if sprite exist(121+(DieCount*100))
delete sprite 121+(DieCount*100)
endif
if sprite exist(122+(DieCount*100))
delete sprite 122+(DieCount*100)
endif
if sprite exist(123+(DieCount*100))
delete sprite 123+(DieCount*100)
endif
if sprite exist(124+(DieCount*100))
delete sprite 124+(DieCount*100)
endif
if sprite exist(125+(DieCount*100))
delete sprite 125+(DieCount*100)
endif
if sprite exist(126+(DieCount*100))
delete sprite 126+(DieCount*100)
endif
if sprite exist(127+(DieCount*100))
delete sprite 127+(DieCount*100)
endif
if sprite exist(128+(DieCount*100))
delete sprite 128+(DieCount*100)
endif
if sprite exist(129+(DieCount*100))
delete sprite 129+(DieCount*100)
endif
if sprite exist(130+(DieCount*100))
delete sprite 130+(DieCount*100)
endif
if sprite exist(131+(DieCount*100))
delete sprite 131+(DieCount*100)
endif
if sprite exist(132+(DieCount*100))
delete sprite 132+(DieCount*100)
endif
if sprite exist(133+(DieCount*100))
delete sprite 133+(DieCount*100)
endif
if sprite exist(134+(DieCount*100))
delete sprite 134+(DieCount*100)
endif
if sprite exist(135+(DieCount*100))
delete sprite 135+(DieCount*100)
endif
if sprite exist(1)
delete sprite 1
endif
DieCount = DieCount +1
gosub LoadGame
endif
if Lives = 0
cls
if sprite exist(80+(DieCount*100))
delete sprite 80+(DieCount*100)
endif
if sprite exist(81+(DieCount*100))
delete sprite 81+(DieCount*100)
endif
if sprite exist(82+(DieCount*100))
delete sprite 82+(DieCount*100)
endif
if sprite exist(83+(DieCount*100))
delete sprite 83+(DieCount*100)
endif
if sprite exist(84+(DieCount*100))
delete sprite 84+(DieCount*100)
endif
if sprite exist(85+(DieCount*100))
delete sprite 85+(DieCount*100)
endif
if sprite exist(86+(DieCount*100))
delete sprite 86+(DieCount*100)
endif
if sprite exist(87+(DieCount*100))
delete sprite 87+(DieCount*100)
endif
if sprite exist(88+(DieCount*100))
delete sprite 88+(DieCount*100)
endif
if sprite exist(89+(DieCount*100))
delete sprite 89+(DieCount*100)
endif
if sprite exist(90+(DieCount*100))
delete sprite 90+(DieCount*100)
endif
if sprite exist(91+(DieCount*100))
delete sprite 91+(DieCount*100)
endif
if sprite exist(92+(DieCount*100))
delete sprite 92+(DieCount*100)
endif
if sprite exist(93+(DieCount*100))
delete sprite 93+(DieCount*100)
endif
if sprite exist(94+(DieCount*100))
delete sprite 94+(DieCount*100)
endif
if sprite exist(95+(DieCount*100))
delete sprite 95+(DieCount*100)
endif
if sprite exist(96+(DieCount*100))
delete sprite 96+(DieCount*100)
endif
if sprite exist(97+(DieCount*100))
delete sprite 97+(DieCount*100)
endif
if sprite exist(98+(DieCount*100))
delete sprite 98+(DieCount*100)
endif
if sprite exist(99+(DieCount*100))
delete sprite 99+(DieCount*100)
endif
if sprite exist(100+(DieCount*100))
delete sprite 100+(DieCount*100)
endif
if sprite exist(101+(DieCount*100))
delete sprite 101+(DieCount*100)
endif
if sprite exist(102+(DieCount*100))
delete sprite 102+(DieCount*100)
endif
if sprite exist(103+(DieCount*100))
delete sprite 103+(DieCount*100)
endif
if sprite exist(104+(DieCount*100))
delete sprite 104+(DieCount*100)
endif
if sprite exist(105+(DieCount*100))
delete sprite 105+(DieCount*100)
endif
if sprite exist(106+(DieCount*100))
delete sprite 106+(DieCount*100)
endif
if sprite exist(107+(DieCount*100))
delete sprite 107+(DieCount*100)
endif
if sprite exist(108+(DieCount*100))
delete sprite 108+(DieCount*100)
endif
if sprite exist(109+(DieCount*100))
delete sprite 109+(DieCount*100)
endif
if sprite exist(110+(DieCount*100))
delete sprite 110+(DieCount*100)
endif
if sprite exist(111+(DieCount*100))
delete sprite 111+(DieCount*100)
endif
if sprite exist(112+(DieCount*100))
delete sprite 112+(DieCount*100)
endif
if sprite exist(113+(DieCount*100))
delete sprite 113+(DieCount*100)
endif
if sprite exist(114+(DieCount*100))
delete sprite 114+(DieCount*100)
endif
if sprite exist(115+(DieCount*100))
delete sprite 115+(DieCount*100)
endif
if sprite exist(116+(DieCount*100))
delete sprite 116+(DieCount*100)
endif
if sprite exist(117+(DieCount*100))
delete sprite 117+(DieCount*100)
endif
if sprite exist(118+(DieCount*100))
delete sprite 118+(DieCount*100)
endif
if sprite exist(119+(DieCount*100))
delete sprite 119+(DieCount*100)
endif
if sprite exist(120+(DieCount*100))
delete sprite 120+(DieCount*100)
endif
if sprite exist(121+(DieCount*100))
delete sprite 121+(DieCount*100)
endif
if sprite exist(122+(DieCount*100))
delete sprite 122+(DieCount*100)
endif
if sprite exist(123+(DieCount*100))
delete sprite 123+(DieCount*100)
endif
if sprite exist(124+(DieCount*100))
delete sprite 124+(DieCount*100)
endif
if sprite exist(125+(DieCount*100))
delete sprite 125+(DieCount*100)
endif
if sprite exist(126+(DieCount*100))
delete sprite 126+(DieCount*100)
endif
if sprite exist(127+(DieCount*100))
delete sprite 127+(DieCount*100)
endif
if sprite exist(128+(DieCount*100))
delete sprite 128+(DieCount*100)
endif
if sprite exist(129+(DieCount*100))
delete sprite 129+(DieCount*100)
endif
if sprite exist(130+(DieCount*100))
delete sprite 130+(DieCount*100)
endif
if sprite exist(131+(DieCount*100))
delete sprite 131+(DieCount*100)
endif
if sprite exist(132+(DieCount*100))
delete sprite 132+(DieCount*100)
endif
if sprite exist(133+(DieCount*100))
delete sprite 133+(DieCount*100)
endif
if sprite exist(134+(DieCount*100))
delete sprite 134+(DieCount*100)
endif
if sprite exist(135+(DieCount*100))
delete sprite 135+(DieCount*100)
endif
if sprite exist(1)
delete sprite 1
endif
Paste image 20,0,0
Wait 3000
DieCount = DieCount +1
gosub main_menu
endif
next i
return