WebSVN – nw_plus – Diff – /nw_plus/NWinter.con/


/*
--------------------------------------------------------------------------------
Duke: Nuclear Winter
By Joris Weimar
© 1997 Simply Silly Software
--------------------------------------------------------------------------------
Duke: Nuclear Winter Plus
By Hendricks266
--------------------------------------------------------------------------------
*/
 
definecheat 14 endepisode
definecheat 15 endlevel
definecheat 25 endvolume
 
include NWDefs.con
include NWUser.con
 
setgamename Duke: Nuclear Winter
 
gamevar picnum 0 2
gamevar temp 0 2
gamevar tempb 0 2
gamevar x 0 2
gamevar y 0 2
gamevar z 0 2
 
gamevar owner 0 2
gamevar temp2 0 2
gamevar temp3 0 2
gamevar temp4 0 2
gamevar ptemp 0 1
gamevar holodukeid 0 1
gamevar musicchange 0 1
gamevar skin DUKE 132097 // do not reset flag enabled
 
gamevar LOGO_FLAGS 767 0 // default; TEN screen reenabled
 
state cutsceneambience
  getactor[THISACTOR].lotag temp
 
  switch temp
 
    case WIND_AMBIENCE
    case WIND_REPEAT
     setactor[THISACTOR].lotag WIND2
    break
 
    case FLY_BY
     setactor[THISACTOR].lotag FLY_BY2
    break
 
  endswitch
ends
 
onevent EVENT_LOADACTOR
  getactor[THISACTOR].picnum picnum
  switch picnum
 
   case SNOWYDOORSHOCK 
     spritepal 30
     cactor DOORSHOCK
   break
 
   case 3765 case 3766 case 3767 case 3768 cactor WOODENHORSE2 break
 
  // case PIGCOP case PIGCOPSTAYPUT case PIGCOPDIVE sizeat 48 40 break
   case SOBBOTWALK case SOBBOTFLY sizeat 42 36 break
   case ELFUZI case ELFUZISTAYPUT sizeat 32 27 break
   case ELFGUN case ELFGUNSTAYPUT sizeat 32 27 break
   case SNOWMAN sizeat 42 36 break
 
   case 1915
    cactor COMMANDER // failsafe fix for NWL5 bug
   break
 
   case MUSICANDSFX
     state cutsceneambience
   break
 
   case JETPACK
     ifspritepal 21 setvar temp 1
     spritepal 0
   break
 
/*
   case SNOWFLAKE
     cactor SNOW
     sizeat 8 8
   break
*/
 
   case XMASPRESENT
   case XMASPRESENT2
     getactor[THISACTOR].hitag temp
     setactor[THISACTOR].hitag 0
   break
 
  endswitch
endevent
 
onevent EVENT_EGS
 getactor[THISACTOR].picnum picnum
 getactor[THISACTOR].owner owner
 
 ifactor APLAYER setactor[THISACTOR].mdflags 16
 ifactor DUKETORSO setactor[THISACTOR].mdflags 16
 ifactor DUKEGUN setactor[THISACTOR].mdflags 16
 ifactor DUKELEG setactor[THISACTOR].mdflags 16
 ifactor DOORSHOCK setactor[THISACTOR].mdflags 16
 
 ifactor SNOW
   {
     sizeat 8 8
 
     setvar temp3 0
     randvar temp3 2047
     setactor[THISACTOR].ang temp3
 
     setvar temp2 -2047
     randvar temp2 2047
 
/*
     setvar temp3 0
     ifrnd 128 addvar temp3 4
     ifrnd 128 addvar temp3 8
     setactor[THISACTOR].cstat temp3
*/
   }
endevent
 
// -----------------------------------------------------------------------------
 
state standard_bjibs
  guts JIBS2 1
  guts JIBS3 2
  guts JIBS4 3
  guts JIBS5 2
  guts JIBS6 3
  ifrnd 6
  {
    guts JIBS1 1
  }         // a badly drawn spine
ends
 
state nwbreakobject
  ifaction 0
  {
    action ANULLACTION
    cstator 257
  }
    ifhitweapon
    {
      ifdead
      {
        ifactor WOODSLATS
        {
          sound GLASS_HEAVYBREAK
	  debris SCRAP3 5
	  debris SCRAP4 3
          killit
        }
      else
        ifactor RIBBON
        {
          sound GLASS_HEAVYBREAK
	  debris SCRAP3 5
	  debris SCRAP4 3
          killit
        }
      else
        ifactor MYBOX
        {
          sound GLASS_HEAVYBREAK
	  debris SCRAP3 5
	  debris SCRAP4 3
          killit
        }
      else
        ifactor SNOWGIB killit
      else
        ifactor DRUNKELF
        {
          sound PRED_DYING
          guts JIBS6 2
          guts JIBS6 3
          guts JIBS6 4
          killit
        }
      else
        ifactor CHOOCHOOSLUT
        {
          sound GLASS_HEAVYBREAK
	  debris SCRAP3 5
	  debris SCRAP4 3
          killit
        }
      else
        ifactor HORSEPOWER
        {
          sound GLASS_HEAVYBREAK
	  debris SCRAP3 5
	  debris SCRAP4 3
          killit
        }
      else
        ifactor CHANDELIER
        {
          sound GLASS_BREAKING
          debris SCRAP3 3
          debris SCRAP4 4
          lotsofglass 10
          killit
        }
      else
        ifactor TREEWITHSOMETHING
        {
          sound GLASS_HEAVYBREAK
	  debris SCRAP3 5
          ifrnd 96
          {
            ifrnd 64 spawn ATOMICHEALTH else spawn SHIELD
          }
          else
          {
            ifrnd 128 spawn STEROIDS else spawn FECES
          }
          killit
        }
      else
        ifactor SSPEAKER
        {
	  debris SCRAP4 3
          killit
        }
      }
    }
ends
 
useractor notenemy WOODSLATS MEDIUMSTRENGTH state nwbreakobject enda
 
useractor notenemy RIBBON WEAK state nwbreakobject enda
 
useractor notenemy SSPEAKER WEAK state nwbreakobject enda
 
useractor notenemy MYBOX WEAK state nwbreakobject enda
 
useractor notenemy DRUNKELF WEAK state nwbreakobject enda
 
useractor notenemy CHOOCHOOSLUT WEAK state nwbreakobject enda
 
useractor notenemy HORSEPOWER WEAK state nwbreakobject enda
 
useractor notenemy SNOWGIB WEAK state nwbreakobject enda
 
useractor notenemy CHANDELIER WEAK state nwbreakobject enda
 
useractor notenemy TREEWITHSOMETHING TOUGH state nwbreakobject enda
 
actor JETPACK
  fall
  ifmove RESPAWN_ACTOR_FLAG
    state respawnit
  else
    ifp pshrunk nullop
    else
      ifp palive
        ifpdistl RETRIEVEDISTANCE
          ifcount 6
            ifpinventory GET_JETPACK JETPACK_AMOUNT
              ifcanseetarget
      {
        ifvare temp 1
        {
          addinventory GET_JETPACK JETPACK_NEAR_EMPTY
          quote 125
        }
        else
        {
          addinventory GET_JETPACK JETPACK_AMOUNT
          quote 41
        }
        ifspawnedby JETPACK
          state getcode
        else
          state quikget
      }
