Home » Personal collection » Commodore disks » disk65a_programs_1.d64 » pussy cat

pussy cat

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Commodore disks » disk65a_programs_1.d64
Filename: pussy cat
Read OK:
File size: 047B bytes
Load address: 0801
Exec address: 0000
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
    20 FORN=0TO9:READHN$(N),HN(N):NEXT:DIMS(11,11)
    30 POKE53280,0:POKE53281,0:PRINT"<clr><purple>";SPC(13);"┌🭸🭸🭸🭸🭸🭸🭸🭸🭸┐";CHR$(142);CHR$(8)
    40 PRINTSPC(13);"🭲<green>PUSSY CAT<purple>🭲"
    50 PRINTSPC(13);"└🭸🭸🭸🭸🭸🭸🭸🭸🭸┘":PRINTSPC(12);"┌🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸┐"
    60 PRINTSPC(12);"🭲<green>HIGH SCORES<purple>🭲":PRINT"🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸┴🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸┴🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸";
    70 PRINT"🭸🭸🭸":FORN=0TO9:POKE781,6+N:POKE782,0:POKE783,0:SYS65520:POKE646,N+1
    80 PRINTHN$(N):POKE782,21:SYS65520:PRINTHN(N):NEXT
    90 POKE781,16:POKE782,0:POKE783,0:SYS65520
   100 PRINT"<purple>🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸<cursor down>";SPC(9);
   110 PRINT"WRITTEN BY DOMINIC FORD"
   120 PRINT:PRINT:PRINT
   130 PRINTSPC(10);"PRESS SPACE TO START"
   140 GET A$:IFA$<>" "THEN140
   150 PRINT"<clr>":FORX=0TO9:FORY=0TO9:S(X,Y)=0:NEXT:NEXT:S(0,0)=1:F=1
   160 PRINT"<blue>┌🭸┬🭸┬🭸┬🭸┬🭸┬🭸┬🭸┬🭸┬🭸┬🭸┬🭸┬🭸┐":FORL=0TO10
   170 PRINT"🭲 🭲 🭲 🭲 🭲 🭲 🭲 🭲 🭲 🭲 🭲 🭲 🭲":PRINT"├🭸┼🭸┼🭸┼🭸┼🭸┼🭸┼🭸┼🭸┼🭸┼🭸┼🭸┼🭸┤":NEXT
   180 PRINT"🭲 🭲 🭲 🭲 🭲 🭲 🭲 🭲 🭲 🭲 🭲 🭲 🭲":PRINT"└🭸┴🭸┴🭸┴🭸┴🭸┴🭸┴🭸┴🭸┴🭸┴🭸┴🭸┴🭸┘";
   210 POKE782,26:POKE781,0:SYS65520:PRINT"<red>SCORE:<cursor down><cursor down><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left>FUEL:<cursor down><cursor down><cursor left><cursor left><cursor left><cursor left><cursor left>LIVES:";
   220 PRINT"<cursor down><cursor down><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left>TIME:<cursor down><cursor down><cursor left><cursor left><cursor left><cursor left><cursor left>CORE:":X=1:Y=1:T=TI:F=350:L=3:LE=1:S=0
   230 XP=X:YP=Y:GOSUB1020:PRINT"<green>●"
   240 POKE782,32:POKE781,0:SYS65520:PRINTS:POKE781,2:SYS65520:PRINTF
   250 POKE781,4:SYS65520:PRINTL:POKE781,6:SYS65520:PRINTINT((TI-T)/60)
   260 POKE781,8:SYS65520:PRINTLE
  1000 DATA FRED,10,FREDB,20,FREDC,30,FREDD,40,FREDE,50,FREDF,60,FREDG,70
  1010 DATA FREDH,80,FREDI,90,FREDJ,100
  1020 POKE782,1+XP*2:POKE781,25-YP*2:SYS65520:RETURN

