actor Starman : MegaBuster 18001
{
Weapon.AmmoUse 1
Weapon.AmmoGive 1
Weapon.SlotNumber 9
Obituary "%o lost a life to %k's Starman."
inventory.pickupmessage "Star get!"
weapon.ammotype "StarmanAmmo"
inventory.pickupsound "weapon/weaponup"
+WEAPON.AMMO_OPTIONAL
inventory.icon "STARM"
Scale 2.0
States
{
Spawn:
STAR ABCD 4
loop
Ready:
STAR I 0 ACS_ExecuteAlways(998,0,43)
STAR I 1 A_WeaponReady
Goto Ready+1
Deselect:
TNT1 AAAAAAAAAAAAAAAAAAAAAA 0 A_Lower
STAR I 1 A_Lower
Loop
Select:
TNT1 AAAAAAAAAAAAAAAAAAAAAA 0 A_Raise
STAR I 1 A_Raise
Loop
Fire:
STAR I 0 A_JumpIfNoAmmo("NoAmmo")
STAR A 0 A_GiveInventory("Speed",1)
Goto Star1
STAR I 0 A_Refire
Goto Ready+1
NoAmmo:
STAR I 1 ACS_Execute(979,0)
Goto Ready+1
Star1:
STAR A 0 A_PlaySound("item/Starman", CHAN_WEAPON, 1000.0, 1)
STAR A 0 A_ChangeFlag("SHOOTABLE",0)
STAR A 0 A_ChangeFlag("DONTRIP",1)
STAR A 0 A_ChangeFlag("ALWAYSFAST",1)
WOOD I 1 ACS_Execute(991, 0, 45)
WOOD I 1 A_SpawnItemEx("StarRadius",0,0,0)
WOOD I 0 A_GiveInventory("StarTimer",1)
goto Star2
Star2:
STAR E 1 A_SpawnItemEx("StarRadius",0,0,0)
STAR E 1 ACS_Execute(991, 0, 46)
STAR E 0 A_GiveInventory("StarTimer",1)
goto Star3
Star3:
HEAT J 1 A_SpawnItemEx("StarRadius",0,0,0)
HEAT J 1 ACS_Execute(991, 0, 62)
HEAT J 0 A_GiveInventory("StarTimer",1)
goto Star4
Star4:
STAR I 1 ACS_Execute(991, 0, 43)
STAR I 1 A_SpawnItemEx("StarRadius",0,0,0)
STAR I 0 A_GiveInventory("StarTimer",1)
STAR I 0 A_JumpIfInventory("StarTimer",160,"End")
Goto Star1
End:
STAR I 0 A_StopSound(CHAN_WEAPON)
STAR I 0 A_TakeInventory("StarTimer",5000)
STAR I 0 A_TakeInventory("StarmanAmmo",1)
STAR A 0 A_TakeInventory("Speed",1)
STAR A 0 A_ChangeFlag("SHOOTABLE",1)
STAR A 0 A_ChangeFlag("DONTRIP",0)
STAR A 0 A_ChangeFlag("ALWAYSFAST",0)
Goto NoAmmo
}
}
actor StarTimer : Inventory
{
inventory.amount 1
inventory.maxamount 5000
States
{
Spawn:
TNT1 A 1
loop
}
}
actor StarmanAmmo : Ammo
{
inventory.amount 1
inventory.maxamount 1
}
actor Speed : PowerupGiver
{
powerup.type "Speed"
powerup.duration 320
+AUTOACTIVATE
-INVENTORY.INVBAR
States
{
Spawn:
TNT1 A 1
stop
}
}