enda
 
action FEMHDANCE1 205 1 1 1 16
action FEMHDANCE3 205 1 1 1 26
action FEMHDANCE2 206 2 1 1 10
 
 
 
state nwbabecode
 getactor[THISACTOR].cstat temp
 ifvarand temp 1 nullop else addvar temp 1
 ifactor HALFBITCH { ifvarand temp 128 nullop else addvar temp 128 }
 ifvarand temp 256 nullop else addvar temp 256
 
 getuserdef .lockout temp2
 ifvare temp2 1
   {
     ifvarand temp 32768 nullop else addvar temp 32768
   }
 else
  // {
     ifvarand temp 32768 subvar temp 32768
  // }
 
 setactor[THISACTOR].cstat temp
 
 
 
  ifactor HALFBITCH nullop else fall
 
  ifaction FEMSHRUNK
  {
    ifcount SHRUNKDONECOUNT
    {
      action FEMANIMATE
      cstat 257
    }
    else
      ifcount SHRUNKCOUNT
        sizeto 40 40
    else
      state genericshrunkcode
  }
  else ifaction FEMGROW
  {
    ifcount 32
    {
      respawnhitag
      guts JIBS4 20
      guts JIBS6 20
      spritepal 6
      soundonce LADY_SCREAM
      ifactor SLUTASS debris SCRAP6 1
      sound SQUISH2
      killit
    }
    else
      sizeto MAXXSTRETCH MAXYSTRETCH
  }
 
 
  else
    ifaction FEMHDANCE1
  {
    ifactioncount 2
      action FEMHDANCE2
  }
  else
    ifaction FEMHDANCE2
  {
    ifactioncount 8
      action FEMHDANCE3
  }
  else
    ifaction FEMHDANCE3
  {
    ifactioncount 2
    action FEMANIMATE
  }
  else
    ifaction FEMFROZEN1
  {
    ifcount THAWTIME
    {
      action FEMANIMATE
      getlastpal
    }
    else
      ifcount FROZENDRIPTIME
    {
      ifactioncount 26
      {
        spawn WATERDRIP
        resetactioncount
      }
    }
 
    ifhitweapon
    {
      ifwasweapon FREEZEBLAST
      {
        strength 0
        break
      }
      lotsofglass 30
      sound GLASS_BREAKING
      respawnhitag
      ifrnd 84
        spawn BLOODPOOL
      killit
    }
    else
      ifp pfacing
        ifpdistl FROZENQUICKKICKDIST
          pkick
    break
  }
  else ifaction FEMFROZEN2
  {
    ifcount THAWTIME
    {
      action FEMANIMATE
      getlastpal
    }
    else
      ifcount FROZENDRIPTIME
    {
      ifactioncount 26
      {
        spawn WATERDRIP
        resetactioncount
      }
    }
 
    ifhitweapon
    {
      ifwasweapon FREEZEBLAST
      {
        strength 0
          break
      }
 
      lotsofglass 30
 
      sound GLASS_BREAKING
      ifrnd 84
        spawn BLOODPOOL
      respawnhitag
 
      ifrnd 128
        sound DUKE_HIT_STRIPPER1
      else
        sound DUKE_HIT_STRIPPER2
 
      killit
    }
    else
      ifp pfacing
        ifpdistl FROZENQUICKKICKDIST
          pkick
    break
  }
 
  ifhitweapon
  {
    ifdead
    {
      ifwasweapon GROWSPARK
      {
        cstat 0
        move 0
        sound ACTOR_GROWING
        action FEMGROW
        break
      }
      else ifwasweapon FREEZEBLAST
      {
        ifaction FEMSHRUNK
          break
 
          action FEMFROZEN1
 
        move 0
        spritepal 1
        strength 0
 
        sound SOMETHINGFROZE
 
        break
      }
 
      ifrnd 128
        sound DUKE_HIT_STRIPPER1
      else
        sound DUKE_HIT_STRIPPER2
 
      respawnhitag
      state standard_bjibs
      state random_wall_jibs
      spawn BLOODPOOL
 
        ifactor HALFBITCH
          money 3
      else
        ifactor SLUTASS
          money 3
 
 
        spritepal 6
        soundonce LADY_SCREAM
        ifactor NAKED1
	  debris SCRAP3 18
        else
          ifactor PODFEM1
	    debris SCRAP3 18
        killit
    }
    else
    {
      ifwasweapon SHRINKSPARK
      {
        sound ACTOR_SHRINKING
        move 0
        action FEMSHRUNK
        cstat 0
        break
      }
      else
        ifwasweapon GROWSPARK
          sound EXPANDERHIT
 
 
      sound SQUISH2
 
      guts JIBS6 1
    }
  }
 
 
 
  ifp pfacing
    ifpdistl 1280
      ifhitspace
  {
    tip
    ifrnd 128
      soundonce DUKE_TIP1
    else
      soundonce DUKE_TIP2
ifactor HALFBITCH
      action FEMHDANCE1
  }
ends
 
useractor notenemy HALFBITCH TOUGH
  state nwbabecode
enda
 
useractor notenemy SLUTASS TOUGH
  state nwbabecode
enda
 
state nwl3surprise
ifvare VOLUME 1
  {
    ifvare LEVEL 2
      {
        getactor[THISACTOR].sectnum temp
        switch temp
          case 220 case 221
            ifvarn musicchange 1
              {
                starttrack 12 // doom
                setvar musicchange 1
              }
          break
          case 563 case 564 case 565 case 566 case 567
            ifvarn musicchange 2
              {
                starttrack 13 // mario
                setvar musicchange 2
              }
          break
          case 192 case 193 case 194 case 195 case 196 case 197 case 198 case 237 case 238 case 239 case 240
          case 166 case 167 case 172 case 173 case 174 case 176 case 179
            ifvarn musicchange 0
              {
                starttrackvar LEVEL // level music
                setvar musicchange 0
              }
          break
        endswitch
      }
  }
ends
 
// Flying Frosty
 
/*
action ACOMMBREETH  0  3  5  1  40
action ACOMMFROZEN  0  1  5
action ACOMMSPIN   -5  1  5  1  12
action ACOMMGET   0  3  5  1  30
action ACOMMSHOOT  20  1  5   1 35
action ACOMMABOUTTOSHOOT 20 1 5 1 30
action ACOMMDYING  30  8  1  1  12
action ACOMMDEAD   38  1  1  1  1
 
 
move COMMGETUPVELS 128 -64
move COMMGETVELS 128 64
move COMMSLOW 64 24
move COMMSTOPPED
 
ai AICOMMWAIT ACOMMBREETH COMMSTOPPED faceplayerslow
ai AICOMMGET ACOMMGET COMMGETVELS seekplayer
ai AICOMMSHOOT ACOMMSHOOT COMMSTOPPED faceplayerslow
ai AICOMMABOUTTOSHOOT ACOMMABOUTTOSHOOT COMMSTOPPED faceplayerslow
ai AICOMMSPIN ACOMMSPIN COMMGETVELS spin
ai AICOMMDYING ACOMMDYING COMMSTOPPED faceplayer
ai AICOMMSHRUNK ACOMMGET COMMSLOW furthestdir
ai AICOMMGROW ACOMMGET COMMSTOPPED furthestdir
*/
 
