Guest User

Decorate so far

a guest
Aug 28th, 2016
74
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ACTOR LDShotgun : Shotgun Replaces Shotgun
  2. {
  3. Weapon.UpSound "shotgun/draw"
  4. Obituary "%o was killed by %k's shotgun."
  5. Decal BulletChip
  6. Tag "Shotgun"
  7. Weapon.Kickback 40
  8. Weapon.SelectionOrder 1900
  9. Weapon.SlotNumber 3
  10. Weapon.AmmoUse1 1
  11. Weapon.AmmoGive1 0
  12. Weapon.AmmoType1 "Shell"
  13. States
  14. {
  15. Ready:
  16. ESHT A 1 A_WeaponReady
  17. Deselect:
  18. TNT1 A 0
  19. TNT1 A 0
  20. TNT1 AA 0 A_Lower
  21. ESHT A 1 A_Lower
  22. Loop
  23. Select:
  24. TNT1 A 0
  25. TNT1 A 0
  26. TNT1 AA 0 A_Raise
  27. ESHT A 1 A_Raise
  28. Loop
  29. NoAmmo:
  30. ESHT A 5 A_PlaySound("shotgun/dryfire", CHAN_WEAPON, 1, 0, 1.4)
  31. Goto Ready
  32. Fire:
  33. ESHT A 3
  34. TNT1 A 0 A_AlertMonsters
  35. TNT1 A 0 A_PlaySound("shotgun/epicfire", CHAN_WEAPON, 1, 0, 0.7)
  36. TNT1 A 0 A_PlaySound("shotgun/epicfire", 7, 0.05, 0, 0.20)
  37. TNT1 A 0 A_GunFlash ("FlashEpic")
  38. TNT1 A 0 A_FireBullets (5.6, 0, 7, 5, "LDBulletPuff", FBF_USEAMMO)
  39. Goto EpicFireEnd
  40. EpicFireEnd:
  41. TNT1 A 0
  42. TNT1 A 0
  43. ESHT I 1 Bright
  44. ESHT J 1 Bright
  45. ESHT K 1
  46. ESHT K 1
  47. ESHT L 1
  48. ESHT B 1
  49. ESHT B 1
  50. ESHT C 1
  51. ESHT D 2
  52. ESHT E 3
  53. ESHT F 4
  54. TNT1 A 0
  55. TNT1 A 0
  56. TNT1 A 0 A_PlaySound("shotgun/epicpump", 5, 1, 0, 1.4)
  57. ESHT G 1
  58. ESHT H 1
  59. ESHT H 1
  60. ESHT H 1
  61. ESHT G 1
  62. ESHT G 1
  63. ESHT FEDCB 2
  64. ESHT A 1
  65. TNT1 A 0
  66. ESHT A 7
  67. Goto Ready
  68. }
  69. }
  70.  
  71.  
  72.  
  73. ACTOR LDSuperShotgun : LDWeapon
  74. {
  75. Weapon.UpSound "supershotgun/draw"
  76. Obituary "%o was killed by %k's super shotgun."
  77. Decal BulletChip
  78. -CHEATNOTWEAPON
  79. Tag "Super Shotgun"
  80. Weapon.Kickback 40
  81. Weapon.SelectionOrder 1900
  82. Weapon.SlotNumber 3
  83. Weapon.AmmoUse1 2
  84. Weapon.AmmoGive1 0
  85. Weapon.AmmoType1 "Shell"
  86. States
  87. {
  88. Ready:
  89. ESSG A 1 A_WeaponReady
  90. Goto Ready
  91. Deselect:
  92. TNT1 A 0
  93. TNT1 A 0
  94. TNT1 AA 0 A_Lower
  95. ESSG A 1 A_Lower
  96. Loop
  97. Select:
  98. TNT1 A 0
  99. TNT1 A 0
  100. TNT1 AA 0 A_Raise
  101. ESSG A 1 A_Raise
  102. Loop
  103. NoAmmo:
  104. ESSG A 5 A_PlaySound("supershotgun/dryfire", CHAN_WEAPON, 1, 0, 1.4)
  105. Goto Ready
  106. Fire:
  107. TNT1 A 0 A_JumpIfInventory("LDSuperShotgunQuickFire",1, 3)
  108. ESSG A 3 A_WeaponReady (WRF_NOFIRE | WRF_NOBOB)
  109. TNT1 A 0 A_Jump(256, 4)
  110. ESSG OPQ 1 A_WeaponReady (WRF_NOFIRE | WRF_NOBOB)
  111. TNT1 A 0 A_AlertMonsters
  112. TNT1 A 0 A_PlaySound("supershotgun/epicfire", CHAN_WEAPON, 1, 0, 0.7)
  113. TNT1 A 0 A_PlaySound("supershotgun/epicfire", 20, 0.05, 0, 0.20)
  114. TNT1 A 0 A_GunFlash ("FlashEpic")
  115. TNT1 A 0 A_FireBullets (11.2, 7.1, 20, 5, "LDBulletPuff", FBF_USEAMMO)
  116. Goto EpicFireEnd
  117. EpicFireEnd:
  118. TNT1 A 0
  119. TNT1 A 0
  120. TNT1 A 0
  121. ESSG R 1 Bright
  122. ESSG R 1 Bright
  123. ESSG S 1 Bright
  124. ESSG S 1 Bright
  125. ESSG T 1
  126. ESSG U 1
  127. ESSG A 1
  128. Goto EpicFireReloadCheck
  129.  
  130. EpicFireReloadCheck:
  131. TNT1 A 0 A_JumpIfInventory("Shell", 2, "EpicFireReload")
  132. Goto Ready
  133.  
  134. EpicFireReload:
  135. ESSG B 2
  136. ESSG C 2
  137. ESSG D 3
  138. ESSG E 4
  139. ESSG F 2
  140. ESSG G 2
  141. ESSG H 2
  142. TNT1 A 0 A_PlaySound("supershotgun/epicopen", 7, 1, 0, 1.4)
  143. TNT1 A 1
  144. TNT1 A 1
  145. TNT1 A 1
  146. TNT1 A 1
  147. TNT1 A 1
  148. TNT1 A 1
  149. TNT1 A 0
  150. TNT1 A 0 A_FireCustomMissile ("LDShellCasingSpawner", 0,0,-14,-6, FPF_NOAUTOAIM)
  151. TNT1 A 0 A_FireCustomMissile ("LDShellCasingSpawner", 0,0,-14,-6, FPF_NOAUTOAIM)
  152. ESSG I 2
  153. ESSG J 2
  154. ESSG K 3
  155. TNT1 A 0 A_PlaySound("supershotgun/epicload", CHAN_WEAPON, 1, 0, 1.4)
  156. ESSG L 2
  157. ESSG M 2
  158. TNT1 A 3
  159. TNT1 A 1
  160. TNT1 A 1
  161. TNT1 A 1
  162. TNT1 A 1
  163. TNT1 A 1
  164. TNT1 A 1
  165. TNT1 A 0 A_PlaySound("supershotgun/epicclose", 7, 1, 0, 1.4)
  166. ESSG N 2
  167. TNT1 A 0
  168. ESSG O 2
  169. ESSG P 2
  170. ESSG Q 2
  171. ESSG A 5 A_WeaponReady (WRF_NOBOB)
  172. Goto Ready
RAW Paste Data