PETSONG 1
FILE INFORMATION
FILENAME(S): PETSONG 1
FILE TYPE(S): PRG
FILE SIZE: 3K
FIRST SEEN: 2025-11-30 21:07:05
APPEARS ON: 1 disk(s)
FILE HASH
ce6f23d8dc1ea1d4077dd45b802acdfea8e4e064df1838d475f3812a7bd4a01f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PET DEMO S 01 | PETSONG 1 | PRG | DuncanTwain | 11 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 10 04 0A 00 8F 20 50 45 54 53 4F 4E 47 31 |....... PETSONG1| 00000010: 00 34 04 14 00 8F 20 57 52 49 54 54 45 4E 20 42 |.4.... WRITTEN B| 00000020: 59 20 45 44 4D 4F 4E 44 20 54 4F 59 20 37 2F 31 |Y EDMOND TOY 7/1| 00000030: 35 2F 37 38 00 46 04 1E 00 99 20 22 93 50 45 54 |5/78.F.... ".PET| 00000040: 53 4F 4E 47 31 22 00 4C 04 28 00 99 00 72 04 2A |SONG1".L.(...r.*| 00000050: 00 99 22 44 4F 20 59 4F 55 20 57 41 4E 54 20 49 |.."DO YOU WANT I| 00000060: 4E 53 54 52 55 43 54 49 4F 4E 53 20 28 59 2F 4E |NSTRUCTIONS (Y/N| 00000070: 29 22 00 87 04 2C 00 85 20 51 24 3A 8B 20 51 24 |)"...,.. Q$:. Q$| 00000080: B2 22 59 22 A7 35 30 00 91 04 2E 00 89 20 35 30 |."Y".50...... 50| 00000090: 30 00 C1 04 32 00 99 22 54 48 45 53 45 20 41 52 |0...2.."THESE AR| 000000A0: 45 20 54 48 45 20 49 4E 53 54 52 55 43 54 4F 4E |E THE INSTRUCTON| 000000B0: 53 20 46 4F 52 20 50 45 54 53 4F 4E 47 32 22 3A |S FOR PETSONG2":| 000000C0: 99 00 06 05 3C 00 99 22 50 45 54 53 4F 4E 47 32 |....<.."PETSONG2| 000000D0: 20 43 41 4E 20 50 4C 41 59 20 41 4E 59 20 53 4F | CAN PLAY ANY SO| 000000E0: 4E 47 20 57 52 49 54 54 45 4E 20 49 4E 54 4F 20 |NG WRITTEN INTO | 000000F0: 49 54 53 20 44 41 54 41 20 53 54 41 54 45 4D 45 |ITS DATA STATEME| 00000100: 4E 54 53 20 22 3B 00 2F 05 46 00 99 22 53 54 41 |NTS ";./.F.."STA| 00000110: 52 54 49 4E 47 20 41 54 20 4C 49 4E 45 20 20 20 |RTING AT LINE | 00000120: 20 4E 55 4D 42 45 52 20 31 30 30 30 22 3A 99 00 | NUMBER 1000":..| 00000130: 74 05 50 00 99 22 54 48 45 20 44 41 54 41 20 4D |t.P.."THE DATA M| 00000140: 55 53 54 20 43 4F 4E 53 49 53 54 20 4F 46 20 54 |UST CONSIST OF T| 00000150: 48 45 20 54 49 54 4C 45 20 4F 46 20 20 20 54 48 |HE TITLE OF TH| 00000160: 45 20 53 4F 4E 47 2C 20 54 48 45 20 54 45 4D 50 |E SONG, THE TEMP| 00000170: 4F 2C 22 3B 00 AC 05 5A 00 99 22 20 54 48 45 20 |O,";...Z.." THE | 00000180: 4E 4F 54 45 53 20 4F 46 20 54 48 45 20 20 20 53 |NOTES OF THE S| 00000190: 4F 4E 47 2C 20 41 4E 44 20 54 48 45 20 53 54 4F |ONG, AND THE STO| 000001A0: 50 20 43 4F 4D 4D 41 4E 44 53 2E 22 00 E5 05 64 |P COMMANDS."...d| 000001B0: 00 99 3A 99 22 54 48 45 20 54 49 54 4C 45 22 3A |..:."THE TITLE":| 000001C0: 99 22 20 20 20 20 20 43 41 4E 20 42 45 20 41 4E |." CAN BE AN| 000001D0: 59 20 41 4C 50 48 41 42 45 54 49 43 20 53 54 52 |Y ALPHABETIC STR| 000001E0: 49 4E 47 2E 22 00 20 06 6E 00 99 3A 99 22 54 48 |ING.". .n..:."TH| 000001F0: 45 20 54 45 4D 50 4F 22 3A 99 22 20 20 20 20 20 |E TEMPO":." | 00000200: 41 20 54 45 4D 50 4F 20 4F 46 20 36 30 20 57 49 |A TEMPO OF 60 WI| 00000210: 4C 4C 20 4D 41 4B 45 20 41 20 57 48 4F 4C 45 22 |LL MAKE A WHOLE"| 00000220: 00 4F 06 78 00 99 22 20 20 4E 4F 54 45 20 4C 41 |.O.x.." NOTE LA| 00000230: 53 54 20 31 20 53 45 43 2C 20 41 20 54 45 4D 50 |ST 1 SEC, A TEMP| 00000240: 4F 20 4F 46 20 31 32 30 20 57 49 4C 4C 20 22 00 |O OF 120 WILL ".| 00000250: 78 06 82 00 99 22 20 20 4D 41 4B 45 20 41 20 57 |x...." MAKE A W| 00000260: 48 4F 4C 45 20 4E 4F 54 45 20 4C 41 53 54 20 32 |HOLE NOTE LAST 2| 00000270: 20 53 45 43 2E 22 3A 99 00 98 06 8C 00 99 22 50 | SEC.":......."P| 00000280: 52 45 53 53 20 52 45 54 55 52 4E 20 54 4F 20 43 |RESS RETURN TO C| 00000290: 4F 4E 54 49 4E 55 45 22 00 AF 06 96 00 A1 20 51 |ONTINUE"...... Q| 000002A0: 24 3A 8B 20 51 24 B2 22 22 20 A7 20 31 35 30 00 |$:. Q$."" . 150.| 000002B0: DB 06 A0 00 99 22 93 54 48 45 20 4E 4F 54 45 53 |.....".THE NOTES| 000002C0: 20 54 48 41 54 20 43 41 4E 20 42 45 20 50 4C 41 | THAT CAN BE PLA| 000002D0: 59 45 44 20 41 52 45 3A 22 3A 99 00 0B 07 AA 00 |YED ARE:":......| 000002E0: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." | 000002F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000300: 20 20 20 20 20 20 20 20 42 30 22 00 3A 07 B4 00 | B0".:...| 00000310: 99 22 43 20 20 43 23 20 20 44 20 20 45 25 20 20 |."C C# D E% | 00000320: 45 20 20 46 20 20 46 23 20 20 47 20 20 41 25 20 |E F F# G A% | 00000330: 20 41 20 20 42 25 20 20 42 22 00 69 07 BE 00 99 | A B% B".i....| 00000340: 22 43 31 20 43 31 23 20 44 31 20 45 31 25 20 45 |"C1 C1# D1 E1% E| 00000350: 31 20 46 31 20 46 31 23 20 47 31 20 41 31 25 20 |1 F1 F1# G1 A1% | 00000360: 41 31 20 42 31 25 20 42 22 00 75 07 C8 00 99 22 |A1 B1% B".u...."| 00000370: 43 32 22 3A 99 00 94 07 D2 00 99 22 20 20 20 20 |C2":......." | 00000380: 20 57 48 45 52 45 20 23 20 49 53 20 41 20 53 48 | WHERE # IS A SH| 00000390: 41 52 50 22 00 B4 07 DC 00 99 22 20 20 20 20 20 |ARP"......" | 000003A0: 57 48 45 52 45 20 25 20 49 53 20 41 20 46 4C 41 |WHERE % IS A FLA| 000003B0: 54 22 3A 99 00 E0 07 E6 00 99 22 20 20 42 30 20 |T":......." B0 | 000003C0: 49 53 20 41 4E 20 4F 43 54 41 56 45 20 42 45 4C |IS AN OCTAVE BEL| 000003D0: 4F 57 20 42 20 28 32 34 36 2E 34 20 48 5A 29 22 |OW B (246.4 HZ)"| 000003E0: 00 03 08 F0 00 99 22 20 20 43 20 49 53 20 4D 49 |......" C IS MI| 000003F0: 44 44 4C 45 20 43 20 28 32 36 31 2E 36 32 20 48 |DDLE C (261.62 H| 00000400: 5A 29 22 00 35 08 FA 00 99 22 20 20 43 31 20 49 |Z)".5...." C1 I| 00000410: 53 20 4F 4E 45 20 4F 43 54 41 56 45 20 41 42 4F |S ONE OCTAVE ABO| 00000420: 56 45 20 43 20 28 35 32 33 2E 32 34 20 48 5A 29 |VE C (523.24 HZ)| 00000430: 22 3A 99 3A 99 00 5F 08 04 01 99 22 52 45 53 54 |":.:.._...."REST| 00000440: 53 22 3A 99 22 20 20 20 20 20 52 20 49 53 20 55 |S":." R IS U| 00000450: 53 45 44 20 46 4F 52 20 41 20 52 45 53 54 22 00 |SED FOR A REST".| 00000460: 84 08 0E 01 99 3A 20 99 3A 99 22 50 52 45 53 53 |.....: .:."PRESS| 00000470: 20 52 45 54 55 52 4E 20 54 4F 20 43 4F 4E 54 49 | RETURN TO CONTI| 00000480: 4E 55 45 22 00 99 08 14 01 A1 20 51 24 3A 8B 20 |NUE"...... Q$:. | 00000490: 51 24 B2 22 22 A7 32 37 36 00 BF 08 18 01 99 22 |Q$."".276......"| 000004A0: 93 4C 45 4E 47 54 48 20 4F 46 20 45 41 43 48 20 |.LENGTH OF EACH | 000004B0: 4E 4F 54 45 20 4F 52 20 52 45 53 54 22 3A 99 00 |NOTE OR REST":..| 000004C0: DA 08 22 01 99 22 20 20 20 20 20 31 3D 57 48 4F |..".." 1=WHO| 000004D0: 4C 45 20 20 20 4E 4F 54 45 22 00 F5 08 2C 01 99 |LE NOTE"...,..| 000004E0: 22 20 20 20 20 20 32 3D 48 41 4C 46 20 20 20 20 |" 2=HALF | 000004F0: 4E 4F 54 45 22 00 10 09 36 01 99 22 20 20 20 20 |NOTE"...6.." | 00000500: 20 34 3D 51 55 41 52 54 45 52 20 4E 4F 54 45 22 | 4=QUARTER NOTE"| 00000510: 00 2B 09 40 01 99 22 20 20 20 20 20 38 3D 45 49 |.+.@.." 8=EI| 00000520: 47 48 54 48 20 20 4E 4F 54 45 22 00 48 09 4A 01 |GHTH NOTE".H.J.| 00000530: 99 22 20 20 20 20 31 36 3D 53 49 58 54 45 45 4E |." 16=SIXTEEN| 00000540: 54 48 20 4E 4F 54 45 22 00 4E 09 54 01 99 00 96 |TH NOTE".N.T....| 00000550: 09 5E 01 99 22 54 48 45 20 53 54 4F 50 20 43 4F |.^.."THE STOP CO| 00000560: 4D 4D 41 4E 44 22 3A 99 22 20 20 20 20 20 53 20 |MMAND":." S | 00000570: 49 4E 20 50 4C 41 43 45 20 4F 46 20 41 20 4E 4F |IN PLACE OF A NO| 00000580: 54 45 20 53 49 47 4E 49 46 49 45 53 20 54 48 45 |TE SIGNIFIES THE| 00000590: 20 20 20 45 22 3B 00 AD 09 68 01 99 22 4E 44 20 | E";...h.."ND | 000005A0: 4F 46 20 54 48 45 20 53 4F 4E 47 2E 22 00 EA 09 |OF THE SONG."...| 000005B0: 72 01 99 22 20 20 20 20 20 27 45 4E 44 27 20 4D |r.." 'END' M| 000005C0: 55 53 54 20 42 45 20 54 48 45 20 4C 41 53 54 20 |UST BE THE LAST | 000005D0: 45 4C 45 4D 45 4E 54 20 49 4E 20 20 20 20 54 48 |ELEMENT IN TH| 000005E0: 45 20 44 41 54 41 2E 22 3A 99 00 05 0A 7C 01 99 |E DATA.":....|..| 000005F0: 22 48 41 52 44 57 41 52 45 20 52 45 51 55 49 52 |"HARDWARE REQUIR| 00000600: 45 44 22 3A 99 00 47 0A 86 01 99 22 20 20 20 20 |ED":..G...." | 00000610: 20 54 48 45 20 4F 55 54 50 55 54 20 49 53 20 46 | THE OUTPUT IS F| 00000620: 52 4F 4D 20 54 48 45 20 43 42 32 20 50 49 4E 20 |ROM THE CB2 PIN | 00000630: 49 4E 20 20 20 20 54 48 45 20 55 53 45 52 20 50 |IN THE USER P| 00000640: 4F 52 54 2E 22 3A 99 00 91 0A 90 01 99 22 20 20 |ORT.":......." | 00000650: 41 20 53 49 4D 50 4C 45 20 4F 4E 45 20 54 52 41 |A SIMPLE ONE TRA| 00000660: 4E 53 49 53 54 4F 52 20 41 4D 50 4C 49 46 49 45 |NSISTOR AMPLIFIE| 00000670: 52 20 41 4E 44 20 20 20 4C 4F 55 44 53 50 45 41 |R AND LOUDSPEA| 00000680: 4B 45 52 20 49 53 20 52 45 51 55 49 52 45 44 22 |KER IS REQUIRED"| 00000690: 3B 00 B1 0A 9A 01 99 22 20 54 4F 20 48 45 41 52 |;......" TO HEAR| 000006A0: 20 54 48 45 20 20 20 20 20 53 4F 55 4E 44 53 2E | THE SOUNDS.| 000006B0: 22 00 D3 0A A4 01 99 3A 99 22 50 52 45 53 53 20 |"......:."PRESS | 000006C0: 52 45 54 55 52 4E 20 54 4F 20 43 4F 4E 54 49 4E |RETURN TO CONTIN| 000006D0: 55 45 22 00 E9 0A A9 01 A1 20 51 24 3A 8B 20 51 |UE"...... Q$:. Q| 000006E0: 24 B2 22 22 A7 20 34 32 35 00 18 0B AE 01 99 22 |$."". 425......"| 000006F0: 93 49 20 57 49 4C 4C 20 44 45 4D 4F 4E 53 54 52 |.I WILL DEMONSTR| 00000700: 41 54 45 20 57 49 54 48 20 41 20 4C 49 54 54 4C |ATE WITH A LITTL| 00000710: 45 20 53 4F 4E 47 2E 22 00 5B 0B B8 01 99 3A 99 |E SONG.".[....:.| 00000720: 22 49 20 57 49 4C 4C 20 50 4C 41 59 20 27 4D 45 |"I WILL PLAY 'ME| 00000730: 52 52 49 4C 59 20 57 45 20 52 4F 4C 4C 20 41 4C |RRILY WE ROLL AL| 00000740: 4F 4E 47 27 20 41 4E 44 20 27 4C 4F 4E 44 4F 4E |ONG' AND 'LONDON| 00000750: 20 42 52 49 44 47 45 27 22 3A 99 00 A3 0B C2 01 | BRIDGE'":......| 00000760: 99 22 41 46 54 45 52 20 49 20 46 49 4E 49 53 48 |."AFTER I FINISH| 00000770: 2C 20 4C 49 53 54 20 4C 49 4E 45 53 20 31 30 30 |, LIST LINES 100| 00000780: 30 20 54 4F 20 31 31 30 30 20 54 4F 20 53 45 45 |0 TO 1100 TO SEE| 00000790: 20 48 4F 57 20 49 20 52 45 41 44 20 4D 55 53 49 | HOW I READ MUSI| 000007A0: 43 2E 22 00 C5 0B CC 01 99 3A 99 22 50 52 45 53 |C."......:."PRES| 000007B0: 53 20 52 45 54 55 52 4E 20 54 4F 20 43 4F 4E 54 |S RETURN TO CONT| 000007C0: 49 4E 55 45 22 00 DA 0B D6 01 A1 20 51 24 3A 8B |INUE"...... Q$:.| 000007D0: 51 24 B2 22 22 A7 20 34 37 30 00 E9 0B F4 01 8F |Q$."". 470......| 000007E0: 20 50 45 54 53 4F 4E 47 32 00 0D 0C FE 01 8F 20 | PETSONG2...... | 000007F0: 57 52 49 54 54 45 4E 20 42 59 20 45 44 4D 4F 4E |WRITTEN BY EDMON| 00000800: 44 20 54 4F 59 20 37 2F 31 35 2F 37 38 00 20 0C |D TOY 7/15/78. .| 00000810: 03 02 99 22 93 50 45 54 53 4F 4E 47 32 22 3A 99 |...".PETSONG2":.| 00000820: 00 34 0C 08 02 86 20 4E 24 28 32 37 29 2C 4E 25 |.4.... N$(27),N%| 00000830: 28 32 37 29 00 4C 0C 12 02 81 20 49 B2 31 A4 32 |(27).L.... I.1.2| 00000840: 36 3A 87 20 4E 24 28 49 29 3A 82 49 00 63 0C 1C |6:. N$(I):.I.c..| 00000850: 02 81 20 49 B2 31 A4 32 36 3A 87 4E 25 28 49 29 |.. I.1.26:.N%(I)| 00000860: 3A 82 49 00 89 0C 30 02 83 20 42 30 2C 43 2C 43 |:.I...0.. B0,C,C| 00000870: 23 2C 44 2C 45 25 2C 45 2C 46 2C 46 23 2C 47 2C |#,D,E%,E,F,F#,G,| 00000880: 41 25 2C 41 2C 42 25 2C 42 00 BB 0C 3A 02 83 20 |A%,A,B%,B...:.. | 00000890: 43 31 2C 43 31 23 2C 44 31 2C 45 31 25 2C 45 31 |C1,C1#,D1,E1%,E1| 000008A0: 2C 46 31 2C 46 31 23 2C 47 31 2C 41 31 25 2C 41 |,F1,F1#,G1,A1%,A| 000008B0: 31 2C 42 31 25 2C 42 31 2C 43 32 00 F5 0C 44 02 |1,B1%,B1,C2...D.| 000008C0: 83 20 32 35 31 2C 32 33 37 2C 32 32 34 2C 32 31 |. 251,237,224,21| 000008D0: 31 2C 31 39 39 2C 31 38 38 2C 31 31 37 2C 31 36 |1,199,188,117,16| 000008E0: 37 2C 31 35 37 2C 31 34 39 2C 31 34 30 2C 31 33 |7,157,149,140,13| 000008F0: 32 2C 31 32 35 00 25 0D 4E 02 83 20 31 31 37 2C |2,125.%.N.. 117,| 00000900: 31 31 31 2C 31 30 34 2C 39 39 2C 39 33 2C 38 37 |111,104,99,93,87| 00000910: 2C 38 33 2C 37 38 2C 37 34 2C 36 39 2C 36 36 2C |,83,78,74,69,66,| 00000920: 36 31 2C 35 38 00 2E 0D 58 02 87 20 51 24 00 6E |61,58...X.. Q$.n| 00000930: 0D 5A 02 8B 20 51 24 B2 22 45 4E 44 22 20 A7 20 |.Z.. Q$."END" . | 00000940: 99 3A 99 22 54 48 41 4E 4B 20 59 4F 55 20 46 4F |.:."THANK YOU FO| 00000950: 52 20 42 45 49 4E 47 20 41 20 47 4F 4F 44 20 41 |R BEING A GOOD A| 00000960: 55 44 49 45 4E 43 45 2E 22 3A 89 38 31 30 00 8A |UDIENCE.":.810..| 00000970: 0D 62 02 99 22 49 20 57 49 4C 4C 20 50 4C 41 59 |.b.."I WILL PLAY| 00000980: 20 27 22 3B 51 24 3B 22 27 22 00 9A 0D 6C 02 87 | '";Q$;"'"...l..| 00000990: 20 50 3A 50 31 B2 50 AD 36 30 00 A3 0D 76 02 87 | P:P1.P.60...v..| 000009A0: 20 4E 24 00 B6 0D 80 02 8B 20 4E 24 B2 22 53 22 | N$...... N$."S"| 000009B0: 20 A7 20 36 30 30 00 BE 0D 8A 02 87 20 4C 00 C7 | . 600...... L..| 000009C0: 0D 94 02 54 B2 54 49 00 DA 0D 9E 02 8B 20 4E 24 |...T.TI...... N$| 000009D0: B2 22 52 22 20 A7 20 37 35 30 00 E9 0D A8 02 81 |."R" . 750......| 000009E0: 20 49 B2 31 20 A4 20 32 37 00 FE 0D B2 02 8B 20 | I.1 . 27...... | 000009F0: 4E 24 B2 4E 24 28 49 29 20 A7 20 37 32 30 00 06 |N$.N$(I) . 720..| 00000A00: 0E BC 02 82 20 49 00 10 0E C6 02 89 20 38 30 30 |.... I...... 800| 00000A10: 00 1F 0E D0 02 97 20 35 39 34 36 37 2C 31 36 00 |...... 59467,16.| 00000A20: 31 0E DA 02 97 20 35 39 34 36 34 2C 4E 25 28 49 |1.... 59464,N%(I| 00000A30: 29 00 40 0E E4 02 97 20 35 39 34 36 36 2C 31 35 |).@.... 59466,15| 00000A40: 00 55 0E EE 02 8B 20 54 49 AB 54 B3 50 AD 4C 20 |.U.... TI.T.P.L | 00000A50: A7 20 37 35 30 00 63 0E F8 02 97 20 35 39 34 36 |. 750.c.... 5946| 00000A60: 37 2C 30 00 6C 0E 02 03 54 B2 54 49 00 80 0E 0C |7,0.l...T.TI....| 00000A70: 03 8B 20 54 49 AB 54 B3 50 31 20 A7 20 37 38 30 |.. TI.T.P1 . 780| 00000A80: 00 8A 0E 16 03 89 20 36 33 30 00 BD 0E 20 03 99 |...... 630... ..| 00000A90: 22 4F 4F 50 53 21 20 49 20 43 41 4E 27 54 20 50 |"OOPS! I CAN'T P| 00000AA0: 4C 41 59 20 54 48 41 54 20 4E 4F 54 45 20 27 22 |LAY THAT NOTE '"| 00000AB0: 3B 4E 24 3B 22 2C 22 3B 4C 3B 22 27 22 00 C3 0E |;N$;",";L;"'"...| 00000AC0: 2A 03 80 00 DE 0E E8 03 83 20 4D 45 52 52 49 4C |*........ MERRIL| 00000AD0: 59 20 57 45 20 52 4F 57 20 41 4C 4F 4E 47 00 E7 |Y WE ROW ALONG..| 00000AE0: 0E F2 03 83 20 36 30 00 23 0F FC 03 83 20 45 2C |.... 60.#.... E,| 00000AF0: 32 2E 37 2C 44 2C 38 2C 43 2C 34 2C 44 2C 34 2C |2.7,D,8,C,4,D,4,| 00000B00: 45 2C 34 2C 45 2C 34 2C 45 2C 32 2C 44 2C 34 2C |E,4,E,4,E,2,D,4,| 00000B10: 44 2C 34 2C 44 2C 32 2C 45 2C 34 2C 47 2C 34 2C |D,4,D,2,E,4,G,4,| 00000B20: 47 2C 32 00 5B 0F 06 04 83 20 45 2C 32 2E 37 2C |G,2.[.... E,2.7,| 00000B30: 44 2C 38 2C 43 2C 34 2C 44 2C 34 2C 45 2C 34 2C |D,8,C,4,D,4,E,4,| 00000B40: 45 2C 34 2C 45 2C 32 2C 44 2C 34 2C 44 2C 34 2C |E,4,E,2,D,4,D,4,| 00000B50: 45 2C 34 2C 44 2C 34 2C 43 2C 31 00 63 0F 10 04 |E,4,D,4,C,1.c...| 00000B60: 83 20 53 00 77 0F 1A 04 83 20 4C 4F 4E 44 4F 4E |. S.w.... LONDON| 00000B70: 20 42 52 49 44 47 45 00 81 0F 24 04 83 20 31 30 | BRIDGE...$.. 10| 00000B80: 30 00 C4 0F 2E 04 83 20 52 2C 31 2C 41 2C 32 2E |0...... R,1,A,2.| 00000B90: 37 2C 42 2C 38 2C 41 2C 34 2C 47 2C 34 2C 46 23 |7,B,8,A,4,G,4,F#| 00000BA0: 2C 34 2C 47 2C 34 2C 41 2C 32 2C 45 2C 34 2C 46 |,4,G,4,A,2,E,4,F| 00000BB0: 23 2C 34 2C 47 2C 32 2C 46 23 2C 34 2C 47 2C 34 |#,4,G,2,F#,4,G,4| 00000BC0: 2C 41 2C 32 00 FC 0F 38 04 83 20 41 2C 32 2E 37 |,A,2...8.. A,2.7| 00000BD0: 2C 42 2C 38 2C 41 2C 34 2C 47 2C 34 2C 46 23 2C |,B,8,A,4,G,4,F#,| 00000BE0: 34 2C 47 2C 34 2C 41 2C 32 2C 45 2C 32 2C 41 2C |4,G,4,A,2,E,2,A,| 00000BF0: 32 2C 46 23 2C 34 2C 44 2C 31 2E 35 00 04 10 42 |2,F#,4,D,1.5...B| 00000C00: 04 83 20 53 00 0E 10 4C 04 83 20 45 4E 44 00 00 |.. S...L.. END..| 00000C10: 00 03 |.. |
....... PETSONG1.4.... WRITTEN BY EDMOND
TOY 7/15/78.F.... ".PETSONG1".L.(...R.*
.."DO YOU WANT INSTRUCTIONS (Y/N)"...,..
Q$:. Q$."Y".50...... 500.A.2.."THESE AR
E THE INSTRUCTONS FOR PETSONG2":....<.."
PETSONG2 CAN PLAY ANY SONG WRITTEN INTO
ITS DATA STATEMENTS ";./.F.."STARTING AT
LINE NUMBER 1000":..T.P.."THE DATA M
UST CONSIST OF THE TITLE OF THE SONG,
THE TEMPO,";...Z.." THE NOTES OF THE S
ONG, AND THE STOP COMMANDS."...D..:."THE
TITLE":." CAN BE ANY ALPHABETIC STR
ING.". .N..:."THE TEMPO":." A TEMPO
OF 60 WILL MAKE A WHOLE".O.X.." NOTE LA
ST 1 SEC, A TEMPO OF 120 WILL ".X...."
MAKE A WHOLE NOTE LAST 2 SEC.":......."P
RESS RETURN TO CONTINUE"...... Q$:. Q$."
" . 150... ..".THE NOTES THAT CAN BE PLA
YED ARE:":......."
B0".:...."C C# D E%
E F F# G A% A B% B".I...."C1 C1#
D1 E1% E1 F1 F1# G1 A1% A1 B1% B".U.H.."
C2":....R.." WHERE # IS A SHARP"....
.." WHERE % IS A FLAT":......." B0
IS AN OCTAVE BELOW B (246.4 HZ)"......"
C IS MIDDLE C (261.62 HZ)".5...." C1 I
S ONE OCTAVE ABOVE C (523.24 HZ)":.:.._.
..."RESTS":." R IS USED FOR A REST".
.....: .:."PRESS RETURN TO CONTINUE"....
.. Q$:. Q$."".276......".LENGTH OF EACH
NOTE OR REST":..Z.".." 1=WHOLE NOT
E"...,.." 2=HALF NOTE"...6.."
4=QUARTER NOTE".+.@.." 8=EIGHTH NO
TE".H.J.." 16=SIXTEENTH NOTE".N.T....
.^.."THE STOP COMMAND":." S IN PLACE
OF A NOTE SIGNIFIES THE E";...H.."ND
OF THE SONG."...R.." 'END' MUST BE T
HE LAST ELEMENT IN THE DATA.":....|..
"HARDWARE REQUIRED":..G...." THE OUT
PUT IS FROM THE CB2 PIN IN THE USER P
ORT.":......." A SIMPLE ONE TRANSISTOR
AMPLIFIER AND LOUDSPEAKER IS REQUIRED"
;......" TO HEAR THE SOUNDS.".S....:
."PRESS RETURN TO CONTINUE"...... Q$:. Q
$."". 425......".I WILL DEMONSTRATE WITH
A LITTLE SONG.".[....:."I WILL PLAY 'ME
RRILY WE ROLL ALONG' AND 'LONDON BRIDGE'
":....B.."AFTER I FINISH, LIST LINES 100
0 TO 1100 TO SEE HOW I READ MUSIC.".E.L.
.:."PRESS RETURN TO CONTINUE".Z.V.. Q$:.
Q$."". 470...... PETSONG2...... WRITTEN
BY EDMOND TOY 7/15/78. ....".PETSONG2":.
.4.... N$(27),N%(27).L.... I.1.26:. N$(I
):.I.C.... I.1.26:.N%(I):.I...0.. B0,C,C
#,D,E%,E,F,F#,G,A%,A,B%,B...:.. C1,C1#,D
1,E1%,E1,F1,F1#,G1,A1%,A1,B1%,B1,C2...D.
. 251,237,224,211,199,188,117,167,157,14
9,140,132,125.%.N.. 117,111,104,99,93,87
,83,78,74,69,66,61,58...X.. Q$.N.Z.. Q$.
"END" . .:."THANK YOU FOR BEING A GOOD A
UDIENCE.":.810...B.."I WILL PLAY '";Q$;"
'"...L.. P:P1.P.60...V.. N$...... N$."S"
. 600...... L.G...T.TI.Z.... N$."R" . 7
50...... I.1 . 27...... N$.N$(I) . 720..
.... I...F.. 800...P.. 59467,16.1.Z.. 59
464,N%(I).@.... 59466,15.U.... TI.T.P.L
. 750.C.... 59467,0.L...T.TI...... TI.T.
P1 . 780...... 630... .."OOPS! I CAN'T P
LAY THAT NOTE '";N$;",";L;"'".C.*.......
. MERRILY WE ROW ALONG...... 60.#.... E,
2.7,D,8,C,4,D,4,E,4,E,4,E,2,D,4,D,4,D,2,
E,4,G,4,G,2.[.... E,2.7,D,8,C,4,D,4,E,4,
E,4,E,2,D,4,D,4,E,4,D,4,C,1.C.... S.W...
. LONDON BRIDGE...$.. 100.D.... R,1,A,2.
7,B,8,A,4,G,4,F#,4,G,4,A,2,E,4,F#,4,G,2,
F#,4,G,4,A,2...8.. A,2.7,B,8,A,4,G,4,F#,
4,G,4,A,2,E,2,A,2,F#,4,D,1.5...B.. S...L
.. END....
> CLICK IMAGE PREVIEW FOR FULL MODAL