move COMMGETUPVELSNW 128 -64
move COMMGETVELSNW 128 64
move COMMSLOWNW 64 24
move COMMSTOPPEDNW
 
action ACOMMSPINNW   0  1  5  1  12
action ACOMMSHOOTNW  20  1  5 1  16 // this is custom to shorten the delay between firing freezeblasts
 
ai AICOMMSPINNW ACOMMSPINNW COMMGETVELSNW spin
ai AICOMMSHOOTNW ACOMMSHOOTNW COMMSTOPPEDNW faceplayerslow
 
state checkcommhitstate
 
  ifhitweapon
  {
    debris SCRAP3 5
    ifdead
    {
      ifwasweapon FREEZEBLAST
      {
        break
      }
      else
        ifwasweapon GROWSPARK
      {
        sound ACTOR_GROWING
        ai AICOMMGROW
        break
      }
 
      addkills 1
 
      ifwasweapon RADIUSEXPLOSION
      {
        debris SCRAP3 5
        sound SQUISH2
        killit
      }
      else
        ifwasweapon RPG
      {
        sound SQUISH2
        debris SCRAP3 5
        state standard_jibs
        killit
      }
 
      debris SCRAP3 100
      sound COMM_DYING
      ai AICOMMDYING
    }
    else
    {
      soundonce COMM_PAIN
      ifwasweapon SHRINKSPARK
      {
        sound ACTOR_SHRINKING
        ai AICOMMSHRUNK
      }
      else
        ifwasweapon GROWSPARK
          sound EXPANDERHIT
      else
        ifrnd 24
          ai AICOMMABOUTTOSHOOT
    }
  }
ends
 
actor COMMANDERSTAYPUT COMMANDERSTRENGTH
  cactor COMMANDER
  ai AICOMMABOUTTOSHOOT
enda
 
actor COMMANDER COMMANDERSTRENGTH
 
  state checksquished
 
  ifaction ACOMMFROZEN
  {
    fall
 
    ifcount THAWTIME
    {
      getlastpal
      ai AICOMMWAIT
    }
    else
      ifcount FROZENDRIPTIME
    {
      ifactioncount 26
      {
        spawn WATERDRIP
        resetactioncount
      }
    }
 
    ifhitweapon
    {
      ifwasweapon FREEZEBLAST
      {
        strength 0
        break
      }
      addkills 1
 
      ifrnd 84
        spawn BLOODPOOL
      lotsofglass 30
      sound GLASS_BREAKING
      killit
    }
    ifp pfacing
      ifpdistl FROZENQUICKKICKDIST
        pkick
    break
  }
  ifai 0
    ai AICOMMSHOOTNW
  else
    ifai AICOMMWAIT
  {
    ifcount 20
    {
      ifcansee
      {
        ifcanshoottarget
        {
          ifrnd 96
            ai AICOMMGET
          else
            ai AICOMMABOUTTOSHOOT
        }
      }
      else
        ai AICOMMGET
    }
  }
  else
    ifai AICOMMABOUTTOSHOOT
  {
    ifactioncount 2
    {
      ifcansee
        ai AICOMMSHOOTNW
      else
      {
        ai AICOMMGET
        break
      }
    }
    ifrnd 32 soundonce COMM_ATTACK
  }
  else
    ifai AICOMMSHOOTNW
  {
    ifcanshoottarget
    {
      ifcount 12
        ifrnd 16
          ai AICOMMWAIT
	
      ifactioncount 1
      {
        shoot FREEZEBLAST
        resetactioncount
      }
 
      getplayer[THISACTOR].i temp
      getactor[temp].pal temp
      ifvare temp 1 // if player is frozen
        ai AICOMMGET
    }
    else
      ai AICOMMGET
  }
  else
    ifai AICOMMSHRUNK
  {
    ifcount SHRUNKDONECOUNT
      ai AICOMMGET
    else
      ifcount SHRUNKCOUNT
        sizeto 48 40
    else
      state genericshrunkcode
  }
  else
    ifai AICOMMGROW
      state genericgrowcode
  else
    ifai AICOMMGET
  {
    ifnotmoving
      ifrnd 4
        operate
    ifpdistl 1024
    {
      ifp palive
      {
        sound COMM_SPIN
        ai AICOMMSPINNW
        break
      }
      
      getplayer[THISACTOR].i temp
      getactor[temp].pal temp
      ifvare temp 1 // if player is frozen
      {
        sound COMM_SPIN
        ai AICOMMSPINNW
        break
      }
    }
 
    ifcansee
    {
      ifp phigher
        move COMMGETUPVELS getv geth faceplayer
      else
        move COMMGETVELS getv geth faceplayer
    }
    ifactioncount 8
      ifrnd 2
        ai AICOMMABOUTTOSHOOT
  }
  else
    ifai AICOMMSPINNW
  {
    soundonce COMM_SPIN
    ifcount 16
    {
      ifpdistl 1280
      {
        setvar tempb CAPTSPINNINGPLAYER
        mulvar tempb -1
        // addphealth CAPTSPINNINGPLAYER
        getplayer[THISACTOR].i temp
        setactor[temp].htextra tempb
        setactor[temp].htpicnum KNEE
        setactor[temp].htowner THISACTOR
 
        globalsound DUKE_GRUNT
        palfrom 32 16
        resetcount
      }
      else
        ifpdistg 2300
          ai AICOMMWAIT
    }
    ifactioncount 52
      ai AICOMMWAIT
    ifnotmoving
      ifrnd 32
        operate
  }
 
  ifai AICOMMDYING
  {
    fall
    strength 0
 
    ifhitweapon
      ifwasweapon RADIUSEXPLOSION
    {
      sound SQUISH2
      spawn BLOODPOOL
      state standard_jibs
 
      killit
    }
 
    ifaction ACOMMDYING
      ifactioncount 8
    {
      iffloordistl 8
        sound THUD
      cstat 0
      action ACOMMDEAD
    }
  }
  else
  {
    ifrnd 2
      soundonce COMM_ROAM
    state checkcommhitstate
  }
enda
 
// Frosted Battle Mobile
 
move TANKSTOPNW
 
useractor enemy TANK TANKSTRENGTH
    fall
 
