"Son of a gun!"
- gunSnip.png (9.56 KiB) Viewed 11209 times
on rawKeyDown RK
global POZZ
if RK = 65309 then
if POZZ < 8 then
add 1 to POZZ
end if
set the backPattern of grc "gun" to the id of img ("gun" & POZZ)
switch POZZ
case 8
set the width of grc "pathX" to 450
set the height of grc "pathX" to 660
set the loc of grc "pathX" to 282,365
break
case 7
set the width of grc "pathX" to 510
set the height of grc "pathX" to 600
set the loc of grc "pathX" to 323,407
break
case 6
set the width of grc "pathX" to 570
set the height of grc "pathX" to 540
set the loc of grc "pathX" to 368,434
break
case 5
set the width of grc "pathX" to 630
set the height of grc "pathX" to 480
set the loc of grc "pathX" to 408,467
break
case 4
set the width of grc "pathX" to 690
set the height of grc "pathX" to 420
set the loc of grc "pathX" to 442,507
break
case 3
set the width of grc "pathX" to 750
set the height of grc "pathX" to 360
set the loc of grc "pathX" to 477,546
break
case 2
set the width of grc "pathX" to 810
set the height of grc "pathX" to 300
set the loc of grc "pathX" to 513,590
break
case 1
set the width of grc "pathX" to 860
set the height of grc "pathX" to 240
set the loc of grc "pathX" to 541,633
break
end switch
end if
if RK = 65308 then
if POZZ > 1 then
subtract 1 from POZZ
end if
set the backPattern of grc "gun" to the id of img ("gun" & POZZ)
switch POZZ
case 8
set the width of grc "pathX" to 450
set the height of grc "pathX" to 660
set the loc of grc "pathX" to 282,365
break
case 7
set the width of grc "pathX" to 510
set the height of grc "pathX" to 600
set the loc of grc "pathX" to 323,407
break
case 6
set the width of grc "pathX" to 570
set the height of grc "pathX" to 540
set the loc of grc "pathX" to 368,434
break
case 5
set the width of grc "pathX" to 630
set the height of grc "pathX" to 480
set the loc of grc "pathX" to 408,467
break
case 4
set the width of grc "pathX" to 690
set the height of grc "pathX" to 420
set the loc of grc "pathX" to 442,507
break
case 3
set the width of grc "pathX" to 750
set the height of grc "pathX" to 360
set the loc of grc "pathX" to 477,546
break
case 2
set the width of grc "pathX" to 810
set the height of grc "pathX" to 300
set the loc of grc "pathX" to 513,590
break
case 1
set the width of grc "pathX" to 860
set the height of grc "pathX" to 240
set the loc of grc "pathX" to 541,633
break
end switch
end if
pass rawKeyDown
end rawKeyDown