etayn

old gzdoom project
git clone git://moonbender.net/etayn
Log | Files | Refs | README

slot5-zornhau.zsc (997B)

      1 class Zornhau : DevilbunnyWeapon
      2 {
      3 
      4 	int swordCharge;
      5 	
      6 	Default
      7 	{
      8 		Weapon.SlotNumber 4;
      9 		Weapon.Kickback 1500;
     10 //		+WEAPON.NOALERT tis loud
     11 		DevilbunnyWeapon.CanParry FALSE;
     12 	}
     13 
     14 	States
     15 	{
     16 		Ready:
     17 			ZHSD A 1
     18 			{
     19 				A_WeaponReady();
     20 			}
     21 			Loop;
     22 		Deselect:
     23 			TNT1 A 0 A_Lower(500);
     24 			Loop;
     25 		Select:
     26 			ZHSD EA 4 Offset(0, 32);
     27 			TNT1 A 0 A_Raise(999);
     28 			Loop;
     29 		Fire:
     30 			TNT1 A 12;
     31 			ZHSD B 2 ;
     32 			TNT1 A 0
     33 			{
     34 				VertFan(2000, 3000, 400);
     35 				A_FireProjectile("ZornStrikeBlast", 0, 0, 0, 0, 0, 0);
     36 				spawn("DustDevil", pos, NO_REPLACE);
     37 			}
     38 			ZHSD CD 1;
     39 			ZHSD F 3;
     40 			TNT1 A 17;
     41 			ZHSD EA 4;
     42 			Goto Ready;
     43 	}
     44 }
     45 
     46 class ZornStrikeBlast : StrikeBlast
     47 {
     48 	States
     49 	{
     50 		Spawn:
     51 			TNT1 AAA 2
     52 			{
     53 				A_Explode(random(50,100), 256, 0, FALSE, 256);
     54 			}
     55 			stop;
     56 		Death:
     57 			TNT1 A 1 A_StartSound("grief/clang", CHAN_AUTO, CHANF_DEFAULT, 1.0, ATTN_IDLE, 1.0);
     58 			TNT1 A 6;
     59 			stop;
     60 		Crash:
     61 		XDeath:
     62 			stop;
     63 	}
     64 }