Apple 1 Xmas Program

5 replies [Last post]
Offline
Joined: Sep 5 2009
Posts: 83

This is a simple Basic program that makes your Apple1/Mimeo/etc a Christmas Decoration.

AttachmentSize
Xmas Program.mp3411.26 KB
IMG_0904.JPG1.28 MB

Comment viewing options

Select your preferred way to display the comments and click "Save settings" to activate your changes.
Offline
Joined: Sep 5 2009
Posts: 83
Re: Apple 1 Xmas Program

Load 004A.00FFR 0800.0FFFR

1978AppleII's picture
Offline
Joined: Jul 5 2015
Posts: 200
Re: Apple 1 Xmas Program

Most expensive Christmas tree in history!!

But I love it!! Thank you for sharing!!

Jennifer

__________________

Long time Apple fan girl Smile

CWJ_Wilko's picture
Offline
Joined: Jun 3 2015
Posts: 274
Re: Apple 1 Xmas Program

Would like to try this out on my replica, can you paste the listing? I don't have a cassette adapter Sad

Offline
Joined: Sep 5 2009
Posts: 83
Re: Apple 1 Xmas Program

Here is a listing
5 GOTO 220
10 PRINT “ _/\_”
20 PRINT “ <****>”
30 PRINT “ <**>”
40 PRINT “ / \”
50 PRINT “ /* \”
60 PRINT “ <_ 0_>“
80 PRINT “ / 0 \”
90 PRINT “ /0 * \“
100 PRINT “ / 0 \”
110 PRINT “ <_ 0 _>”
120 PRINT “ / 0 * \”
130 PRINT “ / 0\”
140 PRINT “ / * 0 * \”
150 PRINT “ <______ ______>”
160 PRINT “ !!”
170 PRINT “ !!”
172 PRINT
174 PRINT
180 PRINT “ MERRY CHRISTMAS & HAPPY NEW YEAR”
185 PRINT
190 PRINT
200 FOR I=1 TO 7000
210 NEXT I
220 FOR I=1 TO 25
225 PRINT
230 NEXT I
250 GOTO 10
1000 END

and an image map with spaces marked as "s" since the spaces are not displayed properly in the listing.

ssssssssssssssssss_/\_
sssssssssssssssss<****>
ssssssssssssssssss<**>
ssssssssssssssssss/ss\
sssssssssssssssss/*sss\
ssssssssssssssss<_sss0_>
sssssssssssssssss/s0ss\
ssssssssssssssss/0sss*s\
sssssssssssssss/sss0ssss\
ssssssssssssss<_ssssss0s_>
sssssssssssssss/ss0ss*ss\
ssssssssssssss/sssssssss0\
sssssssssssss/s*sss0sss*ss\
ssssssssssss<______ss______>
sssssssssssssssssss!!
sssssssssssssssssss!!

ssssMERRYsCHRISTMASs&sHAPPYsNEWsYEAR

Note that the Underscore entry is a problem since the Underscore ($DF) is used as backspace in Apple 1 Basic, however, the del ($FF) will also display as an underscore from the Character Generator so the Underscore symbols need to be enterred as del. If your keyboard does not have all the characters you can enter placeholder characters and edit the strings in the Basic program.

evank's picture
Offline
Joined: Jan 30 2005
Posts: 49
Re: Apple 1 Xmas Program

It's easier to make a Festivus pole. Smile

10 PRINT "!!"
20 GOTO 10

__________________

@ Director, Vintage Computer Federation, a 501(c)3 non-profit -- www.vcfed.org
@ Author, "Abacus to smartphone: The evolution of mobile and portable computers" -- www.abacustosmartphone.com
@ Homepage: www.Snarc.net