Gamer's Paradise: Logic/Hracuv-raj_Logicke-hry_cd1.bin/QUESTCAM/EGG.DIR/00113.ls

Text File | 1998-02-26 | 1.1 KB | 36 lines

on SeeIfHeWantsIt
  global draggin, usingObject, dragChan, objsChan, objsList, selectedSprite, oldtoyloc, tired, lastSelectedSprite, whichanim, resumeanim, pacifierflag, sucky, Hungry, dancecount, nodancing, wet, uinefuar, plaideoff, dragonChan, ughplaide, thaplaideaig, eggtimer, weatherforecast, hatchyhatch
  if hatchyhatch = 1 then
    return 0
  end if
  set slaintemhath to selectedSprite - objsChan + 1
  set whichobj to getAt(objsList, slaintemhath)
  set wantdat to 0
  case whichobj of
    "blankee":
      if (eggtimer > 99) and (weatherforecast = 0) then
        set wantdat to 1
        set usingObject to 1
        set draggin to 0
        set the locH of sprite dragChan to 2000
        set the memberNum of sprite selectedSprite to ughplaide
        set the loc of sprite selectedSprite to the loc of sprite dragonChan - plaideoff
        set thaplaideaig to 1
        setanim("quiver3")
        exit
      end if
      RejectItem(tired)
      return 0
  end case
  return wantdat
end

on RejectItem emotion
  global resumeanim, whichanim
  if resumeanim = EMPTY then
    set resumeanim to whichanim
  end if
  setanim("quiver2")
  exit
end