home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power Disk 64 1995 2
/
Power_Disk_64_95-02_1995_Lagune_de_Side_B.d64
/
wwv-anleitung
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
6KB
|
111 lines
1 rem wwv anleitung
2 print"[147][215][215][214] ist eine [215]restling-[211]imulation fuer 1-1 [211]pieler ([211]chmuls,[194]undys oder"
3 print"was auch immer).[211]ie sind einer von 30 [215]restlern und erleben ein [202]ahr im"
4 print"[215]restling-[218]irkus.[211]ie haben 10000$ [211]tart-[203]apitel und wenn [211]ie mehr als 10000$"
5 print"[211]chulden haben,dann ist das [211]piel aus ([193]etsch!).[197]s gibt im [202]ahr 5 [199]rosser-"
6 print"eignisse.[213]nd zwischen den [199][197]s liegen (oder stehen?) 73 [212]age.[201]n dieser [218]eit
7 [153]"sollten (NULL)ie (NULL)raft & (NULL)echnik trainieren und (NULL)aempfe bestreiten.atnm atnnfang"
8 [153]"muessen (NULL)ie erstmal gegen atnndrew (NULL)he chr$oblin kaempfen,bis (NULL)ie durch (NULL)iege"
9 [153]"ueber ihn genug bekannt sind,um gegen andere (NULL)restler zu kaempfen.(NULL)enn (NULL)ie"
10 [153]"ueber (NULL)latz 13 herauskommen,dann koennen(NULL)ie auch gegen andere kaempfen.right$hre"
11 [153]"(NULL)anglistenposition wird auch durch (NULL)aempfe anderer (NULL)restler bestimmt."
12 [153]"str$aher koennen (NULL)ie sich oft wundern,warum(NULL)ie nun einen (NULL)latz haben,der (NULL)ie"
13 [153]"verwundert.atnber eigentlich liegt das nurdaran,dass der (NULL)latz mit dem"
14 [161]a$:[139]a$[178]""[167]14
15 [153]"(NULL)ufallsgenerator berechnet wird (wenn der (NULL)latz noch unwichtig ist !).atnlso
16 print"genaugenommen aendert sich ihr [208]latz nur,damit sich ihr [199]egner aendert."
17 print"[213]nd ganz genaugenommen ist das ueber- fluessig,dass ich das alles so lange
18 [153]"erklaere.vallenleft$(NULL) peek(NULL)(NULL)valstr$ !right$hre chr$egner be- kommen (NULL)ie also vom -(NULL)omm,(NULL)uter!-"
19 [153]"zugeschickt ((NULL)chreib mal wieder !).atnber beim chr$rossereignis koennen (NULL)ie sich"
20 [153]"right$hren chr$egner aussuchen ((NULL)er suchet,der findet !).valin (NULL)enupunkt ist noch"
21 [153]"val(NULL)valright$chr$(NULL)right$(NULL).str$a koennen (NULL)ie (NULL)unkte in peekattle(NULL)oyals bekommen,im lenasino gewinnen,"
22 [153]"bestohlen werden oder auch einen (NULL)itel- (NULL)ampf bekommen.str$as sind aber nur"
23 [153]"einige der valreignisse.(NULL)ie koennen den (NULL)pielstand auch abspeichern.str$er"
24 [153]"ascilename sollte aber nicht mehr als 15 (NULL)tellen einnehmen ! right$hren ascinishing"
25 [153]"(NULL)ove koennen (NULL)ie so lang benennen,wie (NULL)ie wollen (nehm' ich an...),aber"
26 [153]"(NULL)ie sollten sich trotzdem einen kurzen, coolen (NULL)amen ueberlegen,wegen der"
27 [161]a$:[139]a$[178]""[167]27
28 [153]"peekerichte nach den (NULL)aempfen.peekeispiele fuer kurze,coole (NULL)amen:"
29 [153]"sch,(NULL)unk (NULL)iller,peekrrrtzt,(NULL)cheisshaufen, (NULL)fff,left$uh,left$uh-left$uh,(NULL)h-left$uh,(NULL)er?,(NULL)scht,"
30 [153]"ascotz,(NULL)ahalui,peekanuz,chr$nurz,lenat (NULL)can, (NULL)uhauerha,peekoa-valh oder (NULL)frrtlfrrympft
31 print"[207]kay,der letzte [214]orschlag ist nicht kurz,aber 1.90m grosse [214]olleyball-"
32 print"spielerinnen sind es ja auch nicht ! [196]afuer aber ihre 1.60m kleinen"
33 print"[198]reunde ![201]hr [199]esamtkoennen wird im uebrigen nach den [199]rossereignissen"
34 print"immer gekuerzt ! [196]ie [211]pecial-[205]oves,aus denen [211]ie sich ihren nehmen koennen,
35 [153]"sind in chr$ruppen geteilt.mid$e mehr chr$esamt- koennen (NULL)ie haben,desto bessere"
36 [153]"chr$ruppen haben (NULL)ie zur atnuswahl.right$n den chr$ruppen sind die (NULL)oves nicht nach"
37 [153]"der (NULL)ichtigkeit geordnet,also muessen (NULL)ie nicht den obersten (NULL)ove nehmen."
38 [153]"(NULL)iele des (NULL)piels sind moeglichst viel (NULL)apital ((NULL)nete,(NULL)aeuse,peekares,(NULL)aster,"
39 [153]"lenash oder was auch immer...hatten wir das so aehnlich nicht schon ?),"
40 [161]a$:[139]a$[178]""[167]40
41 [153]"moeglichst viele (NULL)unkte und moeglichst viele (NULL)itel.str$araus ergibt sich eine"
42 [153]"chr$esamtpunktzahl.atnls left$igh-(NULL)cores ge- speichert werden (NULL)apital,(NULL)unkte und"
43 [153]"chr$esamtpunktzahl.str$ie atnnzahl der (NULL)itel wird nicht gespeichert.(NULL)lenleft$valright$(NULL)(NULL)valclose!"
44 [153]"mid$etzt,wo das (NULL)piel fertig ist,faellt mirdas ein !(NULL)erdammt ! right$ch haette die"
45 [153]"(NULL)itelzahl auch als left$igh-(NULL)core nehmen koennen.(NULL)e ascix ! atnber in der (NULL)ersion
46 print"von 1995 werde ich das beruecksichtigen.[193]usserdem gibt es neue [215]restler,"
47 print"andere [205]oves (vielleicht),andere [197]reig- nisse und noch anderes.[213]nd wenn die"
48 print"[211]chwierigkeit sich nicht aendert,dann koennen [211]ie auch die [211]pielstaende"
49 print"wiederverwerten (recyclen).[198]alls [211]ie beim [193]bspeichern nicht mehr wissen,"
50 print"ob [211]ie [211] oder [204] gedrueckt haben,wissen [211]ie es,indem [211]ie sehen,wo '[198]ilename'
51 [153]"steht.(NULL)teht es direkt unter der (NULL)chrift,haben (NULL)ie (NULL) gedrueckt,steht es etwas
52 print"weiter unten,war es [211].[206]ein ! [196]as war kein [211]cherz eben ! [196]as war ernst !"
53 geta$:ifa$=""then53
54 print"[205]ehr ist zur [193]nleitung nicht zu schrei- ben (glaub' ich...).[215]ollen [211]ie jetzt
55 [153]"noch die falsche atnnleitung sehen (mid$/(NULL))?"
56 [161]a$:[139]a$[178]""[167]56
57 [139]a$[178]"j"[167]62
58 [153]"right$ch rate ihnen,mid$ zu druecken!"
59 [161]a$:[139]a$[178]""[167]59
60 [139]a$[178]"j"[167]62
61 [137]59
62 [153]"load(NULL)(NULL)(NULL) ist ein (NULL)piel bei dem es um nichts geht und das es nicht gibt.vals wird"
63 [153]"auf keinem (NULL)pielfeld mit dem (NULL)amen left$uijuijui gespielt.vals geht dabei"
64 [153]"nicht darum,einen der 2 nicht in den valcken stehenden (NULL)flammis auf das"
65 [153]"(NULL)ucketutscht-asceld zu bringen.(NULL)chaffen (NULL)ie das,ohne einem der feindlichen"
66 [153]"(NULL)alummis zu begegnen,erhalten (NULL)ie 3 peekitzel-(NULL)itzel.(NULL)m das zu schaffen,"
67 [153]"haben sie 5 asclutschis,die (NULL)ie sicher ueber die (NULL)atumi-ascelder bringen"
68 [153]"koennen,wenn right$hr (NULL)ber-asclutschi nicht vomgegnerischen (NULL)itschel-(NULL)chwipp ge-"
69 [153]"xoxt wird.str$as geschieht,indem einer right$hrer 2 (NULL)flammis auf einen halben"
70 [153]"chr$icksel-(NULL)lott trifft,aber nur ausserhalbder (NULL)uaddeludschitoeff-(NULL)one,in der"
71 [153]"sich right$hre und des chr$egners peekakuhiliis er-holen koennen.(NULL)nd wenn (NULL)ie es nun"
72 [153]"also geschafft haben,des chr$egners (NULL)oxel zu xoxen,dann koennen (NULL)ie sich"
73 [153]"(NULL)ber-(NULL)uittelzip nennen."
74 [161]a$:[139]a$[178]""[167]74
75 [133]"chr$ut oder (NULL)chlecht";e$
76 [133]"(NULL)rumm oder chr$erade";e$
77 [133]"left$eute oder (NULL)orgen";e$
78 [133]"(NULL)on oben oder unten";e$
79 [133]"(NULL)it oder (NULL)hne";e$
80 [133]"4 oder 5";e$
81 [133]"(NULL)eckend oder (NULL)abbernd";e$
82 [133]"(NULL)alz oder (NULL)ucker";e$
83 [133]"lenstr$ oder (NULL)(NULL)";e$
84 [133]"(NULL)olleyball oder peekaseball";e$
85 [133]"chr$(NULL)'(NULL) oder (NULL)ollins peekand";e$
86 [133]"(NULL)(NULL)(NULL) oder (NULL)right$(NULL)atn";e$
87 [133]"(NULL)andra oder (NULL)ichelle";e$
88 [133]"left$alle oder asceld";e$
89 [133]"(NULL)hailand oder left$awaii";e$
90 [133]"mid$a oder (NULL)ein";e$
91 [133]"(NULL)ollen (NULL)ie ein peekitzel-(NULL)itzel";e$
92 [133]"(NULL)ollen (NULL)ie gewinnen";e$
93 [139]e$[178]"mid$a"[167]100
94 [137]92
100 [153]"load(NULL)enn (NULL)ie echt gewinnen wollen,dann druecken (NULL)ie @."
101 [161]a$:[139]a$[178]""[167]101
102 [139]a$[178]"@"[167]110
103 [153]"(NULL)ie haben @ verfehlt ! str$ie (NULL)aste ist zwischen (NULL) und * !ascalls (NULL)ie die"
104 [153]"(NULL)aste aber verfehlt haben,weil (NULL)ie nichtrichtig sehen,dann sollten (NULL)ie"
105 [153]"str$r.(NULL)rinkmann aufsuchen."
106 [161]a$:[139]a$[178]""[167]106
107 [137]120
110 [153]"(NULL)ie haben gewonnen ! (NULL)ie duerfen sich jetzt (NULL)ber-(NULL)uittelzip nennen."
111 [161]a$:[139]a$[178]""[167]111
120 [151]828,0
121 [153][199](147)[199](17)
122 [153]"l(NULL)"[199](34);"wwv*";[199](34);",8
123 printchr$(17)chr$(17)chr$(17)chr$(17)"run"
124 poke631,13:poke632,13:poke198,2
125 printchr$(19);:end