Not really sure where to post this..

include, plotscr.hsd
include, project1.hsi

# global variables with ID 1. IDs don't matter much, just make sure each variable has a different ID number
global variable (1, hunger)

plotscript,HudLoop,begin

  variable (hud, time)

  hunger:=0
  hud:=load medium enemy sprite (0)
  put sprite (hud, 0,0)

  #exit loop if you die of hunger
  while (hunger << 50) do, begin  # change this

    decrement(time)
    if (time == 0) then (
      increment(hunger)
      time := 300  # change this
    )
    replace medium enemy sprite(hud, hunger)

    wait(1)
  end

  gameover
end

plotscript, decrease hunger by 2, begin
  hunger -= 2
  # don't allow negative hunger, it would break the script above
  if (hunger << 0) then (hunger := 0)
end

include, plotscr.hsd
include, project1.hsi
include, scancode.hsi
 
plotscript,WelcomeBox,begin
   suspend player
   show text box (1)
   wait for text box
   resume player
end

plotscript,HudLoop,begin
   
   variable (hud,diedOfHunger,hunger,time)
   
   # init variables
   time := 300
   diedOfHunger := false
   hunger := 0
   
   # load our HUD sprite and place it on the screen
   hud:=load medium enemy sprite (0)   
   put sprite (hud, 0,0)
   
   # check if we're a new game
   if(check tag(tag:SeenIntro) == false) then (
      WelcomeBox()
      set tag(tag:SeenIntro,true)
   )   
   #--loop begin--   
   while (diedOfHunger == false) do (
   
      if (time==0) then (
         # timer expired, our hunger goes up
         increment (hunger)
         
         # replace the sprite since hunger level has changed         
         replace medium enemy sprite(hud, hunger)
         
         #reset hunger countdown timer
         time := 300
      )
   
      wait (10)
      decrement(time)
      
      if(hunger >= 50) then (
         diedOfHunger := true
      )
      
   if(check tag(tag:HUDOn) == true) then (
      # show hud stuff -
      setspritevisible (1, on)
   )
   else (
      # hide hud stuff -
      setspritevisible (1, off)
   )
   
   # if the key was just pressed (but not triggered by being held down)
   if(keyval(key:Tab) == 3) then (
      # toggle our HUD visibility
      set tag(tag:HUDOn, not(check tag(tag:HUDOn)))
   )
   )
   #--loop end--

   # free up the sprite we used for the HUD
   free sprite (hud)
   
   # game over! the player died
   game over
end