I am creating a game that is similar to cuberunner on the ipod touch. I have mostly everything working except for the menu. I have a menu where you can select a level based keyboard input. When the person hits a cone they go back to the menu. The problem is that they should be able to go back to the level they did but I get an error when I delete all the objects when returning to the menu. You can view it for yourself using the code below. How can I make the level reset?
Sync On
Sync Rate 30
color backdrop rgb(0,0,0)
do
gosub mainmenu
loop
return
level1:
make matrix 1,12000,12000,50,50
varLives=1
For x = 14 to 500
Make object cone x,50
position object x,RND(12000),25,RND(12000)
next x
Make object sphere 1,25
Position object 1,60,0,60
Set object collision to spheres 1
make object cylinder 3501,800
position object 3501,12000,100,12000
make object plain 2,12000,1000
position object 2,12000,0,0
make object plain 3,12000,1000
position object 3,6000,0,0
make object plain 4,12000,1000
position object 4,18000,0,12000
make object plain 5,12000,1000
position object 5,6000,0,12000
make object plain 6,12000,1000
position object 6,18000,0,24000
make object plain 7,12000,1000
position object 7,6000,0,24000
make object plain 8,12000,1000
position object 8,0,0,6000
rotate object 8, 0,90,0
make object plain 9,12000,1000
position object 9,0,0,18000
rotate object 9, 0,90,0
make object plain 10,12000,1000
position object 10,12000,0,6000
rotate object 10, 0,90,0
make object plain 11,12000,1000
position object 11,12000,0,18000
rotate object 11, 0,90,0
make object plain 12,12000,1000
position object 12,24000,0,6000
rotate object 12, 0,90,0
make object plain 13,12000,1000
position object 13,24000,0,18000
rotate object 13, 0,90,0
Set Text Opaque
Seconds=2
T=Timer()
Do
Elapsed=(Timer()-T)/1000
TimeLeft=Seconds-Elapsed
Text 0,20,Str$(TimeLeft)+" "
if Timeleft=0
delete matrix 1
delete object 1
delete object 3501
delete object 14
delete object 15
delete object 16
delete object 17
delete object 18
delete object 19
delete object 20
delete object 21
delete object 22
delete object 23
delete object 24
delete object 25
delete object 26
delete object 27
delete object 28
delete object 29
delete object 30
delete object 31
delete object 32
delete object 33
delete object 34
delete object 35
delete object 36
delete object 37
delete object 38
delete object 39
delete object 40
delete object 41
delete object 42
delete object 43
delete object 44
delete object 45
delete object 46
delete object 47
delete object 48
delete object 49
delete object 50
delete object 51
delete object 52
delete object 53
delete object 54
delete object 55
delete object 56
delete object 57
delete object 58
delete object 59
delete object 60
delete object 61
delete object 62
delete object 63
delete object 64
delete object 65
delete object 66
delete object 67
delete object 68
delete object 69
delete object 70
delete object 71
delete object 72
delete object 73
delete object 74
delete object 75
delete object 76
delete object 77
delete object 78
delete object 79
delete object 80
delete object 81
delete object 82
delete object 83
delete object 84
delete object 85
delete object 86
delete object 87
delete object 88
delete object 89
delete object 90
delete object 91
delete object 92
delete object 93
delete object 94
delete object 95
delete object 96
delete object 97
delete object 98
delete object 99
delete object 100
delete object 101
delete object 102
delete object 103
delete object 104
delete object 105
delete object 106
delete object 107
delete object 108
delete object 109
delete object 110
delete object 111
delete object 112
delete object 113
delete object 114
delete object 115
delete object 116
delete object 117
delete object 118
delete object 119
delete object 120
delete object 121
delete object 122
delete object 123
delete object 124
delete object 125
delete object 126
delete object 127
delete object 128
delete object 129
delete object 130
delete object 131
delete object 132
delete object 133
delete object 134
delete object 135
delete object 136
delete object 137
delete object 138
delete object 139
delete object 140
delete object 141
delete object 142
delete object 143
delete object 144
delete object 145
delete object 146
delete object 147
delete object 148
delete object 149
delete object 150
delete object 151
delete object 152
delete object 153
delete object 154
delete object 155
delete object 156
delete object 157
delete object 158
delete object 159
delete object 160
delete object 161
delete object 162
delete object 163
delete object 164
delete object 165
delete object 166
delete object 167
delete object 168
delete object 169
delete object 170
delete object 171
delete object 172
delete object 173
delete object 174
delete object 175
delete object 176
delete object 177
delete object 178
delete object 179
delete object 180
delete object 181
delete object 182
delete object 183
delete object 184
delete object 185
delete object 186
delete object 187
delete object 188
delete object 189
delete object 190
delete object 191
delete object 192
delete object 193
delete object 194
delete object 195
delete object 196
delete object 197
delete object 198
delete object 199
delete object 200
delete object 201
delete object 202
delete object 203
delete object 204
delete object 205
delete object 206
delete object 207
delete object 208
delete object 209
delete object 210
delete object 211
delete object 212
delete object 213
delete object 214
delete object 215
delete object 216
delete object 217
delete object 218
delete object 219
delete object 220
delete object 221
delete object 222
delete object 223
delete object 224
delete object 225
delete object 226
delete object 227
delete object 228
delete object 229
delete object 230
delete object 231
delete object 232
delete object 233
delete object 234
delete object 235
delete object 236
delete object 237
delete object 238
delete object 239
delete object 240
delete object 241
delete object 242
delete object 243
delete object 244
delete object 245
delete object 246
delete object 247
delete object 248
delete object 249
delete object 250
delete object 251
delete object 252
delete object 253
delete object 254
delete object 255
delete object 256
delete object 257
delete object 258
delete object 259
delete object 260
delete object 261
delete object 262
delete object 263
delete object 264
delete object 265
delete object 266
delete object 267
delete object 268
delete object 269
delete object 270
delete object 271
delete object 272
delete object 273
delete object 274
delete object 275
delete object 276
delete object 277
delete object 278
delete object 279
delete object 280
delete object 281
delete object 282
delete object 283
delete object 284
delete object 285
delete object 286
delete object 287
delete object 288
delete object 289
delete object 290
delete object 291
delete object 292
delete object 293
delete object 294
delete object 295
delete object 296
delete object 297
delete object 298
delete object 299
delete object 300
delete object 301
delete object 302
delete object 303
delete object 304
delete object 305
delete object 306
delete object 307
delete object 308
delete object 309
delete object 310
delete object 311
delete object 312
delete object 313
delete object 314
delete object 315
delete object 316
delete object 317
delete object 318
delete object 319
delete object 320
delete object 321
delete object 322
delete object 323
delete object 324
delete object 325
delete object 326
delete object 327
delete object 328
delete object 329
delete object 330
delete object 331
delete object 332
delete object 333
delete object 334
delete object 335
delete object 336
delete object 337
delete object 338
delete object 339
delete object 340
delete object 341
delete object 342
delete object 343
delete object 344
delete object 345
delete object 346
delete object 347
delete object 348
delete object 349
delete object 350
delete object 351
delete object 352
delete object 353
delete object 354
delete object 355
delete object 356
delete object 357
delete object 358
delete object 359
delete object 360
delete object 361
delete object 362
delete object 363
delete object 364
delete object 365
delete object 366
delete object 367
delete object 368
delete object 369
delete object 370
delete object 371
delete object 372
delete object 373
delete object 374
delete object 375
delete object 376
delete object 377
delete object 378
delete object 379
delete object 380
delete object 381
delete object 382
delete object 383
delete object 384
delete object 385
delete object 386
delete object 387
delete object 388
delete object 389
delete object 390
delete object 391
delete object 392
delete object 393
delete object 394
delete object 395
delete object 396
delete object 397
delete object 398
delete object 399
delete object 400
delete object 401
delete object 402
delete object 403
delete object 404
delete object 405
delete object 406
delete object 407
delete object 408
delete object 409
delete object 410
delete object 411
delete object 412
delete object 413
delete object 414
delete object 415
delete object 416
delete object 417
delete object 418
delete object 419
delete object 420
delete object 421
delete object 422
delete object 423
delete object 424
delete object 425
delete object 426
delete object 427
delete object 428
delete object 429
delete object 430
delete object 431
delete object 432
delete object 433
delete object 434
delete object 435
delete object 436
delete object 437
delete object 438
delete object 439
delete object 440
delete object 441
delete object 442
delete object 443
delete object 444
delete object 445
delete object 446
delete object 447
delete object 448
delete object 449
delete object 450
delete object 451
delete object 452
delete object 453
delete object 454
delete object 455
delete object 456
delete object 457
delete object 458
delete object 459
delete object 460
delete object 461
delete object 462
delete object 463
delete object 464
delete object 465
delete object 466
delete object 467
delete object 468
delete object 469
delete object 470
delete object 471
delete object 472
delete object 473
delete object 474
delete object 475
delete object 476
delete object 477
delete object 478
delete object 479
delete object 480
delete object 481
delete object 482
delete object 483
delete object 484
delete object 485
delete object 486
delete object 487
delete object 488
delete object 489
delete object 490
delete object 491
delete object 492
delete object 493
delete object 494
delete object 495
delete object 496
delete object 497
delete object 498
delete object 499
delete object 500
gosub mainmenu
endif
Text 0,40,Str$(varLives)+" Lives"
aY#=Object angle Y(1)
aY#=45
Move object 1,20
Move object left 1,-20
If Leftkey()=1 then Move object 1, 20
If Leftkey()=1 then Move object left 1, 20
If Rightkey()=1 then Move object left 1,-20
If Rightkey()=1 then Move object 1,-20
If Object collision(1,14)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,15)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,16)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,17)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,18)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,19)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,20)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,21)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,22)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,23)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,24)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,25)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,26)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,27)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,28)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,29)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,30)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,31)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,32)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,33)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,34)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,35)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,36)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,37)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,38)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,39)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,40)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,41)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,42)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,43)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,44)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,45)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,46)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,47)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,48)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,49)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,50)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,51)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,52)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,53)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,54)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,55)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,56)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,57)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,58)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,59)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,60)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,61)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,62)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,63)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,64)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,65)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,66)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,67)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,68)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,69)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,70)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,71)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,72)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,73)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,74)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,75)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,76)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,77)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,78)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,79)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,80)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,81)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,82)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,83)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,84)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,85)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,86)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,87)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,88)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,89)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,90)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,91)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,92)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,93)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,94)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,95)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,96)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,97)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,98)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,99)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,100)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,101)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,102)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,103)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,104)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,105)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,106)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,107)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,108)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,109)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,110)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,111)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,112)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,113)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,114)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,115)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,116)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,117)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,118)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,119)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,120)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,121)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,122)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,123)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,124)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,125)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,126)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,127)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,128)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,129)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,130)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,131)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,132)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,133)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,134)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,135)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,136)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,137)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,138)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,139)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,140)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,141)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,142)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,143)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,144)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,145)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,146)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,147)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,148)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,149)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,150)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,151)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,152)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,153)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,154)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,155)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,156)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,157)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,158)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,159)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,160)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,161)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,162)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,163)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,164)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,165)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,166)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,167)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,168)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,169)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,170)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,171)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,172)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,173)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,174)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,175)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,176)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,177)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,178)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,179)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,180)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,181)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,182)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,183)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,184)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,185)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,186)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,187)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,188)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,189)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,190)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,191)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,192)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,193)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,194)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,195)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,196)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,197)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,198)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,199)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,200)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,201)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,202)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,203)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,204)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,205)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,206)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,207)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,208)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,209)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,210)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,211)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,212)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,213)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,214)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,215)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,216)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,217)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,218)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,219)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,220)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,221)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,222)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,223)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,224)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,225)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,226)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,227)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,228)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,229)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,230)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,231)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,232)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,233)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,234)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,235)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,236)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,237)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,238)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,239)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,240)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,241)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,242)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,243)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,244)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,245)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,246)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,247)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,248)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,249)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,250)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,251)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,252)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,253)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,254)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,255)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,256)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,257)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,258)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,259)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,260)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,261)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,262)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,263)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,264)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,265)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,266)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,267)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,268)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,269)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,270)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,271)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,272)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,273)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,274)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,275)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,276)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,277)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,278)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,279)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,280)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,281)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,282)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,283)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,284)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,285)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,286)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,287)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,288)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,289)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,290)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,291)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,292)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,293)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,294)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,295)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,296)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,297)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,298)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,299)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,300)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,301)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,302)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,303)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,304)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,305)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,306)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,307)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,308)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,309)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,310)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,311)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,312)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,313)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,314)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,315)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,316)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,317)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,318)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,319)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,320)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,321)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,322)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,323)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,324)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,325)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,326)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,327)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,328)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,329)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,330)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,331)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,332)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,333)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,334)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,335)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,336)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,337)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,338)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,339)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,340)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,341)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,342)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,343)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,344)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,345)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,346)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,347)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,348)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,349)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,350)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,351)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,352)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,353)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,354)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,355)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,356)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,357)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,358)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,359)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,360)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,361)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,362)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,363)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,364)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,365)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,366)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,367)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,368)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,369)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,370)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,371)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,372)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,373)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,374)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,375)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,376)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,377)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,378)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,379)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,380)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,381)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,382)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,383)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,384)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,385)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,386)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,387)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,388)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,389)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,390)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,391)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,392)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,393)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,394)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,395)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,396)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,397)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,398)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,399)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,400)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,401)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,402)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,403)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,404)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,405)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,406)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,407)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,408)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,409)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,410)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,411)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,412)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,413)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,414)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,415)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,416)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,417)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,418)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,419)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,420)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,421)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,422)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,423)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,424)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,425)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,426)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,427)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,428)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,429)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,430)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,431)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,432)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,433)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,434)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,435)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,436)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,437)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,438)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,439)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,440)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,441)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,442)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,443)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,444)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,445)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,446)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,447)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,448)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,449)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,450)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,451)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,452)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,453)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,454)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,455)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,456)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,457)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,458)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,459)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,460)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,461)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,462)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,463)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,464)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,465)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,466)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,467)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,468)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,469)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,470)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,471)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,472)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,473)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,474)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,475)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,476)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,477)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,478)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,479)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,480)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,481)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,482)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,483)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,484)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,485)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,486)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,487)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,488)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,489)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,490)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,491)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,492)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,493)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,494)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,495)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,496)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,497)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,498)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,499)>0
position object 1,60,0,60
varlives=varlives-1
endif
If Object collision(1,500)>0
position object 1,60,0,60
varlives=varlives-1
endif
If varLives = 0
delete matrix 1
delete object 1
delete object 3501
delete object 14
delete object 15
delete object 16
delete object 17
delete object 18
delete object 19
delete object 20
delete object 21
delete object 22
delete object 23
delete object 24
delete object 25
delete object 26
delete object 27
delete object 28
delete object 29
delete object 30
delete object 31
delete object 32
delete object 33
delete object 34
delete object 35
delete object 36
delete object 37
delete object 38
delete object 39
delete object 40
delete object 41
delete object 42
delete object 43
delete object 44
delete object 45
delete object 46
delete object 47
delete object 48
delete object 49
delete object 50
delete object 51
delete object 52
delete object 53
delete object 54
delete object 55
delete object 56
delete object 57
delete object 58
delete object 59
delete object 60
delete object 61
delete object 62
delete object 63
delete object 64
delete object 65
delete object 66
delete object 67
delete object 68
delete object 69
delete object 70
delete object 71
delete object 72
delete object 73
delete object 74
delete object 75
delete object 76
delete object 77
delete object 78
delete object 79
delete object 80
delete object 81
delete object 82
delete object 83
delete object 84
delete object 85
delete object 86
delete object 87
delete object 88
delete object 89
delete object 90
delete object 91
delete object 92
delete object 93
delete object 94
delete object 95
delete object 96
delete object 97
delete object 98
delete object 99
delete object 100
delete object 101
delete object 102
delete object 103
delete object 104
delete object 105
delete object 106
delete object 107
delete object 108
delete object 109
delete object 110
delete object 111
delete object 112
delete object 113
delete object 114
delete object 115
delete object 116
delete object 117
delete object 118
delete object 119
delete object 120
delete object 121
delete object 122
delete object 123
delete object 124
delete object 125
delete object 126
delete object 127
delete object 128
delete object 129
delete object 130
delete object 131
delete object 132
delete object 133
delete object 134
delete object 135
delete object 136
delete object 137
delete object 138
delete object 139
delete object 140
delete object 141
delete object 142
delete object 143
delete object 144
delete object 145
delete object 146
delete object 147
delete object 148
delete object 149
delete object 150
delete object 151
delete object 152
delete object 153
delete object 154
delete object 155
delete object 156
delete object 157
delete object 158
delete object 159
delete object 160
delete object 161
delete object 162
delete object 163
delete object 164
delete object 165
delete object 166
delete object 167
delete object 168
delete object 169
delete object 170
delete object 171
delete object 172
delete object 173
delete object 174
delete object 175
delete object 176
delete object 177
delete object 178
delete object 179
delete object 180
delete object 181
delete object 182
delete object 183
delete object 184
delete object 185
delete object 186
delete object 187
delete object 188
delete object 189
delete object 190
delete object 191
delete object 192
delete object 193
delete object 194
delete object 195
delete object 196
delete object 197
delete object 198
delete object 199
delete object 200
delete object 201
delete object 202
delete object 203
delete object 204
delete object 205
delete object 206
delete object 207
delete object 208
delete object 209
delete object 210
delete object 211
delete object 212
delete object 213
delete object 214
delete object 215
delete object 216
delete object 217
delete object 218
delete object 219
delete object 220
delete object 221
delete object 222
delete object 223
delete object 224
delete object 225
delete object 226
delete object 227
delete object 228
delete object 229
delete object 230
delete object 231
delete object 232
delete object 233
delete object 234
delete object 235
delete object 236
delete object 237
delete object 238
delete object 239
delete object 240
delete object 241
delete object 242
delete object 243
delete object 244
delete object 245
delete object 246
delete object 247
delete object 248
delete object 249
delete object 250
delete object 251
delete object 252
delete object 253
delete object 254
delete object 255
delete object 256
delete object 257
delete object 258
delete object 259
delete object 260
delete object 261
delete object 262
delete object 263
delete object 264
delete object 265
delete object 266
delete object 267
delete object 268
delete object 269
delete object 270
delete object 271
delete object 272
delete object 273
delete object 274
delete object 275
delete object 276
delete object 277
delete object 278
delete object 279
delete object 280
delete object 281
delete object 282
delete object 283
delete object 284
delete object 285
delete object 286
delete object 287
delete object 288
delete object 289
delete object 290
delete object 291
delete object 292
delete object 293
delete object 294
delete object 295
delete object 296
delete object 297
delete object 298
delete object 299
delete object 300
delete object 301
delete object 302
delete object 303
delete object 304
delete object 305
delete object 306
delete object 307
delete object 308
delete object 309
delete object 310
delete object 311
delete object 312
delete object 313
delete object 314
delete object 315
delete object 316
delete object 317
delete object 318
delete object 319
delete object 320
delete object 321
delete object 322
delete object 323
delete object 324
delete object 325
delete object 326
delete object 327
delete object 328
delete object 329
delete object 330
delete object 331
delete object 332
delete object 333
delete object 334
delete object 335
delete object 336
delete object 337
delete object 338
delete object 339
delete object 340
delete object 341
delete object 342
delete object 343
delete object 344
delete object 345
delete object 346
delete object 347
delete object 348
delete object 349
delete object 350
delete object 351
delete object 352
delete object 353
delete object 354
delete object 355
delete object 356
delete object 357
delete object 358
delete object 359
delete object 360
delete object 361
delete object 362
delete object 363
delete object 364
delete object 365
delete object 366
delete object 367
delete object 368
delete object 369
delete object 370
delete object 371
delete object 372
delete object 373
delete object 374
delete object 375
delete object 376
delete object 377
delete object 378
delete object 379
delete object 380
delete object 381
delete object 382
delete object 383
delete object 384
delete object 385
delete object 386
delete object 387
delete object 388
delete object 389
delete object 390
delete object 391
delete object 392
delete object 393
delete object 394
delete object 395
delete object 396
delete object 397
delete object 398
delete object 399
delete object 400
delete object 401
delete object 402
delete object 403
delete object 404
delete object 405
delete object 406
delete object 407
delete object 408
delete object 409
delete object 410
delete object 411
delete object 412
delete object 413
delete object 414
delete object 415
delete object 416
delete object 417
delete object 418
delete object 419
delete object 420
delete object 421
delete object 422
delete object 423
delete object 424
delete object 425
delete object 426
delete object 427
delete object 428
delete object 429
delete object 430
delete object 431
delete object 432
delete object 433
delete object 434
delete object 435
delete object 436
delete object 437
delete object 438
delete object 439
delete object 440
delete object 441
delete object 442
delete object 443
delete object 444
delete object 445
delete object 446
delete object 447
delete object 448
delete object 449
delete object 450
delete object 451
delete object 452
delete object 453
delete object 454
delete object 455
delete object 456
delete object 457
delete object 458
delete object 459
delete object 460
delete object 461
delete object 462
delete object 463
delete object 464
delete object 465
delete object 466
delete object 467
delete object 468
delete object 469
delete object 470
delete object 471
delete object 472
delete object 473
delete object 474
delete object 475
delete object 476
delete object 477
delete object 478
delete object 479
delete object 480
delete object 481
delete object 482
delete object 483
delete object 484
delete object 485
delete object 486
delete object 487
delete object 488
delete object 489
delete object 490
delete object 491
delete object 492
delete object 493
delete object 494
delete object 495
delete object 496
delete object 497
delete object 498
delete object 499
delete object 500
gosub mainmenu
endif
X#=Object position x(1)
Z#=Object position z(1)
cZ#=Newzvalue(Z#,aY#-180,100)
cX#=Newxvalue(X#,aY#-180,100)
Position Camera cX#,75,cZ#
Point Camera X#,50,Z#
Sync
Loop
return
mainmenu:
do
center text 300, 100, "Cone Runner"
center text 300, 270, "Press corresponding number key to select level:"
center text 300, 330, "1. Clouds"
if keystate(2)=1
gosub level1
endif
sync
loop
return
