home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Garbo
/
Garbo.cdr
/
mac
/
hypercrd
/
hc2_x
/
beer.sea
/
Beer
/
breweries
/
background_2608.txt
< prev
next >
Wrap
Text File
|
1988-09-26
|
4KB
|
196 lines
-- background: 2608 from stack: in
-- bmap block id: 27422
-- flags: 0000
-- background id: 0
-- name:
----- HyperTalk script -----
on stackopen
sort by brewer
end stackopen
-- part 2 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=90 top=49 right=67 bottom=294
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: brewer
-- part 3 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=90 top=68 right=101 bottom=295
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: address
-- part 4 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=101 top=117 right=197 bottom=293
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: Locations
-- part 6 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=31 top=217 right=296 bottom=292
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: History
-- part 9 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=80 top=293 right=329 bottom=103
-- 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: tastes
----- HyperTalk script -----
on mouseUp
go to stack "beer tastes"
end mouseUp
-- part 10 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=107 top=299 right=327 bottom=130
-- 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: Facts
----- HyperTalk script -----
on mouseUp
go to card ID 5172 of stack "Beer Stax"
end mouseUp
-- part 11 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=134 top=303 right=325 bottom=188
-- 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: Menu
----- HyperTalk script -----
on mouseUp
go to card ID 3496 of stack "Beer Stax"
end mouseUp
-- part 12 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=329 top=87 right=312 bottom=488
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
-- part 27 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=43 top=301 right=324 bottom=73
-- title width / last selected line: 0
-- icon id / first selected line: 19162 / 19162
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Next
----- HyperTalk script -----
on mouseUp
go to next card
end mouseUp
-- part 28 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=11 top=301 right=324 bottom=42
-- title width / last selected line: 0
-- icon id / first selected line: 9120 / 9120
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Prev
----- HyperTalk script -----
on mouseUp
go to previous card
end mouseUp
-- part 29 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=195 top=303 right=325 bottom=295
-- 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: Find Brewer
----- HyperTalk script -----
on mouseUp
ask "Brewery to Find:"
find it in background field "brewer"
if the result is not empty then
answer "Brewery Not Found" with "AAGGHH!"
end if
end mouseUp