//  sizeat 45 45
  ifaction 0
  {
    action ATANKWAIT
    cstat 257
    clipdist 100
  }
  else
    ifaction ATANKSPIN
  {
    soundonce TANK_ROAM
 
    ifactioncount 20
    {
      ifrnd 16
        ifcansee
          ifcanshoottarget
      {
        move TANKSTOPNW geth
        action ATANKSHOOTING
        stopsound TANK_ROAM
      }
    }
 
    ifrnd 16
      move TANKFORWARD seekplayer
  }
  else
    ifaction ATANKSHOOTING
  {
    ifactioncount 22
    {
      ifpdistg 8192
      {
        sound BOS1_ATTACK2
        shoot MORTER
      }
      resetcount
      move 0 action ATANKWAIT
    }
    else
      ifactioncount 2
    {
      ifcansee
      {
        ifpdistl 16384
        {
          ifrnd 128
          {
 
 
            sound PISTOL_FIRE
            shoot SHOTSPARK1
          }
        }
        else
          ifrnd 128
        {
          sound PRED_ATTACK
          shoot FIRELASER
        }
      }
      else
      {
        move TANKFORWARD seekplayer
        action ATANKSPIN
      }
    }
 
    ifrnd 16
    {
      stopsound TANK_ROAM
      move TANKSTOPNW faceplayerslow
    }
  }
  else
    ifaction ATANKWAIT
  {
    ifactioncount 32
    {
      move TANKFORWARD seekplayer
      action ATANKSPIN
    }
  }
  else
    ifaction ATANKDEAD
  {
    addkills 1
    hitradius 6144 TOUGH TOUGH TOUGH TOUGH
    sound LASERTRIP_EXPLODE
    debris SCRAP1 15
    spawn EXPLOSION2
    ifrnd 128 spawn SNOWMAN
    killit
  }
 
  ifhitweapon
  {
    ifdead
      action ATANKDEAD
    else
    {
      debris SCRAP1 1
      ifaction ATANKSHOOTING break
 
      ifrnd 192
      {
        move TANKSTOPNW geth
        action ATANKSHOOTING
        stopsound TANK_ROAM
      }
    }
  }
 
enda
 
 
include NWActor.con
include NWSnow.con
 
// -----------------------------------------------------------------------------
 
onevent EVENT_GAME
  ifactor APLAYER
  {
    state nwl3surprise
    
    getplayer[THISACTOR].holoduke_on holodukeid
    ifvarg holodukeid -1
      setactor[holodukeid].mdflags 16
    
   // addlogvar skin
  }
  ifactor FRAMEEFFECT1
    ifspawnedby APLAYER
      setactor[THISACTOR].mdflags 16
 
/*
  ifactor MONEY
    {
      setactor[THISACTOR].mdflags 16
      // getactor[THISACTOR].owner owner
      switch owner
      case SNOW case SNOWFLAKE case SNOWMAKER case SNOWMAKERNOMOVE
        getactor[THISACTOR].x x
        getactor[THISACTOR].y y
        getactor[THISACTOR].z z
 
        updatesectorz x y z temp
        ifvarn temp -1 getflorzofslope temp x y temp2 else killit
 
        ifvarvare z temp2 killit
      break
      endswitch
    }
*/
endevent
 
onevent EVENT_ANIMATESPRITES
 
 ifvare picnum DOORSHOCK
   {
     ifspritepal 30 settspr[THISACTOR].tsprpicnum 3656
     ifvare VOLUME 1 ifvare LEVEL 2 settspr[THISACTOR].tsprpicnum 3656
     break
   }
 ifvare picnum SNOWFLAKE
   {
     settspr[THISACTOR].tsprpicnum SNOW
     settspr[THISACTOR].tsprxrepeat 4
     settspr[THISACTOR].tspryrepeat 4
     break
   }
/*
 ifvare picnum MONEY
   {
      switch owner
      case SNOW case SNOWFLAKE case SNOWMAKER case SNOWMAKERNOMOVE
        settspr[THISACTOR].tsprpicnum SNOW
      break
      endswitch
   }
*/
 
  switch picnum
    case APLAYER
      ifvare skin SANTA
      {
        gettspr[THISACTOR].tsprpicnum temp3
        ifvarg temp3 1399 ifvarl temp3 1544 addvar temp3 4096
        settspr[THISACTOR].tsprpicnum temp3
 
        ifvarg holodukeid -1
        {
          gettspr[holodukeid].tsprpicnum temp3
          ifvarg temp3 1399 ifvarl temp3 1544 addvar temp3 4096
          settspr[holodukeid].tsprpicnum temp3
        }
      }
      break
 
    case FRAMEEFFECT1
      ifvare skin SANTA
        ifspawnedby APLAYER
        {
          gettspr[THISACTOR].tsprpicnum temp3
          ifvarg temp3 1399 ifvarl temp3 1544 addvar temp3 4096
          settspr[THISACTOR].tsprpicnum temp3
        }
      break
 
    case DUKETORSO
    case DUKEGUN
      getactor[owner].picnum temp2
      ifvare temp2 SOBBOTWALK
      {
        gettspr[THISACTOR].tsprpicnum temp3
        addvar temp3 2456
        settspr[THISACTOR].tsprpicnum temp3
      }
      ifvare temp2 SOBBOTFLY
      {
        gettspr[THISACTOR].tsprpicnum temp3
        addvar temp3 2456
        settspr[THISACTOR].tsprpicnum temp3
      }
      ifvare temp2 APLAYER
      {
        ifvare skin SANTA
        {
          gettspr[THISACTOR].tsprpicnum temp3
          addvar temp3 2456
          settspr[THISACTOR].tsprpicnum temp3
        }
      }
      break
 
    case DUKELEG
      getactor[owner].picnum temp2
      ifvare temp2 SOBBOTWALK settspr[THISACTOR].tsprpal 30
      ifvare temp2 SOBBOTFLY settspr[THISACTOR].tsprpal 30
      ifvare temp2 APLAYER ifvare skin SANTA settspr[THISACTOR].tsprpal 30
      break
  endswitch
 
 ifvare picnum APLAYER // this fixes the bug with the misplaced TV screen tiles
   {
     gettspr[THISACTOR].tsprpicnum temp
     switch temp
      case 1470 case 1471 case 1472 case 1473 case 1474
       subvar temp 5
       settspr[THISACTOR].tsprpicnum temp
      break
     endswitch
   }
