home *** CD-ROM | disk | FTP | other *** search
/ Ultra Mac Games 1 & 2 / UltraMacGames1.iso / Adventure / SpaceEscape / SpaceEscape / card_13048.txt < prev    next >
Text File  |  1988-07-31  |  3KB  |  159 lines
  1. -- card: 13048 from stack: in
  2. -- bmap block id: 43715
  3. -- flags: 4000
  4. -- background id: 2669
  5. -- name: Sec2
  6. ----- HyperTalk script -----
  7. on opencard
  8.   global secdoorhide
  9.   if secdoorhide is "yes" then
  10.     show card field "secdoorhide"
  11.     show button "open"
  12.     hide button "closed"
  13.   else
  14.     hide card field "secdoorhide"
  15.     show button "closed"
  16.     hide button "open"
  17.   end if
  18.   global deadsec
  19.   if deadsec is "" then
  20.     go to card "secretary"
  21.     exit opencard
  22.   end if
  23.   put "There is a dead secretary slumped on the desk." into field "info"
  24.   if secdoorhide is "yes" then put "  There is an open doorway to the"& " north." after last word of field "info"
  25.   pass opencard
  26. end opencard
  27.  
  28.  
  29. -- part 1 (button)
  30. -- low flags: 00
  31. -- high flags: 0000
  32. -- rect: left=226 top=124 right=215 bottom=274
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 0 / 0
  35. -- text alignment: 1
  36. -- font id: 0
  37. -- text size: 12
  38. -- style flags: 0
  39. -- line height: 16
  40. -- part name: 
  41. ----- HyperTalk script -----
  42. on mouseUp
  43.   global objectname
  44.   put "door" into objectname
  45.   go card "door of cell1"
  46. end mouseUp
  47.  
  48.  
  49.  
  50. -- part 2 (button)
  51. -- low flags: 00
  52. -- high flags: 0000
  53. -- rect: left=277 top=169 right=228 bottom=392
  54. -- title width / last selected line: 0
  55. -- icon id / first selected line: 0 / 0
  56. -- text alignment: 1
  57. -- font id: 0
  58. -- text size: 12
  59. -- style flags: 0
  60. -- line height: 16
  61. -- part name: 
  62. ----- HyperTalk script -----
  63. on mouseUp
  64.   global objectname
  65.   put "desk" into objectname
  66.   visual effect zoom open
  67.   go card "sec's desk"
  68. end mouseUp
  69.  
  70.  
  71.  
  72. -- part 3 (button)
  73. -- low flags: 00
  74. -- high flags: 0000
  75. -- rect: left=315 top=145 right=194 bottom=361
  76. -- title width / last selected line: 0
  77. -- icon id / first selected line: 0 / 0
  78. -- text alignment: 1
  79. -- font id: 0
  80. -- text size: 12
  81. -- style flags: 0
  82. -- line height: 16
  83. -- part name: 
  84. ----- HyperTalk script -----
  85. on mouseUp
  86.   global objectname
  87.   put "dead secretary" into objectname
  88.   visual effect zoom open
  89.   go card "dead secretary"
  90. end mouseUp
  91.  
  92.  
  93.  
  94. -- part 4 (field)
  95. -- low flags: 01
  96. -- high flags: 0001
  97. -- rect: left=227 top=205 right=217 bottom=273
  98. -- title width / last selected line: 0
  99. -- icon id / first selected line: 0 / 0
  100. -- text alignment: 0
  101. -- font id: 3
  102. -- text size: 12
  103. -- style flags: 0
  104. -- line height: 16
  105. -- part name: secdoorhide
  106.  
  107.  
  108. -- part 6 (button)
  109. -- low flags: 00
  110. -- high flags: 0000
  111. -- rect: left=226 top=124 right=215 bottom=274
  112. -- title width / last selected line: 0
  113. -- icon id / first selected line: 0 / 0
  114. -- text alignment: 1
  115. -- font id: 0
  116. -- text size: 12
  117. -- style flags: 0
  118. -- line height: 16
  119. -- part name: open
  120. ----- HyperTalk script -----
  121. on mouseUp
  122.   global objectname
  123.   put "doorway" into objectname
  124.   go to card "guard room door"
  125.   global gdoors
  126.   put "n" into gdoors
  127. end mouseUp
  128.  
  129.  
  130.  
  131. -- part 8 (button)
  132. -- low flags: 80
  133. -- high flags: 0000
  134. -- rect: left=226 top=124 right=215 bottom=274
  135. -- title width / last selected line: 0
  136. -- icon id / first selected line: 0 / 0
  137. -- text alignment: 1
  138. -- font id: 0
  139. -- text size: 12
  140. -- style flags: 0
  141. -- line height: 16
  142. -- part name: closed
  143. ----- HyperTalk script -----
  144. on mouseUp
  145.   global objectname
  146.   put "door" into objectname
  147.   visual effect zoom open
  148.   go to card "closed hallway door"
  149. end mouseUp
  150.  
  151.  
  152.  
  153. -- part contents for background part 18
  154. ----- text -----
  155. Dead Secretary
  156.  
  157. -- part contents for background part 6
  158. ----- text -----
  159. There is a dead secretary slumped on the desk.  There is an open doorway to the north.