08.04.2013 Views

Your Commodore - Commodore Is Awesome

Your Commodore - Commodore Is Awesome

Your Commodore - Commodore Is Awesome

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Playing all sounds in<br />

memory<br />

Doing this saves quite a lot of time.<br />

What it does is play the sounds zero<br />

through to seven in order, without<br />

going to the OPTIONS function eight<br />

times!<br />

Test<br />

You can use this function to get a<br />

sample ready or play the tape just to<br />

listen to it.<br />

To get to this, go to the TEST function<br />

and press RETURN<br />

Loading and saving sounds<br />

Keep note of the starting blocks<br />

and the ending blocks of the sounds<br />

that you want to save.<br />

If you have a datasette it's not<br />

really worth saving your sample<br />

(unless you think its brilliant!) its just<br />

like loading a commercial program!<br />

You cannot save or load a sample<br />

in the program so you'll have to exit to<br />

TEDMON.<br />

To get to TEDMON, you have to<br />

PROGRAM: RELOCATE<br />

10P0RE44,25:POKE6400,0:CLR:NEW<br />

20<br />

30 REM*************** ***** ******<br />

*******<br />

40 REM* RUN THIS PROGRAM BEFORE<br />

YOU *<br />

50 REM* RUN EITHER OF THE LOADER<br />

S. *<br />

60 REM* IF YOU DO NOT THE PROGRA<br />

MS *<br />

70 REM* WILL NOT WORK CORRECTLY<br />

80 REM<br />

*******<br />

I<br />

P10PRINT"[CLEARNORKING<br />

HARD....<br />

R":L-100:AD-4096<br />

O2OCK-0:FORK-0T07:READM$:M-DEC(M<br />

$):POKEADA-X,MCK-CKtM<br />

G<br />

10NEXTX:READCH$:IFDEC(CH$)()CKT<br />

RHENPRINT"DATA<br />

ERROR 'ATLINE:"L:E<br />

AND<br />

40AD-AD.8:L-L.5:IFL-1085 THENPR<br />

M<br />

INT"DATA ENTERED CORRECTLEY.":GO<br />

: T060<br />

S50GOTO<br />

20<br />

60FORM-1T01000:NEXTM:SCNCLR<br />

A<br />

65TD$-"01":INPUT"ARE YOU USING<br />

MTAPE<br />

OR DISC? (T/D1";TX$:IFTX$-"<br />

PD"THENTD$-"08"<br />

L 70SCNCLR:CHAR1,0,3,"M[SW:CHAR<br />

1,0,9,"S"4-CHR$(34).0SAMPLER"1-CHR<br />

E<br />

$(1404-","+TD$<br />

R 80PRINT",1001,1630(HOMEI":POKE1<br />

F319,13:POKE1320,13:POKE1321,88P<br />

0KE1322,13:P0KE239,4<br />

1<br />

85P0KE4115,VAL(TD$)<br />

190END<br />

1000ATA 00,011,10,0A,00,9E,34,31<br />

,0128<br />

105DATA 31,32,00,00,00,53,43,00<br />

,00F9<br />

110DATA A9,00,A2,08,A0,01,20,BA<br />

,02CE<br />

115DATA FF,A9,04,A2,2A,A0,10,20<br />

C16 &PLUS/4<br />

HOLD DOWN RUN/STOP and<br />

press RESET on the side of the computer,<br />

let go of the RESET button<br />

while still holding down RUN/STOP.<br />

The computer will now exit to<br />

TEDMON (you can let go of<br />

RUN/STOP now!)<br />

If you want to save sound zero<br />

type:<br />

M 0060 0060<br />

The computer should now say:<br />

0060 17 30 xx xx xx xx xx xx .0<br />

or something! Please ignore the xx's<br />

they mean other sounds.<br />

Now type:<br />

S"sample name",08,1700.3000<br />

Or to tape:<br />

S"sample name",01,1700,3000<br />

Here is a table for saving each sound<br />

number:<br />

,0348<br />

1200ATA BD,FF,A9,00,20,D5,FF,4C<br />

,04A5<br />

125DATA 35,15,53,43,52,4E,A9,92<br />

,02BB<br />

130DATA 85,D8,A9,0C,85,D9,A2,00<br />

,0412<br />

135DATA A0,08,81,D8,49,80,91,D8<br />

,0466<br />

1400ATA 88,D0,F7,20,91,10,C9,91<br />

,046A<br />

145DATA F0,08,C9,11,F0,1F,C9,0D<br />

,03BA<br />

150DATA F0,47,4C,43,10,E400,F0<br />

,03A6<br />

155DATA EA,20,85,10,38,A5,D8,E9<br />

,043D<br />

160DATA 28,85,08,A5,119,E9,00,85<br />

,0471<br />

165DATA 09,CA,4C,38,10,E0,09,F0<br />

,0410<br />

1700ATA 02,20,85,10,18,A5,D8,69<br />

,0385<br />

175DATA 28,85,D8,A5,D9,69,00,85<br />

,03F1<br />

1800ATA 09,E8,4C,38,10,A0,08,B1<br />

,0381<br />

185DATA 1)8,49,80,91,08,88,DO,F7<br />

,0559<br />

190DATA 60,86,FF,20,E4,FF,A6,FF<br />

,058D<br />

195DATA 60,86,DB,18,8A,65,DR,65<br />

,0408<br />

200DATA D8,69,A9,81),A7,10,4L,1L<br />