endevent
 
 
 
 
useractor notenemy NWEFFECTOR 0 
  cstat 32768
  // sizeat 1 1
 
  ifspritepal 31 // phone ringing effect
  {
    /*
    getplayer[THISACTOR].cursectnum temp3
    switch temp3
      case 60 case 61 case 62 case 63
      case 86 case 87
      case 299 case 300 case 301 case 302 case 303 case 304 case 305 case 306 case 307 case 308 case 309
      case 310 case 311 case 312 case 313 case 314 case 315 case 316 case 317
        soundonce PHONE_RING
        break
 
      default
        stopsound PHONE_RING
        break
    endswitch
    */
 
    ifpdistl 8192 // 4096
      soundonce PHONE_RING
    ifpdistg 16384
      stopsound PHONE_RING
 
    ifpdistl RETRIEVEDISTANCE
      ifp pfacing
        ifhitspace
          ifvare temp2 0
          {
            setvar temp 0
            setvar temp2 1
            setvar temp3 0
            setvar tempb 0
          }
 
    ifvare temp2 1
    {
      addvar temp 1
 
      stopsound PHONE_RING
      ifvare temp 1
        sound PHONE_PICKUP
      else ifvare temp 30
      {
        setvar tempb 0
        randvar tempb 3
 
        switch tempb
          case 0
            sound LOWANG1
            setvar temp3 57
            break
          case 1
            sound LOWANG2
            setvar temp3 124
            break
          case 2
            sound LOWANG3
            setvar temp3 121
            break
          case 3
            sound LOWANG4
            setvar temp3 156
            break
        endswitch
 
        addvar temp3 60
        setvar tempb 0
      }
      else ifvarvare temp temp3
      {
        sound PHONE_HANGUP
        setvarvar tempb temp3
        addvar tempb 150
      }
      else ifvarvare temp tempb
      {
        setvar temp2 0
        setvar temp 0
      }
    }
  }
enda
 
useractor notenemy 3831 0
// cstat 32768
 sizeat 12 13
 getactor[THISACTOR].sectnum temp
 getplayer[THISACTOR].cursectnum temp2
 ifvarvare temp temp2
   {
     setuserdef[THISACTOR].volume_number 1
     endofgame 13
   }
enda
 
action WOODENHORSE2FRAME  0   1   5
action WOODEN2FALLFRAME  -2738  1   5
useractor notenemy WOODENHORSE2 WEAK WOODENHORSE2FRAME
  fall
  ifhitweapon
  {
    ifdead
    {
      debris SCRAP1 4
      debris SCRAP2 3
      killit
    }
    else
      action WOODEN2FALLFRAME
  }
enda
 
useractor notenemy NWSTEAM 0 
  ifpdistl 6144
    soundonce STEAM_HISSING
enda
 
define title_x1 73
define title_x2 306
define title_y 194
define title_zoom 32768
 
onevent EVENT_DISPLAYMENU
//  getplayer[THISACTOR].gm temp
//  ifvarand temp 4 nullop else
// {
  rotatesprite title_x1 title_y title_zoom 0 3838 0 0 0 0 0 xdim ydim
  rotatesprite title_x2 title_y title_zoom 0 3839 0 0 0 0 0 xdim ydim
// }
endevent
 
/*
onevent EVENT_DISPLAYTITLE
  rotatesprite title_x1 title_y title_zoom 0 3838 0 0 0 0 0 xdim ydim
  rotatesprite title_x2 title_y title_zoom 0 3839 0 0 0 0 0 xdim ydim
endevent
*/
 
 
 

