home *** CD-ROM | disk | FTP | other *** search
/ Ultra Mac Games 1 & 2 / UltraMacGames1.iso / Adventure / SpaceEscape / SpaceEscape / card_47896.txt < prev    next >
Text File  |  1988-07-31  |  2KB  |  94 lines
  1. -- card: 47896 from stack: in
  2. -- bmap block id: 46203
  3. -- flags: 4000
  4. -- background id: 8902
  5. -- name: captain
  6. ----- HyperTalk script -----
  7. on opencard
  8.   put "This meek little creature cowers before you." into field "info"
  9.   pass opencard
  10. end opencard
  11.  
  12.  
  13. -- part 1 (button)
  14. -- low flags: 00
  15. -- high flags: A003
  16. -- rect: left=161 top=302 right=323 bottom=192
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 0 / 0
  19. -- text alignment: 1
  20. -- font id: 0
  21. -- text size: 12
  22. -- style flags: 0
  23. -- line height: 16
  24. -- part name: OK
  25. ----- HyperTalk script -----
  26. on mouseUp
  27.   global filter
  28.   if filter is "yes" then
  29.     beep
  30.     exit mouseup
  31.   end if
  32.   global donteat
  33.   get bkgnd field "do what"
  34.   if the number of words in it > 1 then
  35.     beep 2
  36.     oneword
  37.     exit mouseup
  38.   end if
  39.   if it contains "close" then
  40.     put "You cannot close the captain." into field "info"
  41.     exit mouseup
  42.   end if
  43.   if it contains "examine" or it contains "look" then
  44.     send "opencard" to this card
  45.     exit mouseup
  46.   end if
  47.   if it contains "hit" or it contains "kick" or it contains "punch" or it contains "get" or it contains "eat" or it contains "slap"then
  48.   global position
  49.   if position is "living room" then
  50.     put "The little midget of a captain squeals with fear.  ""e& "No!"&return&" Wait!""e&&"he screams.  I'll do anything! just"& " don't hit me!≈∏" into field "Info"
  51.     global filter
  52.     put "yes" into filter
  53.     exit mouseup
  54.   else
  55.     put "The little midget of a captain squeals with fear and runs off"& "to the east.≈∏" into field "info"
  56.     global filter
  57.     put "yes" into filter
  58.     exit mouseup
  59.   end if
  60. end if
  61. if it contains "open" then
  62.   put "The captain cannot be opened." into field "info"
  63.   exit mouseup
  64. end if
  65. if it is "" then
  66.   put "Speak up.  I can't hear you." into field "info"
  67.   exit mouseup
  68. end if
  69. idunno
  70. end mouseUp
  71.  
  72. on cont
  73.   global filter
  74.   if filter is "yes" then
  75.     global position
  76.     if position is "living room" then
  77.       go card "win"
  78.       put "" into filter
  79.     else
  80.       put "" into filter
  81.       go card "bedroom2"
  82.     end if
  83.   end if
  84. end cont
  85.  
  86.  
  87.  
  88. -- part contents for background part 2
  89. ----- text -----
  90. What would you like to do with the Captain?
  91.  
  92. -- part contents for background part 7
  93. ----- text -----
  94. Captain