home *** CD-ROM | disk | FTP | other *** search
/ QRZ! Ham Radio 5 / QRZ Ham Radio Callsign Database - Volume 5.iso / files / mac / ssb_test.hqx / SSBTest / card_3035.txt < prev    next >
Encoding:
Text File  |  1992-01-05  |  14.7 KB  |  757 lines
  1. -- card: 3035 from stack: in
  2. -- bmap block id: 3285
  3. -- flags: 0000
  4. -- background id: 2742
  5. -- name: interface
  6. ----- HyperTalk script -----
  7. on idle
  8.   put the time into background field "time"
  9. end idle
  10.  
  11.  
  12. on openCard
  13.   global TheirReport
  14.   global MyReport
  15.   put "59" into MyReport
  16.   put "59" into TheirReport
  17.   handleTheirSigButtons
  18.   handleMySigButtons
  19. end OpenCard
  20.  
  21.  
  22.  
  23.  
  24. -- part 1 (button)
  25. -- low flags: 00
  26. -- high flags: E006
  27. -- rect: left=386 top=119 right=146 bottom=432
  28. -- title width / last selected line: 0
  29. -- icon id / first selected line: 0 / 0
  30. -- text alignment: 1
  31. -- font id: 0
  32. -- text size: 12
  33. -- style flags: 0
  34. -- line height: 16
  35. -- part name: 5/8 their
  36. ----- HyperTalk script -----
  37. on mouseUp
  38.   global TheirReport
  39.   put "58" into TheirReport
  40.   HandleTheirSigbuttons
  41. end mouseUp
  42.  
  43.  
  44.  
  45. -- part 2 (button)
  46. -- low flags: 00
  47. -- high flags: A006
  48. -- rect: left=443 top=119 right=146 bottom=491
  49. -- title width / last selected line: 0
  50. -- icon id / first selected line: 0 / 0
  51. -- text alignment: 1
  52. -- font id: 0
  53. -- text size: 12
  54. -- style flags: 0
  55. -- line height: 16
  56. -- part name: 5/7 their
  57. ----- HyperTalk script -----
  58. on mouseUp
  59.   global TheirReport
  60.   put "57" into TheirReport
  61.   HandleTheirSigbuttons
  62. end mouseUp
  63.  
  64.  
  65.  
  66. -- part 6 (button)
  67. -- low flags: 00
  68. -- high flags: A006
  69. -- rect: left=328 top=119 right=146 bottom=375
  70. -- title width / last selected line: 0
  71. -- icon id / first selected line: 0 / 0
  72. -- text alignment: 1
  73. -- font id: 0
  74. -- text size: 12
  75. -- style flags: 0
  76. -- line height: 16
  77. -- part name: 5/9 their
  78. ----- HyperTalk script -----
  79. on mouseUp
  80.   global TheirReport
  81.   put "59" into TheirReport
  82.   HandleTheirSigbuttons
  83. end mouseUp
  84.  
  85.  
  86.  
  87. -- part 7 (button)
  88. -- low flags: 00
  89. -- high flags: A003
  90. -- rect: left=20 top=13 right=48 bottom=165
  91. -- title width / last selected line: 0
  92. -- icon id / first selected line: 0 / 0
  93. -- text alignment: 1
  94. -- font id: 0
  95. -- text size: 12
  96. -- style flags: 0
  97. -- line height: 16
  98. -- part name: CQ Contest
  99. ----- HyperTalk script -----
  100. on mouseUp
  101.   play "CQContest"
  102. end mouseUp
  103.  
  104.  
  105.  
  106. -- part 8 (button)
  107. -- low flags: 00
  108. -- high flags: A002
  109. -- rect: left=21 top=118 right=145 bottom=76
  110. -- title width / last selected line: 0
  111. -- icon id / first selected line: 0 / 0
  112. -- text alignment: 1
  113. -- font id: 0
  114. -- text size: 12
  115. -- style flags: 0
  116. -- line height: 16
  117. -- part name: Call╩╩╩
  118. ----- HyperTalk script -----
  119. on mouseUp
  120.   GiveTheirCall
  121. end mouseUp
  122.  
  123.  
  124.  
  125. -- part 10 (button)
  126. -- low flags: 00
  127. -- high flags: A003
  128. -- rect: left=321 top=278 right=327 bottom=490
  129. -- title width / last selected line: 0
  130. -- icon id / first selected line: 0 / 0
  131. -- text alignment: 1
  132. -- font id: 0
  133. -- text size: 12
  134. -- style flags: 0
  135. -- line height: 16
  136. -- part name: LOG
  137. ----- HyperTalk script -----
  138. on mouseUp
  139.   LogData
  140.   updateCardfields
  141. end mouseUp
  142.  
  143.  
  144.  
  145. -- part 11 (button)
  146. -- low flags: 00
  147. -- high flags: A003
  148. -- rect: left=179 top=14 right=95 bottom=247
  149. -- title width / last selected line: 0
  150. -- icon id / first selected line: 0 / 0
  151. -- text alignment: 1
  152. -- font id: 0
  153. -- text size: 12
  154. -- style flags: 0
  155. -- line height: 16
  156. -- part name: NU1N
  157. ----- HyperTalk script -----
  158. on mouseUp
  159.   play "NU1N"
  160. end mouseUp
  161.  
  162.  
  163.  
  164. -- part 12 (button)
  165. -- low flags: 00
  166. -- high flags: A002
  167. -- rect: left=20 top=233 right=259 bottom=117
  168. -- title width / last selected line: 0
  169. -- icon id / first selected line: 0 / 0
  170. -- text alignment: 1
  171. -- font id: 0
  172. -- text size: 12
  173. -- style flags: 0
  174. -- line height: 16
  175. -- part name: My Number
  176.  
  177.  
  178. -- part 13 (field)
  179. -- low flags: 00
  180. -- high flags: 0002
  181. -- rect: left=76 top=118 right=145 bottom=210
  182. -- title width / last selected line: 0
  183. -- icon id / first selected line: 0 / 0
  184. -- text alignment: 1
  185. -- font id: 3
  186. -- text size: 18
  187. -- style flags: 256
  188. -- line height: 24
  189. -- part name: TheirCall
  190.  
  191.  
  192. -- part 14 (button)
  193. -- low flags: 00
  194. -- high flags: A002
  195. -- rect: left=20 top=168 right=194 bottom=117
  196. -- title width / last selected line: 0
  197. -- icon id / first selected line: 0 / 0
  198. -- text alignment: 1
  199. -- font id: 0
  200. -- text size: 12
  201. -- style flags: 0
  202. -- line height: 16
  203. -- part name: Their Number
  204. ----- HyperTalk script -----
  205. on mouseUp
  206.   GiveNumber
  207.   Play "QSL?"
  208. end mouseUp
  209.  
  210.  
  211.  
  212. -- part 15 (button)
  213. -- low flags: 00
  214. -- high flags: A003
  215. -- rect: left=261 top=15 right=48 bottom=318
  216. -- title width / last selected line: 0
  217. -- icon id / first selected line: 0 / 0
  218. -- text alignment: 1
  219. -- font id: 0
  220. -- text size: 12
  221. -- style flags: 0
  222. -- line height: 16
  223. -- part name: 73's
  224. ----- HyperTalk script -----
  225. on mouseUp
  226.   play "73's"
  227. end mouseUp
  228.  
  229.  
  230.  
  231. -- part 16 (button)
  232. -- low flags: 00
  233. -- high flags: A003
  234. -- rect: left=337 top=16 right=47 bottom=419
  235. -- title width / last selected line: 0
  236. -- icon id / first selected line: 0 / 0
  237. -- text alignment: 1
  238. -- font id: 0
  239. -- text size: 12
  240. -- style flags: 0
  241. -- line height: 16
  242. -- part name: Good Luck!
  243. ----- HyperTalk script -----
  244. on mouseUp
  245.   play "goodLuck!"
  246. end mouseUp
  247.  
  248.  
  249.  
  250. -- part 17 (button)
  251. -- low flags: 00
  252. -- high flags: A003
  253. -- rect: left=436 top=17 right=46 bottom=490
  254. -- title width / last selected line: 0
  255. -- icon id / first selected line: 0 / 0
  256. -- text alignment: 1
  257. -- font id: 0
  258. -- text size: 12
  259. -- style flags: 0
  260. -- line height: 16
  261. -- part name: QSL
  262. ----- HyperTalk script -----
  263. on mouseUp
  264.   play "QSL"
  265. end mouseUp
  266.  
  267.  
  268.  
  269. -- part 18 (button)
  270. -- low flags: 00
  271. -- high flags: A003
  272. -- rect: left=437 top=62 right=95 bottom=491
  273. -- title width / last selected line: 0
  274. -- icon id / first selected line: 0 / 0
  275. -- text alignment: 1
  276. -- font id: 0
  277. -- text size: 12
  278. -- style flags: 0
  279. -- line height: 16
  280. -- part name: QSL?
  281. ----- HyperTalk script -----
  282. on mouseUp
  283.   play "QSL?"
  284. end mouseUp
  285.  
  286.  
  287.  
  288. -- part 19 (button)
  289. -- low flags: 00
  290. -- high flags: A003
  291. -- rect: left=263 top=63 right=95 bottom=318
  292. -- title width / last selected line: 0
  293. -- icon id / first selected line: 0 / 0
  294. -- text alignment: 1
  295. -- font id: 0
  296. -- text size: 12
  297. -- style flags: 0
  298. -- line height: 16
  299. -- part name: QRZ?
  300. ----- HyperTalk script -----
  301. on mouseUp
  302.   play "QRZ?"
  303. end mouseUp
  304.  
  305.  
  306.  
  307. -- part 20 (button)
  308. -- low flags: 00
  309. -- high flags: A003
  310. -- rect: left=337 top=62 right=94 bottom=418
  311. -- title width / last selected line: 0
  312. -- icon id / first selected line: 0 / 0
  313. -- text alignment: 1
  314. -- font id: 0
  315. -- text size: 12
  316. -- style flags: 0
  317. -- line height: 16
  318. -- part name: Say Again
  319. ----- HyperTalk script -----
  320. on mouseUp
  321.   play "what#?"
  322. end mouseUp
  323.  
  324.  
  325.  
  326. -- part 21 (field)
  327. -- low flags: 00
  328. -- high flags: 0002
  329. -- rect: left=117 top=168 right=194 bottom=186
  330. -- title width / last selected line: 0
  331. -- icon id / first selected line: 0 / 0
  332. -- text alignment: 1
  333. -- font id: 3
  334. -- text size: 18
  335. -- style flags: 256
  336. -- line height: 24
  337. -- part name: TheirNumber
  338.  
  339.  
  340. -- part 23 (button)
  341. -- low flags: 00
  342. -- high flags: A002
  343. -- rect: left=20 top=298 right=324 bottom=117
  344. -- title width / last selected line: 0
  345. -- icon id / first selected line: 0 / 0
  346. -- text alignment: 1
  347. -- font id: 0
  348. -- text size: 12
  349. -- style flags: 0
  350. -- line height: 16
  351. -- part name: DUP?
  352.  
  353.  
  354. -- part 24 (button)
  355. -- low flags: 00
  356. -- high flags: A003
  357. -- rect: left=19 top=59 right=94 bottom=165
  358. -- title width / last selected line: 0
  359. -- icon id / first selected line: 0 / 0
  360. -- text alignment: 1
  361. -- font id: 0
  362. -- text size: 12
  363. -- style flags: 0
  364. -- line height: 16
  365. -- part name: Report
  366. ----- HyperTalk script -----
  367. on mouseUp
  368.   GiveSignal
  369.   wait 65
  370.   GiveNumber
  371.   Play "QSL?"
  372. end mouseUp
  373.  
  374.  
  375.  
  376.  
  377. -- part 26 (button)
  378. -- low flags: 00
  379. -- high flags: A006
  380. -- rect: left=329 top=237 right=259 bottom=375
  381. -- title width / last selected line: 0
  382. -- icon id / first selected line: 0 / 0
  383. -- text alignment: 1
  384. -- font id: 0
  385. -- text size: 12
  386. -- style flags: 0
  387. -- line height: 16
  388. -- part name: 5/9
  389. ----- HyperTalk script -----
  390. on mouseUp
  391.   global MyReport
  392.   put "59" into MyReport
  393.   HandleMySigbuttons
  394. end mouseUp
  395.  
  396.  
  397.  
  398. -- part 27 (button)
  399. -- low flags: 00
  400. -- high flags: A006
  401. -- rect: left=384 top=237 right=259 bottom=430
  402. -- title width / last selected line: 0
  403. -- icon id / first selected line: 0 / 0
  404. -- text alignment: 1
  405. -- font id: 0
  406. -- text size: 12
  407. -- style flags: 0
  408. -- line height: 16
  409. -- part name: 5/8
  410. ----- HyperTalk script -----
  411. on mouseUp
  412.   global MyReport
  413.   put "58" into MyReport
  414.   HandleMySigbuttons
  415. end mouseUp
  416.  
  417.  
  418.  
  419. -- part 28 (button)
  420. -- low flags: 00
  421. -- high flags: E006
  422. -- rect: left=441 top=237 right=259 bottom=487
  423. -- title width / last selected line: 0
  424. -- icon id / first selected line: 0 / 0
  425. -- text alignment: 1
  426. -- font id: 0
  427. -- text size: 12
  428. -- style flags: 0
  429. -- line height: 16
  430. -- part name: 5/7
  431. ----- HyperTalk script -----
  432. on mouseUp
  433.   global MyReport
  434.   put "57" into MyReport
  435.   HandleMySigbuttons
  436. end mouseUp
  437.  
  438.  
  439.  
  440. -- part 32 (button)
  441. -- low flags: 00
  442. -- high flags: A002
  443. -- rect: left=20 top=265 right=292 bottom=75
  444. -- title width / last selected line: 0
  445. -- icon id / first selected line: 0 / 0
  446. -- text alignment: 1
  447. -- font id: 0
  448. -- text size: 12
  449. -- style flags: 0
  450. -- line height: 16
  451. -- part name: UTC
  452. ----- HyperTalk script -----
  453. on mouseUp
  454.   put the time into field time
  455. end mouseUp
  456.  
  457.  
  458.  
  459. -- part 33 (field)
  460. -- low flags: 00
  461. -- high flags: 0002
  462. -- rect: left=117 top=233 right=259 bottom=186
  463. -- title width / last selected line: 0
  464. -- icon id / first selected line: 0 / 0
  465. -- text alignment: 1
  466. -- font id: 3
  467. -- text size: 18
  468. -- style flags: 256
  469. -- line height: 24
  470. -- part name: MyNumber
  471.  
  472.  
  473. -- part 34 (field)
  474. -- low flags: 01
  475. -- high flags: 0002
  476. -- rect: left=117 top=298 right=324 bottom=186
  477. -- title width / last selected line: 0
  478. -- icon id / first selected line: 0 / 0
  479. -- text alignment: 1
  480. -- font id: 3
  481. -- text size: 18
  482. -- style flags: 256
  483. -- line height: 24
  484. -- part name: TheirNumber
  485.  
  486.  
  487. -- part 35 (button)
  488. -- low flags: 00
  489. -- high flags: A002
  490. -- rect: left=232 top=118 right=145 bottom=323
  491. -- title width / last selected line: 0
  492. -- icon id / first selected line: 0 / 0
  493. -- text alignment: 1
  494. -- font id: 0
  495. -- text size: 12
  496. -- style flags: 0
  497. -- line height: 16
  498. -- part name: Their Report
  499. ----- HyperTalk script -----
  500. on mouseUp
  501.   GiveSignal
  502. end mouseUp
  503.  
  504.  
  505.  
  506. -- part 36 (button)
  507. -- low flags: 00
  508. -- high flags: E006
  509. -- rect: left=342 top=168 right=195 bottom=392
  510. -- title width / last selected line: 0
  511. -- icon id / first selected line: 0 / 0
  512. -- text alignment: 1
  513. -- font id: 0
  514. -- text size: 12
  515. -- style flags: 0
  516. -- line height: 16
  517. -- part name: 20M
  518. ----- HyperTalk script -----
  519. on mouseUp
  520.   global TheBand
  521.   put 20 into TheBand
  522.   handleBandButtons
  523. end mouseUp
  524.  
  525.  
  526.  
  527. -- part 37 (button)
  528. -- low flags: 00
  529. -- high flags: A006
  530. -- rect: left=391 top=168 right=195 bottom=441
  531. -- title width / last selected line: 0
  532. -- icon id / first selected line: 0 / 0
  533. -- text alignment: 1
  534. -- font id: 0
  535. -- text size: 12
  536. -- style flags: 0
  537. -- line height: 16
  538. -- part name: 40M
  539. ----- HyperTalk script -----
  540. on mouseUp
  541.   global TheBand
  542.   put 40 into TheBand
  543.   handleBandButtons
  544. end mouseUp
  545.  
  546.  
  547.  
  548. -- part 38 (button)
  549. -- low flags: 00
  550. -- high flags: A006
  551. -- rect: left=293 top=168 right=195 bottom=343
  552. -- title width / last selected line: 0
  553. -- icon id / first selected line: 0 / 0
  554. -- text alignment: 1
  555. -- font id: 0
  556. -- text size: 12
  557. -- style flags: 0
  558. -- line height: 16
  559. -- part name: 15M
  560. ----- HyperTalk script -----
  561. on mouseUp
  562.   global TheBand
  563.   put 15 into TheBand
  564.   handleBandButtons
  565. end mouseUp
  566.  
  567.  
  568.  
  569. -- part 39 (button)
  570. -- low flags: 00
  571. -- high flags: A006
  572. -- rect: left=244 top=168 right=195 bottom=294
  573. -- title width / last selected line: 0
  574. -- icon id / first selected line: 0 / 0
  575. -- text alignment: 1
  576. -- font id: 0
  577. -- text size: 12
  578. -- style flags: 0
  579. -- line height: 16
  580. -- part name: 10M
  581. ----- HyperTalk script -----
  582. on mouseUp
  583.   global TheBand
  584.   put 10 into TheBand
  585.   handleBandButtons
  586. end mouseUp
  587.  
  588.  
  589.  
  590. -- part 40 (button)
  591. -- low flags: 00
  592. -- high flags: A006
  593. -- rect: left=440 top=168 right=195 bottom=490
  594. -- title width / last selected line: 0
  595. -- icon id / first selected line: 0 / 0
  596. -- text alignment: 1
  597. -- font id: 0
  598. -- text size: 12
  599. -- style flags: 0
  600. -- line height: 16
  601. -- part name: 80M
  602. ----- HyperTalk script -----
  603. on mouseUp
  604.   global TheBand
  605.   put 80 into TheBand
  606.   handleBandButtons
  607. end mouseUp
  608.  
  609.  
  610.  
  611. -- part 43 (button)
  612. -- low flags: 00
  613. -- high flags: A003
  614. -- rect: left=230 top=279 right=328 bottom=306
  615. -- title width / last selected line: 0
  616. -- icon id / first selected line: 0 / 0
  617. -- text alignment: 1
  618. -- font id: 0
  619. -- text size: 12
  620. -- style flags: 0
  621. -- line height: 16
  622. -- part name: View Log
  623. ----- HyperTalk script -----
  624. on mouseUp
  625.   show card field logdata
  626. end mouseUp
  627.  
  628.  
  629.  
  630. -- part 41 (field)
  631. -- low flags: 81
  632. -- high flags: 0007
  633. -- rect: left=0 top=12 right=329 bottom=512
  634. -- title width / last selected line: 0
  635. -- icon id / first selected line: 0 / 0
  636. -- text alignment: 0
  637. -- font id: 0
  638. -- text size: 12
  639. -- style flags: 0
  640. -- line height: 16
  641. -- part name: LogData
  642. ----- HyperTalk script -----
  643. on mousedown
  644.   hide card field logdata
  645. end mousedown
  646.  
  647.  
  648.  
  649. -- part 44 (button)
  650. -- low flags: 00
  651. -- high flags: A002
  652. -- rect: left=186 top=168 right=194 bottom=222
  653. -- title width / last selected line: 0
  654. -- icon id / first selected line: 0 / 0
  655. -- text alignment: 1
  656. -- font id: 0
  657. -- text size: 12
  658. -- style flags: 0
  659. -- line height: 16
  660. -- part name: Zero
  661. ----- HyperTalk script -----
  662. on mouseUp
  663.   put "00" into card field "theirnumber"
  664. end mouseUp
  665.  
  666.  
  667.  
  668. -- part 45 (button)
  669. -- low flags: 00
  670. -- high flags: A002
  671. -- rect: left=494 top=326 right=342 bottom=512
  672. -- title width / last selected line: 0
  673. -- icon id / first selected line: 0 / 0
  674. -- text alignment: 1
  675. -- font id: 0
  676. -- text size: 12
  677. -- style flags: 0
  678. -- line height: 16
  679. -- part name: ?
  680. ----- HyperTalk script -----
  681. on mouseUp
  682.   show card field helpfield
  683. end mouseUp
  684.  
  685.  
  686.  
  687. -- part 46 (field)
  688. -- low flags: 81
  689. -- high flags: 0007
  690. -- rect: left=0 top=0 right=342 bottom=512
  691. -- title width / last selected line: 0
  692. -- icon id / first selected line: 0 / 0
  693. -- text alignment: 0
  694. -- font id: 3
  695. -- text size: 12
  696. -- style flags: 0
  697. -- line height: 16
  698. -- part name: HelpField
  699. ----- HyperTalk script -----
  700. on mousedown
  701.   hide me
  702. end mousedown
  703.  
  704.  
  705.  
  706. -- part contents for background part 1
  707. ----- text -----
  708. 17:27
  709.  
  710. -- part contents for card part 21
  711. ----- text -----
  712. 5472
  713.  
  714. -- part contents for card part 34
  715. ----- text -----
  716. No
  717.  
  718. -- part contents for card part 33
  719. ----- text -----
  720. 4763
  721.  
  722. -- part contents for card part 41
  723. ----- text -----
  724. Their#     Call      Time     Band       HisReport         MyReport         My#
  725. 5470 gm4fgs/ 6:20 pm  59 59 4763
  726. 5471   6:20 pm  59 59 4763
  727.  
  728.  
  729.  
  730.  
  731.  
  732.  
  733.  
  734.  
  735.  
  736.  
  737.  
  738.  
  739. -- part contents for card part 46
  740. ----- text -----
  741. Dear OM;
  742.  
  743. Thanks for your interest in this SSB contesting stack. As I mentioned in the QST article, you will need a voice digitizer (such as MacRecorder, from Farallon Computing) to personalize the stack.  Also, you should change the call sign button to reflect your call.
  744.  
  745. There are numerous modifications you can make (in HyperTalk) to make this stack more functional.  For example, better dup checking, printing reports from HyperCard, etc.  Please consider this stack a simple shell, with which you can build your own logging program, suited to your contesting needs.
  746.  
  747. As it stands, you will need to copy and past the log data from HyperCard to your favorite word processing program, in standard Mac fashion.
  748.  
  749. Please try this stack out BEFORE a contest to verify that it works the way you expect.
  750.  
  751. 73
  752.  
  753. Bryan Bergeron, NU1N
  754.  
  755. -- part contents for card part 13
  756. ----- text -----
  757. gm4fgs