Rev 22	Rev 30
1	/*	1	/*
2	--------------------------------------------------------------------------------	2	--------------------------------------------------------------------------------
3	Duke: Nuclear Winter	3	Duke: Nuclear Winter
4	By Joris Weimar	4	By Joris Weimar
5	© 1997 Simply Silly Software	5	© 1997 Simply Silly Software
6	--------------------------------------------------------------------------------	6	--------------------------------------------------------------------------------
7	Duke: Nuclear Winter Plus	7	Duke: Nuclear Winter Plus
8	By Hendricks266	8	By Hendricks266
9	--------------------------------------------------------------------------------	9	--------------------------------------------------------------------------------
10	*/	10	*/
11		11
12	definecheat 14 endepisode	12	definecheat 14 endepisode
13	definecheat 15 endlevel	13	definecheat 15 endlevel
14	definecheat 25 endvolume	14	definecheat 25 endvolume
15		15
16	include NWDefs.con	16	include NWDefs.con
17	include NWUser.con	17	include NWUser.con
18		18
19	setgamename Duke: Nuclear Winter	19	setgamename Duke: Nuclear Winter
20		20
21	gamevar picnum 0 2	21	gamevar picnum 0 2
22	gamevar temp 0 2	22	gamevar temp 0 2
23	gamevar tempb 0 2	23	gamevar tempb 0 2
24	gamevar x 0 2	24	gamevar x 0 2
25	gamevar y 0 2	25	gamevar y 0 2
26	gamevar z 0 2	26	gamevar z 0 2
27		27
28	gamevar owner 0 2	28	gamevar owner 0 2
29	gamevar temp2 0 2	29	gamevar temp2 0 2
30	gamevar temp3 0 2	30	gamevar temp3 0 2
31	gamevar temp4 0 2	31	gamevar temp4 0 2
32	gamevar ptemp 0 1	32	gamevar ptemp 0 1
33	gamevar holodukeid 0 1	33	gamevar holodukeid 0 1
34	gamevar musicchange 0 1	34	gamevar musicchange 0 1
35	gamevar skin DUKE 132097 // do not reset flag enabled	35	gamevar skin DUKE 132097 // do not reset flag enabled
36		36
37	gamevar LOGO_FLAGS 767 0 // default; TEN screen reenabled	37	gamevar LOGO_FLAGS 767 0 // default; TEN screen reenabled
38		38
39	state cutsceneambience	39	state cutsceneambience
40	getactor[THISACTOR].lotag temp	40	getactor[THISACTOR].lotag temp
41		41
42	switch temp	42	switch temp
43		43
44	case WIND_AMBIENCE	44	case WIND_AMBIENCE
45	case WIND_REPEAT	45	case WIND_REPEAT
46	setactor[THISACTOR].lotag WIND2	46	setactor[THISACTOR].lotag WIND2
47	break	47	break
48		48
49	case FLY_BY	49	case FLY_BY
50	setactor[THISACTOR].lotag FLY_BY2	50	setactor[THISACTOR].lotag FLY_BY2
51	break	51	break
52		52
53	endswitch	53	endswitch
54	ends	54	ends
55		55
56	onevent EVENT_LOADACTOR	56	onevent EVENT_LOADACTOR
57	getactor[THISACTOR].picnum picnum	57	getactor[THISACTOR].picnum picnum
58	switch picnum	58	switch picnum
59		59
60	case SNOWYDOORSHOCK	60	case SNOWYDOORSHOCK
61	spritepal 30	61	spritepal 30
62	cactor DOORSHOCK	62	cactor DOORSHOCK
63	break	63	break
64		64
65	case 3765 case 3766 case 3767 case 3768 cactor WOODENHORSE2 break	65	case 3765 case 3766 case 3767 case 3768 cactor WOODENHORSE2 break
66		66
67	// case PIGCOP case PIGCOPSTAYPUT case PIGCOPDIVE sizeat 48 40 break	67	// case PIGCOP case PIGCOPSTAYPUT case PIGCOPDIVE sizeat 48 40 break
68	case SOBBOTWALK case SOBBOTFLY sizeat 42 36 break	68	case SOBBOTWALK case SOBBOTFLY sizeat 42 36 break
69	case ELFUZI case ELFUZISTAYPUT sizeat 32 27 break	69	case ELFUZI case ELFUZISTAYPUT sizeat 32 27 break
70	case ELFGUN case ELFGUNSTAYPUT sizeat 32 27 break	70	case ELFGUN case ELFGUNSTAYPUT sizeat 32 27 break
71	case SNOWMAN sizeat 42 36 break	71	case SNOWMAN sizeat 42 36 break
72		72
73	case 1915	73	case 1915
74	cactor COMMANDER // failsafe fix for NWL5 bug	74	cactor COMMANDER // failsafe fix for NWL5 bug
75	break	75	break
76		76
77	case MUSICANDSFX	77	case MUSICANDSFX
78	state cutsceneambience	78	state cutsceneambience
79	break	79	break
80		80
81	case JETPACK	81	case JETPACK
82	ifspritepal 21 setvar temp 1	82	ifspritepal 21 setvar temp 1
83	spritepal 0	83	spritepal 0
84	break	84	break
85		85
86	/*	86	/*
87	case SNOWFLAKE	87	case SNOWFLAKE
88	cactor SNOW	88	cactor SNOW
89	sizeat 8 8	89	sizeat 8 8
90	break	90	break
91	*/	91	*/
92		92
93	case XMASPRESENT	93	case XMASPRESENT
94	case XMASPRESENT2	94	case XMASPRESENT2
95	getactor[THISACTOR].hitag temp	95	getactor[THISACTOR].hitag temp
96	setactor[THISACTOR].hitag 0	96	setactor[THISACTOR].hitag 0
97	break	97	break
98		98
99	endswitch	99	endswitch
100	endevent	100	endevent
101		101
102	onevent EVENT_EGS	102	onevent EVENT_EGS
103	getactor[THISACTOR].picnum picnum	103	getactor[THISACTOR].picnum picnum
104	getactor[THISACTOR].owner owner	104	getactor[THISACTOR].owner owner
105		105
106	ifactor APLAYER setactor[THISACTOR].mdflags 16	106	ifactor APLAYER setactor[THISACTOR].mdflags 16
107	ifactor DUKETORSO setactor[THISACTOR].mdflags 16	107	ifactor DUKETORSO setactor[THISACTOR].mdflags 16
108	ifactor DUKEGUN setactor[THISACTOR].mdflags 16	108	ifactor DUKEGUN setactor[THISACTOR].mdflags 16
109	ifactor DUKELEG setactor[THISACTOR].mdflags 16	109	ifactor DUKELEG setactor[THISACTOR].mdflags 16
110	ifactor DOORSHOCK setactor[THISACTOR].mdflags 16	110	ifactor DOORSHOCK setactor[THISACTOR].mdflags 16
111		111
112	ifactor SNOW	112	ifactor SNOW
113	{	113	{
114	sizeat 8 8	114	sizeat 8 8
115		115
116	setvar temp3 0	116	setvar temp3 0
117	randvar temp3 2047	117	randvar temp3 2047
118	setactor[THISACTOR].ang temp3	118	setactor[THISACTOR].ang temp3
119		119
120	setvar temp2 -2047	120	setvar temp2 -2047
121	randvar temp2 2047	121	randvar temp2 2047
122		122
123	/*	123	/*
124	setvar temp3 0	124	setvar temp3 0
125	ifrnd 128 addvar temp3 4	125	ifrnd 128 addvar temp3 4
126	ifrnd 128 addvar temp3 8	126	ifrnd 128 addvar temp3 8
127	setactor[THISACTOR].cstat temp3	127	setactor[THISACTOR].cstat temp3
128	*/	128	*/
129	}	129	}
130	endevent	130	endevent
131		131
132	// -----------------------------------------------------------------------------	132	// -----------------------------------------------------------------------------
133		133
134	state standard_bjibs	134	state standard_bjibs
135	guts JIBS2 1	135	guts JIBS2 1
136	guts JIBS3 2	136	guts JIBS3 2
137	guts JIBS4 3	137	guts JIBS4 3
138	guts JIBS5 2	138	guts JIBS5 2
139	guts JIBS6 3	139	guts JIBS6 3
140	ifrnd 6	140	ifrnd 6
141	{	141	{
142	guts JIBS1 1	142	guts JIBS1 1
143	} // a badly drawn spine	143	} // a badly drawn spine
144	ends	144	ends
145		145
146	state nwbreakobject	146	state nwbreakobject
147	ifaction 0	147	ifaction 0
148	{	148	{
149	action ANULLACTION	149	action ANULLACTION
150	cstator 257	150	cstator 257
151	}	151	}
152	ifhitweapon	152	ifhitweapon
153	{	153	{
154	ifdead	154	ifdead
155	{	155	{
156	ifactor WOODSLATS	156	ifactor WOODSLATS
157	{	157	{
158	sound GLASS_HEAVYBREAK	158	sound GLASS_HEAVYBREAK
159	debris SCRAP3 5	159	debris SCRAP3 5
160	debris SCRAP4 3	160	debris SCRAP4 3
161	killit	161	killit
162	}	162	}
163	else	163	else
164	ifactor RIBBON	164	ifactor RIBBON
165	{	165	{
166	sound GLASS_HEAVYBREAK	166	sound GLASS_HEAVYBREAK
167	debris SCRAP3 5	167	debris SCRAP3 5
168	debris SCRAP4 3	168	debris SCRAP4 3
169	killit	169	killit
170	}	170	}
171	else	171	else
172	ifactor MYBOX	172	ifactor MYBOX
173	{	173	{
174	sound GLASS_HEAVYBREAK	174	sound GLASS_HEAVYBREAK
175	debris SCRAP3 5	175	debris SCRAP3 5
176	debris SCRAP4 3	176	debris SCRAP4 3
177	killit	177	killit
178	}	178	}
179	else	179	else
180	ifactor SNOWGIB killit	180	ifactor SNOWGIB killit
181	else	181	else
182	ifactor DRUNKELF	182	ifactor DRUNKELF
183	{	183	{
184	sound PRED_DYING	184	sound PRED_DYING
185	guts JIBS6 2	185	guts JIBS6 2
186	guts JIBS6 3	186	guts JIBS6 3
187	guts JIBS6 4	187	guts JIBS6 4
188	killit	188	killit
189	}	189	}
190	else	190	else
191	ifactor CHOOCHOOSLUT	191	ifactor CHOOCHOOSLUT
192	{	192	{
193	sound GLASS_HEAVYBREAK	193	sound GLASS_HEAVYBREAK
194	debris SCRAP3 5	194	debris SCRAP3 5
195	debris SCRAP4 3	195	debris SCRAP4 3
196	killit	196	killit
197	}	197	}
198	else	198	else
199	ifactor HORSEPOWER	199	ifactor HORSEPOWER
200	{	200	{
201	sound GLASS_HEAVYBREAK	201	sound GLASS_HEAVYBREAK
202	debris SCRAP3 5	202	debris SCRAP3 5
203	debris SCRAP4 3	203	debris SCRAP4 3
204	killit	204	killit
205	}	205	}
206	else	206	else
207	ifactor CHANDELIER	207	ifactor CHANDELIER
208	{	208	{
209	sound GLASS_BREAKING	209	sound GLASS_BREAKING
210	debris SCRAP3 3	210	debris SCRAP3 3
211	debris SCRAP4 4	211	debris SCRAP4 4
212	lotsofglass 10	212	lotsofglass 10
213	killit	213	killit
214	}	214	}
215	else	215	else
216	ifactor TREEWITHSOMETHING	216	ifactor TREEWITHSOMETHING
217	{	217	{
218	sound GLASS_HEAVYBREAK	218	sound GLASS_HEAVYBREAK
219	debris SCRAP3 5	219	debris SCRAP3 5
220	ifrnd 96	220	ifrnd 96
221	{	221	{
222	ifrnd 64 spawn ATOMICHEALTH else spawn SHIELD	222	ifrnd 64 spawn ATOMICHEALTH else spawn SHIELD
223	}	223	}
224	else	224	else
225	{	225	{
226	ifrnd 128 spawn STEROIDS else spawn FECES	226	ifrnd 128 spawn STEROIDS else spawn FECES
227	}	227	}
228	killit	228	killit
229	}	229	}
230	else	230	else
231	ifactor SSPEAKER	231	ifactor SSPEAKER
232	{	232	{
233	debris SCRAP4 3	233	debris SCRAP4 3
234	killit	234	killit
235	}	235	}
236	}	236	}
237	}	237	}
238	ends	238	ends
239		239
240	useractor notenemy WOODSLATS MEDIUMSTRENGTH state nwbreakobject enda	240	useractor notenemy WOODSLATS MEDIUMSTRENGTH state nwbreakobject enda
241		241
242	useractor notenemy RIBBON WEAK state nwbreakobject enda	242	useractor notenemy RIBBON WEAK state nwbreakobject enda
243		243
244	useractor notenemy SSPEAKER WEAK state nwbreakobject enda	244	useractor notenemy SSPEAKER WEAK state nwbreakobject enda
245		245
246	useractor notenemy MYBOX WEAK state nwbreakobject enda	246	useractor notenemy MYBOX WEAK state nwbreakobject enda
247		247
248	useractor notenemy DRUNKELF WEAK state nwbreakobject enda	248	useractor notenemy DRUNKELF WEAK state nwbreakobject enda
249		249
250	useractor notenemy CHOOCHOOSLUT WEAK state nwbreakobject enda	250	useractor notenemy CHOOCHOOSLUT WEAK state nwbreakobject enda
251		251
252	useractor notenemy HORSEPOWER WEAK state nwbreakobject enda	252	useractor notenemy HORSEPOWER WEAK state nwbreakobject enda
253		253
254	useractor notenemy SNOWGIB WEAK state nwbreakobject enda	254	useractor notenemy SNOWGIB WEAK state nwbreakobject enda
255		255
256	useractor notenemy CHANDELIER WEAK state nwbreakobject enda	256	useractor notenemy CHANDELIER WEAK state nwbreakobject enda
257		257
258	useractor notenemy TREEWITHSOMETHING TOUGH state nwbreakobject enda	258	useractor notenemy TREEWITHSOMETHING TOUGH state nwbreakobject enda
259		259
260	actor JETPACK	260	actor JETPACK
261	fall	261	fall
262	ifmove RESPAWN_ACTOR_FLAG	262	ifmove RESPAWN_ACTOR_FLAG
263	state respawnit	263	state respawnit
264	else	264	else
265	ifp pshrunk nullop	265	ifp pshrunk nullop
266	else	266	else
267	ifp palive	267	ifp palive
268	ifpdistl RETRIEVEDISTANCE	268	ifpdistl RETRIEVEDISTANCE
269	ifcount 6	269	ifcount 6
270	ifpinventory GET_JETPACK JETPACK_AMOUNT	270	ifpinventory GET_JETPACK JETPACK_AMOUNT
271	ifcanseetarget	271	ifcanseetarget
272	{	272	{
273	ifvare temp 1	273	ifvare temp 1
274	{	274	{
275	addinventory GET_JETPACK JETPACK_NEAR_EMPTY	275	addinventory GET_JETPACK JETPACK_NEAR_EMPTY
276	quote 125	276	quote 125
277	}	277	}
278	else	278	else
279	{	279	{
280	addinventory GET_JETPACK JETPACK_AMOUNT	280	addinventory GET_JETPACK JETPACK_AMOUNT
281	quote 41	281	quote 41
282	}	282	}
283	ifspawnedby JETPACK	283	ifspawnedby JETPACK
284	state getcode	284	state getcode
285	else	285	else
286	state quikget	286	state quikget
287	}	287	}
288	enda	288	enda
289		289
290	action FEMHDANCE1 205 1 1 1 16	290	action FEMHDANCE1 205 1 1 1 16
291	action FEMHDANCE3 205 1 1 1 26	291	action FEMHDANCE3 205 1 1 1 26
292	action FEMHDANCE2 206 2 1 1 10	292	action FEMHDANCE2 206 2 1 1 10
293		293
294		294
295		295
296	state nwbabecode	296	state nwbabecode
297	getactor[THISACTOR].cstat temp	297	getactor[THISACTOR].cstat temp
298	ifvarand temp 1 nullop else addvar temp 1	298	ifvarand temp 1 nullop else addvar temp 1
299	ifactor HALFBITCH { ifvarand temp 128 nullop else addvar temp 128 }	299	ifactor HALFBITCH { ifvarand temp 128 nullop else addvar temp 128 }
300	ifvarand temp 256 nullop else addvar temp 256	300	ifvarand temp 256 nullop else addvar temp 256
301		301
302	getuserdef .lockout temp2	302	getuserdef .lockout temp2
303	ifvare temp2 1	303	ifvare temp2 1
304	{	304	{
305	ifvarand temp 32768 nullop else addvar temp 32768	305	ifvarand temp 32768 nullop else addvar temp 32768
306	}	306	}
307	else	307	else
308	// {	308	// {
309	ifvarand temp 32768 subvar temp 32768	309	ifvarand temp 32768 subvar temp 32768
310	// }	310	// }
311		311
312	setactor[THISACTOR].cstat temp	312	setactor[THISACTOR].cstat temp
313		313
314		314
315		315
316	ifactor HALFBITCH nullop else fall	316	ifactor HALFBITCH nullop else fall
317		317
318	ifaction FEMSHRUNK	318	ifaction FEMSHRUNK
319	{	319	{
320	ifcount SHRUNKDONECOUNT	320	ifcount SHRUNKDONECOUNT
321	{	321	{
322	action FEMANIMATE	322	action FEMANIMATE
323	cstat 257	323	cstat 257
324	}	324	}
325	else	325	else
326	ifcount SHRUNKCOUNT	326	ifcount SHRUNKCOUNT
327	sizeto 40 40	327	sizeto 40 40
328	else	328	else
329	state genericshrunkcode	329	state genericshrunkcode
330	}	330	}
331	else ifaction FEMGROW	331	else ifaction FEMGROW
332	{	332	{
333	ifcount 32	333	ifcount 32
334	{	334	{
335	respawnhitag	335	respawnhitag
336	guts JIBS4 20	336	guts JIBS4 20
337	guts JIBS6 20	337	guts JIBS6 20
338	spritepal 6	338	spritepal 6
339	soundonce LADY_SCREAM	339	soundonce LADY_SCREAM
340	ifactor SLUTASS debris SCRAP6 1	340	ifactor SLUTASS debris SCRAP6 1
341	sound SQUISH2	341	sound SQUISH2
342	killit	342	killit
343	}	343	}
344	else	344	else
345	sizeto MAXXSTRETCH MAXYSTRETCH	345	sizeto MAXXSTRETCH MAXYSTRETCH
346	}	346	}
347		347
348		348
349	else	349	else
350	ifaction FEMHDANCE1	350	ifaction FEMHDANCE1
351	{	351	{
352	ifactioncount 2	352	ifactioncount 2
353	action FEMHDANCE2	353	action FEMHDANCE2
354	}	354	}
355	else	355	else
356	ifaction FEMHDANCE2	356	ifaction FEMHDANCE2
357	{	357	{
358	ifactioncount 8	358	ifactioncount 8
359	action FEMHDANCE3	359	action FEMHDANCE3
360	}	360	}
361	else	361	else
362	ifaction FEMHDANCE3	362	ifaction FEMHDANCE3
363	{	363	{
364	ifactioncount 2	364	ifactioncount 2
365	action FEMANIMATE	365	action FEMANIMATE
366	}	366	}
367	else	367	else
368	ifaction FEMFROZEN1	368	ifaction FEMFROZEN1
369	{	369	{
370	ifcount THAWTIME	370	ifcount THAWTIME
371	{	371	{
372	action FEMANIMATE	372	action FEMANIMATE
373	getlastpal	373	getlastpal
374	}	374	}
375	else	375	else
376	ifcount FROZENDRIPTIME	376	ifcount FROZENDRIPTIME
377	{	377	{
378	ifactioncount 26	378	ifactioncount 26
379	{	379	{
380	spawn WATERDRIP	380	spawn WATERDRIP
381	resetactioncount	381	resetactioncount
382	}	382	}
383	}	383	}
384		384
385	ifhitweapon	385	ifhitweapon
386	{	386	{
387	ifwasweapon FREEZEBLAST	387	ifwasweapon FREEZEBLAST
388	{	388	{
389	strength 0	389	strength 0
390	break	390	break
391	}	391	}
392	lotsofglass 30	392	lotsofglass 30
393	sound GLASS_BREAKING	393	sound GLASS_BREAKING
394	respawnhitag	394	respawnhitag
395	ifrnd 84	395	ifrnd 84
396	spawn BLOODPOOL	396	spawn BLOODPOOL
397	killit	397	killit
398	}	398	}
399	else	399	else
400	ifp pfacing	400	ifp pfacing
401	ifpdistl FROZENQUICKKICKDIST	401	ifpdistl FROZENQUICKKICKDIST
402	pkick	402	pkick
403	break	403	break
404	}	404	}
405	else ifaction FEMFROZEN2	405	else ifaction FEMFROZEN2
406	{	406	{
407	ifcount THAWTIME	407	ifcount THAWTIME
408	{	408	{
409	action FEMANIMATE	409	action FEMANIMATE
410	getlastpal	410	getlastpal
411	}	411	}
412	else	412	else
413	ifcount FROZENDRIPTIME	413	ifcount FROZENDRIPTIME
414	{	414	{
415	ifactioncount 26	415	ifactioncount 26
416	{	416	{
417	spawn WATERDRIP	417	spawn WATERDRIP
418	resetactioncount	418	resetactioncount
419	}	419	}
420	}	420	}
421		421
422	ifhitweapon	422	ifhitweapon
423	{	423	{
424	ifwasweapon FREEZEBLAST	424	ifwasweapon FREEZEBLAST
425	{	425	{
426	strength 0	426	strength 0
427	break	427	break
428	}	428	}
429		429
430	lotsofglass 30	430	lotsofglass 30
431		431
432	sound GLASS_BREAKING	432	sound GLASS_BREAKING
433	ifrnd 84	433	ifrnd 84
434	spawn BLOODPOOL	434	spawn BLOODPOOL
435	respawnhitag	435	respawnhitag
436		436
437	ifrnd 128	437	ifrnd 128
438	sound DUKE_HIT_STRIPPER1	438	sound DUKE_HIT_STRIPPER1
439	else	439	else
440	sound DUKE_HIT_STRIPPER2	440	sound DUKE_HIT_STRIPPER2
441		441
442	killit	442	killit
443	}	443	}
444	else	444	else
445	ifp pfacing	445	ifp pfacing
446	ifpdistl FROZENQUICKKICKDIST	446	ifpdistl FROZENQUICKKICKDIST
447	pkick	447	pkick
448	break	448	break
449	}	449	}
450		450
451	ifhitweapon	451	ifhitweapon
452	{	452	{
453	ifdead	453	ifdead
454	{	454	{
455	ifwasweapon GROWSPARK	455	ifwasweapon GROWSPARK
456	{	456	{
457	cstat 0	457	cstat 0
458	move 0	458	move 0
459	sound ACTOR_GROWING	459	sound ACTOR_GROWING
460	action FEMGROW	460	action FEMGROW
461	break	461	break
462	}	462	}
463	else ifwasweapon FREEZEBLAST	463	else ifwasweapon FREEZEBLAST
464	{	464	{
465	ifaction FEMSHRUNK	465	ifaction FEMSHRUNK
466	break	466	break
467		467
468	action FEMFROZEN1	468	action FEMFROZEN1
469		469
470	move 0	470	move 0
471	spritepal 1	471	spritepal 1
472	strength 0	472	strength 0
473		473
474	sound SOMETHINGFROZE	474	sound SOMETHINGFROZE
475		475
476	break	476	break
477	}	477	}
478		478
479	ifrnd 128	479	ifrnd 128
480	sound DUKE_HIT_STRIPPER1	480	sound DUKE_HIT_STRIPPER1
481	else	481	else
482	sound DUKE_HIT_STRIPPER2	482	sound DUKE_HIT_STRIPPER2
483		483
484	respawnhitag	484	respawnhitag
485	state standard_bjibs	485	state standard_bjibs
486	state random_wall_jibs	486	state random_wall_jibs
487	spawn BLOODPOOL	487	spawn BLOODPOOL
488		488
489	ifactor HALFBITCH	489	ifactor HALFBITCH
490	money 3	490	money 3
491	else	491	else
492	ifactor SLUTASS	492	ifactor SLUTASS
493	money 3	493	money 3
494		494
495		495
496	spritepal 6	496	spritepal 6
497	soundonce LADY_SCREAM	497	soundonce LADY_SCREAM
498	ifactor NAKED1	498	ifactor NAKED1
499	debris SCRAP3 18	499	debris SCRAP3 18
500	else	500	else

Subversion Repositories nw_plus

(root)/nw_plus/NWinter.con/ – Rev 22 → 30