ZDoom

Posted: **Tue Jul 03, 2007 7:10 pm**

(A quick note from the moderation staff: yes, we renamed the thread. This thread is where you post works in progress, or WIPs as they've come to be known. If you just want to make an update about your life, you might want this thread instead. Thank you for your cooperation. Good day. -mgmt)

old thread gone so

update:this is not a life blog!

Posted: **Tue Jul 03, 2007 8:06 pm**

IKKE

Spoiler:
Code: Select all • Expand view
ACTOR PeekABoo : Weapon { States { Ready: TNT1 A_JumpIfInventory("PowerStrength",1,DEMPSEY) TNT1 A 0 A_TakeInventory("Hook",5) TNT1 A 0 A_TakeInventory("LastHandUsed",1) TNT1 AAAA 4 A_WeaponReady Loop Fire: TNT1 A 0 A_JumpIfInventory("PowerStrength",1,DEMPSEYROLL) TNT1 A 0 A_JumpIfInventory("Hook",2,Straight) TNT1 A 3 A_TakeInventory("Jabu",2) TNT1 A 0 A_Refire Jab: TNT1 A 2 A_JumpIfInventory("Jabu",2,Straight) TNT1 A 5 A_CustomPunch(4,1,0,"HnI-Cloud",56) TNT1 A 0 A_GiveInventory("Jabu",1) TNT1 A 0 A_GiveInventory("LastHandUsed",1) TNT1 A 0 A_Refire TNT1 A 0 A_WeaponReady TNT1 A 8 /* Will try this way later TNT1 A 0 A_WeaponReady TNT1 A 1 TNT1 A 0 A_WeaponReady TNT1 A 1 TNT1 A 0 A_WeaponReady TNT1 A 1 TNT1 A 0 A_WeaponReady TNT1 A 1 */ Goto Ready Hold: TNT1 A 0 A_JumpIfInventory("Jabu",1,Jab) Straight: TNT1 A 4 TNT1 A 4 A_CustomPunch(8,1,0,"HnI-Cloud",56) TNT1 A 0 A_TakeInventory("Jabu",2) TNT1 A 8 TNT1 A 0 //A_Refire //not including it can screw with things Goto Ready AltFire: TNT1 A 3 A_JumpIfInventory("LastUsedHand",1,RightHook) TNT1 A 0 A_Refire LeftHook: TNT1 A 4 TNT1 A 3 A_CustomPunch(9,1,0,"HnI-Cloud",32) TNT1 A 0 A_GiveInventory("Hook",1) TNT1 A 1 A_GiveInventory("LastUsedHand",1) TNT1 A 1 A_JumpIfInventory("Hook",5,3) //End the combo after 5 hooks TNT1 A 0 A_Refire TNT1 A 0 A_WeaponReady TNT1 A 12 Goto Ready RightHook: TNT1 A 0 A_JumpIfInventory("Hook",2,1) Goto RightHookPunch TNT1 A 0 A_JumpIfInventory("Jabu",1,UpperCut) RightHookPunch: TNT1 A 4 TNT1 A 3 A_CustomPunch(9,1,0,"HnI-Cloud",32) TNT1 A 0 A_GiveInventory("Hook",1) TNT1 A 1 A_TakeInventory("LastUsedHand",1) TNT1 A 0 A_Refire TNT1 A 0 A_WeaponReady TNT1 A 12 Goto Ready UpperCut: TNT1 A 4 TNT1 A 3 A_CustomPunch(12,1,0,"HnI-Cloud",32) TNT1 A 0 A_GiveInventory("Hook",1) TNT1 A 1 A_TakeInventory("LastUsedHand",1) TNT1 A 12 Goto Ready AltHold: //BodyPunch TNT1 A 4 TNT1 A 4 A_CustomPunch(18,1,0,"HnI-Cloud",32) TNT1 A 14 TNT1 A 0 //A_Refire Goto Ready DEMPSEY: TNT1 AAAA 2 TNT1 A 0 A_WeaponReady TNT1 A 0 A_TakeInventory("LastHandUsed",1) TNT1 AAAA 2 TNT1 A 0 A_WeaponReady TNT1 A 0 A_GiveInventory("LastHandUsed",1) Goto DEMPSEY DEMPSEYROLL: //not complete yet Goto DEMPSEY

Posted: **Tue Jul 03, 2007 9:36 pm**

Imma killin' ma marines

Posted: **Tue Jul 03, 2007 9:43 pm**

There's some form of Kaisery going on here o.O

Posted: **Tue Jul 03, 2007 10:14 pm**

ZDLSharp? That's the only doom related thing I'm working on.

Posted: **Tue Jul 03, 2007 11:27 pm**

The ZDOOM Table Top Strategy Game.

It's on the verge of Beta Testing, so volunteer if you want to earn special stuff!

Posted: **Wed Jul 04, 2007 7:04 am**

Demented,
just a ZDoom mod I'm working on for fun. Got sick of Demon Wars.

Posted: **Wed Jul 04, 2007 8:49 am**

zap610 wrote:Imma killin' ma marines

wow!! what mod is that?????

and for me, a couple of mods including Cult and others...

Posted: **Wed Jul 04, 2007 12:07 pm**

zap610 wrote:Imma killin' ma marines...

I dont know why, but this screen reminds me the Fate game

EDIT: by the way, none of this games content was ripped and used in any mods yet.

Posted: **Wed Jul 04, 2007 12:25 pm**

because it sucks

Posted: **Wed Jul 04, 2007 2:15 pm**

Ben2k9 wrote:wow!! what mod is that?????

I wrote:There's some form of Kaisery going on here o.O

Posted: **Wed Jul 04, 2007 2:31 pm**

Fun with Hud code!

Spoiler:
Code: Select all • Expand view
function void Draw_Weapons(int Arraysize, int ValueCheck, int Drawtype) { int Xres = Getscreenwidth(); int Yres = Getscreenheight(); //int WeaponHudID = 1; int Hudoffset = 0.0; int DrawDistance = 64; int startpoint; int x = Yres / 2; int y; Sethudsize(Xres, Yres, 1); startpoint = (Xres / 2) - ((DrawDistance * Arraysize) / 2); WeaponHudID = 1; For(int d = 0; d < Arraysize; d++) { If(d == ValueCheck) { //Hudmessage(s:Arsenal[Graphics][d]; Drawtype, WeaponHudID, HudSelectionColor, Startpoint + hudoffset, x + 0.0, 1); y = (Startpoint + Hudoffset) - 0.0; ACS_Execute(Weapon_Enlarger, 0, y, x, Weaponhudid); } else { Setfont("weaponal"); Hudmessage(s:Arsenal[Graphics][d]; Drawtype, WeaponHudID, -1, (Startpoint + hudoffset) << 16, (x << 16)+ 0.0, 1); } Hudoffset += DrawDistance; WeaponHudID++; } } Script Weapon_Enlarger (int Xoffset, int Yoffset , int z) { int diff = 480; int Xhudres = Getscreenwidth(); int Yhudres = Getscreenheight(); int enddrawres = Xhudres - diff; int Xcenter; int Ycenter; int yhudsize; int countdown = 0; For (int x = Xhudres; x > (enddrawres - 1); x = x - 40) { yhudsize = (x * 3) / 4; Xcenter = ((xoffset * x) / Xhudres) << 16; Ycenter = ((yoffset * yhudsize) / Yhudres) << 16; Sethudsize(x, yhudsize, 1); Setfont("Weaponal"); Hudmessage(s:Arsenal[Graphics][z - 1]; HUDMSG_PLAIN, z, HudSelectionColor, Xcenter + 0.4, Ycenter + 0.4, -1); delay(1); } }

Posted: **Wed Jul 04, 2007 2:32 pm**

Just Maps in a Hat for me.

Of course, the name seems to not be that, but it'll always remain so for me

Nearly finished stage 2 now. Just two more stages after that, and the whole deal is complete.

Posted: **Wed Jul 04, 2007 2:56 pm**

skadoomer wrote:Fun with Hud code!
Spoiler:
Code: Select all • Expand view
function void Draw_Weapons(int Arraysize, int ValueCheck, int Drawtype) { int Xres = Getscreenwidth(); int Yres = Getscreenheight(); //int WeaponHudID = 1; int Hudoffset = 0.0; int DrawDistance = 64; int startpoint; int x = Yres / 2; int y; Sethudsize(Xres, Yres, 1); startpoint = (Xres / 2) - ((DrawDistance * Arraysize) / 2); WeaponHudID = 1; For(int d = 0; d < Arraysize; d++) { If(d == ValueCheck) { //Hudmessage(s:Arsenal[Graphics][d]; Drawtype, WeaponHudID, HudSelectionColor, Startpoint + hudoffset, x + 0.0, 1); y = (Startpoint + Hudoffset) - 0.0; ACS_Execute(Weapon_Enlarger, 0, y, x, Weaponhudid); } else { Setfont("weaponal"); Hudmessage(s:Arsenal[Graphics][d]; Drawtype, WeaponHudID, -1, (Startpoint + hudoffset) << 16, (x << 16)+ 0.0, 1); } Hudoffset += DrawDistance; WeaponHudID++; } } Script Weapon_Enlarger (int Xoffset, int Yoffset , int z) { int diff = 480; int Xhudres = Getscreenwidth(); int Yhudres = Getscreenheight(); int enddrawres = Xhudres - diff; int Xcenter; int Ycenter; int yhudsize; int countdown = 0; For (int x = Xhudres; x > (enddrawres - 1); x = x - 40) { yhudsize = (x * 3) / 4; Xcenter = ((xoffset * x) / Xhudres) << 16; Ycenter = ((yoffset * yhudsize) / Yhudres) << 16; Sethudsize(x, yhudsize, 1); Setfont("Weaponal"); Hudmessage(s:Arsenal[Graphics][z - 1]; HUDMSG_PLAIN, z, HudSelectionColor, Xcenter + 0.4, Ycenter + 0.4, -1); delay(1); } }

That looks incredibly amusing. Have a wad as a test for this? I'd like to see what it does.

Posted: **Wed Jul 04, 2007 5:23 pm**

Blade Nightflame wrote: Have a wad as a test for this? I'd like to rip it.

Fixed.

ZDoom

The WIP Thread

The WIP Thread