put "This meek little creature cowers before you." into field "info"
pass opencard
end opencard
-- part 1 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=161 top=302 right=323 bottom=192
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: OK
----- HyperTalk script -----
on mouseUp
global filter
if filter is "yes" then
beep
exit mouseup
end if
global donteat
get bkgnd field "do what"
if the number of words in it > 1 then
beep 2
oneword
exit mouseup
end if
if it contains "close" then
put "You cannot close the captain." into field "info"
exit mouseup
end if
if it contains "examine" or it contains "look" then
send "opencard" to this card
exit mouseup
end if
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
global position
if position is "living room" then
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"
global filter
put "yes" into filter
exit mouseup
else
put "The little midget of a captain squeals with fear and runs off"& "to the east.≈∏" into field "info"
global filter
put "yes" into filter
exit mouseup
end if
end if
if it contains "open" then
put "The captain cannot be opened." into field "info"
exit mouseup
end if
if it is "" then
put "Speak up. I can't hear you." into field "info"