home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Dark Star 7
/
Dark_Star_07_1996_-_de_Side_A.d64
/
imp.mission
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
6KB
|
180 lines
1 poke 775,199
10 poke53281,1:poke53280,1:print"[147]"
20 print"[156][213][192][192][192][192][192][192][192][192][192][192][201]"
30 print"[221]efzet-soft[156][221]"
40 print"[202][192][192][192][192][192][192][192][192][192][192][203]":gosub5000:fort=1to2000:next:print"[147]"
50 print"[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
51 print"[145][221] [221]"
52 print"[145][221] [178] [178] [178] [178][192][201][213][192][201][213][192][201][213][192][201] [178] [178][192][201] [178] [178][192][192] [221] "
53 print"[145][221] [221] [221][205][206][221] [171][192][203][221] [221][202][192][201][202][192][201] [221] [171][192][177][201] [221] [171][192] [221] "
54 print"[145][221] [221] [221] [221] [221] [221] [221] [221] [221] [221] [221] [221] [221] [221] [221] "
55 print"[145][221] [177] [177] [177] [177] [202][192][203][202][192][203][202][192][203] [177] [177][192][192][203] [177][192][192] [177][192][192] [221] "
56 print"[145][221] [221]"
57 print"[145][221] [221]"
58 print"[145][221] [178] [178] [178] [213][192][201][213][192][201] [178] [213][192][201] [178] [178] [221]"
59 print"[145][221] [221][205][206][221] [221] [202][192][201][202][192][201] [221] [221] [221] [221][205] [221] [221]"
60 print"[145][221] [221] [221] [221] [221] [221] [221] [221] [221] [221] [205][221] [221]"
61 print"[145][221] [177] [177] [177] [202][192][203][202][192][203] [177] [202][192][203] [177] [177] [221]"
62 print"[145][221] [221]"
63 print"[145][173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
64 print
65 print"[144] a n l e i t u n g":print:print
110 l1=54272:l2=54279:l3=54286
120 h1=l1+1:h2=l2+1:h3=l3+1
130 v1=l1+4:v2=l2+4:v3=l3+4
140 poke 54296,15
150 poke v1+1,9:poke v2+2,0
160 poke v2+1,36:poke v2+2,36
170 poke v3+1,18:poke v3+2,170
180 t=ti
200 poke v1,16:poke v2,32:poke v3,16
210 read s:if s=0 goto 290
220 read x1,y1,x2,y2,x3,y3
230 if x1 then poke h1,x1:poke l1,y1:poke v1,17
240 if x2 then poke h2,x2:poke l2,y2:poke v2,33
250 if x3 then poke h3,x3:poke l3,y3:poke v3,17
260 t=t+s
270 if t>ti goto 270
280 goto 200
290 forj=l1 to 54296:poke j,0:next j
300 data 10,51,97,0,0,0,0
310 data 10,43,52,0,0,0,0
320 data 20,34,75,21,154,8,147
330 data 20,34,75,25,177,0,0
340 data 10,34,75,17,37,6,108
350 data 10,38,126,0,0,0,0
360 data 10,43,52,25,177,0,0
370 data 10,45,198,0,0,0,0
400 data 20,51,97,21,154,8,147
410 data 20,51,97,25,177,0,0
420 data 20,51,97,17,37,9,159
430 data 20,43,52,25,177,10,205
440 data 20,57,172,22,227,11,114
450 data 20,57,172,34,75,0,0
460 data 20,57,172,28,214,8,147
470 data 10,0,0,34,75,0,0
480 data 10,51,97,0,0,0,0
500 data 20,57,172,22,227,11,114
510 data 10,0,0,34,75,0,0
520 data 10,51,97,0,0,0,0
530 data 10,57,172,28,214,10,205
540 data 10,64,188,0,0,0,0
550 data 10,68,149,34,75,9,159
560 data 10,76,252,0,0,0,0
600 data 20,86,105,21,154,8,147
610 data 20,0,0,25,177,0,0
620 data 20,0,0,17,37,6,108
630 data 10,68,149,25,177,0,0
640 data 10,51,97,0,0,0,0
650 data 20,68,149,21,154,8,147
660 data 20,0,0,25,177,0,0
670 data 20,0,0,17,37,8,23
680 data 10,51,97,25,177,7,53
690 data 10,43,52,0,0,0,0
700 data 20,51,97,22,227,6,108
710 data 20,0,0,25,177,0,0
720 data 20,0,0,19,63,9,159
730 data 10,38,126,25,177,0,0
740 data 10,43,100,0,0,0,0
750 data 20,34,75,21,154,8,147
760 data 20,0,0,25,177,6,108
770 data 20,0,0,21,154,4,73
780 data 20,0,0,0,0,0,0
790 data 0
800 fort=1to500:nextt:gosub5000
801 print" (c) f.z. 1987 ":fort=1to500:nextt:gosub5000
802 print"[147]":poke53280,0:poke53281,0
803 print"wie unmoeglich die aufgabe ist,":print
804 print"die mann zu erfuellen hat,muss jeder":print
805 print"spieler fuer sich selbst herausfinden.":print:print:print
806 print"schnell langweilig wird dieses spiel":print
807 print" bestimmt nicht."
809 gosub4000
810 gosub5000:print"[147][178][192][201]"
811 print"[221] [221]"
812 print"[221] [221]
813 [153]">tan(NULL)er beruechtigte elvin droht die
814 print"weltbevoelkerung mit atomwaffen zu"
815 print"vernichten.als mitglied der"
816 print"anti-computer-terroristen-groppe sollen"
817 print"sie elvin ausschalten.sie muessen
818 [153]"einen weg durch die raume und tunnel
819 print"seines unterirdischen hauptquartiers
820 [153]"finden und dabei die roboterwachen des"
821 [153]"wahnsinnigen verbrechers ueberlisten."
822 [153]"sechs stunden stehen ihnen zur ver-
823 print"fuegung.aber vorsicht!"
824 print"mit jedem 'ausfall' der spielfigur"
825 print"verlieren sie zehn minuten!":print
826 print"[159]die zeit wird schnell knapp.":print
827 print"suchen sie nach hinweisen,um das "
828 print"passwort zu bekommen,mit dem sie bis
829 [153]"zu elvins kontrollraum gelangen.":[141]4000
833 [153]"loadsie muessen schneller als die wachen"
834 [153]"sein,sie ueberspringen oder sie mit ge-"
835 [153]"fundenen passworten (zzz) fuer kurze "
836 [153]"zeit ausser kraft setzen.bei jedem"
837 [153]"neuen versuch werden der aufbau der"
838 [153]"raeume und die faehigkeiten der roboter-"
839 [153]"onwachen geaendert.":[153]
840 [153]"war ein raum beim letzten versuch noch"
841 [153]"leicht zu bewaeltigen,ist er villeicht"
842 [153]"dieses mal kaum noch zu durchqueren.":[153]
843 [153]"openimpossible mission verfuegt ueber eine"
844 [153]"eingebaute sprachausgabe.gleich am an-"
845 [153]"fang werden sie von der stimme elvins"
846 [153]"begruesst.zu diesem zeitpunkt scheint"
847 [153]"er sich noch keine allzu grossen sorgen"
848 [153]"ueber ihr erscheinen zu machen,denn er"
849 [153]"ist der meinung,sie wuerden ihr leben"
850 [153]"verlieren.":[141]4000
851 [153]"loadin den einzelnen raeumen muessen sie"
852 [153]"versuchen,openpuzzle-teile zu finden."
853 [153]"insgesammt sind 36 teile versteckt."
854 [153]"jeweils vier teile ergeben eine "
855 [153]"openlochkarte,auf der immer ein buchstabe"
856 [153]"des passwortes abgespeichert ist.":[153]
857 [153]"an einigen stellen finden sie "
858 [153]"openhilfspassworte.diese koennen zwei"
859 [153]"funktionen haben.":[153]
860 [153]"die einen dienen dazu,die liftplatt-"
861 [153]"formen nach einer veraenderung in ihren"
862 [153]"ausgangszustand zu versetzen.
863 print"die anderen machen alle roboterwachen"
864 print"in einen raum fuer kurze zeit funktions-"
865 print"[145]untuechtig.diese zeit reicht meist aus,"
866 print"um an zwei gegenstaende in einen raum"
867 print"zu untersuchen.":gosub4000
868 print"[147]es gibt noch eine andere moeglichkeit,"
869 print"um an [159]hilfspassworte zu kommen.":print
870 print"in dem labyrinth gibt es zwei computer-"
871 print"raeume,in denen eine konsole und eine"
872 print"anzeigetafel untergebracht sind."
873 print"stehen sie vor der konsole und bewegen"
874 print"den joystick nach vorn,erklingen drei"
875 print"toene.wenn sie die toene vom [159]tiefsten"
876 print"zum [159]hoechsten mit der 'hand' nach-"
877 print"spielen,bekommen sie ein [159]hilfspasswort"
878 print"gutgeschrieben (nach jedem ton feuer-"
879 print"knopf druecken !) ,und die anzahl der"
880 print"nachzuspielenden toene erhoeht sich um"
881 print"eins":print
882 print"mit ein wenig geschick koennen sie "
883 print"einige hilfsmittel dazu bekommen.":gosub4000
884 print"[147]und nun viel glueck !!!!!"
885 print"wenn sie noch einmal lesen wollen,"
886 print"druecken sie die taste'n',sonst eine andere!
887 [161]b$:[139]b$[178]""[167]887
888 [139]b$[178]"n"[167]810
889 [153]"load":[141]5000
890 [153]" i m p o s s i b l e ":[153]
891 [153]" m i s s i o n ":[153]""
892 [153]" ( e p y x )"
893 [153]"load"[199](34)"imp. mission 1"[199](34)",8onononstop":[128]
4000 [153]" space wait --->"
4010 [161]a$:[139]a$[179][177]" "[167]4010
4020 [141]5000:[142]
5000 si[178]54272:fl[178]si:fh[178]si[170]1:w[178]si[170]4:a[178]si[170]5:h[178]si[170]6:l[178]si[170]24:[151]l,15:[151]a,16[170]9
5001 [151]h,4[172]16[170]4:[151]fh,29:[151]fl,69:[151]w,17:[129]t[178]1[164]500:[130]t:[151]w,0
5002 [151]a,0:[151]h,0:[142]