home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 1999 #8 / 1999 CD 8 (black).iso / maskdemo / DATA1.CAB / Program_Executable_Files / Daventry / KQ / BOARDUP.CS < prev    next >
Encoding:
Text File  |  1998-12-15  |  895 b   |  32 lines

  1. echo $1 $2 $3 $4
  2. if test $2 == ConnorAction
  3.     echo $Daventry::Alchemist::BoardsUp
  4.     KQMonster::speak Connor  $1 1000 23 14 21 1 0
  5. else if test $2 == Die
  6.    set Abort 0
  7.    KQMonster::checkInventory Connor Dagger
  8.    if test $Console::Return == 1
  9.       set Abort 1
  10.    endif
  11.    KQMonster::checkInventory Connor Fists
  12.    if test $Console::Return == 1
  13.       set Abort 1
  14.    endif
  15.    if test $Abort == 0
  16.        # KQObject::getLoc sets variable KQObject::loc
  17.        set Daventry::Alchemist::BoardsUp 0
  18.        KQObject::getLoc $1
  19.        deleteObject $1
  20.        KQSound::play breakbox.aud
  21.        loadKQ boardpx.kq @ $KQObject::loc
  22.     addMapIcon dv_alchy.bmp 298 205 davmap.pbm
  23.     sendEvent 0 Connor KQStatsChangeRequestEvent 0 0 0 0 20
  24.    else
  25.        KQMonster::speak Connor  $1 1000 23 12 21 1 0
  26.    endif
  27. else if test $2 == ProjImmune
  28.    KQMonster::speak Connor  $1 1000 23 12 21 1 0
  29. endif
  30. endif
  31. endif
  32.