home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
91xx
/
9101a.d64
/
sfx-edit
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
1KB
|
21 lines
0 PRINT"[147]"+CHR$(8):POKE650,128:POKE53280,0:POKE53281,0:S=54272:Q=255
1 FORZ=0TO28:POKES+Z,0:NEXTZ:Z=0:DIMZ(Q),R(Q):R(24)=15:POKES+24,R(24)
2 DATA5,4,30,30,33,0,240,12,8,30,30,33,0,240,10,12,30,30,33,0,240
3 PRINT"[150][169]BASIC SFX-EDITOR V2.0 BY: SASCHA*NAGIE[223][146]"
4 PRINT" [151]PRESS [152]F1 [155]FOR CHANGE A REGISTER."
5 PRINT" [151]PRESS [152]F3 [155]FOR SFX DEMOREGISTERS."
6 PRINT" [151]PRESS [152]F5 [155]FOR FILL ALL WITH ZERO."
7 FORI=23TO0STEP-1:POKES+I,R(I):NEXTI:POKES+4,R(4):POKES+11,R(11):POKES+18,R(18)
8 PRINT"[145][145] VOICE[150]1:[146] VOICE[153]2:[146] VOICE[154]3:[146]
9 [153]"":[129]I[178]0[164]6:[153]"POKERPRINT#"I"CMD#LIST"R(I)"CMD ":[130]I:[153]"":[129]I[178]7[164]13
10 [153],"POKERPRINT#"I;"CMD#LIST"R(I)"CMD ":[130]I:[153]"":[129]I[178]14[164]20
11 [153],,"POKERPRINT#"I"CMD#LIST"R(I)"CMD ":[130]I:[153]:[129]I[178]21[164]28
12 [153]"POKERPRINT#"I"CMD#LIST"R(I)"CMD ",:[130]I
13 [161]Y$:[139]Y$[178]"INPUT"[167][137]17
14 [139]Y$[178]"DIM"[167] [129]I[178]0[164]20:[135] R(I):[130]I:[140]:[137]7
15 [139]Y$[178]"READ"[167][129]I[178]0[164]28:R(I)[178]0:[130]I:R(24)[178]15:[137]7
16 [137]7
17 [151]19,1:[133]"R]#";Z:[151]19,0:[139]Z[179]0[176]Z[177]28[167][137]17
18 [151]19,1:[133]":";A:[151]19,0:[139]A[179]0[176]A[177]255[167][137] 18
19 R(Z)[178]A:[151]S[170]Z,R(Z):[137] 7