home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er Special 39
/
64er_Magazin_Sonderheft_39_19xx_Markt__Technik_de_Side_A.d64
/
inputinstall
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
1KB
|
41 lines
100 rem hi-eddi maus-installation
110 rem written in january 1989 by
120 rem
130 rem oliver stiller
140 rem nachtigallenstr. 3
150 rem 5000 koeln 90
160 rem tel. 02203/68954
170 rem
180 rem call or write only in order
190 rem to exchange graphics, ideas
200 rem or routines. game-swappers
210 rem may send their disks (they
220 rem will be formatted; i allways
230 rem need empty disks).
240 rem
250 :
270 a=a+1
280 if a=1 then load"mausinst.c000",8,1
290 if a=2 then load"hi-exe",8,1
300 :
320 poke 46,32:clr
330 print"[147] hi-eddi maus/joysticktreiber auswahl ";
340 print "oliver stiller/masters' design group '89"
360 close1:open 1,8,15
380 if peek(174)+256*peek(175)=8192 then 490
390 :
400 input "maustreiber aktivieren (j/n) j[157][157][157]";a$
410 if a$<>"j" then end
420 :
440 print#1,"s:bak/hi-exe.joy"
450 print#1,"r:bak/hi-exe.joy=hi-exe"
460 sys 49152
470 poke 44,13:poke43,0:poke 45,0:poke 46,32:save "hi-exe",8:sys 64738
480 :
490 input "joysticktreiber aktivieren (j/n) j[157][157][157]";a$
500 if a$<>"j" then end
510 :
530 print#1,"s:hi-exe"
540 print#1,"r:hi-exe=bak/hi-exe.joy"
550 sys 64738