&�N�0�9:�HN$(N),HN(N):�:�S(11,11)a�53280,0:�53281,0:�"��";�13);"���������î";�(142);�(8){(��13);"�PUSSY CAT��"�2��13);"���������ý":��12);"�����������î"�<��12);"�HIGH SCORES��":�"�����������ñ����������ñ������������";(	F�"���":�N�0�9:�781,6�N:�782,0:�783,0:�65520:�646,N�1L	P�HN$(N):�782,21:�65520:�HN(N):�m	Z�781,16:�782,0:�783,0:�65520�	d�"�����������������������������������������";�9);�	n�"WRITTEN BY DOMINIC FORD"�	x�:�:��	���10);"PRESS SPACE TO START"
�� A$:�A$��" "�1405
��"�":�X�0�9:�Y�0�9:S(X,Y)�0:�:�:S(0,0)�1:F�1_
��"�òòòòòòòòòòòî":�L�0�10�
��"            �":�"�����������������������ó":��
��"            �":�"�ñññññññññññý";��782,26:�781,0:�65520:�"SCORE:������FUEL:�����LIVES:";_��"������TIME:�����CORE:":X�1:Y�1:T�TI:F�350:L�3:LE�1:S�0y�XP�X:YP�Y:�1020:�"�"���782,32:�781,0:�65520:�S:�781,2:�65520:�F���781,4:�65520:�L:�781,6:�65520:��((TI�T)�60)��781,8:�65520:�LE2�� FRED,10,FREDB,20,FREDC,30,FREDD,40,FREDE,50,FREDF,60,FREDG,70T�� FREDH,80,FREDI,90,FREDJ,100z��782,1�XP�2:�781,25�YP�2:�65520:�
&HT@.n.0.9:.hn$(n),hn(n):.:.s(11,11)@AH.@.53280,0:.53281,0:."..";.13);"...........";.(142);.(8)@.H(@..13);"..pussy cat.."@.H2@..13);"...........":..12);"............."@.H<@..12);"..high scores..":.".....................................";@(If@."...":.n.0.9:.781,6.n:.782,0:.783,0:.65520:.646,n.1@lIp@.hn$(n):.782,21:.65520:.hn(n):.@MIz@.781,16:.782,0:.783,0:.65520@.ID@.".........................................Q";.9);@.IN@."written by dominic ford"@.IX@.:.:.@.I.@..10);"press space to start"@DJ.@. a$:.a$.." ".140@5J.@.".":.x.0.9:.y.0.9:s(x,y).0:.:.:s(0,0).1:f.1@.J.@."..........................":.l.0.10@.J.@.".........................":.".........................":.@.J.@.".........................":.".........................";@.K.@.782,26:.781,0:.65520:."£score:QQ......fuel:QQ.....lives:";@.K.@."QQ......time:QQ.....core:":x.1:y.1:t.ti:f.350:l.3:le.1:s.0@YK.@xp.x:yp.y:.1020:.".."@.K.@.782,32:.781,0:.65520:.s:.781,2:.65520:.f@.K.@.781,4:.65520:.l:.781,6:.65520:..((ti.t).60)@.KDA.781,8:.65520:.le@2L.C. fred,10,fredb,20,fredc,30,fredd,40,frede,50,fredf,60,fredg,70@tL.C. fredh,80,fredi,90,fredj,100@ZL.C.782,1.xp.2:.781,25.yp.2:.65520:.@@@
00000000  26 08 14 00 81 4e b2 30  a4 39 3a 87 48 4e 24 28  |&....N.0.9:.HN$(|
00000010  4e 29 2c 48 4e 28 4e 29  3a 82 3a 86 53 28 31 31  |N),HN(N):.:.S(11|
00000020  2c 31 31 29 00 61 08 1e  00 97 35 33 32 38 30 2c  |,11).a....53280,|
00000030  30 3a 97 35 33 32 38 31  2c 30 3a 99 22 93 9c 22  |0:.53281,0:.".."|
00000040  3b a6 31 33 29 3b 22 b0  c3 c3 c3 c3 c3 c3 c3 c3  |;.13);".........|
00000050  c3 ae 22 3b c7 28 31 34  32 29 3b c7 28 38 29 00  |..";.(142);.(8).|
00000060  7b 08 28 00 99 a6 31 33  29 3b 22 c2 1e 50 55 53  |{.(...13);"..PUS|
00000070  53 59 20 43 41 54 9c c2  22 00 a9 08 32 00 99 a6  |SY CAT.."...2...|
00000080  31 33 29 3b 22 ad c3 c3  c3 c3 c3 c3 c3 c3 c3 bd  |13);"...........|
00000090  22 3a 99 a6 31 32 29 3b  22 b0 c3 c3 c3 c3 c3 c3  |":..12);".......|
000000a0  c3 c3 c3 c3 c3 ae 22 00  ef 08 3c 00 99 a6 31 32  |......"...<...12|
000000b0  29 3b 22 c2 1e 48 49 47  48 20 53 43 4f 52 45 53  |);"..HIGH SCORES|
000000c0  9c c2 22 3a 99 22 c3 c3  c3 c3 c3 c3 c3 c3 c3 c3  |..":."..........|
000000d0  c3 c3 b1 c3 c3 c3 c3 c3  c3 c3 c3 c3 c3 c3 b1 c3  |................|
000000e0  c3 c3 c3 c3 c3 c3 c3 c3  c3 c3 c3 22 3b 00 28 09  |...........";.(.|
000000f0  46 00 99 22 c3 c3 c3 22  3a 81 4e b2 30 a4 39 3a  |F.."...":.N.0.9:|
00000100  97 37 38 31 2c 36 aa 4e  3a 97 37 38 32 2c 30 3a  |.781,6.N:.782,0:|
00000110  97 37 38 33 2c 30 3a 9e  36 35 35 32 30 3a 97 36  |.783,0:.65520:.6|
00000120  34 36 2c 4e aa 31 00 4c  09 50 00 99 48 4e 24 28  |46,N.1.L.P..HN$(|
00000130  4e 29 3a 97 37 38 32 2c  32 31 3a 9e 36 35 35 32  |N):.782,21:.6552|
00000140  30 3a 99 48 4e 28 4e 29  3a 82 00 6d 09 5a 00 97  |0:.HN(N):..m.Z..|
00000150  37 38 31 2c 31 36 3a 97  37 38 32 2c 30 3a 97 37  |781,16:.782,0:.7|
00000160  38 33 2c 30 3a 9e 36 35  35 32 30 00 a4 09 64 00  |83,0:.65520...d.|
00000170  99 22 9c c3 c3 c3 c3 c3  c3 c3 c3 c3 c3 c3 c3 c3  |."..............|
00000180  c3 c3 c3 c3 c3 c3 c3 c3  c3 c3 c3 c3 c3 c3 c3 c3  |................|
00000190  c3 c3 c3 c3 c3 c3 c3 c3  c3 c3 c3 11 22 3b a6 39  |............";.9|
000001a0  29 3b 00 c3 09 6e 00 99  22 57 52 49 54 54 45 4e  |);...n.."WRITTEN|
000001b0  20 42 59 20 44 4f 4d 49  4e 49 43 20 46 4f 52 44  | BY DOMINIC FORD|
000001c0  22 00 cd 09 78 00 99 3a  99 3a 99 00 ee 09 82 00  |"...x..:.:......|
000001d0  99 a6 31 30 29 3b 22 50  52 45 53 53 20 53 50 41  |..10);"PRESS SPA|
000001e0  43 45 20 54 4f 20 53 54  41 52 54 22 00 04 0a 8c  |CE TO START"....|
000001f0  00 a1 20 41 24 3a 8b 41  24 b3 b1 22 20 22 a7 31  |.. A$:.A$.." ".1|
00000200  34 30 00 35 0a 96 00 99  22 93 22 3a 81 58 b2 30  |40.5....".":.X.0|
00000210  a4 39 3a 81 59 b2 30 a4  39 3a 53 28 58 2c 59 29  |.9:.Y.0.9:S(X,Y)|
00000220  b2 30 3a 82 3a 82 3a 53  28 30 2c 30 29 b2 31 3a  |.0:.:.:S(0,0).1:|
00000230  46 b2 31 00 5f 0a a0 00  99 22 1f b0 c3 b2 c3 b2  |F.1._...."......|
00000240  c3 b2 c3 b2 c3 b2 c3 b2  c3 b2 c3 b2 c3 b2 c3 b2  |................|
00000250  c3 b2 c3 ae 22 3a 81 4c  b2 30 a4 31 30 00 9f 0a  |....":.L.0.10...|
00000260  aa 00 99 22 c2 a0 c2 a0  c2 a0 c2 a0 c2 a0 c2 a0  |..."............|
00000270  c2 a0 c2 a0 c2 a0 c2 a0  c2 a0 c2 a0 c2 22 3a 99  |.............":.|
00000280  22 ab c3 db c3 db c3 db  c3 db c3 db c3 db c3 db  |"...............|
00000290  c3 db c3 db c3 db c3 db  c3 b3 22 3a 82 00 de 0a  |..........":....|
000002a0  b4 00 99 22 c2 a0 c2 a0  c2 a0 c2 a0 c2 a0 c2 a0  |..."............|
000002b0  c2 a0 c2 a0 c2 a0 c2 a0  c2 a0 c2 a0 c2 22 3a 99  |.............":.|
000002c0  22 ad c3 b1 c3 b1 c3 b1  c3 b1 c3 b1 c3 b1 c3 b1  |"...............|
000002d0  c3 b1 c3 b1 c3 b1 c3 b1  c3 bd 22 3b 00 1e 0b d2  |..........";....|
000002e0  00 97 37 38 32 2c 32 36  3a 97 37 38 31 2c 30 3a  |..782,26:.781,0:|
000002f0  9e 36 35 35 32 30 3a 99  22 1c 53 43 4f 52 45 3a  |.65520:.".SCORE:|
00000300  11 11 9d 9d 9d 9d 9d 9d  46 55 45 4c 3a 11 11 9d  |........FUEL:...|
00000310  9d 9d 9d 9d 4c 49 56 45  53 3a 22 3b 00 5f 0b dc  |....LIVES:";._..|
00000320  00 99 22 11 11 9d 9d 9d  9d 9d 9d 54 49 4d 45 3a  |.."........TIME:|
00000330  11 11 9d 9d 9d 9d 9d 43  4f 52 45 3a 22 3a 58 b2  |.......CORE:":X.|
00000340  31 3a 59 b2 31 3a 54 b2  54 49 3a 46 b2 33 35 30  |1:Y.1:T.TI:F.350|
00000350  3a 4c b2 33 3a 4c 45 b2  31 3a 53 b2 30 00 79 0b  |:L.3:LE.1:S.0.y.|
00000360  e6 00 58 50 b2 58 3a 59  50 b2 59 3a 8d 31 30 32  |..XP.X:YP.Y:.102|
00000370  30 3a 99 22 1e d1 22 00  a7 0b f0 00 97 37 38 32  |0:.".."......782|
00000380  2c 33 32 3a 97 37 38 31  2c 30 3a 9e 36 35 35 32  |,32:.781,0:.6552|
00000390  30 3a 99 53 3a 97 37 38  31 2c 32 3a 9e 36 35 35  |0:.S:.781,2:.655|
000003a0  32 30 3a 99 46 00 d8 0b  fa 00 97 37 38 31 2c 34  |20:.F......781,4|
000003b0  3a 9e 36 35 35 32 30 3a  99 4c 3a 97 37 38 31 2c  |:.65520:.L:.781,|
000003c0  36 3a 9e 36 35 35 32 30  3a 99 b5 28 28 54 49 ab  |6:.65520:..((TI.|
000003d0  54 29 ad 36 30 29 00 ee  0b 04 01 97 37 38 31 2c  |T).60)......781,|
000003e0  38 3a 9e 36 35 35 32 30  3a 99 4c 45 00 32 0c e8  |8:.65520:.LE.2..|
000003f0  03 83 20 46 52 45 44 2c  31 30 2c 46 52 45 44 42  |.. FRED,10,FREDB|
00000400  2c 32 30 2c 46 52 45 44  43 2c 33 30 2c 46 52 45  |,20,FREDC,30,FRE|
00000410  44 44 2c 34 30 2c 46 52  45 44 45 2c 35 30 2c 46  |DD,40,FREDE,50,F|
00000420  52 45 44 46 2c 36 30 2c  46 52 45 44 47 2c 37 30  |REDF,60,FREDG,70|
00000430  00 54 0c f2 03 83 20 46  52 45 44 48 2c 38 30 2c  |.T.... FREDH,80,|
00000440  46 52 45 44 49 2c 39 30  2c 46 52 45 44 4a 2c 31  |FREDI,90,FREDJ,1|
00000450  30 30 00 7a 0c fc 03 97  37 38 32 2c 31 aa 58 50  |00.z....782,1.XP|
00000460  ac 32 3a 97 37 38 31 2c  32 35 ab 59 50 ac 32 3a  |.2:.781,25.YP.2:|
00000470  9e 36 35 35 32 30 3a 8e  00 00 00                 |.65520:....|
0000047b