SITcomm AppleScript

Attached is Pascal code as well as resources to create a breakout game.
Though not all that complex, it still uses several techniques that can
be used to make such a thing. The code will compile easily under Think
Pascal, and not all that much effort is required to force it to compile
under Codewarrior. Please freely distribute this code in any way; it
may be used for any purpose. Send all questions/whatever to:
ani@atlas.nmsu.edu

#### TEXT simple-save-pict-p.txt ****

Date: Tue, 15 Nov 1994 19:02:18 -0800

--========================_6153076==_
Content-Type: text/plain; charset="us-ascii"

'SimpleSavePict-pas.txt' is a Unit written in Think Pascal to save Gworlds
or current active windows as a file of PICT format.

I'm hoping that it will be placed in /info-mac/dev/source.

Thankyou,

--========================_6153076==_
Content-Type: text/plain; name="SimpleSavePict-pas.txt"; charset="us-ascii"

#### TEXT simplify-list-manager-pas.txt ****

Date: 18 Sep 92 03:33:13 GMT

The following code, once again, is nothing particularly glamorous; it
simply makes it easier to use the List Manager to create and manage lists
of strings. One of the most common uses for the List Manager is
scrollable, one-dimensional, fixed-size
lists of strings (as in SFGetFile, SFPutFile). The List Manager is good
for creating all kinds of lists (such as lists of icons), but a lot of
this functionality is a hassle for programmers who only need a simple list
of strings.
The code below allows you create and dispose of lists of strings. It
allows you to add, rename, and remove elements in the list, and handles
mouse clicks and update events. It also keeps the lists in alphabetical
order.
I remember having a lot of trouble learning how to call the List
Manager properly; I hope that this code helps somebody else.

#### TEXT sitcomm-login-as.txt ****

Date: Tue, 7 Dec 1993 18:13:15 -0800 (PST)

Language: AppleScript 1.0
Author: Harry Myhre
Date Written: Tue, Dec 7, 1993
Purpose: Start SITcomm, logon to Netcom, get into dl directory,
ask user what to do next.

tell application "SITcomm"
activate
Connect "Netcom" -- dial into Netcom
Wait For Text "etcom" -- last part of command prompt
Send Text "go ~" -- first, go to home dir
Send Text return
Send Text "go dl" -- go to my download dir
Send Text return
end tell

Path: /www/exparrot/files.tidbits.com/info-mac/dev/src/simple-breakout-src-updt-p.hqx