// above actor APLAYER

gamevar DUKEANG 0 0
gamevar DUKEX 0 0
gamevar DUKEY 0 0
gamevar DUKEZ 0 0

appendevent EVENT_SPAWN
ifactor DUKESTART
  sizeat 32 32
endevent

actor DUKESTART
  ifp palive 
    break
  else
  {
    getactor[].ang DUKEANG
    getactor[].x DUKEX
    getactor[].y DUKEY
    getactor[].z DUKEZ
  }
enda

state RESPAWNDUKE
  ifp palive
    break
  else
  { 
    quote 75  // blank quote
    setplayer[].ang DUKEANG
    setplayer[].posx DUKEX
    setplayer[].posy DUKEY
    setplayer[].posz DUKEZ
    action PSTAND
    setplayer[].dead_flag 0

    ifrnd 128 
    { 
      ifrnd 64 setactor[].extra 78
      else setactor[].extra 97
    }
    else
    {
      ifrnd 192 setactor[].extra 116
      else setactor[].extra 89
    } 
  } 
ends



// a sample under actor APLAYER
    ifaction PLYINGDEAD
    {
      ifactioncount 3
        move PSTOPED
      quote 13
      ifhitspace
      {
/*
        action PSTAND
        spawn DUKELYINGDEAD
        resetplayer
*/
        state RESPAWNDUKE
      }
      break
    }