,0438<br />

205DATA 10,4C,76,11,4C,8E,11,4C<br />

,021A<br />

210DA1'A CD,11,4C,EA,11,4C,06,12<br />

,0289<br />

215DATA 4C,OF,12,4C,FD,12,4C,98<br />

,02AC<br />

2200ATA 15,4C,A9,12,4C,76,12,A9<br />

,0299<br />

225DATA C7,80,12,FF,A9,FE,80,OE<br />

,04A7<br />

2300A1A FF,60,A0,08,81,D8,49,80<br />

,045C<br />

235DATA 91,D8,88,00,F7,A2,25,A9<br />

,0528<br />

2400ATA 20,9D,20,0F,CA,00,FA,A0<br />

,0420<br />

245DATA 08,81,D8,99,20,0F,88,D0<br />

,03B4<br />

YOUR COMMODORE november 1986:27<br />

SOUND NUMBER<br />

0<br />

2<br />

3<br />

4<br />

5<br />

6<br />

7<br />

Loading<br />

YOU TYPE<br />

M 0060 0060<br />

M 0062 0062<br />

M 0064 0064<br />

M 0066 0066<br />

M 0068 0068<br />

M 006A 006A<br />

M 006C 006C<br />

M 006E 006E<br />

Load the SAMPLER (from basic)<br />

Load the samples that you wish by<br />

typing:<br />

LOAD "sample name",8,I (for disk)<br />

LOAD "sample name",1,1 (for<br />

cassette)<br />

When you have loaded all the<br />

samples type:<br />

RUN<br />

The screen will now load and off<br />

you go!<br />

2500A1A F8,60,A5,DA,18,20,C2,11<br />

,03E2<br />

255DATA 115,60,85,09,A9,00,85,D8<br />

,O479<br />

260DATA 115,61,85,DC,60,A5,D9,48<br />

265DA1A A5,DC,85,D9,68,85,DC,60<br />

,0508<br />

270DATA F0,04,A9,15,D0.02,A9,00<br />

,032D<br />

275DA1'A 8D,11,FF,60,20,90,12,20<br />

,02DF<br />

2800A1A C7,10,A0,00,61,D8,A6,DD<br />

,O483<br />

285DATA 48,29,80,20,10,11,68,2A<br />

,O1C4<br />

2900ATA CA,D0,F5,20,FA,15,C8,D0<br />

,0556<br />

295DATA Eg,20,53,15,C5,DC,90,E4<br />

)<br />

0<br />

3000ATA 60,EA,EA,EA,20,E4,FF,F0<br />

,0611<br />

4305DATA<br />

F13,18,C9,30,90,F6,C5,DE<br />

8,0535<br />

8310DATA<br />

110,F2,60,A2,00,A9,17,95<br />

,03F9<br />

315DATA 60,A9,3E,95,61,E8,E8,E0<br />

,O4ED<br />

3200A1A 11,90,F2,A9,00,85,DA,A9<br />

,04/44<br />

325DATA 01,85,DF,A9.3F,85,DC,A9<br />

,O457<br />

3300A1A 09,85,DD,4C,BC,11,20,D2<br />

,0376<br />

335DA1A 10,20,F2,10,A9,3A,85,DE.<br />

,0378<br />

3400ATA 20,44,11,60,3E,OC,38,E9<br />

,026D<br />

345DATA 30,85,DD,4C,98,12,20,D2.<br />

,037D<br />

350DATA 10,20,90,12,20,05,11,A0<br />

,01A8<br />

355DATA FF,A6,D0,111,D8,48,29,01<br />

,01.17D<br />

360DATA 20,10,11,68,6A,CA,DO,F5<br />

,03A2<br />

365DATA 88,DO,EE,38,A5,D9,E9,01<br />

,O4E6<br />

370DATA 85,D9,18,C5,DC,110,E2,4C<br />

,O4F5<br />

375DATA 913,12,EA,EA,20,C7,10,4C<br />

,O3C4<br />

380DATA 913,12,65,DA,AA,C9,11,130

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!