Home » Personal collection » Commodore disks » disk54b_sound_master_64.d64 » primes
primes
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 » disk54b_sound_master_64.d64 |
Filename: | primes |
Read OK: | ✔ |
File size: | 067A bytes |
Load address: | 3209 |
Exec address: | 0000 |
File contents
23 . 8224 <stop>FN<stop>NEW ?ILLEGAL NEXT LINE ADDRESS
�� �� � �� ��숱 ������������������ ���� �����������.BYTE _3S .BYTE$ _ �� �ϥ �ϩυ�Ӆ V�HJJJJ LDA #157JSR OUTDO m error near $xxxx ��������` 0L8i(�8�*:i(00JJJ0JL8 8)(�(� 8)(�(� 8)(�(� 8)(�(� 8)(�(� 8)(�(� 8�.$ 80�( �($�8�(#�80�("�(��8�(`�(��(��8�(�i*�(��8�ȑ(�0�(��*0�* 0 L8�(��8 �(�i*�(�0�8�(��(��8�8�(��(��80 �(�0 L8`�(��8 �(��8 �(��8 �(�i*�(�0�8 �(��8 �(�.(�.(�.(��80ʍ(��(ƍ(��8�(��(��(��(�8�(�.(�0.(�.(�.(�0.(�L8�8�.(�.(�0.(��((��(��(��(��???�(��(��(�ȍ(��(��* �*�(��(�0�* �(��(�(�0�* L8�(%�($�(#�(��(��(��)�)�(��(��( �(��(�(��(�) �(��(�("0�(�0)G�) ��---------------------------------------�- ��Ԡ�����Š���Š����Š������� -�---------------------------------------�TURBO(((Ń�������������������Ń��Ń��������������Ń����Ń�Ń����������Ã�������Ã����������Ń�������Ã�����ŃŃ�������������Ń���Ń���������������������Á��Ã����� `�$�tΈNЪ`�������;0 �;��:��� ������:�;������������� ������:�;����<���<�� �� ����GETPRIME�GETPRM�NOTPRIM�COD�DIVID�DIVLOO�DIVENTR�DIVLOOP�TOOBI�NOTFACTO�NEX�CARRYO�PRIM�NEXTFACTO�STOR�EN�RE�OUTD�PRINH�LF�PRINL�NOTLE�OTD�AITU�WAITEN�WAITLOO�TX�BYT��D�WAVEFOR�A�S�VOLUM�V2DE�V3DE�V4DE�VDEC�T�VDECE�MSTO�IRQBAC�IR�TIM�IRQBA�IRQRO�MSTAR�PROLO�NOROL�INVE�VECT�STAVECT�VECT�MP�CLIC�X�Y�XP�CONCHEC�LEFT�LK�RIGHT�UP�UPK�DOWN�DK�UP�UJ�DOWN�DJ�LEFT�RIGHT�LJ�RJ�CJC�LEF�RIGH�RK�U�DOW�NOTF�FI�CONTRO�NOT0�HOU�NHGLAS�QTR�SCRO�COLLO�SCRLO�F�SCROF�OUTD�INFILO�DISPLA�XPON�AD�DLO�NEXT�NROL�DISPNOT�PITC�T�TYP�O
..W@V@V@@@@@I..@.@..@.F....B@@@@..C.E.[.[.[.[.[.[.[.[.[.[.[.[...@.L.D.R.@.C..K..H.......F.byte C.3s F.byte$ B.T C.C.@ ...B .....C...B v.hjjjj lda #157jsr outdo M ERROR NEAR $XXXX@....B....C.A@0Ul8QI(GX.8U.*:I(00TXjjj0Rjl8B 8T)(O.(. 8R)(..(. 8T)(O.(. 8R)(..(. 8T)(O.(. 8R)(..(. 8Q..$ 8Q0P.(M.($.8P.(#.8P0O.(".(..8O.(..(..(..8O.(.I*CX.(..8N...(.0N.(..*C0L.*@0Ml8D.(..8M.(.I*C.(.0KX.8L.(..(..8K.8L.(..(..8K0I.(.0Jl8C..(..8J.(..8J.(..8J.(.I*B.(.0BX.8I.(..8I.(..(..(..(..8G0H..(..(..(..8H.(..(..(..(.8.(..(.0F.(..(..(.0G.(.l8F.8E..(..(.0E.(..(..(..(..(..(..???.(..(..(...(..(..*@.*Y.(..(.0D.*@.(..(X.(.0C.*@l8B.(%.($.(#.(..(..(..)BX.)AX.(..(..(@.(..(X.(..(C.)@X.(..(C.("0A.(B.0QE)g.F)@J..---------------------------------------.- ............................... -.---------------------------------------.turbo(((ADFA...........................................................................................................................................................@@@@@@@@@@@@@@@@@.F.$.T£C..nT...........;0J.;.B.:.N.L. M......:.;...............PM......:.;....<...F.<.L.J..M....getprime.getprm.notprim.cod.divid.divloo.diventr.divloop.toobi.notfacto.nex.carryo.prim.nextfacto.stor.en.re.outd.prinh.lf.prinl.notle.otd.aitu.waiten.waitloo.tx.byt..d.wavefor.a.s.volum.v2de.v3de.v4de.vdec.t.vdece.msto.irqbac.ir.tim.irqba.irqro.mstar.prolo.norol.inve.vect.stavect.vect.mp.clic.x.y.xp.conchec.left.lk.right.up.upk.down.dk.up.uj.down.dj.left.right.lj.rj.cjc.lef.righ.rk.u.dow.notf.fi.contro.not0.hou.nhglas.qtr.scro.collo.scrlo.f.scrof.outd.infilo.displa.xpon.ad.dlo.next.nrol.dispnot.pitc.t.typ.o
00000000 8f 83 17 00 16 00 16 00 00 00 00 00 09 ff ff 00 |................| 00000010 b2 00 89 8d 00 a4 06 e7 ec 88 b1 02 00 00 00 00 |................| 00000020 f8 c6 03 c6 05 a5 1b 80 1b 80 1b 80 1b 80 1b 80 |................| 00000030 1b 80 1b 80 1b 80 1b 80 1b 80 1b 80 1b 80 aa a0 |................| 00000040 00 b1 0c d1 04 d0 12 c9 00 d0 03 8a f0 0b c8 f0 |................| 00000050 08 8a f0 ed ca d0 ea a9 06 2e 42 59 54 45 20 20 |..........BYTE | 00000060 20 20 20 20 20 20 20 20 03 5f 33 53 20 20 20 20 | ._3S | 00000070 20 20 20 20 20 20 20 20 06 2e 42 59 54 45 24 20 | ..BYTE$ | 00000080 20 20 20 20 20 20 20 20 02 5f 14 20 20 20 20 20 | ._. | 00000090 20 20 20 20 20 20 20 20 03 a5 03 a2 00 20 b2 cf | ..... ..| 000000a0 a5 02 20 b2 cf a9 cf 85 03 a9 d3 85 02 20 56 c2 |.. .......... V.| 000000b0 48 4a 4a 4a 4a 20 20 20 20 20 20 20 20 20 20 4c |HJJJJ L| 000000c0 44 41 20 23 31 35 37 4a 53 52 20 4f 55 54 44 4f |DA #157JSR OUTDO| 000000d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 20 | m | 000000e0 65 72 72 6f 72 20 6e 65 61 72 20 24 78 78 78 78 |error near $xxxx| 000000f0 00 ad a7 9e 85 02 ad a8 9e 85 03 60 01 00 30 15 |...........`..0.| 00000100 4c 38 11 69 28 07 18 90 38 15 c9 2a 3a 69 28 30 |L8.i(...8..*:i(0| 00000110 30 14 18 4a 4a 4a 30 12 4a 4c 38 02 20 38 14 29 |0..JJJ0.JL8. 8.)| 00000120 28 0f ad 28 f7 20 38 12 29 28 f0 ad 28 f7 20 38 |(..(. 8.)(..(. 8| 00000130 14 29 28 0f ad 28 f8 20 38 12 29 28 f0 ad 28 f8 |.)(..(. 8.)(..(.| 00000140 20 38 14 29 28 0f ad 28 f9 20 38 12 29 28 f0 ad | 8.)(..(. 8.)(..| 00000150 28 f9 20 38 11 a9 2e 24 20 38 11 30 10 a9 28 0d |(. 8...$ 8.0..(.| 00000160 ee 28 24 d0 38 10 ee 28 23 d0 38 10 30 0f ee 28 |.($.8..(#.8.0..(| 00000170 22 ce 28 fc d0 38 0f c9 28 60 ad 28 fc ee 28 fc |".(..8..(`.(..(.| 00000180 90 38 0f 8d 28 fb 69 2a 03 18 ad 28 fb d0 38 0e |.8..(.i*...(..8.| 00000190 ca c8 91 28 fb 30 0e b9 28 f7 a2 2a 03 30 0c a0 |...(.0..(..*.0..| 000001a0 2a 00 30 0d 4c 38 04 ee 28 b5 90 38 0d 8d 28 b4 |*.0.L8..(..8..(.| 000001b0 69 2a 03 ad 28 b4 30 0b 18 90 38 0c cd 28 b6 ad |i*..(.0...8..(..| 000001c0 28 c0 d0 38 0b 90 38 0c cd 28 b7 ad 28 c1 d0 38 |(..8..8..(..(..8| 000001d0 0b 30 09 ad 28 c2 30 0a 4c 38 03 60 ee 28 fa d0 |.0..(.0.L8.`.(..| 000001e0 38 0a ee 28 f9 d0 38 0a ee 28 f8 90 38 0a 8d 28 |8..(..8..(..8..(| 000001f0 f7 69 2a 02 ad 28 f7 30 02 18 d0 38 09 ad 28 bd |.i*..(.0...8..(.| 00000200 d0 38 09 ad 28 bc 2e 28 c2 2e 28 c1 2e 28 c0 d0 |.8..(..(..(..(..| 00000210 38 07 30 08 ca 8d 28 bc ad 28 c6 8d 28 bd 90 38 |8.0...(..(..(..8| 00000220 08 ed 28 b7 ad 28 bd 8d 28 c6 ed 28 b6 38 ad 28 |..(..(..(..(.8.(| 00000230 bc 2e 28 bd 30 06 2e 28 bc 2e 28 c2 2e 28 c1 30 |..(.0..(..(..(.0| 00000240 07 2e 28 c0 4c 38 06 90 38 05 ca 2e 28 c2 2e 28 |..(.L8..8...(..(| 00000250 c1 30 05 2e 28 c0 8d 28 c2 ad 28 f9 8d 28 c1 ad |.0..(..(..(..(..| 00000260 28 f8 8d 28 c0 97 3f 3f 3f ad 28 f7 8d 28 b7 b1 |(..(..???.(..(..| 00000270 28 b4 c8 8d 28 b6 b1 28 b4 a0 2a 00 a2 2a 19 8d |(...(..(..*..*..| 00000280 28 bd 8d 28 bc 30 04 a9 2a 00 8d 28 b5 a9 28 18 |(..(.0..*..(..(.| 00000290 8d 28 b4 30 03 a9 2a 00 4c 38 02 8d 28 25 8d 28 |.(.0..*.L8..(%.(| 000002a0 24 8d 28 23 8d 28 fa 8d 28 f9 8d 28 f8 8d 29 02 |$.(#.(..(..(..).| 000002b0 18 8d 29 01 18 8d 28 fe 8d 28 fd a9 28 00 8d 28 |..)...(..(..(..(| 000002c0 fc a9 28 18 8d 28 fb a9 28 03 8d 29 00 18 8d 28 |..(..(..(..)...(| 000002d0 f7 a9 28 03 8d 28 22 30 01 a9 28 02 80 30 11 05 |..(..("0..(..0..| 000002e0 29 47 ab 06 29 00 0a 80 80 2d 2d 2d 2d 2d 2d 2d |)G..)....-------| 000002f0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| * 00000310 80 2d 20 20 20 c6 c1 d3 d4 a0 cd c1 c3 c8 c9 ce |.- ...........| 00000320 c5 a0 c3 cf c4 c5 a0 d0 d2 c9 cd c5 a0 ce d5 cd |................| 00000330 c2 c5 d2 d3 20 20 20 2d 80 2d 2d 2d 2d 2d 2d 2d |.... -.-------| 00000340 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| * 00000360 bb 54 55 52 42 4f 28 28 28 01 04 06 01 c5 83 83 |.TURBO(((.......| 00000370 83 84 83 83 83 83 83 83 83 84 84 83 83 83 83 83 |................| 00000380 83 83 c5 83 83 83 c5 83 83 83 83 83 83 81 83 83 |................| 00000390 83 87 83 83 83 83 c5 83 83 81 83 83 c5 83 83 c5 |................| 000003a0 83 83 81 83 83 83 83 83 83 83 83 c3 83 83 83 83 |................| 000003b0 83 83 83 83 c3 83 83 83 83 83 83 83 83 83 81 c5 |................| 000003c0 c5 83 83 83 83 83 83 83 83 c3 83 83 83 83 83 c5 |................| 000003d0 c5 83 c5 83 81 81 83 83 81 83 83 83 83 83 83 83 |................| 000003e0 83 c5 83 83 83 83 c5 83 83 83 83 83 83 83 83 83 |................| 000003f0 83 83 83 83 83 83 83 83 83 83 83 83 83 c3 81 81 |................| 00000400 81 c3 83 83 83 81 83 c5 00 00 00 00 00 00 00 00 |................| 00000410 00 00 00 00 00 00 00 00 00 60 06 9b 24 d2 74 1c |.........`..$.t.| 00000420 03 ce 88 4e 14 d0 aa 7f 60 ac ba 84 ae bb 84 a5 |...N....`.......| 00000430 3b 30 0a e4 3b d0 02 c4 3a 90 0e f0 0c a9 20 0d |;0..;...:..... .| 00000440 b6 84 8d b6 84 84 3a 86 3b ec ed ed ee ee ef f0 |......:.;.......| 00000450 f1 f1 f2 f3 f4 f4 f5 f6 10 0d b6 84 8d b6 84 84 |................| 00000460 3a 86 3b ac b8 84 a5 3c c9 e4 b0 06 c4 3c 90 0c |:.;....<.....<..| 00000470 f0 0a a9 80 0d b6 84 8d b6 47 45 54 50 52 49 4d |.........GETPRIM| 00000480 45 d3 47 45 54 50 52 4d d3 4e 4f 54 50 52 49 4d |E.GETPRM.NOTPRIM| 00000490 c5 43 4f 44 c5 44 49 56 49 44 c5 44 49 56 4c 4f |.COD.DIVID.DIVLO| 000004a0 4f d0 44 49 56 45 4e 54 52 d9 44 49 56 4c 4f 4f |O.DIVENTR.DIVLOO| 000004b0 50 b2 54 4f 4f 42 49 c7 4e 4f 54 46 41 43 54 4f |P.TOOBI.NOTFACTO| 000004c0 d2 4e 45 58 d4 43 41 52 52 59 4f ce 50 52 49 4d |.NEX.CARRYO.PRIM| 000004d0 c5 4e 45 58 54 46 41 43 54 4f d2 53 54 4f 52 c5 |.NEXTFACTO.STOR.| 000004e0 45 4e c4 52 45 d4 4f 55 54 44 cf 50 52 49 4e 48 |EN.RE.OUTD.PRINH| 000004f0 c9 4c 46 c1 50 52 49 4e 4c cf 4e 4f 54 4c 45 d4 |.LF.PRINL.NOTLE.| 00000500 4f 54 44 cf 41 49 54 55 d0 57 41 49 54 45 4e c4 |OTD.AITU.WAITEN.| 00000510 57 41 49 54 4c 4f 4f d0 54 58 d4 42 59 54 c5 c6 |WAITLOO.TX.BYT..| 00000520 44 c6 57 41 56 45 46 4f 52 cd 41 c4 53 d2 56 4f |D.WAVEFOR.A.S.VO| 00000530 4c 55 4d c5 56 32 44 45 c3 56 33 44 45 c3 56 34 |LUM.V2DE.V3DE.V4| 00000540 44 45 c3 56 44 45 43 c5 54 d3 56 44 45 43 45 c2 |DE.VDEC.T.VDECE.| 00000550 4d 53 54 4f d0 49 52 51 42 41 43 cb 49 52 d1 54 |MSTO.IRQBAC.IR.T| 00000560 49 4d c5 49 52 51 42 41 c3 49 52 51 52 4f cd 4d |IM.IRQBA.IRQRO.M| 00000570 53 54 41 52 d4 50 52 4f 4c 4f d0 4e 4f 52 4f 4c |STAR.PROLO.NOROL| 00000580 cc 49 4e 56 45 c3 56 45 43 54 c1 53 54 41 56 45 |.INVE.VECT.STAVE| 00000590 43 54 c2 56 45 43 54 c2 4d 50 d6 43 4c 49 43 cb |CT.VECT.MP.CLIC.| 000005a0 58 d0 59 d0 58 50 c2 43 4f 4e 43 48 45 43 cb 4c |X.Y.XP.CONCHEC.L| 000005b0 45 46 54 cb 4c 4b c3 52 49 47 48 54 cb 55 50 cb |EFT.LK.RIGHT.UP.| 000005c0 55 50 4b c3 44 4f 57 4e cb 44 4b c3 55 50 ca 55 |UPK.DOWN.DK.UP.U| 000005d0 4a c3 44 4f 57 4e ca 44 4a c3 4c 45 46 54 ca 52 |J.DOWN.DJ.LEFT.R| 000005e0 49 47 48 54 ca 4c 4a c3 52 4a c3 43 4a 43 c8 4c |IGHT.LJ.RJ.CJC.L| 000005f0 45 46 d4 52 49 47 48 d4 52 4b c3 55 d0 44 4f 57 |EF.RIGH.RK.U.DOW| 00000600 ce 4e 4f 54 46 c6 46 49 ce 43 4f 4e 54 52 4f cc |.NOTF.FI.CONTRO.| 00000610 4e 4f 54 30 b0 48 4f 55 d2 4e 48 47 4c 41 53 d3 |NOT0.HOU.NHGLAS.| 00000620 51 54 52 cf 53 43 52 4f ce 43 4f 4c 4c 4f d0 53 |QTR.SCRO.COLLO.S| 00000630 43 52 4c 4f d0 46 c6 53 43 52 4f 46 c6 4f 55 54 |CRLO.F.SCROF.OUT| 00000640 44 cf 49 4e 46 49 4c 4f d0 44 49 53 50 4c 41 d9 |D.INFILO.DISPLA.| 00000650 58 50 4f 4e d3 41 44 cc 44 4c 4f d0 4e 45 58 54 |XPON.AD.DLO.NEXT| 00000660 c4 4e 52 4f 4c c4 44 49 53 50 4e 4f 54 c5 50 49 |.NROL.DISPNOT.PI| 00000670 54 43 c8 54 d9 54 59 50 c5 4f |TC.T.TYP.O| 0000067a