Avril 2024 | Lun | Mar | Mer | Jeu | Ven | Sam | Dim |
---|
1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | | | | | | Calendrier |
|
| | game for practice | |
| | |
Auteur | Message |
---|
Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Sam 6 Juil 2013 - 20:04 | |
| Danke für den Hinweis.
Ich habe Probleme mit den Zeilen 457 und 458. Sie sollen wie die Zeilen 479 und 480 funktionieren.
Warum läuft die Zeit weiter, wenn die Fahrt beendet ist. "Endzeit"
@ Jicehel @ All
Thanks for the note.
I have problems with the lines 457 and 458 They are like the lines 479 and 480 work.
Why the time continues to run when the run is completed. "End Time"
@ Jicehel @ Tous
Merci pour la note.
J'ai des problèmes avec les lignes 457 et 458 Ils sont comme les lignes 479 et 480 travail.
Pourquoi le temps continue à fonctionner lorsque la course est terminée. "Heure de fin"
| |
| | | Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Sam 13 Juil 2013 - 13:37 | |
| @Jichel, ich habe deine Vorlage angepasst. Ich habe jedoch Schwierigkeiten beim Erstellen einer Pause, wenn die LKW in der Endzone angekommen sind. Es sollte dann eine Standzeit laufen. Für jede Ankunft individuell. Die Pause sollte mit in die Tabelle eingesetzt werden. Wie folgt. Horizontal, Vertikal, Pause - (A1,1), (A1,2), (A1,3) Wenn es deine Zeit erlaubt, bitte hilf mir. I have adapted your presentation. Nevertheless, I have difficulties with the construction of a break, if the truck in that Final zone have come. Then a state time should run. For every arrival individually. The break should be used with in the table. As follows. Horizontally, Vertically, break - (A1,1), (A1,2), (A1,3) If it permits your time, please help me. j'ai adapté ta présentation. Donc, j'ai des difficultés à l'élaboration d'une pause, si le CAMION dans elle La zone finale sont arrivés. Un temps de place devait courir alors. Pour chaque arrivée individuellement. La pause devait être mise avec dans le tableau. Comme c'est indiqué plus loin. Horizontalement, Verticalement, la pause - (A1,1), (A1,2), (A1,3) Si cela permet ton temps, s'il vous plaît Aide moi. - Code:
-
' ****************************************************************************** ' *** SIMULATION LKW-VERKEHR FABRIK - LAGER ********************************* ' ****************************************************************************** ' dim i% dim j% ' *** FORM ERSTELLEN UND AN BILDSCHIRM ANPASSEN ******************************** ' FORM 0000 top 0,0 : LEFT 0,0 : width 0,screen_x : height 0,SCREEN_Y-40 color 0,0,0,0 :' schwarz / black caption 0,"SIMULATION LKW-VERKEHR FABRIK - LAGER " ' ' ****************************************************************************** ' *** ERSTELLEN DES HAUPTMENÜ 9701 bis 9720 ************************************ main_menu 9700 for i% = 1 to 20 sub_menu 9700 + i% : parent 9700 + i%,9700 select i% case 1 : caption 9701," STOP LKW all" case 2 : caption 9702," START LKW all " ' case 3 : caption 9703," START LKW02 " ' case 4 : caption 9704," START LKW03 " ' case 5 : caption 9705," START LKW04 " ' case 6 : caption 9706," START LKW05 " ' case 7 : caption 9707," START LKW06 " ' case 8 : caption 9708," START LKW07 " ' case 9 : caption 9709," START LKW08 " ' case 10: caption 9710," START LKW09 " ' case 11: caption 9711," START LKW10 " ' case 20: caption 9720," " end_select next i% ' ' *** DARSTELLUNGS BILDSCHIRM DEFINIEREN *************************************** DIM SEITE_RECHTS% : SEITE_RECHTS% = (SCREEN_X - 130-40) DIM SEITE_LINKS% : SEITE_LINKS% = 0095 ' *** DARSTELLUNGS-BILDSCHIRM für Gebäude DEFINIEREN *************************** DIM SEITE_RECHTS01% : SEITE_RECHTS01% = (SCREEN_X - 100) DIM SEITE_LINKS01% : SEITE_LINKS01% = 0095 ' *** DARSTELLUNGS-BILDSCHIRM für Rampen DEFINIEREN **************************** DIM SEITE_RECHTS02% : SEITE_RECHTS02% = (SCREEN_X - 120) DIM SEITE_LINKS02% : SEITE_LINKS02% = 0095 ' *** DARSTELLUNGS-BILDSCHIRM für Rampen DEFINIEREN **************************** DIM SEITE_RECHTS03% : SEITE_RECHTS03% = (SCREEN_X - 120 -95 -42 +5) DIM SEITE_LINKS03% : SEITE_LINKS03% = 0095 ' ****************************************************************************** DIM SEITE_OBEN% : SEITE_OBEN% = 000 DIM SEITE_UNTEN% : SEITE_UNTEN% = 000 ' ' *** FABRIK erstellen ********************************************************* edit 9800 :color 9800,000,255,000 TOP 9800,108 :LEFT 9800,10 :HEIGHT 9800,600 :WIDTH 9800,75 ' *** Andockstellen Fabrik ***************************************************** j% = 0 for i% = 8001 to 8020 edit i% :top i%,110+j% :left i%,15 :width i%,60 :height i%,25 :j% = j% + 30 next i% ' *** RAMPEN FABRIK erstellen ************************************************** BUTTON 9810 TOP 9810,108 : LEFT 9810,85 : HEIGHT 9810,600 : WIDTH 9810,19 ' *** Zulieferer erstellen ***************************************************** edit 9820 : text 9820," Lager01" : :color 9820,000,255,000 TOP 9820,108 : LEFT 9820,SEITE_RECHTS01% : HEIGHT 9820,600 : WIDTH 9820,75 ' *** Andockstellen Zulieferer ************************************************* j% = 0 for i% = 8021 to 8040 edit i% :top i%,110+j% :left i%,SEITE_RECHTS01% + 10 :width i%,60 :height i%,25 :j% = j% + 30 next i% ' *** RAMPEN Zulieferer erstellen ********************************************** BUTTON 9830 TOP 9830,108 : LEFT 9830,SEITE_RECHTS02% : HEIGHT 9830,600 : WIDTH 9830,19 ' ****************************************************************************** ' *** LABEL ERSTELLEN ********************************************************** label main label halt label start label FAHRTDATENFUERLKW ' ' ****************************************************************************** dim sens% dim dir% dim LKW% dim Anzahl_LKW% : Anzahl_LKW% = 4 dim Anzahl_Fahrten% : Anzahl_Fahrten% = 11 dim Z1% ' ' *** Geschwindigkeit pro LKW ************************************************** dim v%(Anzahl_LKW%) ' v%(1) = 5 v%(2) = 4 v%(3) = 9 v%(4) = 7 ' ' *** dim RICHTUNG_horizontal%(Anzahl_LKW%,Anzahl_Fahrten%) ' *** dim RICHTUNG_vertikal%(Anzahl_LKW%,Anzahl_Fahrten%) ' *** dim delta_horizontal%(Anzahl_LKW%) ' *** dim delta_vertikal%(Anzahl_LKW%) ' *** dim pos%(Anzahl_LKW%) ' ****************************************************************************** Gosub FAHRTDATENFUERLKW ' ' ****************************************************************************** ON_CLICK 9701,halt ON_CLICK 9702,start ' ON_CLICK 9703,area03 ' ON_CLICK 9704,area04 ' ON_CLICK 9705,area05 ' ON_CLICK 9706,area06 ' ON_CLICK 9707,area07 ' ON_CLICK 9708,area08 ' ON_CLICK 9709,area09 ' ON_CLICK 9710,area10 ' ON_CLICK 9711,area11 ' ON_CLICK 9712,area12 ' ON_CLICK 9713,area13 ' ON_CLICK 9714,area14 ' ON_CLICK 9715,area15 ' ON_CLICK 9716,area16 ' ON_CLICK 9717,area17 ' ON_CLICK 9718,area18 ' ON_CLICK 9719,area17 ' ON_CLICK 9720,start timer 9998 : timer_interval 9998,60 : on_timer 9998,main : timer_off 9998 ' end ' ' *** TIMER INITIALISIERUNG *************************************************** start: timer_on 9998 return ' ' ***************************************************************************** ' ***************************************************************************** main: timer_off_all ' for LKW% = 1 to Anzahl_LKW%
' if (left(LKW%)<SEITE_LINKS%) or (left(LKW%)>SEITE_RECHTS02%) then v%(LKW%) = 0 - v%(LKW%)
if delta_horizontal%(LKW%)=0 and delta_vertikal%(LKW%) = 0
sens% = v%(LKW%)/abs(v%(LKW%))
pos%(LKW%) = pos%(LKW%) + sens%
if pos%(LKW%) < 1 then pos%(LKW%) = 1
if pos%(LKW%) > 11 then pos%(LKW%) = Anzahl_Fahrten% :' <-- Anzahl der Fahrtwechsel
delta_horizontal%(LKW%) = sens% * RICHTUNG_horizontal%(LKW%,pos%(LKW%))
delta_vertikal%(LKW%) = sens% * RICHTUNG_vertikal%(LKW%,pos%(LKW%))
end_if ' *************************** if abs(delta_horizontal%(LKW%)) > 0
dir% = RICHTUNG_horizontal%(LKW%,pos%(LKW%))/abs(RICHTUNG_horizontal%(LKW%,pos%(LKW%)))
delta_horizontal%(LKW%) = abs(delta_horizontal%(LKW%)) - abs(v%(LKW%))
if delta_horizontal%(LKW%) < 0
left LKW%,left(LKW%) + (abs(v%(LKW%)) + delta_horizontal%(LKW%))*sens%*dir%
delta_horizontal%(LKW%) = 0
else
left LKW%,left(LKW%) + v%(LKW%)*dir%
end_if
end_if ' *************************** if abs(delta_vertikal%(LKW%)) > 0
dir% = RICHTUNG_vertikal%(LKW%,pos%(LKW%))/abs(RICHTUNG_vertikal%(LKW%,pos%(LKW%)))
delta_vertikal%(LKW%) = abs(delta_vertikal%(LKW%)) - abs(v%(LKW%))
if delta_vertikal%(LKW%) < 0
top LKW% ,top(LKW%) + (abs(v%(LKW%)) + delta_vertikal%(LKW%))*sens%*dir%
delta_vertikal%(LKW%) = 0
else
top LKW%,top(LKW%) + v%(LKW%)*dir%
end_if
end_if ' next LKW% ' timer_on 9998 ' return ' ' ****************************************************************************** ' *** PROGRAMM ANHALTEN ******************************************************** halt: timer_off_all terminate ' ****************************************************************************** ' ****************************************************************************** FAHRTDATENFUERLKW: ' ' *** SYMBOLE FÜR LKW erstellen ************************************************ for i% = 1 to Anzahl_LKW% edit i% top i%,80+30*i% ' if i% = 1 then left i%,SEITE_LINKS% if i% = 2 then left i%,SEITE_LINKS% if i% = 3 then left i%,SEITE_LINKS% if i% = 4 then left i%,SEITE_RECHTS03%+95 ' width i%,45 :height i%,25 ' if i% = 1 then color i%,255,000,000 if i% = 2 then color i%,000,255,000 if i% = 3 then color i%,020,200,255 if i% = 4 then color i%,240,240,020 ' text i%,"LKW"+STR$(i%) ' if i% = 1 then pos%(i%) = 0 if i% = 2 then pos%(i%) = 0 if i% = 3 then pos%(i%) = 0 if i% = 4 then pos%(i%) = 0 next i% ' *** Text für Andockstellen links ********************************************* text 8001," Tor 1 " :text 8002," Tor 2 " :text 8003," Tor 3 " :text 8004," Tor 4 " text 8005," Tor 5 " :text 8006," Tor 6 " :text 8007," Tor 7 " :text 8008," Tor 8 " text 8009," Tor 9 " :text 8010," Tor 10 " :text 8011," Tor 11 " :text 8012," Tor 12 " text 8013," Tor 13 " :text 8014," Tor 14 " :text 8015," Tor 15 " :text 8016," Tor 16 " text 8017," Tor 17 " :text 8018," Tor 18 " :text 8019," Tor 19 " :text 8020," Tor 20 " ' *** Text für Andockstellen rechts ******************************************** text 8021," Co. AA" :text 8022," Co. BB" :text 8023," Co. CC" :text 8024," Co. DD" text 8025," Co. EE" :text 8026," Co. FF" :text 8027," Co. GG" :text 8028," Co. HH" text 8029," Co. II" :text 8030," Co. JJ" :text 8031," Co. KK" :text 8032," Co. LL" text 8033," Co. MM" :text 8034," Co. NN" :text 8035," Co. OO" :text 8036," Co. PP" text 8037," Co. QQ" :text 8038," Co. RR" :text 8039," Co. SS" :text 8040," Co. TT" ' ****************************************************************************** ' ------------------------------------------------------------------------------ ' Richtung nach rechts = (SEITE_RECHTS03%/2) ' Richtung nach links = 0-(SEITE_RECHTS03%/2) ' Richtung nach unten = POSITIV xxx STEP 30 - 510 ' Richtung nach oben = NEGATIV -xxx STEP -30 - 510 ' ------------------------------------------------------------------------------ ' *** DATEN FÜR LKW 001 ******************************************************** Z1% = 1 RICHTUNG_horizontal%(Z1%,01) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,01) = 000 RICHTUNG_horizontal%(Z1%,02) = 000 : RICHTUNG_vertikal%(Z1%,02) = 120 RICHTUNG_horizontal%(Z1%,03) = 0-(SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 0-(SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,07) = -120 RICHTUNG_horizontal%(Z1%,08) = 0-(SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,09) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,09) = 000 RICHTUNG_horizontal%(Z1%,10) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 ' *** DATEN FÜR LKW 002 ******************************************************** Z1% = 2 RICHTUNG_horizontal%(Z1%,01) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,01) = 000 RICHTUNG_horizontal%(Z1%,02) = 000 : RICHTUNG_vertikal%(Z1%,02) = 000 RICHTUNG_horizontal%(Z1%,03) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = 000 : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 000 : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,07) = 000 RICHTUNG_horizontal%(Z1%,08) = 000 : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,09) = 000 : RICHTUNG_vertikal%(Z1%,09) = 000 RICHTUNG_horizontal%(Z1%,10) = 000 : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 ' *** DATEN FÜR LKW 003 ******************************************************** Z1% = 3 RICHTUNG_horizontal%(Z1%,01) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,01) = 510 RICHTUNG_horizontal%(Z1%,02) = 000 : RICHTUNG_vertikal%(Z1%,02) = 000 RICHTUNG_horizontal%(Z1%,03) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = 000 : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 000 : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,07) = 000 RICHTUNG_horizontal%(Z1%,08) = 000 : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,09) = 000 : RICHTUNG_vertikal%(Z1%,09) = 000 RICHTUNG_horizontal%(Z1%,10) = 000 : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 ' *** DATEN FÜR LKW 004 ******************************************************** Z1% = 4 RICHTUNG_horizontal%(Z1%,01) = 0-(SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,01) = 180 RICHTUNG_horizontal%(Z1%,02) = 000 : RICHTUNG_vertikal%(Z1%,02) = 000 RICHTUNG_horizontal%(Z1%,03) = 0-(SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = 000 : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,08) = 000 : RICHTUNG_vertikal%(Z1%,07) = 000 RICHTUNG_horizontal%(Z1%,09) = 000 : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,10) = 000 : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 ' Return | |
| | | Jicehel
Nombre de messages : 5947 Age : 51 Localisation : 77500 Date d'inscription : 18/04/2011
| Sujet: Re: game for practice Sam 13 Juil 2013 - 19:36 | |
| Pas eu beaucoup de temps pour réfléchir, mais il faut voir pour gérer 2 choses: D'une par remplacer le timer_all_off par le timer_off du timer car à priori, sinon ça peut créer des problème avec le timer qui est assez rapide. Je ne sais pas comment c'est implémenté, mais il semble que le temps qu'il fasse le timer_all_off il a le temps de mettre plusieurs requète en attente. Donc au bout d'un certain temps, ça affiche une erreur. Après, je n'ai pas trop réfléchi, mais je pense qu'il faut faire un truc du genre : - Code:
-
main: timer_off 9998
' for LKW% = 1 to Anzahl_LKW%
' if (left(LKW%)<SEITE_LINKS%) or (left(LKW%)>SEITE_RECHTS02%) then v%(LKW%) = 0 - v%(LKW%)
if delta_horizontal%(LKW%)=0 and delta_vertikal%(LKW%) = 0
sens% = v%(LKW%)/abs(v%(LKW%))
pos%(LKW%) = pos%(LKW%) + sens%
if pos%(LKW%) < 1 then pos%(LKW%) = 1 : v%(LKW%) = 0 - v%(LKW%)
if pos%(LKW%) > Anzahl_Fahrten% then pos%(LKW%) = Anzahl_Fahrten% : v%(LKW%) = 0 - v%(LKW%) :' <-- Anzahl der Fahrtwechsel
delta_horizontal%(LKW%) = sens% * RICHTUNG_horizontal%(LKW%,pos%(LKW%))
delta_vertikal%(LKW%) = sens% * RICHTUNG_vertikal%(LKW%,pos%(LKW%))
end_if
' *************************** if abs(delta_horizontal%(LKW%)) > 0
dir% = RICHTUNG_horizontal%(LKW%,pos%(LKW%))/abs(RICHTUNG_horizontal%(LKW%,pos%(LKW%)))
delta_horizontal%(LKW%) = abs(delta_horizontal%(LKW%)) - abs(v%(LKW%))
if delta_horizontal%(LKW%) < 0
left LKW%,left(LKW%) + (abs(v%(LKW%)) + delta_horizontal%(LKW%))*sens%*dir%
delta_horizontal%(LKW%) = 0
else
left LKW%,left(LKW%) + v%(LKW%)*dir%
end_if
end_if ' *************************** if abs(delta_vertikal%(LKW%)) > 0
dir% = RICHTUNG_vertikal%(LKW%,pos%(LKW%))/abs(RICHTUNG_vertikal%(LKW%,pos%(LKW%)))
delta_vertikal%(LKW%) = abs(delta_vertikal%(LKW%)) - abs(v%(LKW%))
if delta_vertikal%(LKW%) < 0
top LKW% ,top(LKW%) + (abs(v%(LKW%)) + delta_vertikal%(LKW%))*sens%*dir%
delta_vertikal%(LKW%) = 0
else
top LKW%,top(LKW%) + v%(LKW%)*dir%
end_if
end_if ' next LKW% ' timer_on 9998 ' return Mais bon, il faudrait prendre un papier et un crayon et réfléchir calmement, mais pas ce soir: ce soir pizza puis direction Meaux pour un son et lumière + feu d'artifice | |
| | | Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Sam 13 Juil 2013 - 19:52 | |
| @Jichel, Lass dir Zeit, ich bin diese Woche auf Dienstreise. Aber ich hoffe immer noch, daß andere Mitglieder helfen. Erst mal vielen Dank.
Give to you time, I am this week on official journey. But I still hope that other members help. For the moment many thanks.
Donne du temps, je suis cette semaine sur la mission. Mais j'espère encore que les autres membres aident. Remercie seulement donc plusieurs.
| |
| | | Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Dim 14 Juil 2013 - 13:42 | |
| Hallo Panoramics,
Klaus hatte ein Programm Stundenplan veröffentlicht. Leider kann ich es nicht finden. Wer hat einen "LinK" ?
Klaus had published a programme Timetable. Unfortunately, I cannot find it. Who has a "LinK" ?
Klaus avait publié un programme Emploi du temps. Malheureusement je ne peux pas le trouver. Qui a un "LinK" ?
Danke | |
| | | Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Dim 14 Juil 2013 - 21:40 | |
| Hallo an alle,
Hier die letzte Version von Spiel für die Praxis. Das Programm ist für eine Nachricht zulang. Deshalb in 3 Teilen und diese werden gepflegt.
Es sind 10 LKW's eingerichtet. Kann auf mehr LKW's erweitert werden. Es kann jeder LKW einzeln gefahren werden. Es sind bis 99 Fahrtrichtungen möglich.
Es fehlt noch: Pausenzeit an den Beladestellen. Menü ist noch nicht optimal.
Mitarbeit und neue Ideen sind willkommen.
Hello, to everybody,
Here the last version of play for the practise. The programme is for news help yourselves. Therefore, in 3 parts and this are maintained.
It are furnished 10 LKW's. Can be extended on more LKW's. It can be driven of every truck individually. It are possible to 99 directions of the traffic.
It is still absent: Break time at the loading places. Menu is not optimum yet.
Cooperation and new ideas are welcome.
Salut à tous,
Ici la dernière version du jeu pour la pratique. Le programme est pour une nouvelle sers-toi. Pour cette raison dans 3 parties et celui-ci sont soignés.
C'est aménagés 10 LKW's. Peut être élargi sur plus de LKW's. Cela peut être conduit séparément de chaque CAMION. C'est possibles jusqu'à 99 sens de la marche.
Il manque encore : Temps de pauses aux lieux de coffre. Le menu est pas encore optimal.
La collaboration et les nouvelles idées sont bienvenues.
Dernière édition par Severin le Dim 14 Juil 2013 - 21:53, édité 1 fois | |
| | | Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Dim 14 Juil 2013 - 21:48 | |
| Teil 1 -14.07.2013- - Code:
-
' ****************************************************************************** ' *** SIMULATION LKW-VERKEHR FABRIK - LAGER ********************************* ' ****************************************************************************** ' dim i% dim j% ' *** FORM ERSTELLEN UND AN BILDSCHIRM ANPASSEN ******************************** ' FORM 0000 top 0,0 : LEFT 0,0 : width 0,screen_x : height 0,SCREEN_Y-40 color 0,0,0,0 :' schwarz / black caption 0,"SIMULATION LKW-VERKEHR FABRIK - LAGER " ' *** Bilder laden ************************************************************* DIM DIR_A$ ' DIR_A$ = "c:\" DIM Speicherplatz_Bild01$ ' Speicherplatz_Bild01$ = DIR_A$ + "1PC-ZEIT\03_PC-Zeit_BILDER\LKW_Auflierer.BMP" Speicherplatz_Bild01$ = "LKW_Auflieger.BMP" ' ****************************************************************************** ' *** ERSTELLEN DES HAUPTMENÜ 9701 bis 9720 ************************************ main_menu 9700 for i% = 1 to 20 sub_menu 9700 + i% : parent 9700 + i%,9700 select i% case 01 : caption 9701," STOP LKW all" case 02 : caption 9702," START LKW all " case 03 : caption 9703," START LKW01 " case 4 : caption 9704," START LKW02 " case 5 : caption 9705," START LKW03 " case 6 : caption 9706," START LKW04 " case 7 : caption 9707," START LKW05 " case 8 : caption 9708," START LKW06 " case 9 : caption 9709," START LKW07 " case 10: caption 9710," START LKW08 " case 11: caption 9711," START LKW09 " case 12: caption 9712," START LKW10 " ' case 20: caption 9720," " end_select next i% ' ' *** DARSTELLUNGS BILDSCHIRM DEFINIEREN *************************************** DIM SEITE_RECHTS% : SEITE_RECHTS% = (SCREEN_X - 130-40) DIM SEITE_LINKS% : SEITE_LINKS% = 0095 ' *** DARSTELLUNGS-BILDSCHIRM für Gebäude DEFINIEREN *************************** DIM SEITE_RECHTS01% : SEITE_RECHTS01% = (SCREEN_X - 100) DIM SEITE_LINKS01% : SEITE_LINKS01% = 0095 DIM SEITE_OBEN% : SEITE_OBEN% = 108 ' *** DARSTELLUNGS-BILDSCHIRM für Rampen DEFINIEREN **************************** DIM SEITE_RECHTS02% : SEITE_RECHTS02% = (SCREEN_X - 120) DIM SEITE_LINKS02% : SEITE_LINKS02% = 0095 ' *** DARSTELLUNGS-BILDSCHIRM für Rampen DEFINIEREN **************************** DIM SEITE_RECHTS03% : SEITE_RECHTS03% = (SCREEN_X - 120 -95 -42 +5) DIM SEITE_LINKS03% : SEITE_LINKS03% = 0095 ' *** DARSTELLUNGS-BILDSCHIRM für Andockstellen DEFINIEREN ********************* DIM SEITE_OBEN04% : SEITE_OBEN04% = SEITE_OBEN% + 2 DIM SEITE_UNTEN% : SEITE_UNTEN% = 000 ' *** DARSTELLUNGS-BILDSCHIRM für LKW Position DEFINIEREN ********************* DIM SEITE_OBEN05% : SEITE_OBEN05% = SEITE_OBEN% - 28 ' *** Gebäude Linke Seite erstellen ******************************************** edit 9800 :color 9800,000,255,000 TOP 9800,SEITE_OBEN% :LEFT 9800,10 :HEIGHT 9800,600 :WIDTH 9800,75 ' *** Andockstellen Linke Seite erstellen ************************************** BUTTON 9810 :TOP 9810,SEITE_OBEN% :LEFT 9810,85 :HEIGHT 9810,600 :WIDTH 9810,19 ' *** Gebäude Rechte Seite erstellen ******************************************* edit 9820 :color 9820,000,255,000 TOP 9820,SEITE_OBEN% :LEFT 9820,SEITE_RECHTS01% :HEIGHT 9820,600 :WIDTH 9820,75 ' *** Andockstellen Rechte Seite erstellen ************************************* BUTTON 9830 :TOP 9830,SEITE_OBEN% :LEFT 9830,SEITE_RECHTS02% :HEIGHT 9830,600 :WIDTH 9830,19 ' *** Andockstellen Linke Seite leere Textfelder erstellen ********************* j% = 0 for i% = 8001 to 8020 edit i% :top i%,SEITE_OBEN04% + j% :left i%,15 :width i%,60 :height i%,25 :j% = j% + 30 next i% ' *** Andockstellen Rechte Seite leere Textfelder erstellen ******************** j% = 0 for i% = 8021 to 8040 edit i% :top i%,SEITE_OBEN04% + j% :left i%,SEITE_RECHTS01% + 10 :width i%,60 :height i%,25 :j% = j% + 30 next i% ' ****************************************************************************** ' *** LABEL ERSTELLEN ********************************************************** label main : ' Start Hauptrogramm label halt_Lkw_all : ' Stop für alle LKW label start_Lkw_all : ' Start für alle LKW label Start_Lkw_01 : ' Start für einen LKW label Start_Lkw_02 : ' Start für einen LKW label Start_Lkw_03 : ' Start für einen LKW label Start_Lkw_04 : ' Start für einen LKW label Start_Lkw_05 : ' Start für einen LKW label Start_Lkw_06 : ' Start für einen LKW label Start_Lkw_07 : ' Start für einen LKW label Start_Lkw_08 : ' Start für einen LKW label Start_Lkw_09 : ' Start für einen LKW label Start_Lkw_10 : ' Start für einen LKW label FAHRTDATENFUERLKW ' ' ****************************************************************************** dim sens% : ' dim dir% : ' dim LKW% : ' dim Anzahl_LKW% : Anzahl_LKW% = 10 dim Anzahl_Fahrten% : Anzahl_Fahrten% = 99 dim Zaehler_LKW% : Zaehler_LKW% = 1 dim Z1% :' Variable für Anzahl_LKW% in Datentabelle ' ' *** Geschwindigkeit pro LKW ************************************************** dim v%(Anzahl_LKW%) v%(01) = 5 : ' Geschwindigkeit für LKW_01 v%(02) = 4 : ' Geschwindigkeit für LKW_02 v%(03) = 9 : ' Geschwindigkeit für LKW_03 v%(04) = 7 : ' Geschwindigkeit für LKW_04 v%(05) = 7 : ' Geschwindigkeit für LKW_05 v%(06) = 7 : ' Geschwindigkeit für LKW_06 v%(07) = 7 : ' Geschwindigkeit für LKW_07 v%(08) = 7 : ' Geschwindigkeit für LKW_08 v%(09) = 7 : ' Geschwindigkeit für LKW_09 v%(10) = 1 : ' Geschwindigkeit für LKW_10 ' *** Variablen für horizontal Fahrt ****************************************** dim RICHTUNG_horizontal%(Anzahl_LKW%,Anzahl_Fahrten%) ' *** Variablen für vertikal Fahrt ********************************************* dim RICHTUNG_vertikal%(Anzahl_LKW%,Anzahl_Fahrten%) ' *** dim delta_horizontal%(Anzahl_LKW%) ' *** dim delta_vertikal%(Anzahl_LKW%) ' *** dim pos%(Anzahl_LKW%) ' ****************************************************************************** Gosub FAHRTDATENFUERLKW ' ' ****************************************************************************** ON_CLICK 9701,halt_Lkw_all ON_CLICK 9702,start_Lkw_all ON_CLICK 9703,Start_Lkw_01 ON_CLICK 9704,Start_Lkw_02 ON_CLICK 9705,Start_Lkw_03 ON_CLICK 9706,Start_Lkw_04 ON_CLICK 9707,Start_Lkw_05 ON_CLICK 9708,Start_Lkw_06 ON_CLICK 9709,Start_Lkw_07 ON_CLICK 9710,Start_Lkw_08 ON_CLICK 9711,Start_Lkw_09 ON_CLICK 9712,Start_Lkw_10 ' ' Time Interval = 10 <--- Je kleiner um so schneller und flüssiger timer 9998 : timer_interval 9998,10 : on_timer 9998,main : timer_off 9998 ' end ' *** TIMER INITIALISIERUNG **************************************************** start_Lkw_all: timer_on 9998 inactive 9702 :inactive 9703 :inactive 9704 :inactive 9705 :inactive 9706 inactive 9707 :inactive 9708 :inactive 9709 :inactive 9710 :inactive 9711 inactive 9712 return ' Start_Lkw_01: Anzahl_LKW% = 1 :Zaehler_LKW% = 1 :timer_on 9998 inactive 9702 : inactive 9703 return ' Start_Lkw_02: Anzahl_LKW% = 2 : Zaehler_LKW% = 2 :timer_on 9998 inactive 9702 : inactive 9704 return ' Start_Lkw_03: Anzahl_LKW% = 3 : Zaehler_LKW% = 3 :timer_on 9998 inactive 9702 : inactive 9705 return ' Start_Lkw_04: Anzahl_LKW% = 4 : Zaehler_LKW% = 4 :timer_on 9998 inactive 9702 : inactive 9706 return ' Start_Lkw_05: Anzahl_LKW% = 5 : Zaehler_LKW% = 5 :timer_on 9998 inactive 9702 : inactive 9707 return ' Start_Lkw_06: Anzahl_LKW% = 6 : Zaehler_LKW% = 6 :timer_on 9998 inactive 9702 : inactive 9708 return ' Start_Lkw_07: Anzahl_LKW% = 7 : Zaehler_LKW% = 7 :timer_on 9998 inactive 9702 : inactive 9709 return ' Start_Lkw_08: Anzahl_LKW% = 8 : Zaehler_LKW% = 8 :timer_on 9998 inactive 9702 : inactive 9710 return ' Start_Lkw_09: Anzahl_LKW% = 9 : Zaehler_LKW% = 9 :timer_on 9998 inactive 9702 : inactive 9711 return ' Start_Lkw_10: Anzahl_LKW% = 10 : Zaehler_LKW% = 10 :timer_on 9998 inactive 9702 : inactive 9712 return ' ' ***************************************************************************** ' ***************************************************************************** main: timer_off_all :' Timer ausschalten ' for LKW% = Zaehler_LKW% to Anzahl_LKW% :' Beginn Zählschleife Anzahl LKW
' if (left(LKW%)<SEITE_LINKS%) or (left(LKW%)>SEITE_RECHTS02%) then v%(LKW%) = 0 - v%(LKW%)
if delta_horizontal%(LKW%) = 0 and delta_vertikal%(LKW%) = 0
sens% = v%(LKW%)/abs(v%(LKW%))
pos%(LKW%) = pos%(LKW%) + sens%
if pos%(LKW%) < 1 then pos%(LKW%) = 1
if pos%(LKW%) > 99 then pos%(LKW%) = Anzahl_Fahrten% :' <-- Anzahl der Fahrtwechsel
delta_horizontal%(LKW%) = sens% * RICHTUNG_horizontal%(LKW%,pos%(LKW%))
delta_vertikal%(LKW%) = sens% * RICHTUNG_vertikal%(LKW%,pos%(LKW%))
end_if
' *** Horizontal Bewegung ******************************************************
if abs(delta_horizontal%(LKW%)) > 0
dir% = RICHTUNG_horizontal%(LKW%,pos%(LKW%))/abs(RICHTUNG_horizontal%(LKW%,pos%(LKW%)))
delta_horizontal%(LKW%) = abs(delta_horizontal%(LKW%)) - abs(v%(LKW%))
if delta_horizontal%(LKW%) < 0
left LKW%,left(LKW%) + (abs(v%(LKW%)) + delta_horizontal%(LKW%))*sens%*dir%
delta_horizontal%(LKW%) = 0
else
left LKW%,left(LKW%) + v%(LKW%)*dir%
end_if
end_if
' *** Vertikal Bewegung ********************************************************
if abs(delta_vertikal%(LKW%)) > 0
dir% = RICHTUNG_vertikal%(LKW%,pos%(LKW%))/abs(RICHTUNG_vertikal%(LKW%,pos%(LKW%)))
delta_vertikal%(LKW%) = abs(delta_vertikal%(LKW%)) - abs(v%(LKW%))
if delta_vertikal%(LKW%) < 0
top LKW% ,top(LKW%) + (abs(v%(LKW%)) + delta_vertikal%(LKW%))*sens%*dir%
delta_vertikal%(LKW%) = 0
else
top LKW%,top(LKW%) + v%(LKW%)*dir%
end_if
end_if ' next LKW% :' End Zählschleife Anzahl LKW ' timer_on 9998 :' Timer einschalten ' return :' Rücksprung nach ' ' ****************************************************************************** ' *** PROGRAMM ANHALTEN ******************************************************** halt_Lkw_all: timer_off_all terminate ' ****************************************************************************** ' ****************************************************************************** FAHRTDATENFUERLKW: ' ' *** SYMBOLE FÜR LKW erstellen ************************************************ for i% = 1 to Anzahl_LKW% ' *** LKW als Symbol *********************************************************** edit i% ' *** LKW als Bild ************************************************************* ' picture i% top i%,SEITE_OBEN05% + (30*i%) ' ****************************************************************************** ' *** Position links = SEITE_LINKS% ' *** Position rechts = SEITE_RECHTS03%+95 ' ****************************************************************************** if i% = 01 then left i%,SEITE_LINKS% if i% = 02 then left i%,SEITE_LINKS% if i% = 03 then left i%,SEITE_LINKS% if i% = 04 then left i%,SEITE_RECHTS03%+95 if i% = 05 then left i%,SEITE_LINKS% if i% = 06 then left i%,SEITE_LINKS% if i% = 07 then left i%,SEITE_LINKS% if i% = 08 then left i%,SEITE_LINKS% if i% = 09 then left i%,SEITE_LINKS% if i% = 10 then left i%,SEITE_LINKS% ' *** Abmessung der LKW's ****************************************************** width i%,45 :height i%,25 ' *** LKW als Bild ************************************************************* ' FILE_LOAD i%,Speicherplatz_Bild01$ ' STRETCH_ON i% ' SHOW i% ' *** LKW als Symbol *********************************************************** if i% = 01 then color i%,255,000,000 if i% = 02 then color i%,000,255,000 if i% = 03 then color i%,020,200,255 if i% = 04 then color i%,240,240,020 if i% = 05 then color i%,255,255,255 if i% = 06 then color i%,255,255,255 if i% = 07 then color i%,255,255,255 if i% = 08 then color i%,255,255,255 if i% = 09 then color i%,255,255,255 if i% = 10 then color i%,255,255,255 ' *** Beschriftung der LKW's *************************************************** text i%,"Linie "+STR$(i%) ' if i% = 01 then pos%(i%) = 0 if i% = 02 then pos%(i%) = 0 if i% = 03 then pos%(i%) = 0 if i% = 04 then pos%(i%) = 0 if i% = 05 then pos%(i%) = 0 if i% = 06 then pos%(i%) = 0 if i% = 07 then pos%(i%) = 0 if i% = 08 then pos%(i%) = 0 if i% = 09 then pos%(i%) = 0 if i% = 10 then pos%(i%) = 0 next i% ' *** Text für Andockstellen links ********************************************* text 8001," Tor 1 " :text 8002," Tor 2 " :text 8003," Tor 3 " :text 8004," Tor 4 " text 8005," Tor 5 " :text 8006," Tor 6 " :text 8007," Tor 7 " :text 8008," Tor 8 " text 8009," Tor 9 " :text 8010," Tor 10 " :text 8011," Tor 11 " :text 8012," Tor 12 " text 8013," Tor 13 " :text 8014," Tor 14 " :text 8015," Tor 15 " :text 8016," Tor 16 " text 8017," Tor 17 " :text 8018," Tor 18 " :text 8019," Tor 19 " :text 8020," Tor 20 " ' *** Text für Andockstellen rechts ******************************************** text 8021," Co. AA" :text 8022," Co. BB" :text 8023," Co. CC" :text 8024," Co. DD" text 8025," Co. EE" :text 8026," Co. FF" :text 8027," Co. GG" :text 8028," Co. HH" text 8029," Co. II" :text 8030," Co. JJ" :text 8031," Co. KK" :text 8032," Co. LL" text 8033," Co. MM" :text 8034," Co. NN" :text 8035," Co. OO" :text 8036," Co. PP" text 8037," Co. QQ" :text 8038," Co. RR" :text 8039," Co. SS" :text 8040," Co. TT" ' ****************************************************************************** ' ------------------------------------------------------------------------------ ' Richtung nach rechts = (SEITE_RECHTS03%/2) ' Richtung nach links = 0-(SEITE_RECHTS03%/2) ' Richtung nach unten = POSITIV xxx STEP 30 - 510 ' Richtung nach oben = NEGATIV -xxx STEP -30 - 510 ' ------------------------------------------------------------------------------ ' *** DATEN FÜR LKW 001 ******************************************************** Z1% = 1 RICHTUNG_horizontal%(Z1%,01) = (SEITE_RECHTS03%/4) : RICHTUNG_vertikal%(Z1%,01) = 000 RICHTUNG_horizontal%(Z1%,02) = 000 : RICHTUNG_vertikal%(Z1%,02) = 120 RICHTUNG_horizontal%(Z1%,03) = 0-(SEITE_RECHTS03%/4) : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 0-(SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,07) = -120 RICHTUNG_horizontal%(Z1%,08) = 0-(SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,09) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,09) = 000 RICHTUNG_horizontal%(Z1%,10) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 RICHTUNG_horizontal%(Z1%,12) = 000 : RICHTUNG_vertikal%(Z1%,12) = 000 RICHTUNG_horizontal%(Z1%,13) = 000 : RICHTUNG_vertikal%(Z1%,13) = 000 RICHTUNG_horizontal%(Z1%,14) = 000 : RICHTUNG_vertikal%(Z1%,14) = 000 RICHTUNG_horizontal%(Z1%,15) = 000 : RICHTUNG_vertikal%(Z1%,15) = 000 RICHTUNG_horizontal%(Z1%,16) = 000 : RICHTUNG_vertikal%(Z1%,16) = 000 RICHTUNG_horizontal%(Z1%,17) = 000 : RICHTUNG_vertikal%(Z1%,17) = 000 RICHTUNG_horizontal%(Z1%,18) = 000 : RICHTUNG_vertikal%(Z1%,18) = 000 RICHTUNG_horizontal%(Z1%,19) = 000 : RICHTUNG_vertikal%(Z1%,19) = 000 RICHTUNG_horizontal%(Z1%,20) = 000 : RICHTUNG_vertikal%(Z1%,20) = 000 RICHTUNG_horizontal%(Z1%,21) = 000 : RICHTUNG_vertikal%(Z1%,21) = 000 RICHTUNG_horizontal%(Z1%,22) = 000 : RICHTUNG_vertikal%(Z1%,22) = 000 RICHTUNG_horizontal%(Z1%,23) = 000 : RICHTUNG_vertikal%(Z1%,23) = 000 RICHTUNG_horizontal%(Z1%,24) = 000 : RICHTUNG_vertikal%(Z1%,24) = 000 RICHTUNG_horizontal%(Z1%,25) = 000 : RICHTUNG_vertikal%(Z1%,25) = 000 RICHTUNG_horizontal%(Z1%,26) = 000 : RICHTUNG_vertikal%(Z1%,26) = 000 RICHTUNG_horizontal%(Z1%,27) = 000 : RICHTUNG_vertikal%(Z1%,27) = 000 RICHTUNG_horizontal%(Z1%,28) = 000 : RICHTUNG_vertikal%(Z1%,28) = 000 RICHTUNG_horizontal%(Z1%,29) = 000 : RICHTUNG_vertikal%(Z1%,29) = 000 RICHTUNG_horizontal%(Z1%,30) = 000 : RICHTUNG_vertikal%(Z1%,30) = 000 RICHTUNG_horizontal%(Z1%,31) = 000 : RICHTUNG_vertikal%(Z1%,31) = 000 RICHTUNG_horizontal%(Z1%,32) = 000 : RICHTUNG_vertikal%(Z1%,32) = 000 RICHTUNG_horizontal%(Z1%,33) = 000 : RICHTUNG_vertikal%(Z1%,33) = 000 RICHTUNG_horizontal%(Z1%,34) = 000 : RICHTUNG_vertikal%(Z1%,34) = 000 RICHTUNG_horizontal%(Z1%,35) = 000 : RICHTUNG_vertikal%(Z1%,35) = 000 RICHTUNG_horizontal%(Z1%,36) = 000 : RICHTUNG_vertikal%(Z1%,36) = 000 RICHTUNG_horizontal%(Z1%,37) = 000 : RICHTUNG_vertikal%(Z1%,37) = 000 RICHTUNG_horizontal%(Z1%,38) = 000 : RICHTUNG_vertikal%(Z1%,38) = 000 RICHTUNG_horizontal%(Z1%,39) = 000 : RICHTUNG_vertikal%(Z1%,39) = 000 RICHTUNG_horizontal%(Z1%,40) = 000 : RICHTUNG_vertikal%(Z1%,40) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,51) = 000 : RICHTUNG_vertikal%(Z1%,51) = 000 RICHTUNG_horizontal%(Z1%,52) = 000 : RICHTUNG_vertikal%(Z1%,52) = 000 RICHTUNG_horizontal%(Z1%,53) = 000 : RICHTUNG_vertikal%(Z1%,53) = 000 RICHTUNG_horizontal%(Z1%,54) = 000 : RICHTUNG_vertikal%(Z1%,54) = 000 RICHTUNG_horizontal%(Z1%,55) = 000 : RICHTUNG_vertikal%(Z1%,55) = 000 RICHTUNG_horizontal%(Z1%,56) = 000 : RICHTUNG_vertikal%(Z1%,56) = 000 RICHTUNG_horizontal%(Z1%,57) = 000 : RICHTUNG_vertikal%(Z1%,57) = 000 RICHTUNG_horizontal%(Z1%,58) = 000 : RICHTUNG_vertikal%(Z1%,58) = 000 RICHTUNG_horizontal%(Z1%,59) = 000 : RICHTUNG_vertikal%(Z1%,59) = 000 RICHTUNG_horizontal%(Z1%,60) = 000 : RICHTUNG_vertikal%(Z1%,60) = 000 RICHTUNG_horizontal%(Z1%,61) = 000 : RICHTUNG_vertikal%(Z1%,61) = 000 RICHTUNG_horizontal%(Z1%,62) = 000 : RICHTUNG_vertikal%(Z1%,62) = 000 RICHTUNG_horizontal%(Z1%,63) = 000 : RICHTUNG_vertikal%(Z1%,63) = 000 RICHTUNG_horizontal%(Z1%,64) = 000 : RICHTUNG_vertikal%(Z1%,64) = 000 RICHTUNG_horizontal%(Z1%,65) = 000 : RICHTUNG_vertikal%(Z1%,65) = 000 RICHTUNG_horizontal%(Z1%,66) = 000 : RICHTUNG_vertikal%(Z1%,66) = 000 RICHTUNG_horizontal%(Z1%,67) = 000 : RICHTUNG_vertikal%(Z1%,67) = 000 RICHTUNG_horizontal%(Z1%,68) = 000 : RICHTUNG_vertikal%(Z1%,68) = 000 RICHTUNG_horizontal%(Z1%,69) = 000 : RICHTUNG_vertikal%(Z1%,69) = 000 RICHTUNG_horizontal%(Z1%,70) = 000 : RICHTUNG_vertikal%(Z1%,70) = 000 RICHTUNG_horizontal%(Z1%,71) = 000 : RICHTUNG_vertikal%(Z1%,71) = 000 RICHTUNG_horizontal%(Z1%,72) = 000 : RICHTUNG_vertikal%(Z1%,72) = 000 RICHTUNG_horizontal%(Z1%,73) = 000 : RICHTUNG_vertikal%(Z1%,73) = 000 RICHTUNG_horizontal%(Z1%,74) = 000 : RICHTUNG_vertikal%(Z1%,74) = 000 RICHTUNG_horizontal%(Z1%,75) = 000 : RICHTUNG_vertikal%(Z1%,75) = 000 RICHTUNG_horizontal%(Z1%,76) = 000 : RICHTUNG_vertikal%(Z1%,76) = 000 RICHTUNG_horizontal%(Z1%,77) = 000 : RICHTUNG_vertikal%(Z1%,77) = 000 RICHTUNG_horizontal%(Z1%,78) = 000 : RICHTUNG_vertikal%(Z1%,78) = 000 RICHTUNG_horizontal%(Z1%,79) = 000 : RICHTUNG_vertikal%(Z1%,79) = 000 RICHTUNG_horizontal%(Z1%,80) = 000 : RICHTUNG_vertikal%(Z1%,80) = 000 RICHTUNG_horizontal%(Z1%,81) = 000 : RICHTUNG_vertikal%(Z1%,81) = 000 RICHTUNG_horizontal%(Z1%,82) = 000 : RICHTUNG_vertikal%(Z1%,82) = 000 RICHTUNG_horizontal%(Z1%,83) = 000 : RICHTUNG_vertikal%(Z1%,83) = 000 RICHTUNG_horizontal%(Z1%,84) = 000 : RICHTUNG_vertikal%(Z1%,84) = 000 RICHTUNG_horizontal%(Z1%,85) = 000 : RICHTUNG_vertikal%(Z1%,85) = 000 RICHTUNG_horizontal%(Z1%,86) = 000 : RICHTUNG_vertikal%(Z1%,86) = 000 RICHTUNG_horizontal%(Z1%,87) = 000 : RICHTUNG_vertikal%(Z1%,87) = 000 RICHTUNG_horizontal%(Z1%,88) = 000 : RICHTUNG_vertikal%(Z1%,88) = 000 RICHTUNG_horizontal%(Z1%,89) = 000 : RICHTUNG_vertikal%(Z1%,89) = 000 RICHTUNG_horizontal%(Z1%,90) = 000 : RICHTUNG_vertikal%(Z1%,90) = 000 RICHTUNG_horizontal%(Z1%,91) = 000 : RICHTUNG_vertikal%(Z1%,91) = 000 RICHTUNG_horizontal%(Z1%,92) = 000 : RICHTUNG_vertikal%(Z1%,92) = 000 RICHTUNG_horizontal%(Z1%,93) = 000 : RICHTUNG_vertikal%(Z1%,93) = 000 RICHTUNG_horizontal%(Z1%,94) = 000 : RICHTUNG_vertikal%(Z1%,94) = 000 RICHTUNG_horizontal%(Z1%,95) = 000 : RICHTUNG_vertikal%(Z1%,95) = 000 RICHTUNG_horizontal%(Z1%,96) = 000 : RICHTUNG_vertikal%(Z1%,96) = 000 RICHTUNG_horizontal%(Z1%,97) = 000 : RICHTUNG_vertikal%(Z1%,97) = 000 RICHTUNG_horizontal%(Z1%,98) = 000 : RICHTUNG_vertikal%(Z1%,98) = 000 RICHTUNG_horizontal%(Z1%,99) = 000 : RICHTUNG_vertikal%(Z1%,99) = 000 ' ****************************************************************************** ' *** End Teil 1 *************************************************************** ' ****************************************************************************** ' ****************************************************************************** ' ****************************************************************************** | |
| | | Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Dim 14 Juil 2013 - 21:51 | |
| Teil 2-14.07.2013- - Code:
-
' ****************************************************************************** ' *** Start Teil 2 ************************************************************* ' ****************************************************************************** ' *** DATEN FÜR LKW 002 ******************************************************** Z1% = 2 RICHTUNG_horizontal%(Z1%,01) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,01) = 000 RICHTUNG_horizontal%(Z1%,02) = 000 : RICHTUNG_vertikal%(Z1%,02) = 000 RICHTUNG_horizontal%(Z1%,03) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = 000 : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 000 : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,07) = 000 RICHTUNG_horizontal%(Z1%,08) = 000 : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,09) = 000 : RICHTUNG_vertikal%(Z1%,09) = 000 RICHTUNG_horizontal%(Z1%,10) = 000 : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 RICHTUNG_horizontal%(Z1%,12) = 000 : RICHTUNG_vertikal%(Z1%,12) = 000 RICHTUNG_horizontal%(Z1%,13) = 000 : RICHTUNG_vertikal%(Z1%,13) = 000 RICHTUNG_horizontal%(Z1%,14) = 000 : RICHTUNG_vertikal%(Z1%,14) = 000 RICHTUNG_horizontal%(Z1%,15) = 000 : RICHTUNG_vertikal%(Z1%,15) = 000 RICHTUNG_horizontal%(Z1%,16) = 000 : RICHTUNG_vertikal%(Z1%,16) = 000 RICHTUNG_horizontal%(Z1%,17) = 000 : RICHTUNG_vertikal%(Z1%,17) = 000 RICHTUNG_horizontal%(Z1%,18) = 000 : RICHTUNG_vertikal%(Z1%,18) = 000 RICHTUNG_horizontal%(Z1%,19) = 000 : RICHTUNG_vertikal%(Z1%,19) = 000 RICHTUNG_horizontal%(Z1%,20) = 000 : RICHTUNG_vertikal%(Z1%,20) = 000 RICHTUNG_horizontal%(Z1%,21) = 000 : RICHTUNG_vertikal%(Z1%,21) = 000 RICHTUNG_horizontal%(Z1%,22) = 000 : RICHTUNG_vertikal%(Z1%,22) = 000 RICHTUNG_horizontal%(Z1%,23) = 000 : RICHTUNG_vertikal%(Z1%,23) = 000 RICHTUNG_horizontal%(Z1%,24) = 000 : RICHTUNG_vertikal%(Z1%,24) = 000 RICHTUNG_horizontal%(Z1%,25) = 000 : RICHTUNG_vertikal%(Z1%,25) = 000 RICHTUNG_horizontal%(Z1%,26) = 000 : RICHTUNG_vertikal%(Z1%,26) = 000 RICHTUNG_horizontal%(Z1%,27) = 000 : RICHTUNG_vertikal%(Z1%,27) = 000 RICHTUNG_horizontal%(Z1%,28) = 000 : RICHTUNG_vertikal%(Z1%,28) = 000 RICHTUNG_horizontal%(Z1%,29) = 000 : RICHTUNG_vertikal%(Z1%,29) = 000 RICHTUNG_horizontal%(Z1%,30) = 000 : RICHTUNG_vertikal%(Z1%,30) = 000 RICHTUNG_horizontal%(Z1%,31) = 000 : RICHTUNG_vertikal%(Z1%,31) = 000 RICHTUNG_horizontal%(Z1%,32) = 000 : RICHTUNG_vertikal%(Z1%,32) = 000 RICHTUNG_horizontal%(Z1%,33) = 000 : RICHTUNG_vertikal%(Z1%,33) = 000 RICHTUNG_horizontal%(Z1%,34) = 000 : RICHTUNG_vertikal%(Z1%,34) = 000 RICHTUNG_horizontal%(Z1%,35) = 000 : RICHTUNG_vertikal%(Z1%,35) = 000 RICHTUNG_horizontal%(Z1%,36) = 000 : RICHTUNG_vertikal%(Z1%,36) = 000 RICHTUNG_horizontal%(Z1%,37) = 000 : RICHTUNG_vertikal%(Z1%,37) = 000 RICHTUNG_horizontal%(Z1%,38) = 000 : RICHTUNG_vertikal%(Z1%,38) = 000 RICHTUNG_horizontal%(Z1%,39) = 000 : RICHTUNG_vertikal%(Z1%,39) = 000 RICHTUNG_horizontal%(Z1%,40) = 000 : RICHTUNG_vertikal%(Z1%,40) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,51) = 000 : RICHTUNG_vertikal%(Z1%,51) = 000 RICHTUNG_horizontal%(Z1%,52) = 000 : RICHTUNG_vertikal%(Z1%,52) = 000 RICHTUNG_horizontal%(Z1%,53) = 000 : RICHTUNG_vertikal%(Z1%,53) = 000 RICHTUNG_horizontal%(Z1%,54) = 000 : RICHTUNG_vertikal%(Z1%,54) = 000 RICHTUNG_horizontal%(Z1%,55) = 000 : RICHTUNG_vertikal%(Z1%,55) = 000 RICHTUNG_horizontal%(Z1%,56) = 000 : RICHTUNG_vertikal%(Z1%,56) = 000 RICHTUNG_horizontal%(Z1%,57) = 000 : RICHTUNG_vertikal%(Z1%,57) = 000 RICHTUNG_horizontal%(Z1%,58) = 000 : RICHTUNG_vertikal%(Z1%,58) = 000 RICHTUNG_horizontal%(Z1%,59) = 000 : RICHTUNG_vertikal%(Z1%,59) = 000 RICHTUNG_horizontal%(Z1%,60) = 000 : RICHTUNG_vertikal%(Z1%,60) = 000 RICHTUNG_horizontal%(Z1%,61) = 000 : RICHTUNG_vertikal%(Z1%,61) = 000 RICHTUNG_horizontal%(Z1%,62) = 000 : RICHTUNG_vertikal%(Z1%,62) = 000 RICHTUNG_horizontal%(Z1%,63) = 000 : RICHTUNG_vertikal%(Z1%,63) = 000 RICHTUNG_horizontal%(Z1%,64) = 000 : RICHTUNG_vertikal%(Z1%,64) = 000 RICHTUNG_horizontal%(Z1%,65) = 000 : RICHTUNG_vertikal%(Z1%,65) = 000 RICHTUNG_horizontal%(Z1%,66) = 000 : RICHTUNG_vertikal%(Z1%,66) = 000 RICHTUNG_horizontal%(Z1%,67) = 000 : RICHTUNG_vertikal%(Z1%,67) = 000 RICHTUNG_horizontal%(Z1%,68) = 000 : RICHTUNG_vertikal%(Z1%,68) = 000 RICHTUNG_horizontal%(Z1%,69) = 000 : RICHTUNG_vertikal%(Z1%,69) = 000 RICHTUNG_horizontal%(Z1%,70) = 000 : RICHTUNG_vertikal%(Z1%,70) = 000 RICHTUNG_horizontal%(Z1%,71) = 000 : RICHTUNG_vertikal%(Z1%,71) = 000 RICHTUNG_horizontal%(Z1%,72) = 000 : RICHTUNG_vertikal%(Z1%,72) = 000 RICHTUNG_horizontal%(Z1%,73) = 000 : RICHTUNG_vertikal%(Z1%,73) = 000 RICHTUNG_horizontal%(Z1%,74) = 000 : RICHTUNG_vertikal%(Z1%,74) = 000 RICHTUNG_horizontal%(Z1%,75) = 000 : RICHTUNG_vertikal%(Z1%,75) = 000 RICHTUNG_horizontal%(Z1%,76) = 000 : RICHTUNG_vertikal%(Z1%,76) = 000 RICHTUNG_horizontal%(Z1%,77) = 000 : RICHTUNG_vertikal%(Z1%,77) = 000 RICHTUNG_horizontal%(Z1%,78) = 000 : RICHTUNG_vertikal%(Z1%,78) = 000 RICHTUNG_horizontal%(Z1%,79) = 000 : RICHTUNG_vertikal%(Z1%,79) = 000 RICHTUNG_horizontal%(Z1%,80) = 000 : RICHTUNG_vertikal%(Z1%,80) = 000 RICHTUNG_horizontal%(Z1%,81) = 000 : RICHTUNG_vertikal%(Z1%,81) = 000 RICHTUNG_horizontal%(Z1%,82) = 000 : RICHTUNG_vertikal%(Z1%,82) = 000 RICHTUNG_horizontal%(Z1%,83) = 000 : RICHTUNG_vertikal%(Z1%,83) = 000 RICHTUNG_horizontal%(Z1%,84) = 000 : RICHTUNG_vertikal%(Z1%,84) = 000 RICHTUNG_horizontal%(Z1%,85) = 000 : RICHTUNG_vertikal%(Z1%,85) = 000 RICHTUNG_horizontal%(Z1%,86) = 000 : RICHTUNG_vertikal%(Z1%,86) = 000 RICHTUNG_horizontal%(Z1%,87) = 000 : RICHTUNG_vertikal%(Z1%,87) = 000 RICHTUNG_horizontal%(Z1%,88) = 000 : RICHTUNG_vertikal%(Z1%,88) = 000 RICHTUNG_horizontal%(Z1%,89) = 000 : RICHTUNG_vertikal%(Z1%,89) = 000 RICHTUNG_horizontal%(Z1%,90) = 000 : RICHTUNG_vertikal%(Z1%,90) = 000 RICHTUNG_horizontal%(Z1%,91) = 000 : RICHTUNG_vertikal%(Z1%,91) = 000 RICHTUNG_horizontal%(Z1%,92) = 000 : RICHTUNG_vertikal%(Z1%,92) = 000 RICHTUNG_horizontal%(Z1%,93) = 000 : RICHTUNG_vertikal%(Z1%,93) = 000 RICHTUNG_horizontal%(Z1%,94) = 000 : RICHTUNG_vertikal%(Z1%,94) = 000 RICHTUNG_horizontal%(Z1%,95) = 000 : RICHTUNG_vertikal%(Z1%,95) = 000 RICHTUNG_horizontal%(Z1%,96) = 000 : RICHTUNG_vertikal%(Z1%,96) = 000 RICHTUNG_horizontal%(Z1%,97) = 000 : RICHTUNG_vertikal%(Z1%,97) = 000 RICHTUNG_horizontal%(Z1%,98) = 000 : RICHTUNG_vertikal%(Z1%,98) = 000 RICHTUNG_horizontal%(Z1%,99) = 000 : RICHTUNG_vertikal%(Z1%,99) = 000 ' *** DATEN FÜR LKW 003 ******************************************************** Z1% = 3 RICHTUNG_horizontal%(Z1%,01) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,01) = 510 RICHTUNG_horizontal%(Z1%,02) = 000 : RICHTUNG_vertikal%(Z1%,02) = 000 RICHTUNG_horizontal%(Z1%,03) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = 000 : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 000 : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,07) = 000 RICHTUNG_horizontal%(Z1%,08) = 000 : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,09) = 000 : RICHTUNG_vertikal%(Z1%,09) = 000 RICHTUNG_horizontal%(Z1%,10) = 000 : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 RICHTUNG_horizontal%(Z1%,12) = 000 : RICHTUNG_vertikal%(Z1%,12) = 000 RICHTUNG_horizontal%(Z1%,13) = 000 : RICHTUNG_vertikal%(Z1%,13) = 000 RICHTUNG_horizontal%(Z1%,14) = 000 : RICHTUNG_vertikal%(Z1%,14) = 000 RICHTUNG_horizontal%(Z1%,15) = 000 : RICHTUNG_vertikal%(Z1%,15) = 000 RICHTUNG_horizontal%(Z1%,16) = 000 : RICHTUNG_vertikal%(Z1%,16) = 000 RICHTUNG_horizontal%(Z1%,17) = 000 : RICHTUNG_vertikal%(Z1%,17) = 000 RICHTUNG_horizontal%(Z1%,18) = 000 : RICHTUNG_vertikal%(Z1%,18) = 000 RICHTUNG_horizontal%(Z1%,19) = 000 : RICHTUNG_vertikal%(Z1%,19) = 000 RICHTUNG_horizontal%(Z1%,20) = 000 : RICHTUNG_vertikal%(Z1%,20) = 000 RICHTUNG_horizontal%(Z1%,21) = 000 : RICHTUNG_vertikal%(Z1%,21) = 000 RICHTUNG_horizontal%(Z1%,22) = 000 : RICHTUNG_vertikal%(Z1%,22) = 000 RICHTUNG_horizontal%(Z1%,23) = 000 : RICHTUNG_vertikal%(Z1%,23) = 000 RICHTUNG_horizontal%(Z1%,24) = 000 : RICHTUNG_vertikal%(Z1%,24) = 000 RICHTUNG_horizontal%(Z1%,25) = 000 : RICHTUNG_vertikal%(Z1%,25) = 000 RICHTUNG_horizontal%(Z1%,26) = 000 : RICHTUNG_vertikal%(Z1%,26) = 000 RICHTUNG_horizontal%(Z1%,27) = 000 : RICHTUNG_vertikal%(Z1%,27) = 000 RICHTUNG_horizontal%(Z1%,28) = 000 : RICHTUNG_vertikal%(Z1%,28) = 000 RICHTUNG_horizontal%(Z1%,29) = 000 : RICHTUNG_vertikal%(Z1%,29) = 000 RICHTUNG_horizontal%(Z1%,30) = 000 : RICHTUNG_vertikal%(Z1%,30) = 000 RICHTUNG_horizontal%(Z1%,31) = 000 : RICHTUNG_vertikal%(Z1%,31) = 000 RICHTUNG_horizontal%(Z1%,32) = 000 : RICHTUNG_vertikal%(Z1%,32) = 000 RICHTUNG_horizontal%(Z1%,33) = 000 : RICHTUNG_vertikal%(Z1%,33) = 000 RICHTUNG_horizontal%(Z1%,34) = 000 : RICHTUNG_vertikal%(Z1%,34) = 000 RICHTUNG_horizontal%(Z1%,35) = 000 : RICHTUNG_vertikal%(Z1%,35) = 000 RICHTUNG_horizontal%(Z1%,36) = 000 : RICHTUNG_vertikal%(Z1%,36) = 000 RICHTUNG_horizontal%(Z1%,37) = 000 : RICHTUNG_vertikal%(Z1%,37) = 000 RICHTUNG_horizontal%(Z1%,38) = 000 : RICHTUNG_vertikal%(Z1%,38) = 000 RICHTUNG_horizontal%(Z1%,39) = 000 : RICHTUNG_vertikal%(Z1%,39) = 000 RICHTUNG_horizontal%(Z1%,40) = 000 : RICHTUNG_vertikal%(Z1%,40) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,51) = 000 : RICHTUNG_vertikal%(Z1%,51) = 000 RICHTUNG_horizontal%(Z1%,52) = 000 : RICHTUNG_vertikal%(Z1%,52) = 000 RICHTUNG_horizontal%(Z1%,53) = 000 : RICHTUNG_vertikal%(Z1%,53) = 000 RICHTUNG_horizontal%(Z1%,54) = 000 : RICHTUNG_vertikal%(Z1%,54) = 000 RICHTUNG_horizontal%(Z1%,55) = 000 : RICHTUNG_vertikal%(Z1%,55) = 000 RICHTUNG_horizontal%(Z1%,56) = 000 : RICHTUNG_vertikal%(Z1%,56) = 000 RICHTUNG_horizontal%(Z1%,57) = 000 : RICHTUNG_vertikal%(Z1%,57) = 000 RICHTUNG_horizontal%(Z1%,58) = 000 : RICHTUNG_vertikal%(Z1%,58) = 000 RICHTUNG_horizontal%(Z1%,59) = 000 : RICHTUNG_vertikal%(Z1%,59) = 000 RICHTUNG_horizontal%(Z1%,60) = 000 : RICHTUNG_vertikal%(Z1%,60) = 000 RICHTUNG_horizontal%(Z1%,61) = 000 : RICHTUNG_vertikal%(Z1%,61) = 000 RICHTUNG_horizontal%(Z1%,62) = 000 : RICHTUNG_vertikal%(Z1%,62) = 000 RICHTUNG_horizontal%(Z1%,63) = 000 : RICHTUNG_vertikal%(Z1%,63) = 000 RICHTUNG_horizontal%(Z1%,64) = 000 : RICHTUNG_vertikal%(Z1%,64) = 000 RICHTUNG_horizontal%(Z1%,65) = 000 : RICHTUNG_vertikal%(Z1%,65) = 000 RICHTUNG_horizontal%(Z1%,66) = 000 : RICHTUNG_vertikal%(Z1%,66) = 000 RICHTUNG_horizontal%(Z1%,67) = 000 : RICHTUNG_vertikal%(Z1%,67) = 000 RICHTUNG_horizontal%(Z1%,68) = 000 : RICHTUNG_vertikal%(Z1%,68) = 000 RICHTUNG_horizontal%(Z1%,69) = 000 : RICHTUNG_vertikal%(Z1%,69) = 000 RICHTUNG_horizontal%(Z1%,70) = 000 : RICHTUNG_vertikal%(Z1%,70) = 000 RICHTUNG_horizontal%(Z1%,71) = 000 : RICHTUNG_vertikal%(Z1%,71) = 000 RICHTUNG_horizontal%(Z1%,72) = 000 : RICHTUNG_vertikal%(Z1%,72) = 000 RICHTUNG_horizontal%(Z1%,73) = 000 : RICHTUNG_vertikal%(Z1%,73) = 000 RICHTUNG_horizontal%(Z1%,74) = 000 : RICHTUNG_vertikal%(Z1%,74) = 000 RICHTUNG_horizontal%(Z1%,75) = 000 : RICHTUNG_vertikal%(Z1%,75) = 000 RICHTUNG_horizontal%(Z1%,76) = 000 : RICHTUNG_vertikal%(Z1%,76) = 000 RICHTUNG_horizontal%(Z1%,77) = 000 : RICHTUNG_vertikal%(Z1%,77) = 000 RICHTUNG_horizontal%(Z1%,78) = 000 : RICHTUNG_vertikal%(Z1%,78) = 000 RICHTUNG_horizontal%(Z1%,79) = 000 : RICHTUNG_vertikal%(Z1%,79) = 000 RICHTUNG_horizontal%(Z1%,80) = 000 : RICHTUNG_vertikal%(Z1%,80) = 000 RICHTUNG_horizontal%(Z1%,81) = 000 : RICHTUNG_vertikal%(Z1%,81) = 000 RICHTUNG_horizontal%(Z1%,82) = 000 : RICHTUNG_vertikal%(Z1%,82) = 000 RICHTUNG_horizontal%(Z1%,83) = 000 : RICHTUNG_vertikal%(Z1%,83) = 000 RICHTUNG_horizontal%(Z1%,84) = 000 : RICHTUNG_vertikal%(Z1%,84) = 000 RICHTUNG_horizontal%(Z1%,85) = 000 : RICHTUNG_vertikal%(Z1%,85) = 000 RICHTUNG_horizontal%(Z1%,86) = 000 : RICHTUNG_vertikal%(Z1%,86) = 000 RICHTUNG_horizontal%(Z1%,87) = 000 : RICHTUNG_vertikal%(Z1%,87) = 000 RICHTUNG_horizontal%(Z1%,88) = 000 : RICHTUNG_vertikal%(Z1%,88) = 000 RICHTUNG_horizontal%(Z1%,89) = 000 : RICHTUNG_vertikal%(Z1%,89) = 000 RICHTUNG_horizontal%(Z1%,90) = 000 : RICHTUNG_vertikal%(Z1%,90) = 000 RICHTUNG_horizontal%(Z1%,91) = 000 : RICHTUNG_vertikal%(Z1%,91) = 000 RICHTUNG_horizontal%(Z1%,92) = 000 : RICHTUNG_vertikal%(Z1%,92) = 000 RICHTUNG_horizontal%(Z1%,93) = 000 : RICHTUNG_vertikal%(Z1%,93) = 000 RICHTUNG_horizontal%(Z1%,94) = 000 : RICHTUNG_vertikal%(Z1%,94) = 000 RICHTUNG_horizontal%(Z1%,95) = 000 : RICHTUNG_vertikal%(Z1%,95) = 000 RICHTUNG_horizontal%(Z1%,96) = 000 : RICHTUNG_vertikal%(Z1%,96) = 000 RICHTUNG_horizontal%(Z1%,97) = 000 : RICHTUNG_vertikal%(Z1%,97) = 000 RICHTUNG_horizontal%(Z1%,98) = 000 : RICHTUNG_vertikal%(Z1%,98) = 000 RICHTUNG_horizontal%(Z1%,99) = 000 : RICHTUNG_vertikal%(Z1%,99) = 000 ' *** DATEN FÜR LKW 004 ******************************************************** Z1% = 4 RICHTUNG_horizontal%(Z1%,01) = 0-(SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,01) = 180 RICHTUNG_horizontal%(Z1%,02) = 000 : RICHTUNG_vertikal%(Z1%,02) = 000 RICHTUNG_horizontal%(Z1%,03) = 0-(SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = 000 : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,08) = 000 : RICHTUNG_vertikal%(Z1%,07) = 000 RICHTUNG_horizontal%(Z1%,09) = 000 : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,10) = 000 : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 RICHTUNG_horizontal%(Z1%,12) = 000 : RICHTUNG_vertikal%(Z1%,12) = 000 RICHTUNG_horizontal%(Z1%,13) = 000 : RICHTUNG_vertikal%(Z1%,13) = 000 RICHTUNG_horizontal%(Z1%,14) = 000 : RICHTUNG_vertikal%(Z1%,14) = 000 RICHTUNG_horizontal%(Z1%,15) = 000 : RICHTUNG_vertikal%(Z1%,15) = 000 RICHTUNG_horizontal%(Z1%,16) = 000 : RICHTUNG_vertikal%(Z1%,16) = 000 RICHTUNG_horizontal%(Z1%,17) = 000 : RICHTUNG_vertikal%(Z1%,17) = 000 RICHTUNG_horizontal%(Z1%,18) = 000 : RICHTUNG_vertikal%(Z1%,18) = 000 RICHTUNG_horizontal%(Z1%,19) = 000 : RICHTUNG_vertikal%(Z1%,19) = 000 RICHTUNG_horizontal%(Z1%,20) = 000 : RICHTUNG_vertikal%(Z1%,20) = 000 RICHTUNG_horizontal%(Z1%,21) = 000 : RICHTUNG_vertikal%(Z1%,21) = 000 RICHTUNG_horizontal%(Z1%,22) = 000 : RICHTUNG_vertikal%(Z1%,22) = 000 RICHTUNG_horizontal%(Z1%,23) = 000 : RICHTUNG_vertikal%(Z1%,23) = 000 RICHTUNG_horizontal%(Z1%,24) = 000 : RICHTUNG_vertikal%(Z1%,24) = 000 RICHTUNG_horizontal%(Z1%,25) = 000 : RICHTUNG_vertikal%(Z1%,25) = 000 RICHTUNG_horizontal%(Z1%,26) = 000 : RICHTUNG_vertikal%(Z1%,26) = 000 RICHTUNG_horizontal%(Z1%,27) = 000 : RICHTUNG_vertikal%(Z1%,27) = 000 RICHTUNG_horizontal%(Z1%,28) = 000 : RICHTUNG_vertikal%(Z1%,28) = 000 RICHTUNG_horizontal%(Z1%,29) = 000 : RICHTUNG_vertikal%(Z1%,29) = 000 RICHTUNG_horizontal%(Z1%,30) = 000 : RICHTUNG_vertikal%(Z1%,30) = 000 RICHTUNG_horizontal%(Z1%,31) = 000 : RICHTUNG_vertikal%(Z1%,31) = 000 RICHTUNG_horizontal%(Z1%,32) = 000 : RICHTUNG_vertikal%(Z1%,32) = 000 RICHTUNG_horizontal%(Z1%,33) = 000 : RICHTUNG_vertikal%(Z1%,33) = 000 RICHTUNG_horizontal%(Z1%,34) = 000 : RICHTUNG_vertikal%(Z1%,34) = 000 RICHTUNG_horizontal%(Z1%,35) = 000 : RICHTUNG_vertikal%(Z1%,35) = 000 RICHTUNG_horizontal%(Z1%,36) = 000 : RICHTUNG_vertikal%(Z1%,36) = 000 RICHTUNG_horizontal%(Z1%,37) = 000 : RICHTUNG_vertikal%(Z1%,37) = 000 RICHTUNG_horizontal%(Z1%,38) = 000 : RICHTUNG_vertikal%(Z1%,38) = 000 RICHTUNG_horizontal%(Z1%,39) = 000 : RICHTUNG_vertikal%(Z1%,39) = 000 RICHTUNG_horizontal%(Z1%,40) = 000 : RICHTUNG_vertikal%(Z1%,40) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,51) = 000 : RICHTUNG_vertikal%(Z1%,51) = 000 RICHTUNG_horizontal%(Z1%,52) = 000 : RICHTUNG_vertikal%(Z1%,52) = 000 RICHTUNG_horizontal%(Z1%,53) = 000 : RICHTUNG_vertikal%(Z1%,53) = 000 RICHTUNG_horizontal%(Z1%,54) = 000 : RICHTUNG_vertikal%(Z1%,54) = 000 RICHTUNG_horizontal%(Z1%,55) = 000 : RICHTUNG_vertikal%(Z1%,55) = 000 RICHTUNG_horizontal%(Z1%,56) = 000 : RICHTUNG_vertikal%(Z1%,56) = 000 RICHTUNG_horizontal%(Z1%,57) = 000 : RICHTUNG_vertikal%(Z1%,57) = 000 RICHTUNG_horizontal%(Z1%,58) = 000 : RICHTUNG_vertikal%(Z1%,58) = 000 RICHTUNG_horizontal%(Z1%,59) = 000 : RICHTUNG_vertikal%(Z1%,59) = 000 RICHTUNG_horizontal%(Z1%,60) = 000 : RICHTUNG_vertikal%(Z1%,60) = 000 RICHTUNG_horizontal%(Z1%,61) = 000 : RICHTUNG_vertikal%(Z1%,61) = 000 RICHTUNG_horizontal%(Z1%,62) = 000 : RICHTUNG_vertikal%(Z1%,62) = 000 RICHTUNG_horizontal%(Z1%,63) = 000 : RICHTUNG_vertikal%(Z1%,63) = 000 RICHTUNG_horizontal%(Z1%,64) = 000 : RICHTUNG_vertikal%(Z1%,64) = 000 RICHTUNG_horizontal%(Z1%,65) = 000 : RICHTUNG_vertikal%(Z1%,65) = 000 RICHTUNG_horizontal%(Z1%,66) = 000 : RICHTUNG_vertikal%(Z1%,66) = 000 RICHTUNG_horizontal%(Z1%,67) = 000 : RICHTUNG_vertikal%(Z1%,67) = 000 RICHTUNG_horizontal%(Z1%,68) = 000 : RICHTUNG_vertikal%(Z1%,68) = 000 RICHTUNG_horizontal%(Z1%,69) = 000 : RICHTUNG_vertikal%(Z1%,69) = 000 RICHTUNG_horizontal%(Z1%,70) = 000 : RICHTUNG_vertikal%(Z1%,70) = 000 RICHTUNG_horizontal%(Z1%,71) = 000 : RICHTUNG_vertikal%(Z1%,71) = 000 RICHTUNG_horizontal%(Z1%,72) = 000 : RICHTUNG_vertikal%(Z1%,72) = 000 RICHTUNG_horizontal%(Z1%,73) = 000 : RICHTUNG_vertikal%(Z1%,73) = 000 RICHTUNG_horizontal%(Z1%,74) = 000 : RICHTUNG_vertikal%(Z1%,74) = 000 RICHTUNG_horizontal%(Z1%,75) = 000 : RICHTUNG_vertikal%(Z1%,75) = 000 RICHTUNG_horizontal%(Z1%,76) = 000 : RICHTUNG_vertikal%(Z1%,76) = 000 RICHTUNG_horizontal%(Z1%,77) = 000 : RICHTUNG_vertikal%(Z1%,77) = 000 RICHTUNG_horizontal%(Z1%,78) = 000 : RICHTUNG_vertikal%(Z1%,78) = 000 RICHTUNG_horizontal%(Z1%,79) = 000 : RICHTUNG_vertikal%(Z1%,79) = 000 RICHTUNG_horizontal%(Z1%,80) = 000 : RICHTUNG_vertikal%(Z1%,80) = 000 RICHTUNG_horizontal%(Z1%,81) = 000 : RICHTUNG_vertikal%(Z1%,81) = 000 RICHTUNG_horizontal%(Z1%,82) = 000 : RICHTUNG_vertikal%(Z1%,82) = 000 RICHTUNG_horizontal%(Z1%,83) = 000 : RICHTUNG_vertikal%(Z1%,83) = 000 RICHTUNG_horizontal%(Z1%,84) = 000 : RICHTUNG_vertikal%(Z1%,84) = 000 RICHTUNG_horizontal%(Z1%,85) = 000 : RICHTUNG_vertikal%(Z1%,85) = 000 RICHTUNG_horizontal%(Z1%,86) = 000 : RICHTUNG_vertikal%(Z1%,86) = 000 RICHTUNG_horizontal%(Z1%,87) = 000 : RICHTUNG_vertikal%(Z1%,87) = 000 RICHTUNG_horizontal%(Z1%,88) = 000 : RICHTUNG_vertikal%(Z1%,88) = 000 RICHTUNG_horizontal%(Z1%,89) = 000 : RICHTUNG_vertikal%(Z1%,89) = 000 RICHTUNG_horizontal%(Z1%,90) = 000 : RICHTUNG_vertikal%(Z1%,90) = 000 RICHTUNG_horizontal%(Z1%,91) = 000 : RICHTUNG_vertikal%(Z1%,91) = 000 RICHTUNG_horizontal%(Z1%,92) = 000 : RICHTUNG_vertikal%(Z1%,92) = 000 RICHTUNG_horizontal%(Z1%,93) = 000 : RICHTUNG_vertikal%(Z1%,93) = 000 RICHTUNG_horizontal%(Z1%,94) = 000 : RICHTUNG_vertikal%(Z1%,94) = 000 RICHTUNG_horizontal%(Z1%,95) = 000 : RICHTUNG_vertikal%(Z1%,95) = 000 RICHTUNG_horizontal%(Z1%,96) = 000 : RICHTUNG_vertikal%(Z1%,96) = 000 RICHTUNG_horizontal%(Z1%,97) = 000 : RICHTUNG_vertikal%(Z1%,97) = 000 RICHTUNG_horizontal%(Z1%,98) = 000 : RICHTUNG_vertikal%(Z1%,98) = 000 RICHTUNG_horizontal%(Z1%,99) = 000 : RICHTUNG_vertikal%(Z1%,99) = 000 ' *** DATEN FÜR LKW 005 ******************************************************** Z1% = 5 RICHTUNG_horizontal%(Z1%,01) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,01) = 000 RICHTUNG_horizontal%(Z1%,02) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,02) = 000 RICHTUNG_horizontal%(Z1%,03) = 000 : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = 000 : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,08) = 000 : RICHTUNG_vertikal%(Z1%,07) = 000 RICHTUNG_horizontal%(Z1%,09) = 000 : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,10) = 000 : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 RICHTUNG_horizontal%(Z1%,12) = 000 : RICHTUNG_vertikal%(Z1%,12) = 000 RICHTUNG_horizontal%(Z1%,13) = 000 : RICHTUNG_vertikal%(Z1%,13) = 000 RICHTUNG_horizontal%(Z1%,14) = 000 : RICHTUNG_vertikal%(Z1%,14) = 000 RICHTUNG_horizontal%(Z1%,15) = 000 : RICHTUNG_vertikal%(Z1%,15) = 000 RICHTUNG_horizontal%(Z1%,16) = 000 : RICHTUNG_vertikal%(Z1%,16) = 000 RICHTUNG_horizontal%(Z1%,17) = 000 : RICHTUNG_vertikal%(Z1%,17) = 000 RICHTUNG_horizontal%(Z1%,18) = 000 : RICHTUNG_vertikal%(Z1%,18) = 000 RICHTUNG_horizontal%(Z1%,19) = 000 : RICHTUNG_vertikal%(Z1%,19) = 000 RICHTUNG_horizontal%(Z1%,20) = 000 : RICHTUNG_vertikal%(Z1%,20) = 000 RICHTUNG_horizontal%(Z1%,21) = 000 : RICHTUNG_vertikal%(Z1%,21) = 000 RICHTUNG_horizontal%(Z1%,22) = 000 : RICHTUNG_vertikal%(Z1%,22) = 000 RICHTUNG_horizontal%(Z1%,23) = 000 : RICHTUNG_vertikal%(Z1%,23) = 000 RICHTUNG_horizontal%(Z1%,24) = 000 : RICHTUNG_vertikal%(Z1%,24) = 000 RICHTUNG_horizontal%(Z1%,25) = 000 : RICHTUNG_vertikal%(Z1%,25) = 000 RICHTUNG_horizontal%(Z1%,26) = 000 : RICHTUNG_vertikal%(Z1%,26) = 000 RICHTUNG_horizontal%(Z1%,27) = 000 : RICHTUNG_vertikal%(Z1%,27) = 000 RICHTUNG_horizontal%(Z1%,28) = 000 : RICHTUNG_vertikal%(Z1%,28) = 000 RICHTUNG_horizontal%(Z1%,29) = 000 : RICHTUNG_vertikal%(Z1%,29) = 000 RICHTUNG_horizontal%(Z1%,30) = 000 : RICHTUNG_vertikal%(Z1%,30) = 000 RICHTUNG_horizontal%(Z1%,31) = 000 : RICHTUNG_vertikal%(Z1%,31) = 000 RICHTUNG_horizontal%(Z1%,32) = 000 : RICHTUNG_vertikal%(Z1%,32) = 000 RICHTUNG_horizontal%(Z1%,33) = 000 : RICHTUNG_vertikal%(Z1%,33) = 000 RICHTUNG_horizontal%(Z1%,34) = 000 : RICHTUNG_vertikal%(Z1%,34) = 000 RICHTUNG_horizontal%(Z1%,35) = 000 : RICHTUNG_vertikal%(Z1%,35) = 000 RICHTUNG_horizontal%(Z1%,36) = 000 : RICHTUNG_vertikal%(Z1%,36) = 000 RICHTUNG_horizontal%(Z1%,37) = 000 : RICHTUNG_vertikal%(Z1%,37) = 000 RICHTUNG_horizontal%(Z1%,38) = 000 : RICHTUNG_vertikal%(Z1%,38) = 000 RICHTUNG_horizontal%(Z1%,39) = 000 : RICHTUNG_vertikal%(Z1%,39) = 000 RICHTUNG_horizontal%(Z1%,40) = 000 : RICHTUNG_vertikal%(Z1%,40) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,51) = 000 : RICHTUNG_vertikal%(Z1%,51) = 000 RICHTUNG_horizontal%(Z1%,52) = 000 : RICHTUNG_vertikal%(Z1%,52) = 000 RICHTUNG_horizontal%(Z1%,53) = 000 : RICHTUNG_vertikal%(Z1%,53) = 000 RICHTUNG_horizontal%(Z1%,54) = 000 : RICHTUNG_vertikal%(Z1%,54) = 000 RICHTUNG_horizontal%(Z1%,55) = 000 : RICHTUNG_vertikal%(Z1%,55) = 000 RICHTUNG_horizontal%(Z1%,56) = 000 : RICHTUNG_vertikal%(Z1%,56) = 000 RICHTUNG_horizontal%(Z1%,57) = 000 : RICHTUNG_vertikal%(Z1%,57) = 000 RICHTUNG_horizontal%(Z1%,58) = 000 : RICHTUNG_vertikal%(Z1%,58) = 000 RICHTUNG_horizontal%(Z1%,59) = 000 : RICHTUNG_vertikal%(Z1%,59) = 000 RICHTUNG_horizontal%(Z1%,60) = 000 : RICHTUNG_vertikal%(Z1%,60) = 000 RICHTUNG_horizontal%(Z1%,61) = 000 : RICHTUNG_vertikal%(Z1%,61) = 000 RICHTUNG_horizontal%(Z1%,62) = 000 : RICHTUNG_vertikal%(Z1%,62) = 000 RICHTUNG_horizontal%(Z1%,63) = 000 : RICHTUNG_vertikal%(Z1%,63) = 000 RICHTUNG_horizontal%(Z1%,64) = 000 : RICHTUNG_vertikal%(Z1%,64) = 000 RICHTUNG_horizontal%(Z1%,65) = 000 : RICHTUNG_vertikal%(Z1%,65) = 000 RICHTUNG_horizontal%(Z1%,66) = 000 : RICHTUNG_vertikal%(Z1%,66) = 000 RICHTUNG_horizontal%(Z1%,67) = 000 : RICHTUNG_vertikal%(Z1%,67) = 000 RICHTUNG_horizontal%(Z1%,68) = 000 : RICHTUNG_vertikal%(Z1%,68) = 000 RICHTUNG_horizontal%(Z1%,69) = 000 : RICHTUNG_vertikal%(Z1%,69) = 000 RICHTUNG_horizontal%(Z1%,70) = 000 : RICHTUNG_vertikal%(Z1%,70) = 000 RICHTUNG_horizontal%(Z1%,71) = 000 : RICHTUNG_vertikal%(Z1%,71) = 000 RICHTUNG_horizontal%(Z1%,72) = 000 : RICHTUNG_vertikal%(Z1%,72) = 000 RICHTUNG_horizontal%(Z1%,73) = 000 : RICHTUNG_vertikal%(Z1%,73) = 000 RICHTUNG_horizontal%(Z1%,74) = 000 : RICHTUNG_vertikal%(Z1%,74) = 000 RICHTUNG_horizontal%(Z1%,75) = 000 : RICHTUNG_vertikal%(Z1%,75) = 000 RICHTUNG_horizontal%(Z1%,76) = 000 : RICHTUNG_vertikal%(Z1%,76) = 000 RICHTUNG_horizontal%(Z1%,77) = 000 : RICHTUNG_vertikal%(Z1%,77) = 000 RICHTUNG_horizontal%(Z1%,78) = 000 : RICHTUNG_vertikal%(Z1%,78) = 000 RICHTUNG_horizontal%(Z1%,79) = 000 : RICHTUNG_vertikal%(Z1%,79) = 000 RICHTUNG_horizontal%(Z1%,80) = 000 : RICHTUNG_vertikal%(Z1%,80) = 000 RICHTUNG_horizontal%(Z1%,81) = 000 : RICHTUNG_vertikal%(Z1%,81) = 000 RICHTUNG_horizontal%(Z1%,82) = 000 : RICHTUNG_vertikal%(Z1%,82) = 000 RICHTUNG_horizontal%(Z1%,83) = 000 : RICHTUNG_vertikal%(Z1%,83) = 000 RICHTUNG_horizontal%(Z1%,84) = 000 : RICHTUNG_vertikal%(Z1%,84) = 000 RICHTUNG_horizontal%(Z1%,85) = 000 : RICHTUNG_vertikal%(Z1%,85) = 000 RICHTUNG_horizontal%(Z1%,86) = 000 : RICHTUNG_vertikal%(Z1%,86) = 000 RICHTUNG_horizontal%(Z1%,87) = 000 : RICHTUNG_vertikal%(Z1%,87) = 000 RICHTUNG_horizontal%(Z1%,88) = 000 : RICHTUNG_vertikal%(Z1%,88) = 000 RICHTUNG_horizontal%(Z1%,89) = 000 : RICHTUNG_vertikal%(Z1%,89) = 000 RICHTUNG_horizontal%(Z1%,90) = 000 : RICHTUNG_vertikal%(Z1%,90) = 000 RICHTUNG_horizontal%(Z1%,91) = 000 : RICHTUNG_vertikal%(Z1%,91) = 000 RICHTUNG_horizontal%(Z1%,92) = 000 : RICHTUNG_vertikal%(Z1%,92) = 000 RICHTUNG_horizontal%(Z1%,93) = 000 : RICHTUNG_vertikal%(Z1%,93) = 000 RICHTUNG_horizontal%(Z1%,94) = 000 : RICHTUNG_vertikal%(Z1%,94) = 000 RICHTUNG_horizontal%(Z1%,95) = 000 : RICHTUNG_vertikal%(Z1%,95) = 000 RICHTUNG_horizontal%(Z1%,96) = 000 : RICHTUNG_vertikal%(Z1%,96) = 000 RICHTUNG_horizontal%(Z1%,97) = 000 : RICHTUNG_vertikal%(Z1%,97) = 000 RICHTUNG_horizontal%(Z1%,98) = 000 : RICHTUNG_vertikal%(Z1%,98) = 000 RICHTUNG_horizontal%(Z1%,99) = 000 : RICHTUNG_vertikal%(Z1%,99) = 000 ' *** DATEN FÜR LKW 006 ******************************************************** Z1% = 6 RICHTUNG_horizontal%(Z1%,01) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,01) = 000 RICHTUNG_horizontal%(Z1%,02) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,02) = 000 RICHTUNG_horizontal%(Z1%,03) = 000 : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = 000 : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,08) = 000 : RICHTUNG_vertikal%(Z1%,07) = 000 RICHTUNG_horizontal%(Z1%,09) = 000 : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,10) = 000 : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 RICHTUNG_horizontal%(Z1%,12) = 000 : RICHTUNG_vertikal%(Z1%,12) = 000 RICHTUNG_horizontal%(Z1%,13) = 000 : RICHTUNG_vertikal%(Z1%,13) = 000 RICHTUNG_horizontal%(Z1%,14) = 000 : RICHTUNG_vertikal%(Z1%,14) = 000 RICHTUNG_horizontal%(Z1%,15) = 000 : RICHTUNG_vertikal%(Z1%,15) = 000 RICHTUNG_horizontal%(Z1%,16) = 000 : RICHTUNG_vertikal%(Z1%,16) = 000 RICHTUNG_horizontal%(Z1%,17) = 000 : RICHTUNG_vertikal%(Z1%,17) = 000 RICHTUNG_horizontal%(Z1%,18) = 000 : RICHTUNG_vertikal%(Z1%,18) = 000 RICHTUNG_horizontal%(Z1%,19) = 000 : RICHTUNG_vertikal%(Z1%,19) = 000 RICHTUNG_horizontal%(Z1%,20) = 000 : RICHTUNG_vertikal%(Z1%,20) = 000 RICHTUNG_horizontal%(Z1%,21) = 000 : RICHTUNG_vertikal%(Z1%,21) = 000 RICHTUNG_horizontal%(Z1%,22) = 000 : RICHTUNG_vertikal%(Z1%,22) = 000 RICHTUNG_horizontal%(Z1%,23) = 000 : RICHTUNG_vertikal%(Z1%,23) = 000 RICHTUNG_horizontal%(Z1%,24) = 000 : RICHTUNG_vertikal%(Z1%,24) = 000 RICHTUNG_horizontal%(Z1%,25) = 000 : RICHTUNG_vertikal%(Z1%,25) = 000 RICHTUNG_horizontal%(Z1%,26) = 000 : RICHTUNG_vertikal%(Z1%,26) = 000 RICHTUNG_horizontal%(Z1%,27) = 000 : RICHTUNG_vertikal%(Z1%,27) = 000 RICHTUNG_horizontal%(Z1%,28) = 000 : RICHTUNG_vertikal%(Z1%,28) = 000 RICHTUNG_horizontal%(Z1%,29) = 000 : RICHTUNG_vertikal%(Z1%,29) = 000 RICHTUNG_horizontal%(Z1%,30) = 000 : RICHTUNG_vertikal%(Z1%,30) = 000 RICHTUNG_horizontal%(Z1%,31) = 000 : RICHTUNG_vertikal%(Z1%,31) = 000 RICHTUNG_horizontal%(Z1%,32) = 000 : RICHTUNG_vertikal%(Z1%,32) = 000 RICHTUNG_horizontal%(Z1%,33) = 000 : RICHTUNG_vertikal%(Z1%,33) = 000 RICHTUNG_horizontal%(Z1%,34) = 000 : RICHTUNG_vertikal%(Z1%,34) = 000 RICHTUNG_horizontal%(Z1%,35) = 000 : RICHTUNG_vertikal%(Z1%,35) = 000 RICHTUNG_horizontal%(Z1%,36) = 000 : RICHTUNG_vertikal%(Z1%,36) = 000 RICHTUNG_horizontal%(Z1%,37) = 000 : RICHTUNG_vertikal%(Z1%,37) = 000 RICHTUNG_horizontal%(Z1%,38) = 000 : RICHTUNG_vertikal%(Z1%,38) = 000 RICHTUNG_horizontal%(Z1%,39) = 000 : RICHTUNG_vertikal%(Z1%,39) = 000 RICHTUNG_horizontal%(Z1%,40) = 000 : RICHTUNG_vertikal%(Z1%,40) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,51) = 000 : RICHTUNG_vertikal%(Z1%,51) = 000 RICHTUNG_horizontal%(Z1%,52) = 000 : RICHTUNG_vertikal%(Z1%,52) = 000 RICHTUNG_horizontal%(Z1%,53) = 000 : RICHTUNG_vertikal%(Z1%,53) = 000 RICHTUNG_horizontal%(Z1%,54) = 000 : RICHTUNG_vertikal%(Z1%,54) = 000 RICHTUNG_horizontal%(Z1%,55) = 000 : RICHTUNG_vertikal%(Z1%,55) = 000 RICHTUNG_horizontal%(Z1%,56) = 000 : RICHTUNG_vertikal%(Z1%,56) = 000 RICHTUNG_horizontal%(Z1%,57) = 000 : RICHTUNG_vertikal%(Z1%,57) = 000 RICHTUNG_horizontal%(Z1%,58) = 000 : RICHTUNG_vertikal%(Z1%,58) = 000 RICHTUNG_horizontal%(Z1%,59) = 000 : RICHTUNG_vertikal%(Z1%,59) = 000 RICHTUNG_horizontal%(Z1%,60) = 000 : RICHTUNG_vertikal%(Z1%,60) = 000 RICHTUNG_horizontal%(Z1%,61) = 000 : RICHTUNG_vertikal%(Z1%,61) = 000 RICHTUNG_horizontal%(Z1%,62) = 000 : RICHTUNG_vertikal%(Z1%,62) = 000 RICHTUNG_horizontal%(Z1%,63) = 000 : RICHTUNG_vertikal%(Z1%,63) = 000 RICHTUNG_horizontal%(Z1%,64) = 000 : RICHTUNG_vertikal%(Z1%,64) = 000 RICHTUNG_horizontal%(Z1%,65) = 000 : RICHTUNG_vertikal%(Z1%,65) = 000 RICHTUNG_horizontal%(Z1%,66) = 000 : RICHTUNG_vertikal%(Z1%,66) = 000 RICHTUNG_horizontal%(Z1%,67) = 000 : RICHTUNG_vertikal%(Z1%,67) = 000 RICHTUNG_horizontal%(Z1%,68) = 000 : RICHTUNG_vertikal%(Z1%,68) = 000 RICHTUNG_horizontal%(Z1%,69) = 000 : RICHTUNG_vertikal%(Z1%,69) = 000 RICHTUNG_horizontal%(Z1%,70) = 000 : RICHTUNG_vertikal%(Z1%,70) = 000 RICHTUNG_horizontal%(Z1%,71) = 000 : RICHTUNG_vertikal%(Z1%,71) = 000 RICHTUNG_horizontal%(Z1%,72) = 000 : RICHTUNG_vertikal%(Z1%,72) = 000 RICHTUNG_horizontal%(Z1%,73) = 000 : RICHTUNG_vertikal%(Z1%,73) = 000 RICHTUNG_horizontal%(Z1%,74) = 000 : RICHTUNG_vertikal%(Z1%,74) = 000 RICHTUNG_horizontal%(Z1%,75) = 000 : RICHTUNG_vertikal%(Z1%,75) = 000 RICHTUNG_horizontal%(Z1%,76) = 000 : RICHTUNG_vertikal%(Z1%,76) = 000 RICHTUNG_horizontal%(Z1%,77) = 000 : RICHTUNG_vertikal%(Z1%,77) = 000 RICHTUNG_horizontal%(Z1%,78) = 000 : RICHTUNG_vertikal%(Z1%,78) = 000 RICHTUNG_horizontal%(Z1%,79) = 000 : RICHTUNG_vertikal%(Z1%,79) = 000 RICHTUNG_horizontal%(Z1%,80) = 000 : RICHTUNG_vertikal%(Z1%,80) = 000 RICHTUNG_horizontal%(Z1%,81) = 000 : RICHTUNG_vertikal%(Z1%,81) = 000 RICHTUNG_horizontal%(Z1%,82) = 000 : RICHTUNG_vertikal%(Z1%,82) = 000 RICHTUNG_horizontal%(Z1%,83) = 000 : RICHTUNG_vertikal%(Z1%,83) = 000 RICHTUNG_horizontal%(Z1%,84) = 000 : RICHTUNG_vertikal%(Z1%,84) = 000 RICHTUNG_horizontal%(Z1%,85) = 000 : RICHTUNG_vertikal%(Z1%,85) = 000 RICHTUNG_horizontal%(Z1%,86) = 000 : RICHTUNG_vertikal%(Z1%,86) = 000 RICHTUNG_horizontal%(Z1%,87) = 000 : RICHTUNG_vertikal%(Z1%,87) = 000 RICHTUNG_horizontal%(Z1%,88) = 000 : RICHTUNG_vertikal%(Z1%,88) = 000 RICHTUNG_horizontal%(Z1%,89) = 000 : RICHTUNG_vertikal%(Z1%,89) = 000 RICHTUNG_horizontal%(Z1%,90) = 000 : RICHTUNG_vertikal%(Z1%,90) = 000 RICHTUNG_horizontal%(Z1%,91) = 000 : RICHTUNG_vertikal%(Z1%,91) = 000 RICHTUNG_horizontal%(Z1%,92) = 000 : RICHTUNG_vertikal%(Z1%,92) = 000 RICHTUNG_horizontal%(Z1%,93) = 000 : RICHTUNG_vertikal%(Z1%,93) = 000 RICHTUNG_horizontal%(Z1%,94) = 000 : RICHTUNG_vertikal%(Z1%,94) = 000 RICHTUNG_horizontal%(Z1%,95) = 000 : RICHTUNG_vertikal%(Z1%,95) = 000 RICHTUNG_horizontal%(Z1%,96) = 000 : RICHTUNG_vertikal%(Z1%,96) = 000 RICHTUNG_horizontal%(Z1%,97) = 000 : RICHTUNG_vertikal%(Z1%,97) = 000 RICHTUNG_horizontal%(Z1%,98) = 000 : RICHTUNG_vertikal%(Z1%,98) = 000 RICHTUNG_horizontal%(Z1%,99) = 000 : RICHTUNG_vertikal%(Z1%,99) = 000 ' ****************************************************************************** ' ****************************************************************************** ' *** End Teil 2 *************************************************************** ' ****************************************************************************** ' ****************************************************************************** ' ****************************************************************************** | |
| | | Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Dim 14 Juil 2013 - 21:52 | |
| Teil 3-14.07.2013- - Code:
-
' ****************************************************************************** ' *** Start Teil 3 ************************************************************* ' ****************************************************************************** ' *** DATEN FÜR LKW 007 ******************************************************** Z1% = 7 RICHTUNG_horizontal%(Z1%,01) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,01) = 000 RICHTUNG_horizontal%(Z1%,02) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,02) = 000 RICHTUNG_horizontal%(Z1%,03) = 000 : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = 000 : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,08) = 000 : RICHTUNG_vertikal%(Z1%,07) = 000 RICHTUNG_horizontal%(Z1%,09) = 000 : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,10) = 000 : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 RICHTUNG_horizontal%(Z1%,12) = 000 : RICHTUNG_vertikal%(Z1%,12) = 000 RICHTUNG_horizontal%(Z1%,13) = 000 : RICHTUNG_vertikal%(Z1%,13) = 000 RICHTUNG_horizontal%(Z1%,14) = 000 : RICHTUNG_vertikal%(Z1%,14) = 000 RICHTUNG_horizontal%(Z1%,15) = 000 : RICHTUNG_vertikal%(Z1%,15) = 000 RICHTUNG_horizontal%(Z1%,16) = 000 : RICHTUNG_vertikal%(Z1%,16) = 000 RICHTUNG_horizontal%(Z1%,17) = 000 : RICHTUNG_vertikal%(Z1%,17) = 000 RICHTUNG_horizontal%(Z1%,18) = 000 : RICHTUNG_vertikal%(Z1%,18) = 000 RICHTUNG_horizontal%(Z1%,19) = 000 : RICHTUNG_vertikal%(Z1%,19) = 000 RICHTUNG_horizontal%(Z1%,20) = 000 : RICHTUNG_vertikal%(Z1%,20) = 000 RICHTUNG_horizontal%(Z1%,21) = 000 : RICHTUNG_vertikal%(Z1%,21) = 000 RICHTUNG_horizontal%(Z1%,22) = 000 : RICHTUNG_vertikal%(Z1%,22) = 000 RICHTUNG_horizontal%(Z1%,23) = 000 : RICHTUNG_vertikal%(Z1%,23) = 000 RICHTUNG_horizontal%(Z1%,24) = 000 : RICHTUNG_vertikal%(Z1%,24) = 000 RICHTUNG_horizontal%(Z1%,25) = 000 : RICHTUNG_vertikal%(Z1%,25) = 000 RICHTUNG_horizontal%(Z1%,26) = 000 : RICHTUNG_vertikal%(Z1%,26) = 000 RICHTUNG_horizontal%(Z1%,27) = 000 : RICHTUNG_vertikal%(Z1%,27) = 000 RICHTUNG_horizontal%(Z1%,28) = 000 : RICHTUNG_vertikal%(Z1%,28) = 000 RICHTUNG_horizontal%(Z1%,29) = 000 : RICHTUNG_vertikal%(Z1%,29) = 000 RICHTUNG_horizontal%(Z1%,30) = 000 : RICHTUNG_vertikal%(Z1%,30) = 000 RICHTUNG_horizontal%(Z1%,31) = 000 : RICHTUNG_vertikal%(Z1%,31) = 000 RICHTUNG_horizontal%(Z1%,32) = 000 : RICHTUNG_vertikal%(Z1%,32) = 000 RICHTUNG_horizontal%(Z1%,33) = 000 : RICHTUNG_vertikal%(Z1%,33) = 000 RICHTUNG_horizontal%(Z1%,34) = 000 : RICHTUNG_vertikal%(Z1%,34) = 000 RICHTUNG_horizontal%(Z1%,35) = 000 : RICHTUNG_vertikal%(Z1%,35) = 000 RICHTUNG_horizontal%(Z1%,36) = 000 : RICHTUNG_vertikal%(Z1%,36) = 000 RICHTUNG_horizontal%(Z1%,37) = 000 : RICHTUNG_vertikal%(Z1%,37) = 000 RICHTUNG_horizontal%(Z1%,38) = 000 : RICHTUNG_vertikal%(Z1%,38) = 000 RICHTUNG_horizontal%(Z1%,39) = 000 : RICHTUNG_vertikal%(Z1%,39) = 000 RICHTUNG_horizontal%(Z1%,40) = 000 : RICHTUNG_vertikal%(Z1%,40) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,51) = 000 : RICHTUNG_vertikal%(Z1%,51) = 000 RICHTUNG_horizontal%(Z1%,52) = 000 : RICHTUNG_vertikal%(Z1%,52) = 000 RICHTUNG_horizontal%(Z1%,53) = 000 : RICHTUNG_vertikal%(Z1%,53) = 000 RICHTUNG_horizontal%(Z1%,54) = 000 : RICHTUNG_vertikal%(Z1%,54) = 000 RICHTUNG_horizontal%(Z1%,55) = 000 : RICHTUNG_vertikal%(Z1%,55) = 000 RICHTUNG_horizontal%(Z1%,56) = 000 : RICHTUNG_vertikal%(Z1%,56) = 000 RICHTUNG_horizontal%(Z1%,57) = 000 : RICHTUNG_vertikal%(Z1%,57) = 000 RICHTUNG_horizontal%(Z1%,58) = 000 : RICHTUNG_vertikal%(Z1%,58) = 000 RICHTUNG_horizontal%(Z1%,59) = 000 : RICHTUNG_vertikal%(Z1%,59) = 000 RICHTUNG_horizontal%(Z1%,60) = 000 : RICHTUNG_vertikal%(Z1%,60) = 000 RICHTUNG_horizontal%(Z1%,61) = 000 : RICHTUNG_vertikal%(Z1%,61) = 000 RICHTUNG_horizontal%(Z1%,62) = 000 : RICHTUNG_vertikal%(Z1%,62) = 000 RICHTUNG_horizontal%(Z1%,63) = 000 : RICHTUNG_vertikal%(Z1%,63) = 000 RICHTUNG_horizontal%(Z1%,64) = 000 : RICHTUNG_vertikal%(Z1%,64) = 000 RICHTUNG_horizontal%(Z1%,65) = 000 : RICHTUNG_vertikal%(Z1%,65) = 000 RICHTUNG_horizontal%(Z1%,66) = 000 : RICHTUNG_vertikal%(Z1%,66) = 000 RICHTUNG_horizontal%(Z1%,67) = 000 : RICHTUNG_vertikal%(Z1%,67) = 000 RICHTUNG_horizontal%(Z1%,68) = 000 : RICHTUNG_vertikal%(Z1%,68) = 000 RICHTUNG_horizontal%(Z1%,69) = 000 : RICHTUNG_vertikal%(Z1%,69) = 000 RICHTUNG_horizontal%(Z1%,70) = 000 : RICHTUNG_vertikal%(Z1%,70) = 000 RICHTUNG_horizontal%(Z1%,71) = 000 : RICHTUNG_vertikal%(Z1%,71) = 000 RICHTUNG_horizontal%(Z1%,72) = 000 : RICHTUNG_vertikal%(Z1%,72) = 000 RICHTUNG_horizontal%(Z1%,73) = 000 : RICHTUNG_vertikal%(Z1%,73) = 000 RICHTUNG_horizontal%(Z1%,74) = 000 : RICHTUNG_vertikal%(Z1%,74) = 000 RICHTUNG_horizontal%(Z1%,75) = 000 : RICHTUNG_vertikal%(Z1%,75) = 000 RICHTUNG_horizontal%(Z1%,76) = 000 : RICHTUNG_vertikal%(Z1%,76) = 000 RICHTUNG_horizontal%(Z1%,77) = 000 : RICHTUNG_vertikal%(Z1%,77) = 000 RICHTUNG_horizontal%(Z1%,78) = 000 : RICHTUNG_vertikal%(Z1%,78) = 000 RICHTUNG_horizontal%(Z1%,79) = 000 : RICHTUNG_vertikal%(Z1%,79) = 000 RICHTUNG_horizontal%(Z1%,80) = 000 : RICHTUNG_vertikal%(Z1%,80) = 000 RICHTUNG_horizontal%(Z1%,81) = 000 : RICHTUNG_vertikal%(Z1%,81) = 000 RICHTUNG_horizontal%(Z1%,82) = 000 : RICHTUNG_vertikal%(Z1%,82) = 000 RICHTUNG_horizontal%(Z1%,83) = 000 : RICHTUNG_vertikal%(Z1%,83) = 000 RICHTUNG_horizontal%(Z1%,84) = 000 : RICHTUNG_vertikal%(Z1%,84) = 000 RICHTUNG_horizontal%(Z1%,85) = 000 : RICHTUNG_vertikal%(Z1%,85) = 000 RICHTUNG_horizontal%(Z1%,86) = 000 : RICHTUNG_vertikal%(Z1%,86) = 000 RICHTUNG_horizontal%(Z1%,87) = 000 : RICHTUNG_vertikal%(Z1%,87) = 000 RICHTUNG_horizontal%(Z1%,88) = 000 : RICHTUNG_vertikal%(Z1%,88) = 000 RICHTUNG_horizontal%(Z1%,89) = 000 : RICHTUNG_vertikal%(Z1%,89) = 000 RICHTUNG_horizontal%(Z1%,90) = 000 : RICHTUNG_vertikal%(Z1%,90) = 000 RICHTUNG_horizontal%(Z1%,91) = 000 : RICHTUNG_vertikal%(Z1%,91) = 000 RICHTUNG_horizontal%(Z1%,92) = 000 : RICHTUNG_vertikal%(Z1%,92) = 000 RICHTUNG_horizontal%(Z1%,93) = 000 : RICHTUNG_vertikal%(Z1%,93) = 000 RICHTUNG_horizontal%(Z1%,94) = 000 : RICHTUNG_vertikal%(Z1%,94) = 000 RICHTUNG_horizontal%(Z1%,95) = 000 : RICHTUNG_vertikal%(Z1%,95) = 000 RICHTUNG_horizontal%(Z1%,96) = 000 : RICHTUNG_vertikal%(Z1%,96) = 000 RICHTUNG_horizontal%(Z1%,97) = 000 : RICHTUNG_vertikal%(Z1%,97) = 000 RICHTUNG_horizontal%(Z1%,98) = 000 : RICHTUNG_vertikal%(Z1%,98) = 000 RICHTUNG_horizontal%(Z1%,99) = 000 : RICHTUNG_vertikal%(Z1%,99) = 000 ' ****************************************************************************** ' *** DATEN FÜR LKW 008 ******************************************************** Z1% = 8 RICHTUNG_horizontal%(Z1%,01) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,01) = 000 RICHTUNG_horizontal%(Z1%,02) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,02) = 000 RICHTUNG_horizontal%(Z1%,03) = 000 : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = 000 : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,08) = 000 : RICHTUNG_vertikal%(Z1%,07) = 000 RICHTUNG_horizontal%(Z1%,09) = 000 : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,10) = 000 : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 RICHTUNG_horizontal%(Z1%,12) = 000 : RICHTUNG_vertikal%(Z1%,12) = 000 RICHTUNG_horizontal%(Z1%,13) = 000 : RICHTUNG_vertikal%(Z1%,13) = 000 RICHTUNG_horizontal%(Z1%,14) = 000 : RICHTUNG_vertikal%(Z1%,14) = 000 RICHTUNG_horizontal%(Z1%,15) = 000 : RICHTUNG_vertikal%(Z1%,15) = 000 RICHTUNG_horizontal%(Z1%,16) = 000 : RICHTUNG_vertikal%(Z1%,16) = 000 RICHTUNG_horizontal%(Z1%,17) = 000 : RICHTUNG_vertikal%(Z1%,17) = 000 RICHTUNG_horizontal%(Z1%,18) = 000 : RICHTUNG_vertikal%(Z1%,18) = 000 RICHTUNG_horizontal%(Z1%,19) = 000 : RICHTUNG_vertikal%(Z1%,19) = 000 RICHTUNG_horizontal%(Z1%,20) = 000 : RICHTUNG_vertikal%(Z1%,20) = 000 RICHTUNG_horizontal%(Z1%,21) = 000 : RICHTUNG_vertikal%(Z1%,21) = 000 RICHTUNG_horizontal%(Z1%,22) = 000 : RICHTUNG_vertikal%(Z1%,22) = 000 RICHTUNG_horizontal%(Z1%,23) = 000 : RICHTUNG_vertikal%(Z1%,23) = 000 RICHTUNG_horizontal%(Z1%,24) = 000 : RICHTUNG_vertikal%(Z1%,24) = 000 RICHTUNG_horizontal%(Z1%,25) = 000 : RICHTUNG_vertikal%(Z1%,25) = 000 RICHTUNG_horizontal%(Z1%,26) = 000 : RICHTUNG_vertikal%(Z1%,26) = 000 RICHTUNG_horizontal%(Z1%,27) = 000 : RICHTUNG_vertikal%(Z1%,27) = 000 RICHTUNG_horizontal%(Z1%,28) = 000 : RICHTUNG_vertikal%(Z1%,28) = 000 RICHTUNG_horizontal%(Z1%,29) = 000 : RICHTUNG_vertikal%(Z1%,29) = 000 RICHTUNG_horizontal%(Z1%,30) = 000 : RICHTUNG_vertikal%(Z1%,30) = 000 RICHTUNG_horizontal%(Z1%,31) = 000 : RICHTUNG_vertikal%(Z1%,31) = 000 RICHTUNG_horizontal%(Z1%,32) = 000 : RICHTUNG_vertikal%(Z1%,32) = 000 RICHTUNG_horizontal%(Z1%,33) = 000 : RICHTUNG_vertikal%(Z1%,33) = 000 RICHTUNG_horizontal%(Z1%,34) = 000 : RICHTUNG_vertikal%(Z1%,34) = 000 RICHTUNG_horizontal%(Z1%,35) = 000 : RICHTUNG_vertikal%(Z1%,35) = 000 RICHTUNG_horizontal%(Z1%,36) = 000 : RICHTUNG_vertikal%(Z1%,36) = 000 RICHTUNG_horizontal%(Z1%,37) = 000 : RICHTUNG_vertikal%(Z1%,37) = 000 RICHTUNG_horizontal%(Z1%,38) = 000 : RICHTUNG_vertikal%(Z1%,38) = 000 RICHTUNG_horizontal%(Z1%,39) = 000 : RICHTUNG_vertikal%(Z1%,39) = 000 RICHTUNG_horizontal%(Z1%,40) = 000 : RICHTUNG_vertikal%(Z1%,40) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,51) = 000 : RICHTUNG_vertikal%(Z1%,51) = 000 RICHTUNG_horizontal%(Z1%,52) = 000 : RICHTUNG_vertikal%(Z1%,52) = 000 RICHTUNG_horizontal%(Z1%,53) = 000 : RICHTUNG_vertikal%(Z1%,53) = 000 RICHTUNG_horizontal%(Z1%,54) = 000 : RICHTUNG_vertikal%(Z1%,54) = 000 RICHTUNG_horizontal%(Z1%,55) = 000 : RICHTUNG_vertikal%(Z1%,55) = 000 RICHTUNG_horizontal%(Z1%,56) = 000 : RICHTUNG_vertikal%(Z1%,56) = 000 RICHTUNG_horizontal%(Z1%,57) = 000 : RICHTUNG_vertikal%(Z1%,57) = 000 RICHTUNG_horizontal%(Z1%,58) = 000 : RICHTUNG_vertikal%(Z1%,58) = 000 RICHTUNG_horizontal%(Z1%,59) = 000 : RICHTUNG_vertikal%(Z1%,59) = 000 RICHTUNG_horizontal%(Z1%,60) = 000 : RICHTUNG_vertikal%(Z1%,60) = 000 RICHTUNG_horizontal%(Z1%,61) = 000 : RICHTUNG_vertikal%(Z1%,61) = 000 RICHTUNG_horizontal%(Z1%,62) = 000 : RICHTUNG_vertikal%(Z1%,62) = 000 RICHTUNG_horizontal%(Z1%,63) = 000 : RICHTUNG_vertikal%(Z1%,63) = 000 RICHTUNG_horizontal%(Z1%,64) = 000 : RICHTUNG_vertikal%(Z1%,64) = 000 RICHTUNG_horizontal%(Z1%,65) = 000 : RICHTUNG_vertikal%(Z1%,65) = 000 RICHTUNG_horizontal%(Z1%,66) = 000 : RICHTUNG_vertikal%(Z1%,66) = 000 RICHTUNG_horizontal%(Z1%,67) = 000 : RICHTUNG_vertikal%(Z1%,67) = 000 RICHTUNG_horizontal%(Z1%,68) = 000 : RICHTUNG_vertikal%(Z1%,68) = 000 RICHTUNG_horizontal%(Z1%,69) = 000 : RICHTUNG_vertikal%(Z1%,69) = 000 RICHTUNG_horizontal%(Z1%,70) = 000 : RICHTUNG_vertikal%(Z1%,70) = 000 RICHTUNG_horizontal%(Z1%,71) = 000 : RICHTUNG_vertikal%(Z1%,71) = 000 RICHTUNG_horizontal%(Z1%,72) = 000 : RICHTUNG_vertikal%(Z1%,72) = 000 RICHTUNG_horizontal%(Z1%,73) = 000 : RICHTUNG_vertikal%(Z1%,73) = 000 RICHTUNG_horizontal%(Z1%,74) = 000 : RICHTUNG_vertikal%(Z1%,74) = 000 RICHTUNG_horizontal%(Z1%,75) = 000 : RICHTUNG_vertikal%(Z1%,75) = 000 RICHTUNG_horizontal%(Z1%,76) = 000 : RICHTUNG_vertikal%(Z1%,76) = 000 RICHTUNG_horizontal%(Z1%,77) = 000 : RICHTUNG_vertikal%(Z1%,77) = 000 RICHTUNG_horizontal%(Z1%,78) = 000 : RICHTUNG_vertikal%(Z1%,78) = 000 RICHTUNG_horizontal%(Z1%,79) = 000 : RICHTUNG_vertikal%(Z1%,79) = 000 RICHTUNG_horizontal%(Z1%,80) = 000 : RICHTUNG_vertikal%(Z1%,80) = 000 RICHTUNG_horizontal%(Z1%,81) = 000 : RICHTUNG_vertikal%(Z1%,81) = 000 RICHTUNG_horizontal%(Z1%,82) = 000 : RICHTUNG_vertikal%(Z1%,82) = 000 RICHTUNG_horizontal%(Z1%,83) = 000 : RICHTUNG_vertikal%(Z1%,83) = 000 RICHTUNG_horizontal%(Z1%,84) = 000 : RICHTUNG_vertikal%(Z1%,84) = 000 RICHTUNG_horizontal%(Z1%,85) = 000 : RICHTUNG_vertikal%(Z1%,85) = 000 RICHTUNG_horizontal%(Z1%,86) = 000 : RICHTUNG_vertikal%(Z1%,86) = 000 RICHTUNG_horizontal%(Z1%,87) = 000 : RICHTUNG_vertikal%(Z1%,87) = 000 RICHTUNG_horizontal%(Z1%,88) = 000 : RICHTUNG_vertikal%(Z1%,88) = 000 RICHTUNG_horizontal%(Z1%,89) = 000 : RICHTUNG_vertikal%(Z1%,89) = 000 RICHTUNG_horizontal%(Z1%,90) = 000 : RICHTUNG_vertikal%(Z1%,90) = 000 RICHTUNG_horizontal%(Z1%,91) = 000 : RICHTUNG_vertikal%(Z1%,91) = 000 RICHTUNG_horizontal%(Z1%,92) = 000 : RICHTUNG_vertikal%(Z1%,92) = 000 RICHTUNG_horizontal%(Z1%,93) = 000 : RICHTUNG_vertikal%(Z1%,93) = 000 RICHTUNG_horizontal%(Z1%,94) = 000 : RICHTUNG_vertikal%(Z1%,94) = 000 RICHTUNG_horizontal%(Z1%,95) = 000 : RICHTUNG_vertikal%(Z1%,95) = 000 RICHTUNG_horizontal%(Z1%,96) = 000 : RICHTUNG_vertikal%(Z1%,96) = 000 RICHTUNG_horizontal%(Z1%,97) = 000 : RICHTUNG_vertikal%(Z1%,97) = 000 RICHTUNG_horizontal%(Z1%,98) = 000 : RICHTUNG_vertikal%(Z1%,98) = 000 RICHTUNG_horizontal%(Z1%,99) = 000 : RICHTUNG_vertikal%(Z1%,99) = 000 ' ****************************************************************************** ' *** DATEN FÜR LKW 009 ******************************************************** Z1% = 9 RICHTUNG_horizontal%(Z1%,01) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,01) = 000 RICHTUNG_horizontal%(Z1%,02) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,02) = 000 RICHTUNG_horizontal%(Z1%,03) = 000 : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = 000 : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,08) = 000 : RICHTUNG_vertikal%(Z1%,07) = 000 RICHTUNG_horizontal%(Z1%,09) = 000 : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,10) = 000 : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 RICHTUNG_horizontal%(Z1%,12) = 000 : RICHTUNG_vertikal%(Z1%,12) = 000 RICHTUNG_horizontal%(Z1%,13) = 000 : RICHTUNG_vertikal%(Z1%,13) = 000 RICHTUNG_horizontal%(Z1%,14) = 000 : RICHTUNG_vertikal%(Z1%,14) = 000 RICHTUNG_horizontal%(Z1%,15) = 000 : RICHTUNG_vertikal%(Z1%,15) = 000 RICHTUNG_horizontal%(Z1%,16) = 000 : RICHTUNG_vertikal%(Z1%,16) = 000 RICHTUNG_horizontal%(Z1%,17) = 000 : RICHTUNG_vertikal%(Z1%,17) = 000 RICHTUNG_horizontal%(Z1%,18) = 000 : RICHTUNG_vertikal%(Z1%,18) = 000 RICHTUNG_horizontal%(Z1%,19) = 000 : RICHTUNG_vertikal%(Z1%,19) = 000 RICHTUNG_horizontal%(Z1%,20) = 000 : RICHTUNG_vertikal%(Z1%,20) = 000 RICHTUNG_horizontal%(Z1%,21) = 000 : RICHTUNG_vertikal%(Z1%,21) = 000 RICHTUNG_horizontal%(Z1%,22) = 000 : RICHTUNG_vertikal%(Z1%,22) = 000 RICHTUNG_horizontal%(Z1%,23) = 000 : RICHTUNG_vertikal%(Z1%,23) = 000 RICHTUNG_horizontal%(Z1%,24) = 000 : RICHTUNG_vertikal%(Z1%,24) = 000 RICHTUNG_horizontal%(Z1%,25) = 000 : RICHTUNG_vertikal%(Z1%,25) = 000 RICHTUNG_horizontal%(Z1%,26) = 000 : RICHTUNG_vertikal%(Z1%,26) = 000 RICHTUNG_horizontal%(Z1%,27) = 000 : RICHTUNG_vertikal%(Z1%,27) = 000 RICHTUNG_horizontal%(Z1%,28) = 000 : RICHTUNG_vertikal%(Z1%,28) = 000 RICHTUNG_horizontal%(Z1%,29) = 000 : RICHTUNG_vertikal%(Z1%,29) = 000 RICHTUNG_horizontal%(Z1%,30) = 000 : RICHTUNG_vertikal%(Z1%,30) = 000 RICHTUNG_horizontal%(Z1%,31) = 000 : RICHTUNG_vertikal%(Z1%,31) = 000 RICHTUNG_horizontal%(Z1%,32) = 000 : RICHTUNG_vertikal%(Z1%,32) = 000 RICHTUNG_horizontal%(Z1%,33) = 000 : RICHTUNG_vertikal%(Z1%,33) = 000 RICHTUNG_horizontal%(Z1%,34) = 000 : RICHTUNG_vertikal%(Z1%,34) = 000 RICHTUNG_horizontal%(Z1%,35) = 000 : RICHTUNG_vertikal%(Z1%,35) = 000 RICHTUNG_horizontal%(Z1%,36) = 000 : RICHTUNG_vertikal%(Z1%,36) = 000 RICHTUNG_horizontal%(Z1%,37) = 000 : RICHTUNG_vertikal%(Z1%,37) = 000 RICHTUNG_horizontal%(Z1%,38) = 000 : RICHTUNG_vertikal%(Z1%,38) = 000 RICHTUNG_horizontal%(Z1%,39) = 000 : RICHTUNG_vertikal%(Z1%,39) = 000 RICHTUNG_horizontal%(Z1%,40) = 000 : RICHTUNG_vertikal%(Z1%,40) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,51) = 000 : RICHTUNG_vertikal%(Z1%,51) = 000 RICHTUNG_horizontal%(Z1%,52) = 000 : RICHTUNG_vertikal%(Z1%,52) = 000 RICHTUNG_horizontal%(Z1%,53) = 000 : RICHTUNG_vertikal%(Z1%,53) = 000 RICHTUNG_horizontal%(Z1%,54) = 000 : RICHTUNG_vertikal%(Z1%,54) = 000 RICHTUNG_horizontal%(Z1%,55) = 000 : RICHTUNG_vertikal%(Z1%,55) = 000 RICHTUNG_horizontal%(Z1%,56) = 000 : RICHTUNG_vertikal%(Z1%,56) = 000 RICHTUNG_horizontal%(Z1%,57) = 000 : RICHTUNG_vertikal%(Z1%,57) = 000 RICHTUNG_horizontal%(Z1%,58) = 000 : RICHTUNG_vertikal%(Z1%,58) = 000 RICHTUNG_horizontal%(Z1%,59) = 000 : RICHTUNG_vertikal%(Z1%,59) = 000 RICHTUNG_horizontal%(Z1%,60) = 000 : RICHTUNG_vertikal%(Z1%,60) = 000 RICHTUNG_horizontal%(Z1%,61) = 000 : RICHTUNG_vertikal%(Z1%,61) = 000 RICHTUNG_horizontal%(Z1%,62) = 000 : RICHTUNG_vertikal%(Z1%,62) = 000 RICHTUNG_horizontal%(Z1%,63) = 000 : RICHTUNG_vertikal%(Z1%,63) = 000 RICHTUNG_horizontal%(Z1%,64) = 000 : RICHTUNG_vertikal%(Z1%,64) = 000 RICHTUNG_horizontal%(Z1%,65) = 000 : RICHTUNG_vertikal%(Z1%,65) = 000 RICHTUNG_horizontal%(Z1%,66) = 000 : RICHTUNG_vertikal%(Z1%,66) = 000 RICHTUNG_horizontal%(Z1%,67) = 000 : RICHTUNG_vertikal%(Z1%,67) = 000 RICHTUNG_horizontal%(Z1%,68) = 000 : RICHTUNG_vertikal%(Z1%,68) = 000 RICHTUNG_horizontal%(Z1%,69) = 000 : RICHTUNG_vertikal%(Z1%,69) = 000 RICHTUNG_horizontal%(Z1%,70) = 000 : RICHTUNG_vertikal%(Z1%,70) = 000 RICHTUNG_horizontal%(Z1%,71) = 000 : RICHTUNG_vertikal%(Z1%,71) = 000 RICHTUNG_horizontal%(Z1%,72) = 000 : RICHTUNG_vertikal%(Z1%,72) = 000 RICHTUNG_horizontal%(Z1%,73) = 000 : RICHTUNG_vertikal%(Z1%,73) = 000 RICHTUNG_horizontal%(Z1%,74) = 000 : RICHTUNG_vertikal%(Z1%,74) = 000 RICHTUNG_horizontal%(Z1%,75) = 000 : RICHTUNG_vertikal%(Z1%,75) = 000 RICHTUNG_horizontal%(Z1%,76) = 000 : RICHTUNG_vertikal%(Z1%,76) = 000 RICHTUNG_horizontal%(Z1%,77) = 000 : RICHTUNG_vertikal%(Z1%,77) = 000 RICHTUNG_horizontal%(Z1%,78) = 000 : RICHTUNG_vertikal%(Z1%,78) = 000 RICHTUNG_horizontal%(Z1%,79) = 000 : RICHTUNG_vertikal%(Z1%,79) = 000 RICHTUNG_horizontal%(Z1%,80) = 000 : RICHTUNG_vertikal%(Z1%,80) = 000 RICHTUNG_horizontal%(Z1%,81) = 000 : RICHTUNG_vertikal%(Z1%,81) = 000 RICHTUNG_horizontal%(Z1%,82) = 000 : RICHTUNG_vertikal%(Z1%,82) = 000 RICHTUNG_horizontal%(Z1%,83) = 000 : RICHTUNG_vertikal%(Z1%,83) = 000 RICHTUNG_horizontal%(Z1%,84) = 000 : RICHTUNG_vertikal%(Z1%,84) = 000 RICHTUNG_horizontal%(Z1%,85) = 000 : RICHTUNG_vertikal%(Z1%,85) = 000 RICHTUNG_horizontal%(Z1%,86) = 000 : RICHTUNG_vertikal%(Z1%,86) = 000 RICHTUNG_horizontal%(Z1%,87) = 000 : RICHTUNG_vertikal%(Z1%,87) = 000 RICHTUNG_horizontal%(Z1%,88) = 000 : RICHTUNG_vertikal%(Z1%,88) = 000 RICHTUNG_horizontal%(Z1%,89) = 000 : RICHTUNG_vertikal%(Z1%,89) = 000 RICHTUNG_horizontal%(Z1%,90) = 000 : RICHTUNG_vertikal%(Z1%,90) = 000 RICHTUNG_horizontal%(Z1%,91) = 000 : RICHTUNG_vertikal%(Z1%,91) = 000 RICHTUNG_horizontal%(Z1%,92) = 000 : RICHTUNG_vertikal%(Z1%,92) = 000 RICHTUNG_horizontal%(Z1%,93) = 000 : RICHTUNG_vertikal%(Z1%,93) = 000 RICHTUNG_horizontal%(Z1%,94) = 000 : RICHTUNG_vertikal%(Z1%,94) = 000 RICHTUNG_horizontal%(Z1%,95) = 000 : RICHTUNG_vertikal%(Z1%,95) = 000 RICHTUNG_horizontal%(Z1%,96) = 000 : RICHTUNG_vertikal%(Z1%,96) = 000 RICHTUNG_horizontal%(Z1%,97) = 000 : RICHTUNG_vertikal%(Z1%,97) = 000 RICHTUNG_horizontal%(Z1%,98) = 000 : RICHTUNG_vertikal%(Z1%,98) = 000 RICHTUNG_horizontal%(Z1%,99) = 000 : RICHTUNG_vertikal%(Z1%,99) = 000 ' ****************************************************************************** ' *** DATEN FÜR LKW 010 ******************************************************** Z1% = 10 RICHTUNG_horizontal%(Z1%,01) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,01) = 000 RICHTUNG_horizontal%(Z1%,02) = (SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,02) = 000 RICHTUNG_horizontal%(Z1%,03) = 000 : RICHTUNG_vertikal%(Z1%,03) = 000 RICHTUNG_horizontal%(Z1%,04) = 000 : RICHTUNG_vertikal%(Z1%,04) = 000 RICHTUNG_horizontal%(Z1%,05) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,06) = 000 : RICHTUNG_vertikal%(Z1%,05) = 000 RICHTUNG_horizontal%(Z1%,07) = 000 : RICHTUNG_vertikal%(Z1%,06) = 000 RICHTUNG_horizontal%(Z1%,08) = 000 : RICHTUNG_vertikal%(Z1%,07) = 000 RICHTUNG_horizontal%(Z1%,09) = 000 : RICHTUNG_vertikal%(Z1%,08) = 000 RICHTUNG_horizontal%(Z1%,10) = 000 : RICHTUNG_vertikal%(Z1%,10) = 000 RICHTUNG_horizontal%(Z1%,11) = 000 : RICHTUNG_vertikal%(Z1%,11) = 000 RICHTUNG_horizontal%(Z1%,12) = 000 : RICHTUNG_vertikal%(Z1%,12) = 000 RICHTUNG_horizontal%(Z1%,13) = 000 : RICHTUNG_vertikal%(Z1%,13) = 000 RICHTUNG_horizontal%(Z1%,14) = 000 : RICHTUNG_vertikal%(Z1%,14) = 000 RICHTUNG_horizontal%(Z1%,15) = 000 : RICHTUNG_vertikal%(Z1%,15) = 000 RICHTUNG_horizontal%(Z1%,16) = 000 : RICHTUNG_vertikal%(Z1%,16) = 000 RICHTUNG_horizontal%(Z1%,17) = 000 : RICHTUNG_vertikal%(Z1%,17) = 000 RICHTUNG_horizontal%(Z1%,18) = 000 : RICHTUNG_vertikal%(Z1%,18) = 000 RICHTUNG_horizontal%(Z1%,19) = 000 : RICHTUNG_vertikal%(Z1%,19) = 000 RICHTUNG_horizontal%(Z1%,20) = 000 : RICHTUNG_vertikal%(Z1%,20) = 000 RICHTUNG_horizontal%(Z1%,21) = 000 : RICHTUNG_vertikal%(Z1%,21) = 000 RICHTUNG_horizontal%(Z1%,22) = 000 : RICHTUNG_vertikal%(Z1%,22) = 000 RICHTUNG_horizontal%(Z1%,23) = 000 : RICHTUNG_vertikal%(Z1%,23) = 000 RICHTUNG_horizontal%(Z1%,24) = 000 : RICHTUNG_vertikal%(Z1%,24) = 000 RICHTUNG_horizontal%(Z1%,25) = 000 : RICHTUNG_vertikal%(Z1%,25) = 000 RICHTUNG_horizontal%(Z1%,26) = 000 : RICHTUNG_vertikal%(Z1%,26) = 000 RICHTUNG_horizontal%(Z1%,27) = 000 : RICHTUNG_vertikal%(Z1%,27) = 000 RICHTUNG_horizontal%(Z1%,28) = 000 : RICHTUNG_vertikal%(Z1%,28) = 000 RICHTUNG_horizontal%(Z1%,29) = 000 : RICHTUNG_vertikal%(Z1%,29) = 000 RICHTUNG_horizontal%(Z1%,30) = 000 : RICHTUNG_vertikal%(Z1%,30) = 000 RICHTUNG_horizontal%(Z1%,31) = 000 : RICHTUNG_vertikal%(Z1%,31) = 000 RICHTUNG_horizontal%(Z1%,32) = 000 : RICHTUNG_vertikal%(Z1%,32) = 000 RICHTUNG_horizontal%(Z1%,33) = 000 : RICHTUNG_vertikal%(Z1%,33) = 000 RICHTUNG_horizontal%(Z1%,34) = 000 : RICHTUNG_vertikal%(Z1%,34) = 000 RICHTUNG_horizontal%(Z1%,35) = 000 : RICHTUNG_vertikal%(Z1%,35) = 000 RICHTUNG_horizontal%(Z1%,36) = 000 : RICHTUNG_vertikal%(Z1%,36) = 000 RICHTUNG_horizontal%(Z1%,37) = 000 : RICHTUNG_vertikal%(Z1%,37) = 000 RICHTUNG_horizontal%(Z1%,38) = 000 : RICHTUNG_vertikal%(Z1%,38) = 000 RICHTUNG_horizontal%(Z1%,39) = 000 : RICHTUNG_vertikal%(Z1%,39) = 000 RICHTUNG_horizontal%(Z1%,40) = 000 : RICHTUNG_vertikal%(Z1%,40) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,41) = 000 : RICHTUNG_vertikal%(Z1%,41) = 000 RICHTUNG_horizontal%(Z1%,42) = 000 : RICHTUNG_vertikal%(Z1%,42) = 000 RICHTUNG_horizontal%(Z1%,43) = 000 : RICHTUNG_vertikal%(Z1%,43) = 000 RICHTUNG_horizontal%(Z1%,44) = 000 : RICHTUNG_vertikal%(Z1%,44) = 000 RICHTUNG_horizontal%(Z1%,45) = 000 : RICHTUNG_vertikal%(Z1%,45) = 000 RICHTUNG_horizontal%(Z1%,46) = 000 : RICHTUNG_vertikal%(Z1%,46) = 000 RICHTUNG_horizontal%(Z1%,47) = 000 : RICHTUNG_vertikal%(Z1%,47) = 000 RICHTUNG_horizontal%(Z1%,48) = 000 : RICHTUNG_vertikal%(Z1%,48) = 000 RICHTUNG_horizontal%(Z1%,49) = 000 : RICHTUNG_vertikal%(Z1%,49) = 000 RICHTUNG_horizontal%(Z1%,50) = 000 : RICHTUNG_vertikal%(Z1%,50) = 000 RICHTUNG_horizontal%(Z1%,51) = 000 : RICHTUNG_vertikal%(Z1%,51) = 000 RICHTUNG_horizontal%(Z1%,52) = 000 : RICHTUNG_vertikal%(Z1%,52) = 000 RICHTUNG_horizontal%(Z1%,53) = 000 : RICHTUNG_vertikal%(Z1%,53) = 000 RICHTUNG_horizontal%(Z1%,54) = 000 : RICHTUNG_vertikal%(Z1%,54) = 000 RICHTUNG_horizontal%(Z1%,55) = 000 : RICHTUNG_vertikal%(Z1%,55) = 000 RICHTUNG_horizontal%(Z1%,56) = 000 : RICHTUNG_vertikal%(Z1%,56) = 000 RICHTUNG_horizontal%(Z1%,57) = 000 : RICHTUNG_vertikal%(Z1%,57) = 000 RICHTUNG_horizontal%(Z1%,58) = 000 : RICHTUNG_vertikal%(Z1%,58) = 000 RICHTUNG_horizontal%(Z1%,59) = 000 : RICHTUNG_vertikal%(Z1%,59) = 000 RICHTUNG_horizontal%(Z1%,60) = 000 : RICHTUNG_vertikal%(Z1%,60) = 000 RICHTUNG_horizontal%(Z1%,61) = 000 : RICHTUNG_vertikal%(Z1%,61) = 000 RICHTUNG_horizontal%(Z1%,62) = 000 : RICHTUNG_vertikal%(Z1%,62) = 000 RICHTUNG_horizontal%(Z1%,63) = 000 : RICHTUNG_vertikal%(Z1%,63) = 000 RICHTUNG_horizontal%(Z1%,64) = 000 : RICHTUNG_vertikal%(Z1%,64) = 000 RICHTUNG_horizontal%(Z1%,65) = 000 : RICHTUNG_vertikal%(Z1%,65) = 000 RICHTUNG_horizontal%(Z1%,66) = 000 : RICHTUNG_vertikal%(Z1%,66) = 000 RICHTUNG_horizontal%(Z1%,67) = 000 : RICHTUNG_vertikal%(Z1%,67) = 000 RICHTUNG_horizontal%(Z1%,68) = 000 : RICHTUNG_vertikal%(Z1%,68) = 000 RICHTUNG_horizontal%(Z1%,69) = 000 : RICHTUNG_vertikal%(Z1%,69) = 000 RICHTUNG_horizontal%(Z1%,70) = 000 : RICHTUNG_vertikal%(Z1%,70) = 000 RICHTUNG_horizontal%(Z1%,71) = 000 : RICHTUNG_vertikal%(Z1%,71) = 000 RICHTUNG_horizontal%(Z1%,72) = 000 : RICHTUNG_vertikal%(Z1%,72) = 000 RICHTUNG_horizontal%(Z1%,73) = 000 : RICHTUNG_vertikal%(Z1%,73) = 000 RICHTUNG_horizontal%(Z1%,74) = 000 : RICHTUNG_vertikal%(Z1%,74) = 000 RICHTUNG_horizontal%(Z1%,75) = 000 : RICHTUNG_vertikal%(Z1%,75) = 000 RICHTUNG_horizontal%(Z1%,76) = 000 : RICHTUNG_vertikal%(Z1%,76) = 000 RICHTUNG_horizontal%(Z1%,77) = 000 : RICHTUNG_vertikal%(Z1%,77) = 000 RICHTUNG_horizontal%(Z1%,78) = 000 : RICHTUNG_vertikal%(Z1%,78) = 000 RICHTUNG_horizontal%(Z1%,79) = 000 : RICHTUNG_vertikal%(Z1%,79) = 000 RICHTUNG_horizontal%(Z1%,80) = 000 : RICHTUNG_vertikal%(Z1%,80) = 000 RICHTUNG_horizontal%(Z1%,81) = 000 : RICHTUNG_vertikal%(Z1%,81) = 000 RICHTUNG_horizontal%(Z1%,82) = 000 : RICHTUNG_vertikal%(Z1%,82) = 000 RICHTUNG_horizontal%(Z1%,83) = 000 : RICHTUNG_vertikal%(Z1%,83) = 000 RICHTUNG_horizontal%(Z1%,84) = 000 : RICHTUNG_vertikal%(Z1%,84) = 000 RICHTUNG_horizontal%(Z1%,85) = 000 : RICHTUNG_vertikal%(Z1%,85) = 000 RICHTUNG_horizontal%(Z1%,86) = 000 : RICHTUNG_vertikal%(Z1%,86) = 000 RICHTUNG_horizontal%(Z1%,87) = 000 : RICHTUNG_vertikal%(Z1%,87) = 000 RICHTUNG_horizontal%(Z1%,88) = 000 : RICHTUNG_vertikal%(Z1%,88) = 000 RICHTUNG_horizontal%(Z1%,89) = 000 : RICHTUNG_vertikal%(Z1%,89) = 000 RICHTUNG_horizontal%(Z1%,90) = 000 : RICHTUNG_vertikal%(Z1%,90) = 000 RICHTUNG_horizontal%(Z1%,91) = 000 : RICHTUNG_vertikal%(Z1%,91) = 000 RICHTUNG_horizontal%(Z1%,92) = 000 : RICHTUNG_vertikal%(Z1%,92) = 000 RICHTUNG_horizontal%(Z1%,93) = 000 : RICHTUNG_vertikal%(Z1%,93) = 000 RICHTUNG_horizontal%(Z1%,94) = 000 : RICHTUNG_vertikal%(Z1%,94) = 000 RICHTUNG_horizontal%(Z1%,95) = 000 : RICHTUNG_vertikal%(Z1%,95) = 000 RICHTUNG_horizontal%(Z1%,96) = 000 : RICHTUNG_vertikal%(Z1%,96) = 000 RICHTUNG_horizontal%(Z1%,97) = 0-(SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,97) = 30 RICHTUNG_horizontal%(Z1%,98) = 0-(SEITE_RECHTS03%/2) : RICHTUNG_vertikal%(Z1%,98) = 000 RICHTUNG_horizontal%(Z1%,99) = 000 : RICHTUNG_vertikal%(Z1%,99) = 000 return | |
| | | Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Dim 14 Juil 2013 - 23:16 | |
| @Jichel
nur ein Gedanke.
Wir geben x Pixel, dann gehe x Pixel nach rechts. Wir geben x Pixel, dann gehe x Pixel nach unten. Wenn wir geben x Pixel, bleibe x Pixel stehen.
seulement une idée.
Nous donnons x le pixel, alors va x le pixel à droite.
Nous donnons x le pixel, alors va x le pixel en bas.
Si nous donnons x le pixel, s'arrête x le pixel.
' *** Variablen für horizontal Fahrt dim RICHTUNG_horizontal%(Anzahl_LKW%,Anzahl_Fahrten%) ' *** Variablen für vertikal Fahrt dim RICHTUNG_vertikal%(Anzahl_LKW%,Anzahl_Fahrten%)
Neu ' *** Variablen für keine Fahrt dim RICHTUNG_standplatz%(Anzahl_LKW%,Anzahl_Fahrten%) ' ***
dim delta_horizontal%(Anzahl_LKW%) ' *** dim delta_vertikal%(Anzahl_LKW%)
Neu ' *** dim delta_standplatz%(Anzahl_LKW%) | |
| | | Jicehel
Nombre de messages : 5947 Age : 51 Localisation : 77500 Date d'inscription : 18/04/2011
| Sujet: Re: game for practice Lun 15 Juil 2013 - 10:43 | |
| Yes Severin, you have differents way to do it. You can add another tabs to manage the speed or waiting time for example. In the tab, the speed can be positive only, if it's negative, it's could be a waiting time (a number of cycles to wait for example) to manage it, when you change of step in the travel, if the speed value is negative, you change value of a counter (example: IF speed(LKW%, pos(LKW%)) < 0 THEN wait(LKW%)= 0 - speed(LKW%, pos(LKW%)) and you test each cycle if you have to wait. If counter is positiv, you decrease it and go next car else you manage de move.
Another thing, better than having 3 parts to manage, you could you a data structure to have data. Structure could be something like: DATA "LKW1",delta_h1,delta_v1,speed1,delta_hl2,delta_v2,speed2,... It's coulb be alot easiest to manage i think and after you'll be able to replace data structure by data in a file to let user register the moves.
| |
| | | Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Lun 15 Juil 2013 - 13:40 | |
| | |
| | | Jicehel
Nombre de messages : 5947 Age : 51 Localisation : 77500 Date d'inscription : 18/04/2011
| Sujet: Re: game for practice Lun 15 Juil 2013 - 14:35 | |
| Ce n'est qu'une idée pour que tu puisses l'implémenter comme tu veux. Je vais essayer de reprendre un peu mon Pacman là où j'en étais pour avancer un peu. Je me suis libéré du temps en arrêtant certains jeux chronophages, mais je ne peux pas reprendre ton programme (en plus il n'est pas dans ma langue naturelle et par conséquent, j'ai toujours un peu de mal à rentrer dedans). Je te laisse chercher ta solution et je peux te donner des pistes sur comment faire ou t'aider ponctuellement si tu as un problème de fonctionnement, mais je ne vais pas modifier le code pour toi, je ne voudrais pas te retirer le plaisir de la recherche et de la création. En plus, je suis en vacances à partir de jeudi soir, je vais avoir des choses à préparer et je vais essayer d'avancer un peu sur mes propres créations pendant quelques heures histoires d'être sûr de pouvoir livrer les articles dans les temps. Si tu ne comprends pas l'idée que j'ai exposé dans mon dernier post, je peux t'expliquer même en anglais, par contre pour l'allemand, il faudra attendre l'intervention de Klaus, j'aurais trop peur en utilisant Google trad d'écrire un message qui me ferait passer pour un français fortement alcoolisé...
| |
| | | Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Dim 21 Juil 2013 - 1:12 | |
| Guten Abend, hier meine neuste Version 21.07.2013 01:0323:29 Wer kann mir sagen wie ich eine Zeitschleife verlassen kann ? Ich möchte zurück ins Menü zum Neustart. Verbesserungen willkommen. Good evening, here my newest version 7/21/2013 01:0323:29 Who can tell me how I can leave a timer loop? I would want to go back to the menu for a new start. Improvements welcome. Bonsoir, ici mon 21/07/2013 de version le plus nouveau 01:0323:29 Qui peut me dire comment je peux quitter une boucle de minuteur ? Je voudrais retourner au menu pour un nouveau début. Améliorations bienvenues. - Code:
-
' ****************************************************************************** ' *** SIMULATION LKW-VERKEHR FABRIK - LAGER ********************************* ' ****************************************************************************** dim i% dim j% ' ------------------------------------------------------------------------------ ' *** FORM ERSTELLEN UND AN BILDSCHIRM ANPASSEN ******************************** ' FORM 0000 top 0,0 : LEFT 0,0 : width 0,screen_x : height 0,SCREEN_Y-40 color 0,0,0,0 :' schwarz / black caption 0,"SIMULATION LKW-VERKEHR FABRIK - LAGER " ' ------------------------------------------------------------------------------ ' *** ERSTELLEN DES HAUPTMENÜ 9701 bis 9720 ************************************ main_menu 9700 for i% = 1 to 20 sub_menu 9700 + i% : parent 9700 + i%,9700 select i% case 1 : caption 9701," Programm END " case 2 : caption 9702," START LKW all " case 3 : caption 9703," START LKW01 " case 4 : caption 9704," START LKW02 " case 5 : caption 9705," START LKW03 " case 6 : caption 9706," START LKW04 " case 7 : caption 9707," STOP LKW all " ' case 20: caption 9720," " end_select next i% ' ------------------------------------------------------------------------------ ' *** DARSTELLUNGS-BILDSCHIRM DEFINIEREN *************************************** DIM SEITE_RECHTS% : SEITE_RECHTS% = (SCREEN_X - 130-50) DIM SEITE_LINKS% : SEITE_LINKS% = 0095 ' *** DARSTELLUNGS-BILDSCHIRM für Gebäude DEFINIEREN *************************** DIM SEITE_RECHTS01% : SEITE_RECHTS01% = (SCREEN_X - 110) DIM SEITE_LINKS01% : SEITE_LINKS01% = 0095 ' *** DARSTELLUNGS-BILDSCHIRM für Rampen DEFINIEREN **************************** DIM SEITE_RECHTS02% : SEITE_RECHTS02% = (SCREEN_X - 130) DIM SEITE_LINKS02% : SEITE_LINKS02% = 0095 ' *** DARSTELLUNGS-BILDSCHIRM für Rampen DEFINIEREN **************************** DIM SEITE_RECHTS03% : SEITE_RECHTS03% = (SCREEN_X - 130 -50) DIM SEITE_LINKS03% : SEITE_LINKS03% = 0095 ' *** Grenzen für Fahrwege auf Bildschirm langer Fahrweg *********************** DIM SEITE_RECHTS04% : SEITE_RECHTS04% = (SCREEN_X - 165) DIM SEITE_LINKS04% : SEITE_LINKS04% = 0095 ' *** Grenzen für Fahrwege auf Bildschirm kurzer Fahrweg links ***************** DIM SEITE_RECHTS05% : SEITE_RECHTS05% = 0095 + 0100 DIM SEITE_LINKS05% : SEITE_LINKS05% = 0095 ' *** Grenzen für Fahrwege auf Bildschirm kurzer Fahrweg rechts **************** DIM SEITE_RECHTS06% : SEITE_RECHTS06% = (SCREEN_X - 165) DIM SEITE_LINKS06% : SEITE_LINKS06% = (SCREEN_X - 165-101) ' *** DARSTELLUNGS-BILDSCHIRM Grenze für Fahrwege in Tabelle DEFINIEREN ******** DIM FAHR_WEG_01% : FAHR_WEG_01% = (SCREEN_X - 170 - 95) DIM FAHR_WEG_02% : FAHR_WEG_02% = 0 - (SCREEN_X - 170 - 95) ' *** DARSTELLUNGS-BILDSCHIRM Grenze für Fahrwege links in Tabelle DEFINIEREN ** DIM FAHR_WEG_03% : FAHR_WEG_03% = 100 :' immer 200 Pixel DIM FAHR_WEG_04% : FAHR_WEG_04% = 0 - 100 :' immer 200 Pixel ' *** DARSTELLUNGS-BILDSCHIRM Grenze für Fahrwege rechts in Tabelle DEFINIEREN * DIM FAHR_WEG_05% : FAHR_WEG_05% = 101 :' immer 200 Pixel DIM FAHR_WEG_06% : FAHR_WEG_06% = 0 - 101 :' immer 200 Pixel ' ------------------------------------------------------------------------------ ' 1680 x 1050 = Fahr_weg_01% = 1415 ' 1280 x 1024 = Fahr_weg_01% = 1015 ' ' ------------------------------------------------------------------------------ ' ****************************************************************************** DIM SEITE_OBEN01% : SEITE_OBEN01% = 108 :' Fabrik, Zulieferer, Rampen DIM SEITE_OBEN02% : SEITE_OBEN02% = 110 :' Andockstellen ' ------------------------------------------------------------------------------ ' ****************************************************************************** DIM SEITE_UNTEN01% : SEITE_UNTEN01% = 000 ' ' *** FABRIK erstellen ********************************************************* edit 9800 :color 9800,000,255,000 TOP 9800,SEITE_OBEN01% :LEFT 9800,10 :HEIGHT 9800,600 :WIDTH 9800,75 ' *** Andockstellen Fabrik ***************************************************** j% = 0 for i% = 8001 to 8020 edit i% :top i%,SEITE_OBEN02%+j% :left i%,15 :width i%,60 :height i%,25 :j% = j% + 30 next i% ' *** RAMPEN FABRIK erstellen ************************************************** BUTTON 9810 TOP 9810,SEITE_OBEN01% : LEFT 9810,85 : HEIGHT 9810,600 : WIDTH 9810,19 ' *** Zulieferer erstellen ***************************************************** edit 9820 : color 9820,000,255,000 TOP 9820,SEITE_OBEN01% : LEFT 9820,SEITE_RECHTS01% : HEIGHT 9820,600 : WIDTH 9820,75 ' *** Andockstellen Zulieferer ************************************************* j% = 0 for i% = 8041 to 8060 edit i% :top i%,SEITE_OBEN02%+j% :left i%,SEITE_RECHTS01% + 10 :width i%,60 :height i%,25 :j% = j% + 30 next i% ' *** RAMPEN Zulieferer erstellen ********************************************** BUTTON 9830 TOP 9830,SEITE_OBEN01% : LEFT 9830,SEITE_RECHTS02% : HEIGHT 9830,600 : WIDTH 9830,19 ' *** Hilfsfelder zur Kontrolle ************************************************ EDIT 5000: TOP 5000,30: LEFT 5000,Screen_X/2-60: HEIGHT 5000,25 :WIDTH 5000,120 COLOR 5000,000,255,000: Text 5000," Anzahl Fahrten : "
' j% = 0 ' for i% = 5001 to 5002 ' Button i% :top i%,770 :left i%,45 + j% :width i%,65 :height i%,25 :' j% = j% + 50 ' caption i%," STOP LKW" ' next i% ' *** LABEL ERSTELLEN ********************************************************** label main label halt label start label Start_Lkw_01 label Start_Lkw_02 label Start_Lkw_03 label Start_Lkw_04 label Stop_LKW label FAHRTDATENFUERLKW label Weiter01 :' LKW nach rechts fahren langer Weg label Weiter02 :' LKW nach rechts fahren kurzer Weg linke Seite label Weiter03 :' LKW nach rechts fahren kurzer Weg rechte Seite label Weiter04 :' LKW nach links fahren langer Weg label Weiter05 :' LKW nach links fahren kurzer Weg label Weiter06 label Weiter07 :' Auswahl LKW nach oben oder unten fahren label Weiter08 :' LKW nach unten fahren label Weiter09 :' LKW nach oben fahren label Weiter10 :' Pause an Ladestelle
label Weiter80 :' Für alle LKW label Weiter81 :' Für 1. LKW label Weiter82 :' Für 2. LKW label Weiter83 :' Für 3. LKW label Weiter84 :' Für 4. LKW label Weiter99 ' ' ****************************************************************************** dim Zaehler% :' Zaehler% = 1 :' Zähler für dir gelesenen Zeilen dim LKW% dim Anzahl_LKW% : Anzahl_LKW% = 4 dim Anzahl_Fahrten% : Anzahl_Fahrten% = 21 dim Zaehler_LKW% : Zaehler_LKW% = 1 dim Z1% dim Ankunft%(Anzahl_LKW%) ' ------------------------------------------------------------------------------ ' *** Geschwindigkeit pro LKW ************************************************** dim v%(Anzahl_LKW%) :' Übergabe Variable dim v1%(Anzahl_LKW%) :' Hilfsvariable für Fahrgeschwindigkeit dim v2%(Anzahl_LKW%) :' Bechleunigungs- und Bremsgescheindigkeit dim v3%(Anzahl_LKW%) :' dim v4%(Anzahl_LKW%) ' *** Hilfsvariable zur Übernahme der Geschwindigkeit ************************** v%(1) = 0 : v%(2) = 0 : v%(3) = 0 : v%(4) = 0 ' *** Normale Geschwindigkeit für horizontale Fahrt v1%(1) = 5 : v1%(2) = 5 :v1%(3) = 5 :v1%(4) = 5 ' *** Beschleunigungs- und Bremsgescheingigkeit für horizontale Fahrt ********** v2%(1) = 1 :v2%(2) = 1 :v2%(3) = 1 :v2%(4) = 1 ' *** Standgeschwindigkeit = 0 wenn Zielpunkt erreicht ************************ v3%(1) = 0 :v3%(2) = 0 :v3%(3) = 0 :v3%(4) = 0 ' *** Normale Geschwindigkeit für verikale Fahrt ******************************* v4%(1) = 2 :v4%(2) = 2 :v4%(3) = 2 :v4%(4) = 2 ' *** dim R_horiz%(Anzahl_LKW%,Anzahl_Fahrten%) ' *** dim R_vert%(Anzahl_LKW%,Anzahl_Fahrten%) ' *** dim R_stand%(Anzahl_LKW%,Anzahl_Fahrten%) ' *** dim D_01_horiz%(Anzahl_LKW%) :' Langer Weg von links nach rechts dim D_02_horiz%(Anzahl_LKW%) :' Kurzer Weg von nur linke Seite dim D_03_horiz%(Anzahl_LKW%) :' Kurzer Weg von nur rechte Seite ' *** dim delta_vertikal%(Anzahl_LKW%) ' *** dim delta_platzstand%(Anzahl_LKW%) ' *** dim pos%(Anzahl_LKW%)
' ****************************************************************************** Gosub FAHRTDATENFUERLKW ' ' ****************************************************************************** ON_CLICK 9701,halt ON_CLICK 9702,start ON_CLICK 9703,Start_Lkw_01 ON_CLICK 9704,Start_Lkw_02 ON_CLICK 9705,Start_Lkw_03 ON_CLICK 9706,Start_Lkw_04 ON_CLICK 9707,Stop_LKW
' ------------------------------------------------------------------------------ ' *** TIMER INITIALISIERUNG **************************************************** timer 9998 :' Timer erstellen timer_interval 9998,60 :' Timer interval festlegen on_timer 9998,main :' Timer starten und Startlabel festlegen timer_off 9998 :' Timer ausschalten ' end ' ------------------------------------------------------------------------------ ' *** Timer Stoppen ************************************************************ Stop_LKW: timer_off 9998 end ' ------------------------------------------------------------------------------ ' *** LKW starten einzeln oder alle ******************************************** start: Anzahl_LKW% = 4 :Zaehler_LKW% = 1 :timer_on 9998 return ' Start_Lkw_01: Anzahl_LKW% = 1 :Zaehler_LKW% = 1 :timer_on 9998 return ' Start_Lkw_02: Anzahl_LKW% = 2 :Zaehler_LKW% = 2 :timer_on 9998 return ' Start_Lkw_03: Anzahl_LKW% = 3 :Zaehler_LKW% = 3 :timer_on 9998 return ' Start_Lkw_04: Anzahl_LKW% = 4 :Zaehler_LKW% = 4 :timer_on 9998 return ' ------------------------------------------------------------------------------ ' ****************************************************************************** ' *** Timer Schleife *********************************************************** main: timer_off_all ' Text 5000," Anzahl Fahrten : "+STR$(Anzahl_Fahrten%) if Anzahl_LKW% = 4 and Zaehler_LKW% = 1 then goto Weiter80 if Anzahl_LKW% = 1 and Zaehler_LKW% = 1 then goto Weiter81 if Anzahl_LKW% = 2 and Zaehler_LKW% = 2 then goto Weiter82 if Anzahl_LKW% = 3 and Zaehler_LKW% = 3 then goto Weiter83 if Anzahl_LKW% = 4 and Zaehler_LKW% = 4 then goto Weiter84 ' end ' ------------------------------------------------------------------------------ Weiter80: if Ankunft%(1)+Ankunft%(2)+Ankunft%(3)+Ankunft%(4) = 4 then Anzahl_LKW% = 4 if Ankunft%(1)+Ankunft%(2)+Ankunft%(3)+Ankunft%(4) = 4 then Zaehler_LKW% = 1 if Ankunft%(1)+Ankunft%(2)+Ankunft%(3)+Ankunft%(4) = 4 then Anzahl_Fahrten% = Anzahl_Fahrten% + 1 if Ankunft%(1)+Ankunft%(2)+Ankunft%(3)+Ankunft%(4) = 4 then v4%(1) = 2 if Ankunft%(1)+Ankunft%(2)+Ankunft%(3)+Ankunft%(4) = 4 then v4%(2) = 2 if Ankunft%(1)+Ankunft%(2)+Ankunft%(3)+Ankunft%(4) = 4 then v4%(3) = 2 if Ankunft%(1)+Ankunft%(2)+Ankunft%(3)+Ankunft%(4) = 4 then v4%(4) = 2 Text 5000," Anzahl Fahrten : "+STR$(Anzahl_Fahrten%) goto weiter99 ' ------------------------------------------------------------------------------ Weiter81: if Ankunft%(1) = 1 then Anzahl_LKW% = 1 if Ankunft%(1) = 1 then Zaehler_LKW% = 1 if Ankunft%(1) = 1 then Anzahl_Fahrten% = Anzahl_Fahrten% + 1 if Ankunft%(1) = 1 then v4%(1) = 2 if Ankunft%(1) = 1 then v4%(2) = 2 if Ankunft%(1) = 1 then v4%(3) = 2 if Ankunft%(1) = 1 then v4%(4) = 2 Text 5000," Anzahl Fahrten : "+STR$(Anzahl_Fahrten%) goto weiter99 ' ------------------------------------------------------------------------------ Weiter82: if Ankunft%(2) = 1 then Anzahl_LKW% = 2 if Ankunft%(2) = 1 then Zaehler_LKW% = 2 if Ankunft%(2) = 1 then Anzahl_Fahrten% = Anzahl_Fahrten% + 1 if Ankunft%(2) = 1 then v4%(1) = 2 if Ankunft%(2) = 1 then v4%(2) = 2 if Ankunft%(2) = 1 then v4%(3) = 2 if Ankunft%(2) = 1 then v4%(4) = 2 Text 5000," Anzahl Fahrten : "+STR$(Anzahl_Fahrten%) goto weiter99 ' ------------------------------------------------------------------------------ Weiter83: if Ankunft%(3) = 1 then Anzahl_LKW% = 3 if Ankunft%(3) = 1 then Zaehler_LKW% = 3 if Ankunft%(3) = 1 then Anzahl_Fahrten% = Anzahl_Fahrten% + 1 if Ankunft%(3) = 1 then v4%(1) = 2 if Ankunft%(3) = 1 then v4%(2) = 2 if Ankunft%(3) = 1 then v4%(3) = 2 if Ankunft%(3) = 1 then v4%(4) = 2 Text 5000," Anzahl Fahrten : "+STR$(Anzahl_Fahrten%) goto weiter99 ' ------------------------------------------------------------------------------ Weiter84: if Ankunft%(4) = 1 then Anzahl_LKW% = 4 if Ankunft%(4) = 1 then Zaehler_LKW% = 4 if Ankunft%(4) = 1 then Anzahl_Fahrten% = Anzahl_Fahrten% + 1 if Ankunft%(4) = 1 then v4%(1) = 2 if Ankunft%(4) = 1 then v4%(2) = 2 if Ankunft%(4) = 1 then v4%(3) = 2 if Ankunft%(4) = 1 then v4%(4) = 2 Text 5000," Anzahl Fahrten : "+STR$(Anzahl_Fahrten%) goto weiter99 ' ------------------------------------------------------------------------------ Weiter99: if Anzahl_Fahrten% = 21 then Text 5000," Anzahl Fahrten : ENDE " if Anzahl_Fahrten% = 21 then goto Stop_LKW ' Ankunft%(1)= 999 :Ankunft%(2)= 999 :Ankunft%(3)= 999 :Ankunft%(4)= 999 ' ------------------------------------------------------------------------------ ' *** LKW% ist der äußere Zähler der Schleife ********************************** ' for LKW% = Zaehler_LKW% to Anzahl_LKW% ' ------------------------------------------------------------------------------ ' *** Auswahl LKW nach links oder rechts fahren ******************************** ' ' *** Fahrt nach rechts if R_horiz%(LKW%,Anzahl_Fahrten%) = FAHR_WEG_01% then goto weiter01 if R_horiz%(LKW%,Anzahl_Fahrten%) = 100 then goto weiter02 if R_horiz%(LKW%,Anzahl_Fahrten%) = 101 then goto weiter03 ' *** Fahrt nach links if R_horiz%(LKW%,Anzahl_Fahrten%) = FAHR_WEG_02% then goto weiter04 if R_horiz%(LKW%,Anzahl_Fahrten%) = -100 then goto weiter05 if R_horiz%(LKW%,Anzahl_Fahrten%) = -101 then goto weiter06 ' ' ------------------------------------------------------------------------------ ' *** LKW nach rechts fahren langer Weg **************************************** weiter01: ' D_01_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten%) ' *** Anfahrstrecke nach rechts if left(LKW%) = SEITE_LINKS04% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_LINKS04% + 30 then v%(LKW%) = v1%(LKW%) ' *** Normalfahrstrecke nach rechts left LKW%,left(LKW%) + v%(LKW%) ' *** Bremsstrecke nach rechts if left(LKW%) - SEITE_LINKS04% - 5 > D_01_horiz%(LKW%) - 30 then v%(LKW%) = v2%(LKW%) ' *** LKW steht an Ladestelle rechts if left(LKW%) - SEITE_LINKS04% - 5 = D_01_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_LINKS04% - 5 = D_01_horiz%(LKW%) then Ankunft%(LKW%) = 1 ' *** Neue vertikal Position an Ladestelle festlegen if left(LKW%) - SEITE_LINKS04% - 5 = D_01_horiz%(LKW%) then pos%(LKW%) = top(LKW%) ' goto weiter07 ' ------------------------------------------------------------------------------ ' *** LKW nach rechts fahren von linker Seite kurzer Weg *********************** weiter02: ' D_02_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten%) ' *** Anfahrstrecke nach rechts if left(LKW%) = SEITE_LINKS05% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_LINKS05% + 30 then v%(LKW%) = v1%(LKW%) ' *** Normalfahrstrecke nach rechts left LKW%,left(LKW%) + v%(LKW%) ' *** Bremsstrecke nach rechts if left(LKW%) - SEITE_LINKS05% - 5 > D_02_horiz%(LKW%) - 30 then v%(LKW%) = v2%(LKW%) ' *** LKW steht an Ladestelle rechts if left(LKW%) - SEITE_LINKS05% - 5 = D_02_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_LINKS05% - 5 = D_02_horiz%(LKW%) then Ankunft%(LKW%) = 1 ' *** Neue vertikal Position an Ladestelle festlegen if left(LKW%) - SEITE_LINKS05% - 5 = D_02_horiz%(LKW%) then pos%(LKW%) = top(LKW%) ' goto weiter07 ' ------------------------------------------------------------------------------ ' *** LKW nach rechts fahren von rechter Seite kurzer Weg ********************** weiter03: ' D_03_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten%) ' *** Anfahrstrecke nach rechts if left(LKW%) = SEITE_LINKS06% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_LINKS06% + 30 then v%(LKW%) = v1%(LKW%) ' *** Normalfahrstrecke nach rechts left LKW%,left(LKW%) + v%(LKW%) ' *** Bremsstrecke nach rechts if left(LKW%) - SEITE_LINKS06% - 0 > D_03_horiz%(LKW%) - 30 then v%(LKW%) = v2%(LKW%) ' *** LKW steht an Ladestelle rechts if left(LKW%) - SEITE_LINKS06% - 0 = D_03_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_LINKS06% - 0 = D_03_horiz%(LKW%) then Ankunft%(LKW%) = 1 ' *** Neue vertikal Position an Ladestelle festlegen if left(LKW%) - SEITE_LINKS06% - 0 = D_03_horiz%(LKW%) then pos%(LKW%) = top(LKW%) ' goto weiter07 ' ------------------------------------------------------------------------------ ' *** LKW nach links fahren langer Weg ***************************************** weiter04: ' D_01_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten%) ' *** Anfahrstrecke nach links if left(LKW%) = SEITE_RECHTS04% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_RECHTS04% - 30 then v%(LKW%) = v1%(LKW%) ' *** Normalfahrstrecke nach links left LKW%,left(LKW%) - v%(LKW%) ' *** Bremsstrecke nach links if left(LKW%) - SEITE_RECHTS04% - 5 = D_01_horiz%(LKW%) + 30 then v%(LKW%) = v2%(LKW%) ' *** LKW steht an Ladestelle links if left(LKW%) - SEITE_RECHTS04% + 5 = D_01_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_RECHTS04% + 5 = D_01_horiz%(LKW%) then Ankunft%(LKW%) = 1 ' *** Neue vertikal Position an Ladestelle festlegen if left(LKW%) - SEITE_RECHTS04% + 5 = D_01_horiz%(LKW%) then pos%(LKW%) = top(LKW%) ' goto weiter07 ' ------------------------------------------------------------------------------ ' *** LKW nach links fahren kurzer Weg ***************************************** weiter05: ' D_02_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten%) ' *** Anfahrstrecke nach links if left(LKW%) = SEITE_RECHTS05% + 5 then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_RECHTS05% - 30 then v%(LKW%) = v1%(LKW%) ' *** Normalfahrstrecke nach links left LKW%,left(LKW%) - v%(LKW%) ' *** Bremsstrecke nach links if left(LKW%) - SEITE_RECHTS05% + 5 = D_02_horiz%(LKW%) + 30 then v%(LKW%) = v2%(LKW%) ' *** LKW steht an Ladestelle links if left(LKW%) - SEITE_RECHTS05% + 0 = D_02_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_RECHTS05% + 0 = D_02_horiz%(LKW%) then Ankunft%(LKW%) = 1 ' *** Neue vertikal Position an Ladestelle festlegen if left(LKW%) - SEITE_RECHTS05% + 0 = D_02_horiz%(LKW%) then pos%(LKW%) = top(LKW%) ' goto weiter07 ' ------------------------------------------------------------------------------ ' *** LKW nach links fahren kurzer Weg **************************************** weiter06: ' D_03_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten%) ' *** Anfahrstrecke nach links if left(LKW%) = SEITE_RECHTS06% + 0 then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_RECHTS06% + 30 then v%(LKW%) = v1%(LKW%) ' *** Normalfahrstrecke nach links left LKW%,left(LKW%) - v%(LKW%) ' *** Bremsstrecke nach links if left(LKW%) - SEITE_RECHTS06% - 5 = D_03_horiz%(LKW%) + 30 then v%(LKW%) = v2%(LKW%) ' *** LKW steht an Ladestelle links if left(LKW%) - SEITE_RECHTS06% + 0 = D_03_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_RECHTS06% + 0 = D_03_horiz%(LKW%) then Ankunft%(LKW%) = 1 ' *** Neue vertikal Position an Ladestelle festlegen if left(LKW%) - SEITE_RECHTS06% + 0 = D_03_horiz%(LKW%) then pos%(LKW%) = top(LKW%) ' goto weiter07 ' ------------------------------------------------------------------------------ ' *** Auswahl LKW nach oben oder unten fahren ********************************** weiter07: ' if R_vert%(LKW%,Anzahl_Fahrten%) = 0 then goto weiter10 if R_vert%(LKW%,Anzahl_Fahrten%) > 0 then goto weiter08 if R_vert%(LKW%,Anzahl_Fahrten%) < 0 then goto weiter09 ' ------------------------------------------------------------------------------ ' *** LKW nach unten fahren **************************************************** Weiter08: ' delta_vertikal%(LKW%) = R_vert%(LKW%,Anzahl_Fahrten%) ' *** Normalfahrstrecke nach unten top LKW%,top(LKW%) + v4%(LKW%) ' *** Stop der Fahrt nach unten if top(LKW%) = pos%(LKW%) + delta_vertikal%(LKW%) then v4%(LKW%) = v3%(LKW%) ' *** Sprung zur Pause an Ladestelle goto weiter10 ' ------------------------------------------------------------------------------ ' *** LKW nach oben fahren ***************************************************** Weiter09: ' delta_vertikal%(LKW%) = R_vert%(LKW%,Anzahl_Fahrten%) ' *** Normalfahrstrecke nach oben top LKW%,top(LKW%) - v4%(LKW%) ' *** Stop der Fahrt nach oben if top(LKW%) = pos%(LKW%) + delta_vertikal%(LKW%) then v4%(LKW%) = v3%(LKW%) ' *** Sprung zur Pause an Ladestelle goto weiter10 ' ------------------------------------------------------------------------------ ' *** Pause an Ladestelle Weiter10: ' if Ankunft%(1)+Ankunft%(2)+Ankunft%(3)+Ankunft%(4) = 4 then wait 999 ' ------------------------------------------------------------------------------ ' *** Ende Zählschleife alle LKW's einmal durchlaufen ************************** next LKW% ' ------------------------------------------------------------------------------ ' *** Timer einschalten ******************************************************** timer_on 9998 ' ------------------------------------------------------------------------------ ' *** Rücksprung zum Label main: *********************************************** return end ' ------------------------------------------------------------------------------ ' *** PROGRAMM ANHALTEN UND BEENDEN ******************************************** halt: timer_off_all terminate ' ****************************************************************************** ' ****************************************************************************** FAHRTDATENFUERLKW: ' ' *** SYMBOLE FÜR LKW erstellen ************************************************ Anzahl_Fahrten% = 1
for i% = 1 to Anzahl_LKW% edit i% top i%,80+30*i% ' if i% = 1 then left i%,SEITE_LINKS04% :' SEITE_RECHTS04% if i% = 2 then left i%,SEITE_RECHTS04% if i% = 3 then left i%,SEITE_LINKS04% :' SEITE_RECHTS04% if i% = 4 then left i%,SEITE_RECHTS04% ' width i%,45 :height i%,25 ' if i% = 1 then color i%,255,000,000 if i% = 2 then color i%,000,255,000 if i% = 3 then color i%,020,200,255 if i% = 4 then color i%,240,240,020 ' text i%,"Linie "+STR$(i%) ' if i% = 1 then pos%(i%) = top(1) if i% = 2 then pos%(i%) = top(2) if i% = 3 then pos%(i%) = top(3) if i% = 4 then pos%(i%) = top(4) ' next i% ' *** Text für Andockstellen links ********************************************* text 8001," Tor 1 " :text 8002," Tor 2 " :text 8003," Tor 3 " :text 8004," Tor 4 " text 8005," Tor 5 " :text 8006," Tor 6 " :text 8007," Tor 7 " :text 8008," Tor 8 " text 8009," Tor 9 " :text 8010," Tor 10 " :text 8011," Tor 11 " :text 8012," Tor 12 " text 8013," Tor 13 " :text 8014," Tor 14 " :text 8015," Tor 15 " :text 8016," Tor 16 " text 8017," Tor 17 " :text 8018," Tor 18 " :text 8019," Tor 19 " :text 8020," Tor 20 " ' *** Text für Andockstellen rechts ******************************************** text 8041," Co. AA" :text 8042," Co. BB" :text 8043," Co. CC" :text 8044," Co. DD" text 8045," Co. EE" :text 8046," Co. FF" :text 8047," Co. GG" :text 8048," Co. HH" text 8049," Co. II" :text 8050," Co. JJ" :text 8051," Co. KK" :text 8052," Co. LL" text 8053," Co. MM" :text 8054," Co. NN" :text 8055," Co. OO" :text 8056," Co. PP" text 8057," Co. QQ" :text 8058," Co. RR" :text 8059," Co. SS" :text 8060," Co. TT" ' ****************************************************************************** ' ------------------------------------------------------------------------------ ' Richtung nach rechts = FAHR_WEG_01% kompletter Weg ' Richtung nach links = FAHR_WEG_02% kompletter Weg ' *** ' Richtung nach rechts = FAHR_WEG_03% 150 Pixel - Teilweg nach rechts ' Richtung nach links = FAHR_WEG_04% 150 Pixel - Teilweg zurück von reechts ' *** ' Richtung nach rechts = FAHR_WEG_05% 150 Pixel - Teilweg nach rechts ' Richtung nach links = FAHR_WEG_06% 150 Pixel - Teilweg zurück von reechts ' *** ' Richtung nach unten = POSITIV xxx STEP 30 - 510 ' Richtung nach oben = NEGATIV -xxx STEP -30 - 510 ' ------------------------------------------------------------------------------ ' *** DATEN FÜR LKW 001 FAHREN VON LINKS NACH RECHTS *************************** Z1% = 1 R_horiz%(Z1%,01) = FAHR_WEG_01% : R_vert%(Z1%,01) = 120 :R_stand%(Z1%,01) = 000 R_horiz%(Z1%,02) = FAHR_WEG_02% : R_vert%(Z1%,02) = 000 :R_stand%(Z1%,02) = 000 R_horiz%(Z1%,03) = FAHR_WEG_01% : R_vert%(Z1%,03) = 000 :R_stand%(Z1%,03) = 000 R_horiz%(Z1%,04) = FAHR_WEG_02% : R_vert%(Z1%,04) = 000 :R_stand%(Z1%,04) = 000 R_horiz%(Z1%,05) = FAHR_WEG_01% : R_vert%(Z1%,05) = -90 :R_stand%(Z1%,05) = 000 R_horiz%(Z1%,06) = FAHR_WEG_02% : R_vert%(Z1%,06) = 000 :R_stand%(Z1%,06) = 000 R_horiz%(Z1%,07) = FAHR_WEG_01% : R_vert%(Z1%,07) = 000 :R_stand%(Z1%,07) = 000 R_horiz%(Z1%,08) = FAHR_WEG_02% : R_vert%(Z1%,08) = 000 :R_stand%(Z1%,08) = 000 R_horiz%(Z1%,09) = FAHR_WEG_01% : R_vert%(Z1%,09) = 000 :R_stand%(Z1%,09) = 000 R_horiz%(Z1%,10) = FAHR_WEG_02% : R_vert%(Z1%,10) = 000 :R_stand%(Z1%,10) = 000 R_horiz%(Z1%,11) = FAHR_WEG_01% : R_vert%(Z1%,11) = 000 :R_stand%(Z1%,11) = 000 R_horiz%(Z1%,12) = FAHR_WEG_02% : R_vert%(Z1%,12) = 000 :R_stand%(Z1%,12) = 000 R_horiz%(Z1%,13) = FAHR_WEG_01% : R_vert%(Z1%,13) = 000 :R_stand%(Z1%,13) = 000 R_horiz%(Z1%,14) = FAHR_WEG_02% : R_vert%(Z1%,14) = 000 :R_stand%(Z1%,14) = 000 R_horiz%(Z1%,15) = FAHR_WEG_01% : R_vert%(Z1%,15) = -90 :R_stand%(Z1%,15) = 000 R_horiz%(Z1%,16) = FAHR_WEG_02% : R_vert%(Z1%,16) = 000 :R_stand%(Z1%,16) = 000 R_horiz%(Z1%,17) = FAHR_WEG_01% : R_vert%(Z1%,17) = 000 :R_stand%(Z1%,17) = 000 R_horiz%(Z1%,18) = FAHR_WEG_02% : R_vert%(Z1%,18) = 000 :R_stand%(Z1%,18) = 000 R_horiz%(Z1%,19) = FAHR_WEG_01% : R_vert%(Z1%,19) = 000 :R_stand%(Z1%,19) = 000 R_horiz%(Z1%,20) = FAHR_WEG_02% : R_vert%(Z1%,20) = 000 :R_stand%(Z1%,20) = 000 R_horiz%(Z1%,21) = 000 : R_vert%(Z1%,21) = 000 :R_stand%(Z1%,21) = 000 ' *** DATEN FÜR LKW 002 FAHRTEN NUR RECHTE SEITE ******************************* Z1% = 2 R_horiz%(Z1%,01) = FAHR_WEG_06% : R_vert%(Z1%,01) = 000 :R_stand%(Z1%,01) = 000 R_horiz%(Z1%,02) = FAHR_WEG_05% : R_vert%(Z1%,02) = 060 :R_stand%(Z1%,02) = 000 R_horiz%(Z1%,03) = FAHR_WEG_06% : R_vert%(Z1%,03) = 000 :R_stand%(Z1%,03) = 000 R_horiz%(Z1%,04) = FAHR_WEG_05% : R_vert%(Z1%,04) = 060 :R_stand%(Z1%,04) = 000 R_horiz%(Z1%,05) = FAHR_WEG_06% : R_vert%(Z1%,05) = 000 :R_stand%(Z1%,05) = 000 R_horiz%(Z1%,06) = FAHR_WEG_05% : R_vert%(Z1%,06) = 060 :R_stand%(Z1%,06) = 000 R_horiz%(Z1%,07) = FAHR_WEG_06% : R_vert%(Z1%,07) = 000 :R_stand%(Z1%,07) = 000 R_horiz%(Z1%,08) = FAHR_WEG_05% : R_vert%(Z1%,08) = 060 :R_stand%(Z1%,08) = 000 R_horiz%(Z1%,09) = FAHR_WEG_06% : R_vert%(Z1%,09) = 000 :R_stand%(Z1%,09) = 000 R_horiz%(Z1%,10) = FAHR_WEG_05% : R_vert%(Z1%,10) = 060 :R_stand%(Z1%,10) = 000 R_horiz%(Z1%,11) = FAHR_WEG_06% : R_vert%(Z1%,11) = 000 :R_stand%(Z1%,11) = 000 R_horiz%(Z1%,12) = FAHR_WEG_05% : R_vert%(Z1%,12) = 060 :R_stand%(Z1%,12) = 000 R_horiz%(Z1%,13) = FAHR_WEG_06% : R_vert%(Z1%,13) = 000 :R_stand%(Z1%,13) = 000 R_horiz%(Z1%,14) = FAHR_WEG_05% : R_vert%(Z1%,14) = 060 :R_stand%(Z1%,14) = 000 R_horiz%(Z1%,15) = FAHR_WEG_06% : R_vert%(Z1%,15) = 000 :R_stand%(Z1%,15) = 000 R_horiz%(Z1%,16) = FAHR_WEG_05% : R_vert%(Z1%,16) = 060 :R_stand%(Z1%,16) = 000 R_horiz%(Z1%,17) = FAHR_WEG_06% : R_vert%(Z1%,17) = 000 :R_stand%(Z1%,17) = 000 R_horiz%(Z1%,18) = FAHR_WEG_05% : R_vert%(Z1%,18) = -60 :R_stand%(Z1%,18) = 000 R_horiz%(Z1%,19) = FAHR_WEG_06% : R_vert%(Z1%,19) = 000 :R_stand%(Z1%,19) = 000 R_horiz%(Z1%,20) = FAHR_WEG_05% : R_vert%(Z1%,20) = 000 :R_stand%(Z1%,20) = 000 R_horiz%(Z1%,21) = 000 : R_vert%(Z1%,21) = 000 :R_stand%(Z1%,21) = 000 ' *** DATEN FÜR LKW 003 FAHREN NUR LINKE SEITE ********************************* Z1% = 3 R_horiz%(Z1%,01) = FAHR_WEG_03% : R_vert%(Z1%,01) = 060 :R_stand%(Z1%,01) = 000 R_horiz%(Z1%,02) = FAHR_WEG_04% : R_vert%(Z1%,02) = 000 :R_stand%(Z1%,02) = 000 R_horiz%(Z1%,03) = FAHR_WEG_03% : R_vert%(Z1%,03) = 060 :R_stand%(Z1%,03) = 000 R_horiz%(Z1%,04) = FAHR_WEG_04% : R_vert%(Z1%,04) = 000 :R_stand%(Z1%,04) = 000 R_horiz%(Z1%,05) = FAHR_WEG_03% : R_vert%(Z1%,05) = 060 :R_stand%(Z1%,05) = 000 R_horiz%(Z1%,06) = FAHR_WEG_04% : R_vert%(Z1%,06) = 000 :R_stand%(Z1%,06) = 000 R_horiz%(Z1%,07) = FAHR_WEG_03% : R_vert%(Z1%,07) = 060 :R_stand%(Z1%,07) = 000 R_horiz%(Z1%,08) = FAHR_WEG_04% : R_vert%(Z1%,08) = 000 :R_stand%(Z1%,08) = 000 R_horiz%(Z1%,09) = FAHR_WEG_03% : R_vert%(Z1%,09) = 060 :R_stand%(Z1%,09) = 000 R_horiz%(Z1%,10) = FAHR_WEG_04% : R_vert%(Z1%,10) = 000 :R_stand%(Z1%,10) = 000 R_horiz%(Z1%,11) = FAHR_WEG_03% : R_vert%(Z1%,11) = 060 :R_stand%(Z1%,11) = 000 R_horiz%(Z1%,12) = FAHR_WEG_04% : R_vert%(Z1%,12) = 000 :R_stand%(Z1%,12) = 000 R_horiz%(Z1%,13) = FAHR_WEG_03% : R_vert%(Z1%,13) = 060 :R_stand%(Z1%,13) = 000 R_horiz%(Z1%,14) = FAHR_WEG_04% : R_vert%(Z1%,14) = 000 :R_stand%(Z1%,14) = 000 R_horiz%(Z1%,15) = FAHR_WEG_03% : R_vert%(Z1%,15) = 060 :R_stand%(Z1%,15) = 000 R_horiz%(Z1%,16) = FAHR_WEG_04% : R_vert%(Z1%,16) = 000 :R_stand%(Z1%,16) = 000 R_horiz%(Z1%,17) = FAHR_WEG_03% : R_vert%(Z1%,17) = 000 :R_stand%(Z1%,17) = 000 R_horiz%(Z1%,18) = FAHR_WEG_04% : R_vert%(Z1%,18) = 000 :R_stand%(Z1%,18) = 000 R_horiz%(Z1%,19) = FAHR_WEG_03% : R_vert%(Z1%,19) = 000 :R_stand%(Z1%,19) = 000 R_horiz%(Z1%,20) = FAHR_WEG_04% : R_vert%(Z1%,20) = 000 :R_stand%(Z1%,20) = 000 R_horiz%(Z1%,21) = 000 : R_vert%(Z1%,21) = 000 :R_stand%(Z1%,21) = 000 ' *** DATEN FÜR LKW 004 FAHREN VON RECHTS NACH LINKS *************************** Z1% = 4 R_horiz%(Z1%,01) = FAHR_WEG_02% : R_vert%(Z1%,01) = -90 :R_stand%(Z1%,01) = 000 R_horiz%(Z1%,02) = FAHR_WEG_01% : R_vert%(Z1%,02) = 000 :R_stand%(Z1%,02) = 000 R_horiz%(Z1%,03) = FAHR_WEG_02% : R_vert%(Z1%,03) = 090 :R_stand%(Z1%,03) = 000 R_horiz%(Z1%,04) = FAHR_WEG_01% : R_vert%(Z1%,04) = 000 :R_stand%(Z1%,04) = 000 R_horiz%(Z1%,05) = FAHR_WEG_02% : R_vert%(Z1%,05) = 090 :R_stand%(Z1%,05) = 000 R_horiz%(Z1%,06) = FAHR_WEG_01% : R_vert%(Z1%,06) = 000 :R_stand%(Z1%,06) = 000 R_horiz%(Z1%,07) = FAHR_WEG_02% : R_vert%(Z1%,07) = 090 :R_stand%(Z1%,07) = 000 R_horiz%(Z1%,08) = FAHR_WEG_01% : R_vert%(Z1%,08) = 000 :R_stand%(Z1%,08) = 000 R_horiz%(Z1%,09) = FAHR_WEG_02% : R_vert%(Z1%,09) = -270 :R_stand%(Z1%,09) = 000 R_horiz%(Z1%,10) = FAHR_WEG_01% : R_vert%(Z1%,10) = 000 :R_stand%(Z1%,10) = 000 R_horiz%(Z1%,11) = FAHR_WEG_02% : R_vert%(Z1%,11) = 000 :R_stand%(Z1%,11) = 000 R_horiz%(Z1%,12) = FAHR_WEG_01% : R_vert%(Z1%,12) = 000 :R_stand%(Z1%,12) = 000 R_horiz%(Z1%,13) = FAHR_WEG_02% : R_vert%(Z1%,13) = 090 :R_stand%(Z1%,13) = 000 R_horiz%(Z1%,14) = FAHR_WEG_01% : R_vert%(Z1%,14) = 000 :R_stand%(Z1%,14) = 000 R_horiz%(Z1%,15) = FAHR_WEG_02% : R_vert%(Z1%,15) = 090 :R_stand%(Z1%,15) = 000 R_horiz%(Z1%,16) = FAHR_WEG_01% : R_vert%(Z1%,16) = 000 :R_stand%(Z1%,16) = 000 R_horiz%(Z1%,17) = FAHR_WEG_02% : R_vert%(Z1%,17) = 090 :R_stand%(Z1%,17) = 000 R_horiz%(Z1%,18) = FAHR_WEG_01% : R_vert%(Z1%,18) = 000 :R_stand%(Z1%,18) = 000 R_horiz%(Z1%,19) = FAHR_WEG_02% : R_vert%(Z1%,19) = -270 :R_stand%(Z1%,19) = 000 R_horiz%(Z1%,20) = FAHR_WEG_01% : R_vert%(Z1%,20) = 000 :R_stand%(Z1%,20) = 000 R_horiz%(Z1%,21) = 000 : R_vert%(Z1%,21) = 000 :R_stand%(Z1%,21) = 000 ' Return
Dernière édition par Severin le Dim 21 Juil 2013 - 23:31, édité 1 fois | |
| | | Klaus
Nombre de messages : 12274 Age : 74 Localisation : Ile de France Date d'inscription : 29/12/2009
| Sujet: Re: game for practice Dim 21 Juil 2013 - 15:31 | |
| Ohne in Dein Programm einzusteigen, kann ich Dir folgenden Hinweis geben: verwende ein BUTTON Objekt, dessen ON_CLICK Event ein TIMER_OFF Kommando für den gewünschten Timer enthält. Die Timeschleife ist gestoppt, da kein neues TIMER Event geschehen kann.
Sans rentrer dans ton programe, je peux te donner le tuyau suivant: utilise un objet BUTTON, ont l'évènement ON_CLICK contient une commande TIMER_OFF pour le TIMER souhaité. La boucle du timer est stoppée, car aucun nouvel évènement TIMER ne se produira plus. | |
| | | Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Dim 21 Juil 2013 - 23:39 | |
| Danke Klaus, es hat funktioniert. Oben neue Version. Im Endstadium wird für jeden LKW ein eigener Zeitgeber, und eigene Pausenzeit möglich sein. Es wird noch etwas dauern, da ich wieder auf Dienstreise gehen muss. On top new version. In the final stage becomes for every truck own timer, and own Be possible for break time. It will last a little bit, because I go again on official journey has to go. En haut la nouvelle version. Dans le stade final devient pour chaque CAMION un propre donneur de temps, et les propres Le temps de pauses être possible. Cela durera encore un peu, puisque je vont de nouveau sur la mission doit. | |
| | | Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Dim 28 Juil 2013 - 22:34 | |
| Hallo an Alle, hier die neuste Version vom 28.7.2013 Wie gehabt in 2 Teilen. Ich verzichte auf Übersetzung, die kann jeder selbst machen. Ich will nicht wie ein betrunkener dastehen. - Code:
-
' ****************************************************************************** ' *** SIMULATION LKW-VERKEHR FABRIK - LAGER ************************************ ' ****************************************************************************** dim i% : dim j% ' *** FORM ERSTELLEN UND AN BILDSCHIRM ANPASSEN ******************************** ' FORM 0000 top 0,0 :LEFT 0,0 :width 0,screen_x :height 0,SCREEN_Y-40 :color 0,0,0,0 :' black caption 0,"SIMULATION LKW-VERKEHR FABRIK - LAGER " ' *** ERSTELLEN DES HAUPTMENÜ 9701 bis 9720 ************************************ main_menu 9700 for i% = 1 to 20 sub_menu 9700 + i% : parent 9700 + i%,9700 select i% case 1 : caption 9701," Programm END " case 2 : caption 9702," START LKW all " case 3 : caption 9703," STOP LKW all " case 4 : caption 9704," START LKW01 " case 5 : caption 9705," START LKW02 " case 8 : caption 9708," STOP LKW01 " case 9 : caption 9709," STOP LKW02 " end_select next i% ' ****************************************************************************** DIM Weg01% : Weg01% = 45 DIM Weg02% : Weg02% = 80 DIM Weg04% : Weg04% = 160 :' Fixwert nicht ändern ' *** DARSTELLUNGS-BILDSCHIRM DEFINIEREN *************************************** DIM SEITE_RECHTS% : SEITE_RECHTS% = (SCREEN_X - 130-50) DIM SEITE_LINKS% : SEITE_LINKS% = 95 ' *** DARSTELLUNGS-BILDSCHIRM für Gebäude DEFINIEREN *************************** DIM SEITE_RECHTS01% : SEITE_RECHTS01% = (SCREEN_X - 110) DIM SEITE_LINKS01% : SEITE_LINKS01% = 95 ' *** DARSTELLUNGS-BILDSCHIRM für Rampen DEFINIEREN **************************** DIM SEITE_RECHTS02% : SEITE_RECHTS02% = (SCREEN_X - 130) DIM SEITE_LINKS02% : SEITE_LINKS02% = 95 ' *** DARSTELLUNGS-BILDSCHIRM für Rampen DEFINIEREN **************************** DIM SEITE_RECHTS03% : SEITE_RECHTS03% = (SCREEN_X - 130 -50) DIM SEITE_LINKS03% : SEITE_LINKS03% = 95 ' *** Grenzen für Fahrwege auf Bildschirm langer Fahrweg *********************** DIM SEITE_RECHTS04% : SEITE_RECHTS04% = (SCREEN_X - Weg04%) DIM SEITE_LINKS04% : SEITE_LINKS04% = 90 ' *** Grenzen für Fahrwege auf Bildschirm kurzer Fahrweg links ***************** DIM SEITE_RECHTS05% : SEITE_RECHTS05% = 90 + Weg01% DIM SEITE_LINKS05% : SEITE_LINKS05% = 90 ' *** Grenzen für Fahrwege auf Bildschirm kurzer Fahrweg rechts **************** DIM SEITE_RECHTS06% : SEITE_RECHTS06% = (SCREEN_X - Weg04%) DIM SEITE_LINKS06% : SEITE_LINKS06% = (SCREEN_X - Weg04% - Weg02%) ' *** Grenzen für Fahrwege auf Bildschirm langer Fahrweg zum verschieben ******* DIM SEITE_RECHTS07% : SEITE_RECHTS07% = (SCREEN_X - Weg04% - Weg02%) DIM SEITE_LINKS07% : SEITE_LINKS07% = 90 + Weg01% ' *** DARSTELLUNGS-BILDSCHIRM Grenze für Fahrweg kompltt nach rechts *********** DIM FAHR_WEG_01% : FAHR_WEG_01% = (SCREEN_X - Weg04% - 90) DIM FAHR_WEG_02% : FAHR_WEG_02% = 0 - (SCREEN_X - Weg04% - 90) ' *** DARSTELLUNGS-BILDSCHIRM Grenze für Fahrwege links in Tabelle DEFINIEREN ** DIM FAHR_WEG_03% : FAHR_WEG_03% = Weg01% :' immer 100 Pixel DIM FAHR_WEG_04% : FAHR_WEG_04% = 0 - Weg01% :' immer 100 Pixel ' *** DARSTELLUNGS-BILDSCHIRM Grenze für Fahrwege rechts in Tabelle DEFINIEREN * DIM FAHR_WEG_05% : FAHR_WEG_05% = Weg02% :' immer 101Pixel DIM FAHR_WEG_06% : FAHR_WEG_06% = 0 - Weg02% :' immer 101 Pixel ' *** DARSTELLUNGS-BILDSCHIRM Grenze für Fahrwege nach rechts zum verschieben ** DIM FAHR_WEG_07% : FAHR_WEG_07% = (SCREEN_X - Weg04% - 90 - Weg02% ) DIM FAHR_WEG_08% : FAHR_WEG_08% = 0 - (SCREEN_X - Weg04% - 90 - Weg02% ) ' *** Fahrweg horitontal auf Null gesetzt ************************************** DIM FAHR_WEG_99% : FAHR_WEG_99% = 0 ' *** DARSTELLUNGS-BILDSCHIRM Bereich des Bremsweges *************************** DIM Brems_WEG_01% : Brems_WEG_01% = 30 :' immer 30 Pixel ' ------------------------------------------------------------------------------ DIM SEITE_OBEN01% : SEITE_OBEN01% = 57 :' Fabrik, Zulieferer, Rampen DIM SEITE_OBEN02% : SEITE_OBEN02% = 60 :' Andockstellen ' ****************************************************************************** DIM SEITE_UNTEN01% : SEITE_UNTEN01% = 855 :' Höhe der Gebäude ' *** Anzeige der Fahrt-Nr. für LKW 01 ***************************************** EDIT 5000: TOP 5000,20: LEFT 5000,Screen_X/8+150: HEIGHT 5000,20 :WIDTH 5000,120 COLOR 5000,255,000,000: Text 5000," LKW01 Fahrt Nr.: " ' *** Anzeige der Fahrt-Nr. für LKW 02 ***************************************** EDIT 5001: TOP 5001,20: LEFT 5001,Screen_X/8+300: HEIGHT 5001,20 :WIDTH 5001,120 COLOR 5001,000,255,000: Text 5001," LKW02 Fahrt Nr.: " ' *** Darstellung der Fahrfläche *********************************************** Picture 5900 : TOP 5900,57 : LEFT 5900,135 : HEIGHT 5900,855 WIDTH 5900,(SCREEN_X - 160 - 135) :COLOR 5900,070,070,080 ' *** LABEL ERSTELLEN ********************************************************** label main_101 :label main_202 label halt label start_LKW_all :label Stop_LKW_all label Start_Lkw_01 :label Start_Lkw_02 label Stop_LKW_01 :label Stop_LKW_02 label FAHRTDATENFUERLKW label LKW_ERSTELLEN label VARIABLEN_NEU_INITZIALISIEREN ' *** Ablauf für LKW 01 label Weiter101 :' LKW nach rechts fahren langer Weg label Weiter102 :' LKW nach rechts fahren kurzer Weg linke Seite label Weiter103 :' LKW nach rechts fahren kurzer Weg rechte Seite label Weiter104 :' LKW nach links fahren langer Weg label Weiter105 :' LKW nach links fahren kurzer Weg label Weiter106 :' label Weiter107 :' Auswahl LKW nach oben oder unten fahren label Weiter108 :' LKW nach unten fahren label Weiter109 :' LKW nach oben fahren label Weiter110 :' Pause an Ladestelle label Weiter111 ' *** Ablauf für LKW 02 label Weiter211 :label Weiter212 : label Weiter213 : label Weiter214 label Weiter215 :label Weiter216 : label Weiter217 : label Weiter218 label Weiter219 :label Weiter220 : label Weiter221 label Weiter173 :label Weiter174 :' für Wartezeit Be- und Entladen label Weiter273 :label Weiter274 ' ****************************************************************************** dim Zaehler% :' Zaehler% = 1 :' Zähler für dir gelesenen Zeilen dim LKW% dim Anzahl_LKW% : Anzahl_LKW% = 2 dim Anzahl_Fahrten% : Anzahl_Fahrten% = 80 dim Anzahl_Fahrten1% : Anzahl_Fahrten1% = 80 dim Anzahl_Fahrten2% : Anzahl_Fahrten2% = 80 dim Letzte_Fahrten% : Letzte_Fahrten% = 80 dim Zaehler_LKW% : Zaehler_LKW% = 1 dim Z1% dim Ankunft%(Anzahl_LKW%) ' *** Geschwindigkeit pro LKW ************************************************** dim v%(Anzahl_LKW%) :' Übergabe Variable dim v1%(Anzahl_LKW%) :' Hilfsvariable für Fahrgeschwindigkeit dim v2%(Anzahl_LKW%) :' Bechleunigungs- und Bremsgescheindigkeit dim v3%(Anzahl_LKW%) :' dim v4%(Anzahl_LKW%) ' *** Hilfsvariable zur Übernahme der Geschwindigkeit ************************** v%(1) = 0 : v%(2) = 0 ' *** Normale Geschwindigkeit für horizontale Fahrt v1%(1) = 14 : v1%(2) = 14 ' *** Beschleunigungs- und Bremsgescheingigkeit für horizontale Fahrt ********** v2%(1) = 1 :v2%(2) = 1 ' *** Standgeschwindigkeit = 0 wenn Zielpunkt erreicht ************************ v3%(1) = 0 :v3%(2) = 0 ' *** Normale Geschwindigkeit für verikale Fahrt ******************************* v4%(1) = 4 :v4%(2) = 4 ' *** dim R_horiz%(Anzahl_LKW%,Anzahl_Fahrten%) dim R_vert%(Anzahl_LKW%,Anzahl_Fahrten%) dim R_stand%(Anzahl_LKW%,Anzahl_Fahrten%) dim D_01_horiz%(Anzahl_LKW%) :' Langer Weg von links nach rechts dim D_02_horiz%(Anzahl_LKW%) :' Kurzer Weg von nur linke Seite dim D_03_horiz%(Anzahl_LKW%) :' Kurzer Weg von nur rechte Seite dim delta_vertikal%(Anzahl_LKW%) dim delta_platzstand%(Anzahl_LKW%) dim pos%(Anzahl_LKW%) dim Uhr01% :dim Uhr02% ' ****************************************************************************** Gosub FAHRTDATENFUERLKW Gosub LKW_ERSTELLEN ' ***Click im MENÜ ************************************************************* ON_CLICK 9701,halt ON_CLICK 9702,start_LKW_all ON_CLICK 9703,Stop_Lkw_all ON_CLICK 9704,Start_Lkw_01 ON_CLICK 9705,Start_Lkw_02 ON_CLICK 9708,Stop_LKW_01 ON_CLICK 9709,Stop_LKW_02 timer 9991 :' Timer LKW 01 erstellen timer 9992 :' Timer LKW 02 erstellen end ' *** Timer Stoppen ************************************************************ Stop_LKW_all: timer_off 9991 :timer_off 9992:end Stop_LKW_01: timer_off 9991 :end Stop_LKW_02: timer_off 9992 :end start_LKW_all: if Anzahl_Fahrten% = Letzte_Fahrten% then Gosub VARIABLEN_NEU_INITZIALISIEREN Anzahl_LKW% = 2 :Zaehler_LKW% = 2 timer_interval 9991,50 :' Timer interval für LKW 01 festlegen timer_interval 9992,50 :' Timer interval für LKW 02 festlegen on_timer 9991,main_101 :' Timer Startlabel für LKW 01 festlegen on_timer 9992,main_202 :' Timer Startlabel für LKW 01 festlegen timer_on 9991 :' Timer Starten timer_on 9992 :' Timer Starten return Start_Lkw_01: if Anzahl_Fahrten% = Letzte_Fahrten% then Gosub VARIABLEN_NEU_INITZIALISIEREN Anzahl_LKW% = 2 :Zaehler_LKW% = 2 timer_interval 9991,10 :on_timer 9991,main_101 timer_on 9991 :return Start_Lkw_02: if Anzahl_Fahrten% = Letzte_Fahrten% then Gosub VARIABLEN_NEU_INITZIALISIEREN Anzahl_LKW% = 2 :Zaehler_LKW% = 2 timer_interval 9992,10 :on_timer 9992,main_202 :timer_on 9992 :return ' *** Timer Schleife 1 für LKW 01 ********************************************** main_101: timer_off 9991 Text 5000," LKW01 Fahrt Nr.: "+STR$(Anzahl_Fahrten1%) ' ------------------------------------------------------------------------------ if Ankunft%(1) = 1 then Anzahl_LKW% = 1 if Ankunft%(1) = 1 then Zaehler_LKW% = 1 if Ankunft%(1) = 1 then Anzahl_Fahrten1% = Anzahl_Fahrten1% + 1 if Ankunft%(1) = 1 then v4%(1) = 2 Text 5000," LKW01 Fahrt Nr.: "+STR$(Anzahl_Fahrten1%) ' ------------------------------------------------------------------------------ if Anzahl_Fahrten1% = Letzte_Fahrten% then Text 5000," Anzahl Fahrten : ENDE " if Anzahl_Fahrten1% = Letzte_Fahrten% then goto Stop_LKW_01 Ankunft%(1)= 999 ' *** LKW% ist der äußere Zähler der Schleife ********************************** LKW% = 1 ' *** Auswahl LKW nach links oder rechts fahren ******************************** ' *** Fahrt nach rechts if R_horiz%(LKW%,Anzahl_Fahrten1%) = Fahr_weg_99% then goto weiter107 if R_horiz%(LKW%,Anzahl_Fahrten1%) = Fahr_weg_07% then goto weiter101 if R_horiz%(LKW%,Anzahl_Fahrten1%) = Fahr_weg_01% then goto weiter101 if R_horiz%(LKW%,Anzahl_Fahrten1%) = Fahr_weg_03% then goto weiter102 if R_horiz%(LKW%,Anzahl_Fahrten1%) = Fahr_weg_05% then goto weiter103 ' *** Fahrt nach links if R_horiz%(LKW%,Anzahl_Fahrten1%) = Fahr_weg_99% then goto weiter107 if R_horiz%(LKW%,Anzahl_Fahrten1%) = Fahr_weg_08% then goto weiter111 if R_horiz%(LKW%,Anzahl_Fahrten1%) = Fahr_weg_02% then goto weiter104 if R_horiz%(LKW%,Anzahl_Fahrten1%) = Fahr_weg_04% then goto weiter105 if R_horiz%(LKW%,Anzahl_Fahrten1%) = Fahr_weg_06% then goto weiter106 ' *** LKW nach rechts fahren langer Weg **************************************** weiter101: D_01_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten1%) ' *** Anfahrstrecke nach rechts if left(LKW%) = SEITE_LINKS04% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_LINKS04% + Brems_WEG_01% then v%(LKW%) = v1%(LKW%) ' *** Normalfahrstrecke nach rechts left LKW%,left(LKW%) + v%(LKW%) ' *** Bremsstrecke nach rechts if left(LKW%) - SEITE_LINKS04% > D_01_horiz%(LKW%) - Brems_WEG_01% then v%(LKW%) = v2%(LKW%) ' *** LKW steht an Ladestelle rechts if left(LKW%) - SEITE_LINKS04% = D_01_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_LINKS04% = D_01_horiz%(LKW%) then Ankunft%(LKW%) = 1 ' *** Neue vertikal Position an Ladestelle festlegen if left(LKW%) - SEITE_LINKS04% = D_01_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter107 ' *** LKW nach rechts fahren von linker Seite kurzer Weg *********************** weiter102: D_02_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten1%) ' *** Anfahrstrecke nach rechts if left(LKW%) = SEITE_LINKS05% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_LINKS05% + Brems_WEG_01% then v%(LKW%) = v1%(LKW%) ' *** Normalfahrstrecke nach rechts left LKW%,left(LKW%) + v%(LKW%) ' *** Bremsstrecke nach rechts if left(LKW%) - SEITE_LINKS05% > D_02_horiz%(LKW%) - Brems_WEG_01% then v%(LKW%) = v2%(LKW%) ' *** LKW steht an Ladestelle rechts if left(LKW%) - SEITE_LINKS05% = D_02_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_LINKS05% = D_02_horiz%(LKW%) then Ankunft%(LKW%) = 1 ' *** Neue vertikal Position an Ladestelle festlegen if left(LKW%) - SEITE_LINKS05% = D_02_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter107 ' *** LKW nach rechts fahren von rechter Seite kurzer Weg ********************** weiter103: D_03_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten1%) ' *** Anfahrstrecke nach rechts if left(LKW%) = SEITE_LINKS06% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_LINKS06% + Brems_WEG_01% then v%(LKW%) = v1%(LKW%) ' *** Normalfahrstrecke nach rechts left LKW%,left(LKW%) + v%(LKW%) ' *** Bremsstrecke nach rechts if left(LKW%) - SEITE_LINKS06% > D_03_horiz%(LKW%) - Brems_WEG_01% then v%(LKW%) = v2%(LKW%) ' *** LKW steht an Ladestelle rechts if left(LKW%) - SEITE_LINKS06% = D_03_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_LINKS06% = D_03_horiz%(LKW%) then Ankunft%(LKW%) = 1 ' *** Neue vertikal Position an Ladestelle festlegen if left(LKW%) - SEITE_LINKS06% = D_03_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter107 ' *** LKW nach links fahren langer Weg ***************************************** weiter104: D_01_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten1%) ' *** Anfahrstrecke nach links if left(LKW%) = SEITE_RECHTS04% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_RECHTS04% - Brems_WEG_01% then v%(LKW%) = v1%(LKW%) ' *** Normalfahrstrecke nach links left LKW%,left(LKW%) - v%(LKW%) ' *** Bremsstrecke nach links if left(LKW%) - SEITE_RECHTS04% < D_01_horiz%(LKW%) + Brems_WEG_01% then v%(LKW%) = v2%(LKW%) ' *** LKW steht an Ladestelle links if left(LKW%) - SEITE_RECHTS04% = D_01_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_RECHTS04% = D_01_horiz%(LKW%) then Ankunft%(LKW%) = 1 ' *** Neue vertikal Position an Ladestelle festlegen if left(LKW%) - SEITE_RECHTS04% = D_01_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter107 ' *** LKW nach links fahren langer Weg 2 *************************************** weiter111: D_01_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten1%) ' *** Anfahrstrecke nach links if left(LKW%) = SEITE_RECHTS07% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_RECHTS07% - Brems_WEG_01% then v%(LKW%) = v1%(LKW%) ' *** Normalfahrstrecke nach links left LKW%,left(LKW%) - v%(LKW%) ' *** Bremsstrecke nach links if left(LKW%) - SEITE_RECHTS07% < D_01_horiz%(LKW%) + Brems_WEG_01% then v%(LKW%) = v2%(LKW%) ' *** LKW steht an Ladestelle links if left(LKW%) - SEITE_RECHTS07% = D_01_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_RECHTS07% = D_01_horiz%(LKW%) then Ankunft%(LKW%) = 1 ' *** Neue vertikal Position an Ladestelle festlegen if left(LKW%) - SEITE_RECHTS07% = D_01_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter107 ' *** LKW nach links fahren kurzer Weg ***************************************** weiter105: D_02_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten1%) ' *** Anfahrstrecke nach links if left(LKW%) = SEITE_RECHTS05% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_RECHTS05% - Brems_WEG_01% then v%(LKW%) = v1%(LKW%) ' *** Normalfahrstrecke nach links left LKW%,left(LKW%) - v%(LKW%) ' *** Bremsstrecke nach links if left(LKW%) - SEITE_RECHTS05% < D_02_horiz%(LKW%) + Brems_WEG_01% then v%(LKW%) = v2%(LKW%) ' *** LKW steht an Ladestelle links if left(LKW%) - SEITE_RECHTS05% = D_02_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_RECHTS05% = D_02_horiz%(LKW%) then Ankunft%(LKW%) = 1 ' *** Neue vertikal Position an Ladestelle festlegen if left(LKW%) - SEITE_RECHTS05% = D_02_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter107 ' *** LKW nach links fahren kurzer Weg **************************************** weiter106: D_03_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten1%) ' *** Anfahrstrecke nach links if left(LKW%) = SEITE_RECHTS06% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_RECHTS06% + Brems_WEG_01% then v%(LKW%) = v1%(LKW%) ' *** Normalfahrstrecke nach links left LKW%,left(LKW%) - v%(LKW%) ' *** Bremsstrecke nach links if left(LKW%) - SEITE_RECHTS06% < D_03_horiz%(LKW%) + Brems_WEG_01% then v%(LKW%) = v2%(LKW%) ' *** LKW steht an Ladestelle links if left(LKW%) - SEITE_RECHTS06% = D_03_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_RECHTS06% = D_03_horiz%(LKW%) then Ankunft%(LKW%) = 1 ' *** Neue vertikal Position an Ladestelle festlegen if left(LKW%) - SEITE_RECHTS06% = D_03_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter107 ' *** Auswahl LKW nach oben oder unten fahren ********************************** weiter107: if R_vert%(LKW%,Anzahl_Fahrten1%) = 0 then goto weiter110 if R_vert%(LKW%,Anzahl_Fahrten1%) > 0 then goto weiter108 if R_vert%(LKW%,Anzahl_Fahrten1%) < 0 then goto weiter109 ' *** LKW nach unten fahren **************************************************** Weiter108: delta_vertikal%(LKW%) = R_vert%(LKW%,Anzahl_Fahrten1%) ' *** Normalfahrstrecke nach unten top LKW%,top(LKW%) + v4%(LKW%) ' *** Stop der Fahrt nach unten if top(LKW%) = pos%(LKW%) + delta_vertikal%(LKW%) then v4%(LKW%) = v3%(LKW%) if top(LKW%) = pos%(LKW%) + delta_vertikal%(LKW%) then Ankunft%(LKW%) = 1 ' *** Sprung zur Pause an Ladestelle goto weiter110 ' *** LKW nach oben fahren ***************************************************** Weiter109: delta_vertikal%(LKW%) = R_vert%(LKW%,Anzahl_Fahrten1%) ' *** Normalfahrstrecke nach oben top LKW%,top(LKW%) - v4%(LKW%) ' *** Stop der Fahrt nach oben if top(LKW%) = pos%(LKW%) + delta_vertikal%(LKW%) then v4%(LKW%) = v3%(LKW%) if top(LKW%) = pos%(LKW%) + delta_vertikal%(LKW%) then Ankunft%(LKW%) = 1 ' *** Sprung zur Pause an Ladestelle goto weiter110 ' *** Prüfen ob Pause an Ladestelle erforderlich ******************************* Weiter110: if R_stand%(LKW%,Anzahl_Fahrten1%) = 0 then goto Weiter174 if R_stand%(LKW%,Anzahl_Fahrten1%) > 0 then goto Weiter173 ' *** Länge der Pause an Ladestelle durchführen ******************************** Weiter173: delta_platzstand%(Anzahl_LKW%) = R_stand%(LKW%,Anzahl_Fahrten1%) Uhr01% = Uhr01% + 1 if Uhr01% = delta_platzstand%(Anzahl_LKW%) then Ankunft%(LKW%) = 1 if Uhr01% = delta_platzstand%(Anzahl_LKW%) then Uhr01% = 0 goto weiter174 ' *** Timer einschalten ******************************************************** Weiter174: timer_on 9991 : return end ' *** Timer Schleife 2 ********************************************************* main_202: timer_off 9992 Text 5001," LKW02 Fahrt Nr.: "+STR$(Anzahl_Fahrten2%) if Ankunft%(2) = 1 then Anzahl_LKW% = 2 if Ankunft%(2) = 1 then Zaehler_LKW% = 2 if Ankunft%(2) = 1 then Anzahl_Fahrten2% = Anzahl_Fahrten2% + 1 if Ankunft%(2) = 1 then v4%(2) = 2 Text 5001," LKW02 Fahrt Nr.: "+STR$(Anzahl_Fahrten2%) if Anzahl_Fahrten2% = Letzte_Fahrten% then Text 5001," LKW02 Fahrt Nr. : ENDE " if Anzahl_Fahrten2% = Letzte_Fahrten% then goto Stop_LKW_02 Ankunft%(2)= 999 LKW% = 2 if R_horiz%(LKW%,Anzahl_Fahrten2%) = Fahr_weg_99% then goto weiter217 if R_horiz%(LKW%,Anzahl_Fahrten2%) = Fahr_weg_07% then goto weiter211 if R_horiz%(LKW%,Anzahl_Fahrten2%) = Fahr_weg_01% then goto weiter211 if R_horiz%(LKW%,Anzahl_Fahrten2%) = Fahr_weg_03% then goto weiter212 if R_horiz%(LKW%,Anzahl_Fahrten2%) = Fahr_weg_05% then goto weiter213 if R_horiz%(LKW%,Anzahl_Fahrten2%) = Fahr_weg_99% then goto weiter217 if R_horiz%(LKW%,Anzahl_Fahrten2%) = Fahr_weg_08% then goto weiter221 if R_horiz%(LKW%,Anzahl_Fahrten2%) = Fahr_weg_02% then goto weiter214 if R_horiz%(LKW%,Anzahl_Fahrten2%) = Fahr_weg_04% then goto weiter215 if R_horiz%(LKW%,Anzahl_Fahrten2%) = Fahr_weg_06% then goto weiter216 weiter211: D_01_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten2%) if left(LKW%) = SEITE_LINKS04% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_LINKS04% + Brems_WEG_01% then v%(LKW%) = v1%(LKW%) left LKW%,left(LKW%) + v%(LKW%) if left(LKW%) - SEITE_LINKS04% > D_01_horiz%(LKW%) - Brems_WEG_01% then v%(LKW%) = v2%(LKW%) if left(LKW%) - SEITE_LINKS04% = D_01_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_LINKS04% = D_01_horiz%(LKW%) then Ankunft%(LKW%) = 1 if left(LKW%) - SEITE_LINKS04% = D_01_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter217 weiter212: D_02_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten2%) if left(LKW%) = SEITE_LINKS05% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_LINKS05% + Brems_WEG_01% then v%(LKW%) = v1%(LKW%) left LKW%,left(LKW%) + v%(LKW%) if left(LKW%) - SEITE_LINKS05% > D_02_horiz%(LKW%) - Brems_WEG_01% then v%(LKW%) = v2%(LKW%) if left(LKW%) - SEITE_LINKS05% = D_02_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_LINKS05% = D_02_horiz%(LKW%) then Ankunft%(LKW%) = 1 if left(LKW%) - SEITE_LINKS05% = D_02_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter217 weiter213: D_03_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten2%) if left(LKW%) = SEITE_LINKS06% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_LINKS06% + Brems_WEG_01% then v%(LKW%) = v1%(LKW%) left LKW%,left(LKW%) + v%(LKW%) if left(LKW%) - SEITE_LINKS06% > D_03_horiz%(LKW%) - Brems_WEG_01% then v%(LKW%) = v2%(LKW%) if left(LKW%) - SEITE_LINKS06% = D_03_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_LINKS06% = D_03_horiz%(LKW%) then Ankunft%(LKW%) = 1 if left(LKW%) - SEITE_LINKS06% = D_03_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter217 weiter214: D_01_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten2%) if left(LKW%) = SEITE_RECHTS04% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_RECHTS04% - Brems_WEG_01% then v%(LKW%) = v1%(LKW%) left LKW%,left(LKW%) - v%(LKW%) if left(LKW%) - SEITE_RECHTS04% < D_01_horiz%(LKW%) + Brems_WEG_01% then v%(LKW%) = v2%(LKW%) if left(LKW%) - SEITE_RECHTS04% = D_01_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_RECHTS04% = D_01_horiz%(LKW%) then Ankunft%(LKW%) = 1 if left(LKW%) - SEITE_RECHTS04% = D_01_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter217 weiter221: D_01_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten2%) if left(LKW%) = SEITE_RECHTS07% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_RECHTS07% - Brems_WEG_01% then v%(LKW%) = v1%(LKW%) left LKW%,left(LKW%) - v%(LKW%) if left(LKW%) - SEITE_RECHTS07% < D_01_horiz%(LKW%) + Brems_WEG_01% then v%(LKW%) = v2%(LKW%) if left(LKW%) - SEITE_RECHTS07% = D_01_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_RECHTS07% = D_01_horiz%(LKW%) then Ankunft%(LKW%) = 1 if left(LKW%) - SEITE_RECHTS07% = D_01_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter217 weiter215: D_02_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten2%) if left(LKW%) = SEITE_RECHTS05% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_RECHTS05% - Brems_WEG_01% then v%(LKW%) = v1%(LKW%) left LKW%,left(LKW%) - v%(LKW%) if left(LKW%) - SEITE_RECHTS05% < D_02_horiz%(LKW%) + Brems_WEG_01% then v%(LKW%) = v2%(LKW%) if left(LKW%) - SEITE_RECHTS05% = D_02_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_RECHTS05% = D_02_horiz%(LKW%) then Ankunft%(LKW%) = 1 if left(LKW%) - SEITE_RECHTS05% = D_02_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter217 weiter216: D_03_horiz%(LKW%) = R_horiz%(LKW%,Anzahl_Fahrten2%) if left(LKW%) = SEITE_RECHTS06% then v%(LKW%) = v2%(LKW%) if left(LKW%) = SEITE_RECHTS06% + Brems_WEG_01% then v%(LKW%) = v1%(LKW%) left LKW%,left(LKW%) - v%(LKW%) if left(LKW%) - SEITE_RECHTS06% < D_03_horiz%(LKW%) + Brems_WEG_01% then v%(LKW%) = v2%(LKW%) if left(LKW%) - SEITE_RECHTS06% = D_03_horiz%(LKW%) then v%(LKW%) = v3%(LKW%) if left(LKW%) - SEITE_RECHTS06% = D_03_horiz%(LKW%) then Ankunft%(LKW%) = 1 if left(LKW%) - SEITE_RECHTS06% = D_03_horiz%(LKW%) then pos%(LKW%) = top(LKW%) goto weiter217 weiter217: if R_vert%(LKW%,Anzahl_Fahrten2%) = 0 then goto weiter220 if R_vert%(LKW%,Anzahl_Fahrten2%) > 0 then goto weiter218 if R_vert%(LKW%,Anzahl_Fahrten2%) < 0 then goto weiter219 Weiter218: delta_vertikal%(LKW%) = R_vert%(LKW%,Anzahl_Fahrten2%) top LKW%,top(LKW%) + v4%(LKW%) if top(LKW%) = pos%(LKW%) + delta_vertikal%(LKW%) then v4%(LKW%) = v3%(LKW%) if top(LKW%) = pos%(LKW%) + delta_vertikal%(LKW%) then Ankunft%(LKW%) = 1 goto weiter220 Weiter219: delta_vertikal%(LKW%) = R_vert%(LKW%,Anzahl_Fahrten2%) top LKW%,top(LKW%) - v4%(LKW%) if top(LKW%) = pos%(LKW%) + delta_vertikal%(LKW%) then v4%(LKW%) = v3%(LKW%) if top(LKW%) = pos%(LKW%) + delta_vertikal%(LKW%) then Ankunft%(LKW%) = 1 goto weiter220 Weiter220: if R_stand%(LKW%,Anzahl_Fahrten2%) = 0 then goto Weiter274 if R_stand%(LKW%,Anzahl_Fahrten2%) > 0 then goto Weiter273 Weiter273: delta_platzstand%(Anzahl_LKW%) = R_stand%(LKW%,Anzahl_Fahrten2%) Uhr02% = Uhr02% + 1 if Uhr02% = delta_platzstand%(Anzahl_LKW%) then Ankunft%(LKW%) = 1 if Uhr02% = delta_platzstand%(Anzahl_LKW%) then Uhr02% = 0 goto weiter274 Weiter274: timer_on 9992 :return end ' *** PROGRAMM ANHALTEN UND BEENDEN ******************************************** halt: timer_off_all:terminate ' -------------------------------------------------------------------------- ---- ' -------------------------------------------------------------------------- ---- ' -------------------------------------------------------------------------- ---- ' -------------------------------------------------------------------------- ---- | |
| | | Severin
Nombre de messages : 547 Localisation : Braunschweig / Germany Date d'inscription : 13/12/2010
| Sujet: Re: game for practice Dim 28 Juil 2013 - 22:36 | |
| Teil 2 - Code:
-
' -------------------------------------------------------------------------- ---- ' -------------------------------------------------------------------------- ---- ' -------------------------------------------------------------------------- ---- ' -------------------------------------------------------------------------- ---- LKW_ERSTELLEN: ' *** SYMBOLE FÜR LKW erstellen ************************************************ for i% = Zaehler_LKW% to Anzahl_LKW% edit i% : top i%,43+16*i% if i% = 1 then left i%,SEITE_LINKS04% :' SEITE_RECHTS04% if i% = 2 then left i%,SEITE_LINKS04% width i%,45 :height i%,16 if i% = 1 then color i%,255,000,000 if i% = 2 then color i%,000,255,000 text i%," Linie "+STR$(i%) if i% = 1 then top 1,43 + (16 * 20) if i% = 2 then top 2,43 + (16 * 47) if i% = 1 then pos%(i%) = top(1) if i% = 2 then pos%(i%) = top(2) next i% RETURN ' ------------------------------------------------------------------------------ VARIABLEN_NEU_INITZIALISIEREN: Anzahl_Fahrten1% = 1 Anzahl_Fahrten2% = 1 for i% = Zaehler_LKW% to Anzahl_LKW% top i%,43+16*i% if i% = 1 then left i%,SEITE_LINKS04% :' SEITE_RECHTS04% if i% = 2 then left i%,SEITE_LINKS04% width i%,45 :height i%,16 if i% = 1 then color i%,255,000,000 if i% = 2 then color i%,000,255,000 text i%,"Linie "+STR$(i%) if i% = 1 then top 1,43 + (16 * 20) if i% = 2 then top 2,43 + (16 * 47) if i% = 1 then pos%(i%) = top(1) if i% = 2 then pos%(i%) = top(2) next i% RETURN ' ------------------------------------------------------------------------------ FAHRTDATENFUERLKW: ' *** FABRIK erstellen ********************************************************* edit 9800 :color 9800,000,255,000 TOP 9800,SEITE_OBEN01% :LEFT 9800,10 :HEIGHT 9800,SEITE_UNTEN01% :WIDTH 9800,75 ' *** RAMPEN FABRIK erstellen ************************************************** EDIT 9810 TOP 9810,SEITE_OBEN01% : LEFT 9810,85 : HEIGHT 9810,SEITE_UNTEN01% : WIDTH 9810,19 ' *** Andockstellen Fabrik ***************************************************** j% = 0 for i% = 8001 to 8053 edit i% :top i%,SEITE_OBEN02%+j% :left i%,15 :width i%,60 :height i%,16 j% = j% + 16 next i% ' *** Text für Andockstellen links - Fabrik text 8001," Tor 1 M" :text 8002," Tor 2 M" :text 8003," Tor 3 M" :text 8004," Tor 4 M" text 8005," Tor 5 M" :text 8006," Tor 7 M" :text 8007," Tor 8 M" :text 8008," Tor 9 M" text 8009," Tor 10 M" :text 8010," Tor 11 M" :text 8011," Tor 12 M" :text 8012," Tor 21 M" text 8013," Tor 22 M" :text 8014," Tor 23 M" :text 8015," Tor 24 M" :text 8016," Tor 26 M" text 8017," Tor 27 M" :text 8018," Tor 28 M" :text 8019," Tor 29 M" :text 8020," Tor 32 M" text 8021," Tor 33 M" :text 8022," Tor 34 M" :text 8023," Tor 35 M" :text 8024," Tor 36 M" text 8025," Tor 37 M" :text 8026," Tor 38 M" :text 8027," Tor 39 M" :text 8028," Tor 40 M" text 8029," Tor 45 M" :text 8030," Tor 46 M" :text 8031," Tor 47 M" :text 8032," Tor 48 M" text 8033," Tor 49 M" :text 8034," Tor 401 H" :text 8035," Tor 402 H" :text 8036," Tor 403 H" text 8037," Tor 404 H" :text 8038," Tor 405 H" :text 8039," Tor 406 H" :text 8040," Tor 407 H" text 8041," Tor 408 H" :text 8042," Tor 430 H" :text 8043," Tor 431 H" :text 8044," Tor 432 H" text 8045," Tor 433 H" :text 8046," Tor 434 H" :text 8047," Tor 104 N" :text 8048," Tor 105 N" text 8049," Tor 106 N" :text 8050," Tor 107 N" :text 8051," Tor 108 N" :text 8052," Tor 109 N" text 8053," Tor 110 N" ' *** Färben der dauerhaft belegte Andockstellen links Fabrik color 8006,230,020,200 : Hint 8006," ??? " color 8014,230,020,200 : Hint 8014," ??? " color 8016,230,020,200 : Hint 8016," ??? " color 8018,230,020,200 : Hint 8018," ??? " color 8029,230,020,200 : Hint 8029," ??? " color 8030,230,020,200 : Hint 8030," ??? " color 8031,230,020,200 : Hint 8031," ??? " ' *** Färben der Andockstellen Niederstetten Color 8047,215,240,095 :Color 8048,215,240,095 :Color 8049,215,240,095 Color 8050,215,240,095 :Color 8051,215,240,095 :Color 8052,215,240,095 Color 8053,215,240,095 ' *** Färben der Andockstellen Hollenbach 401 bis 408 Color 8034,215,210,110 :Color 8035,215,210,110 :Color 8036,215,210,110 Color 8037,215,210,110 :Color 8038,215,210,110 :Color 8039,215,210,110 Color 8040,215,210,110 :Color 8041,215,210,110 ' *** Färben der Andockstellen Hollenbach 430 bis 434 Color 8042,215,190,110 :Color 8043,215,190,110 :Color 8044,215,190,110 Color 8045,215,190,110 :Color 8046,215,190,110 ' *** Färben der Andockstellen Mulfingen 32 bis 40 Color 8020,000,230,000 :Color 8021,000,230,000 :Color 8022,000,230,000 Color 8023,000,230,000 :Color 8024,000,230,000 :Color 8025,000,230,000 Color 8026,000,230,000 :Color 8027,000,230,000 :Color 8028,000,230,000 ' *** Zulieferer erstellen ***************************************************** edit 9820 : color 9820,000,255,000 TOP 9820,SEITE_OBEN01% : LEFT 9820,SEITE_RECHTS01% : HEIGHT 9820,SEITE_UNTEN01% : WIDTH 9820,85 ' *** RAMPEN Zulieferer erstellen ********************************************** EDIT 9830 TOP 9830,SEITE_OBEN01% : LEFT 9830,SEITE_RECHTS02% : HEIGHT 9830,SEITE_UNTEN01% : WIDTH 9830,19 ' *** Andockstellen Zulieferer ************************************************* j% = 0 for i% = 8101 to 8153 edit i% :top i%,SEITE_OBEN02%+j% :left i%,SEITE_RECHTS01% + 10 :width i%,70 :height i%,16 j% = j% + 16 next i% ' *** Text für Andockstellen rechts - Zulieferer text 8101," Tor 1 Wall ":text 8102," Tor 2 Wall " :text 8103," Tor 3 Wall " :text 8104," Tor 4 Wall " text 8105," ":text 8106," Tor 1 Crails" :text 8107," Tor 2 Crails" :text 8108," Tor 3 Crails" text 8109," ":text 8110," Tor 1 Künz 1" :text 8111," Tor 2 Künz 1" :text 8112," Tor 3 Künz 1" text 8113," ":text 8114," Tor 1 Künz 2" :text 8115," " :text 8116," Tor 1 Satt " text 8117," Tor 2 Satt ":text 8118," Tor 3 Satt " :text 8119," Tor 4 Satt " :text 8120," Tor 5 Satt " text 8121," Tor 6 Satt ":text 8122," Tor 7 Satt " :text 8123," Tor 8 Satt " :text 8124," " text 8125," Tor 1 Satt ":text 8126," Tor 2 Satt " :text 8127," Tor 3 Satt " :text 8128," Tor 4 Satt " text 8129," Tor 5 Satt ":text 8130," Tor 6 Satt " :text 8131," Tor 7 Satt " :text 8132," Tor 8 Satt " text 8133," Tor 8 Satt ":text 8134," Tor 10 Satt " :text 8135," Tor 11 Satt " :text 8136," Tor 12 Satt " text 8137," Tor 13 Satt ":text 8138," Tor 14 Satt " :text 8139," Tor 15 Satt " :text 8140," " text 8141," Tor 1 Thor ":text 8142," " :text 8143," Tor 1 Dörr " :text 8144," Tor 2 Dörr " text 8145," Tor1 SMWA ":text 8146," Tor1 SMWA " :text 8147," Tor 1 MT/RA " :text 8148," " text 8149," Tor1 Stadt 1 ":text 8150," Tor1 Stadt 2" :text 8151," " :text 8152," Tor 1 PVSB " text 8153," Tor 2 PVSB " ' *** Freie Andockstellen rechts Zuliefer color 8105,130,130,130 :color 8109,130,130,130 :color 8113,130,130,130 color 8115,130,130,130 :color 8124,130,130,130 :color 8140,130,130,130 color 8142,130,130,130 :color 8148,130,130,130 :color 8151,130,130,130 ' *** Dauerhaft belegte Andockstellen rechts Zuliefer color 8103,230,020,200 : Hint 8103," Ist für Abholer von Luftfracht freizuhalten" ' *** Wechselbrücke für Dürr erstellen ***************************************** edit 99 : top 99,43+16*44 : left 99,SEITE_RECHTS04% : width 99,45 : height 99,16 text 99, "Auflieg." :color 99,130,130,130 hint 99," Eine Wechselbrücke steht permanent bei Dörr " ' *** Folgende Variablen sind in Fahrtabelle einzutragen *********************** ' Richtung nach rechts = FAHR_WEG_01% kompletter Weg ' Richtung nach links = FAHR_WEG_02% kompletter Weg ' Richtung nach rechts = FAHR_WEG_07% kompletter Weg, verkürzt um 101 Pixel ' Richtung nach links = FAHR_WEG_08% kompletter Weg, verkürzt um 101 Pixel ' Richtung nach rechts = FAHR_WEG_03% 100 Pixel - Teilweg von links nach rechts ' Richtung nach links = FAHR_WEG_04% 100 Pixel - Teilweg von rechts nach links ' Richtung nach rechts = FAHR_WEG_05% 101 Pixel - Teilweg von rechts nach links ' Richtung nach links = FAHR_WEG_06% 101 Pixel - Teilweg von links nach rechts ' Richtung nach unten = POSITIV xxx STEP 16 ' Richtung nach oben = NEGATIV -xxx STEP -16 ' *** DATEN FÜR LKW 001 Linie 1 *********************************************** Z1% = 1 ' --- 1. Fahr Früh ------------------------------------------------------------- ' *** Fahrt von Tor 32 zum Tor 1 R_horiz%(Z1%,01) = FAHR_WEG_03% : R_vert%(Z1%,01) = 000 :R_stand%(Z1%,01) = 000 R_horiz%(Z1%,02) = FAHR_WEG_99% : R_vert%(Z1%,02) = -304 :R_stand%(Z1%,02) = 000 R_horiz%(Z1%,03) = FAHR_WEG_04% : R_vert%(Z1%,03) = 000 :R_stand%(Z1%,03) = 000 R_horiz%(Z1%,04) = FAHR_WEG_99% : R_vert%(Z1%,04) = 000 :R_stand%(Z1%,04) = 001 ' *** Fahrt vom Tor 1 zu PVS R_horiz%(Z1%,05) = FAHR_WEG_07% : R_vert%(Z1%,05) = 000 :R_stand%(Z1%,05) = 000 R_horiz%(Z1%,06) = FAHR_WEG_99% : R_vert%(Z1%,06) = 832 :R_stand%(Z1%,06) = 000 R_horiz%(Z1%,07) = FAHR_WEG_05% : R_vert%(Z1%,07) = 000 :R_stand%(Z1%,07) = 000 R_horiz%(Z1%,08) = FAHR_WEG_99% : R_vert%(Z1%,08) = 000 :R_stand%(Z1%,08) = 001 ' *** Fahrt von PVS zum Tor 1 R_horiz%(Z1%,09) = FAHR_WEG_06% : R_vert%(Z1%,09) = 000 :R_stand%(Z1%,09) = 000 R_horiz%(Z1%,10) = FAHR_WEG_99% : R_vert%(Z1%,10) = -832 :R_stand%(Z1%,10) = 000 R_horiz%(Z1%,11) = FAHR_WEG_08% : R_vert%(Z1%,11) = 000 :R_stand%(Z1%,11) = 000 R_horiz%(Z1%,12) = FAHR_WEG_99% : R_vert%(Z1%,12) = 000 :R_stand%(Z1%,12) = 001 ' *** Fahrt vom Tor 1 zum Tor 4 R_horiz%(Z1%,13) = FAHR_WEG_03% : R_vert%(Z1%,13) = 000 :R_stand%(Z1%,13) = 000 R_horiz%(Z1%,14) = FAHR_WEG_99% : R_vert%(Z1%,14) = 48 :R_stand%(Z1%,14) = 000 R_horiz%(Z1%,15) = FAHR_WEG_04% : R_vert%(Z1%,15) = 000 :R_stand%(Z1%,15) = 000 R_horiz%(Z1%,16) = FAHR_WEG_99% : R_vert%(Z1%,16) = 000 :R_stand%(Z1%,16) = 001 ' *** Fahrt vom Tor 4 zum Tor 8 R_horiz%(Z1%,17) = FAHR_WEG_03% : R_vert%(Z1%,17) = 000 :R_stand%(Z1%,17) = 000 R_horiz%(Z1%,18) = FAHR_WEG_99% : R_vert%(Z1%,18) = 48 :R_stand%(Z1%,18) = 000 R_horiz%(Z1%,19) = FAHR_WEG_04% : R_vert%(Z1%,19) = 000 :R_stand%(Z1%,19) = 000 R_horiz%(Z1%,20) = FAHR_WEG_99% : R_vert%(Z1%,20) = 000 :R_stand%(Z1%,20) = 001 ' *** fahrt vom Tor 8 zum Tor 21 R_horiz%(Z1%,21) = FAHR_WEG_03% : R_vert%(Z1%,21) = 000 :R_stand%(Z1%,21) = 000 R_horiz%(Z1%,22) = FAHR_WEG_99% : R_vert%(Z1%,22) = 80 :R_stand%(Z1%,22) = 000 R_horiz%(Z1%,23) = FAHR_WEG_04% : R_vert%(Z1%,23) = 000 :R_stand%(Z1%,23) = 000 R_horiz%(Z1%,24) = FAHR_WEG_99% : R_vert%(Z1%,24) = 000 :R_stand%(Z1%,24) = 001 ' *** Fahrt von Tor 21 zum Tor 48 R_horiz%(Z1%,25) = FAHR_WEG_03% : R_vert%(Z1%,25) = 000 :R_stand%(Z1%,25) = 000 R_horiz%(Z1%,26) = FAHR_WEG_99% : R_vert%(Z1%,26) = 320 :R_stand%(Z1%,26) = 000 R_horiz%(Z1%,27) = FAHR_WEG_04% : R_vert%(Z1%,27) = 000 :R_stand%(Z1%,27) = 000 R_horiz%(Z1%,28) = FAHR_WEG_99% : R_vert%(Z1%,28) = 000 :R_stand%(Z1%,28) = 001 ' *** Fahrt vom Tor 48 zum Tor 430 R_horiz%(Z1%,29) = FAHR_WEG_03% : R_vert%(Z1%,29) = 000 :R_stand%(Z1%,29) = 000 R_horiz%(Z1%,30) = FAHR_WEG_99% : R_vert%(Z1%,30) = 160 :R_stand%(Z1%,30) = 000 R_horiz%(Z1%,31) = FAHR_WEG_04% : R_vert%(Z1%,31) = 000 :R_stand%(Z1%,31) = 000 R_horiz%(Z1%,32) = FAHR_WEG_99% : R_vert%(Z1%,32) = 000 :R_stand%(Z1%,32) = 001 ' *** Fahrt vom Tor 430 zum Tor 104 R_horiz%(Z1%,33) = FAHR_WEG_03% : R_vert%(Z1%,33) = 000 :R_stand%(Z1%,33) = 000 R_horiz%(Z1%,34) = FAHR_WEG_99% : R_vert%(Z1%,34) = 80 :R_stand%(Z1%,34) = 000 R_horiz%(Z1%,35) = FAHR_WEG_04% : R_vert%(Z1%,35) = 000 :R_stand%(Z1%,35) = 000 R_horiz%(Z1%,36) = FAHR_WEG_99% : R_vert%(Z1%,36) = 000 :R_stand%(Z1%,36) = 001 ' *** Fahrt vom Tor 104 zum Tor 12 R_horiz%(Z1%,37) = FAHR_WEG_03% : R_vert%(Z1%,37) = 000 :R_stand%(Z1%,37) = 000 R_horiz%(Z1%,38) = FAHR_WEG_99% : R_vert%(Z1%,38) = -576 :R_stand%(Z1%,38) = 000 R_horiz%(Z1%,39) = FAHR_WEG_04% : R_vert%(Z1%,39) = 000 :R_stand%(Z1%,39) = 000 R_horiz%(Z1%,40) = FAHR_WEG_99% : R_vert%(Z1%,40) = 000 :R_stand%(Z1%,40) = 001 ' *** Fahrt vom Tor 12 zum Tor 1 R_horiz%(Z1%,41) = FAHR_WEG_03% : R_vert%(Z1%,41) = 000 :R_stand%(Z1%,41) = 000 R_horiz%(Z1%,42) = FAHR_WEG_99% : R_vert%(Z1%,42) = -160 :R_stand%(Z1%,42) = 000 R_horiz%(Z1%,43) = FAHR_WEG_04% : R_vert%(Z1%,43) = 000 :R_stand%(Z1%,43) = 000 R_horiz%(Z1%,44) = FAHR_WEG_99% : R_vert%(Z1%,44) = 000 :R_stand%(Z1%,44) = 001 ' --- 2. Fahrt Mittags --------------------------------------------------------- ' *** Fahrt vom Tor 1 zu PVS R_horiz%(Z1%,45) = FAHR_WEG_07% : R_vert%(Z1%,45) = 000 :R_stand%(Z1%,45) = 000 R_horiz%(Z1%,46) = FAHR_WEG_99% : R_vert%(Z1%,46) = 832 :R_stand%(Z1%,46) = 000 R_horiz%(Z1%,47) = FAHR_WEG_05% : R_vert%(Z1%,47) = 000 :R_stand%(Z1%,47) = 000 R_horiz%(Z1%,48) = FAHR_WEG_99% : R_vert%(Z1%,48) = 000 :R_stand%(Z1%,48) = 001 ' *** Fahrt von PVS zum Tor 1 R_horiz%(Z1%,49) = FAHR_WEG_06% : R_vert%(Z1%,49) = 000 :R_stand%(Z1%,49) = 000 R_horiz%(Z1%,50) = FAHR_WEG_99% : R_vert%(Z1%,50) = -832 :R_stand%(Z1%,50) = 000 R_horiz%(Z1%,51) = FAHR_WEG_08% : R_vert%(Z1%,51) = 000 :R_stand%(Z1%,51) = 000 R_horiz%(Z1%,52) = FAHR_WEG_99% : R_vert%(Z1%,52) = 000 :R_stand%(Z1%,52) = 001 ' *** Fahrt vom Tor 1 zum Tor 4 R_horiz%(Z1%,53) = FAHR_WEG_03% : R_vert%(Z1%,53) = 000 :R_stand%(Z1%,53) = 000 R_horiz%(Z1%,54) = FAHR_WEG_99% : R_vert%(Z1%,54) = 48 :R_stand%(Z1%,54) = 000 R_horiz%(Z1%,55) = FAHR_WEG_04% : R_vert%(Z1%,55) = 000 :R_stand%(Z1%,55) = 000 R_horiz%(Z1%,56) = FAHR_WEG_99% : R_vert%(Z1%,56) = 000 :R_stand%(Z1%,56) = 001 ' *** Fahrt vom Tor 4 zum Tor 8 R_horiz%(Z1%,57) = FAHR_WEG_03% : R_vert%(Z1%,57) = 000 :R_stand%(Z1%,57) = 000 R_horiz%(Z1%,58) = FAHR_WEG_99% : R_vert%(Z1%,58) = 48 :R_stand%(Z1%,58) = 000 R_horiz%(Z1%,59) = FAHR_WEG_04% : R_vert%(Z1%,59) = 000 :R_stand%(Z1%,59) = 000 R_horiz%(Z1%,60) = FAHR_WEG_99% : R_vert%(Z1%,60) = 000 :R_stand%(Z1%,60) = 001 ' *** fahrt vom Tor 8 zum Tor 21 R_horiz%(Z1%,61) = FAHR_WEG_03% : R_vert%(Z1%,61) = 000 :R_stand%(Z1%,61) = 000 R_horiz%(Z1%,62) = FAHR_WEG_99% : R_vert%(Z1%,62) = 80 :R_stand%(Z1%,62) = 000 R_horiz%(Z1%,63) = FAHR_WEG_04% : R_vert%(Z1%,63) = 000 :R_stand%(Z1%,63) = 000 R_horiz%(Z1%,64) = FAHR_WEG_99% : R_vert%(Z1%,64) = 000 :R_stand%(Z1%,64) = 001 ' *** Fahrt von Tor 21 zum Tor 32 R_horiz%(Z1%,65) = FAHR_WEG_03% : R_vert%(Z1%,65) = 000 :R_stand%(Z1%,65) = 000 R_horiz%(Z1%,66) = FAHR_WEG_99% : R_vert%(Z1%,66) = 128 :R_stand%(Z1%,66) = 000 R_horiz%(Z1%,67) = FAHR_WEG_04% : R_vert%(Z1%,67) = 000 :R_stand%(Z1%,67) = 000 R_horiz%(Z1%,68) = FAHR_WEG_99% : R_vert%(Z1%,68) = 000 :R_stand%(Z1%,68) = 001 ' *** Fahrt vom Tor 32 zum Tor 48 R_horiz%(Z1%,69) = FAHR_WEG_03% : R_vert%(Z1%,69) = 000 :R_stand%(Z1%,69) = 000 R_horiz%(Z1%,70) = FAHR_WEG_99% : R_vert%(Z1%,70) = 192 :R_stand%(Z1%,70) = 000 R_horiz%(Z1%,71) = FAHR_WEG_04% : R_vert%(Z1%,71) = 000 :R_stand%(Z1%,71) = 000 R_horiz%(Z1%,72) = FAHR_WEG_99% : R_vert%(Z1%,72) = 000 :R_stand%(Z1%,72) = 001 ' *** Fahrt vom Tor 48 zum Tor 430 R_horiz%(Z1%,73) = FAHR_WEG_03% : R_vert%(Z1%,73) = 000 :R_stand%(Z1%,73) = 000 R_horiz%(Z1%,74) = FAHR_WEG_99% : R_vert%(Z1%,74) = 160 :R_stand%(Z1%,74) = 000 R_horiz%(Z1%,75) = FAHR_WEG_04% : R_vert%(Z1%,75) = 000 :R_stand%(Z1%,75) = 000 R_horiz%(Z1%,76) = FAHR_WEG_99% : R_vert%(Z1%,76) = 000 :R_stand%(Z1%,76) = 001 ' *** Fahrt vom Tor 430 zum Tor 104 R_horiz%(Z1%,77) = FAHR_WEG_03% : R_vert%(Z1%,77) = 000 :R_stand%(Z1%,77) = 000 R_horiz%(Z1%,78) = FAHR_WEG_99% : R_vert%(Z1%,78) = 80 :R_stand%(Z1%,78) = 000 R_horiz%(Z1%,79) = FAHR_WEG_04% : R_vert%(Z1%,79) = 000 :R_stand%(Z1%,79) = 000 R_horiz%(Z1%,80) = FAHR_WEG_99% : R_vert%(Z1%,80) = 000 :R_stand%(Z1%,80) = 001 ' *** DATEN FÜR LKW 002 FAHREN VON RECHTS NACH LINKS *************************** Z1% = 2 ' --- 1. Rundfahrt ------------------------------------------------------------- ' *** Fahrt vom Tor 104 zum Tor 430 R_horiz%(Z1%,01) = FAHR_WEG_03% : R_vert%(Z1%,01) = 000 :R_stand%(Z1%,01) = 000 R_horiz%(Z1%,02) = FAHR_WEG_99% : R_vert%(Z1%,02) = -80 :R_stand%(Z1%,02) = 000 R_horiz%(Z1%,03) = FAHR_WEG_04% : R_vert%(Z1%,03) = 000 :R_stand%(Z1%,03) = 000 R_horiz%(Z1%,04) = FAHR_WEG_99% : R_vert%(Z1%,04) = 000 :R_stand%(Z1%,04) = 001 ' *** Fahrt vom Tor 430 zum Tor 1 R_horiz%(Z1%,05) = FAHR_WEG_03% : R_vert%(Z1%,05) = 000 :R_stand%(Z1%,05) = 000 R_horiz%(Z1%,06) = FAHR_WEG_99% : R_vert%(Z1%,06) = -656 :R_stand%(Z1%,06) = 000 R_horiz%(Z1%,07) = FAHR_WEG_04% : R_vert%(Z1%,07) = 000 :R_stand%(Z1%,07) = 000 R_horiz%(Z1%,08) = FAHR_WEG_99% : R_vert%(Z1%,08) = 000 :R_stand%(Z1%,08) = 001 ' *** Fahrt vom Tor 1 zum Tor 4 R_horiz%(Z1%,09) = FAHR_WEG_03% : R_vert%(Z1%,09) = 000 :R_stand%(Z1%,09) = 000 R_horiz%(Z1%,10) = FAHR_WEG_99% : R_vert%(Z1%,10) = 48 :R_stand%(Z1%,10) = 000 R_horiz%(Z1%,11) = FAHR_WEG_04% : R_vert%(Z1%,11) = 000 :R_stand%(Z1%,11) = 000 R_horiz%(Z1%,12) = FAHR_WEG_99% : R_vert%(Z1%,12) = 000 :R_stand%(Z1%,12) = 001 ' *** Fahrt vom Tor 4 zum Tor 8 R_horiz%(Z1%,13) = FAHR_WEG_03% : R_vert%(Z1%,13) = 000 :R_stand%(Z1%,13) = 000 R_horiz%(Z1%,14) = FAHR_WEG_99% : R_vert%(Z1%,14) = 48 :R_stand%(Z1%,14) = 000 R_horiz%(Z1%,15) = FAHR_WEG_04% : R_vert%(Z1%,15) = 000 :R_stand%(Z1%,15) = 000 R_horiz%(Z1%,16) = FAHR_WEG_99% : R_vert%(Z1%,16) = 000 :R_stand%(Z1%,16) = 001 ' *** Fahrt vom Tor 8 zum Tor 48 R_horiz%(Z1%,17) = FAHR_WEG_03% : R_vert%(Z1%,17) = 000 :R_stand%(Z1%,17) = 000 R_horiz%(Z1%,18) = FAHR_WEG_99% : R_vert%(Z1%,18) = 400 :R_stand%(Z1%,18) = 000 R_horiz%(Z1%,19) = FAHR_WEG_04% : R_vert%(Z1%,19) = 000 :R_stand%(Z1%,19) = 000 R_horiz%(Z1%,20) = FAHR_WEG_99% : R_vert%(Z1%,20) = 000 :R_stand%(Z1%,20) = 001 ' *** Fahrt vom Tor 48 zum Tor 21 R_horiz%(Z1%,21) = FAHR_WEG_03% : R_vert%(Z1%,21) = 000 :R_stand%(Z1%,21) = 000 R_horiz%(Z1%,22) = FAHR_WEG_99% : R_vert%(Z1%,22) = -320:R_stand%(Z1%,22) = 000 R_horiz%(Z1%,23) = FAHR_WEG_04% : R_vert%(Z1%,23) = 000 :R_stand%(Z1%,23) = 000 R_horiz%(Z1%,24) = FAHR_WEG_99% : R_vert%(Z1%,24) = 000 :R_stand%(Z1%,24) = 001 ' *** Fahrt vom Tor 21 zum Tor 104 R_horiz%(Z1%,25) = FAHR_WEG_03% : R_vert%(Z1%,25) = 000 :R_stand%(Z1%,25) = 000 R_horiz%(Z1%,26) = FAHR_WEG_99% : R_vert%(Z1%,26) = 560 :R_stand%(Z1%,26) = 000 R_horiz%(Z1%,27) = FAHR_WEG_04% : R_vert%(Z1%,27) = 000 :R_stand%(Z1%,27) = 000 R_horiz%(Z1%,28) = FAHR_WEG_99% : R_vert%(Z1%,28) = 000 :R_stand%(Z1%,28) = 001 ' --- 2. Rundfahrt ------------------------------------------------------------- ' *** Fahrt vom Tor 104 zum Tor 430 R_horiz%(Z1%,29) = FAHR_WEG_03% : R_vert%(Z1%,29) = 000 :R_stand%(Z1%,29) = 000 R_horiz%(Z1%,30) = FAHR_WEG_99% : R_vert%(Z1%,30) = -80 :R_stand%(Z1%,30) = 000 R_horiz%(Z1%,31) = FAHR_WEG_04% : R_vert%(Z1%,31) = 000 :R_stand%(Z1%,31) = 000 R_horiz%(Z1%,32) = FAHR_WEG_99% : R_vert%(Z1%,32) = 000 :R_stand%(Z1%,32) = 001 ' *** Fahrt vom Tor 430 zum Tor 1 R_horiz%(Z1%,33) = FAHR_WEG_03% : R_vert%(Z1%,33) = 000 :R_stand%(Z1%,33) = 000 R_horiz%(Z1%,34) = FAHR_WEG_99% : R_vert%(Z1%,34) = -656:R_stand%(Z1%,34) = 000 R_horiz%(Z1%,35) = FAHR_WEG_04% : R_vert%(Z1%,35) = 000 :R_stand%(Z1%,35) = 000 R_horiz%(Z1%,36) = FAHR_WEG_99% : R_vert%(Z1%,36) = 000 :R_stand%(Z1%,36) = 001 ' *** Fahrt vom Tor 1 zum Tor 4 R_horiz%(Z1%,37) = FAHR_WEG_03% : R_vert%(Z1%,37) = 000 :R_stand%(Z1%,37) = 000 R_horiz%(Z1%,38) = FAHR_WEG_99% : R_vert%(Z1%,38) = 48 :R_stand%(Z1%,38) = 000 R_horiz%(Z1%,39) = FAHR_WEG_04% : R_vert%(Z1%,39) = 000 :R_stand%(Z1%,39) = 000 R_horiz%(Z1%,40) = FAHR_WEG_99% : R_vert%(Z1%,40) = 000 :R_stand%(Z1%,40) = 001 ' *** Fahrtm vo Tor 4 zum Tor 8 R_horiz%(Z1%,41) = FAHR_WEG_03% : R_vert%(Z1%,41) = 000 :R_stand%(Z1%,41) = 000 R_horiz%(Z1%,42) = FAHR_WEG_99% : R_vert%(Z1%,42) = 48 :R_stand%(Z1%,42) = 000 R_horiz%(Z1%,43) = FAHR_WEG_04% : R_vert%(Z1%,43) = 000 :R_stand%(Z1%,43) = 000 R_horiz%(Z1%,44) = FAHR_WEG_99% : R_vert%(Z1%,44) = 000 :R_stand%(Z1%,44) = 001 ' *** Fahrt vom Tor 8 zum Tor 48 R_horiz%(Z1%,45) = FAHR_WEG_03% : R_vert%(Z1%,45) = 000 :R_stand%(Z1%,45) = 000 R_horiz%(Z1%,46) = FAHR_WEG_99% : R_vert%(Z1%,46) = 400 :R_stand%(Z1%,46) = 000 R_horiz%(Z1%,47) = FAHR_WEG_04% : R_vert%(Z1%,47) = 000 :R_stand%(Z1%,47) = 000 R_horiz%(Z1%,48) = FAHR_WEG_99% : R_vert%(Z1%,48) = 000 :R_stand%(Z1%,48) = 001 ' *** Fahrt vom Tor 48 zum Tor 430 R_horiz%(Z1%,49) = FAHR_WEG_03% : R_vert%(Z1%,49) = 000 :R_stand%(Z1%,49) = 000 R_horiz%(Z1%,50) = FAHR_WEG_99% : R_vert%(Z1%,50) = 160 :R_stand%(Z1%,50) = 000 R_horiz%(Z1%,51) = FAHR_WEG_04% : R_vert%(Z1%,51) = 000 :R_stand%(Z1%,51) = 000 R_horiz%(Z1%,52) = FAHR_WEG_99% : R_vert%(Z1%,52) = 000 :R_stand%(Z1%,52) = 001 ' *** Fahrt vom Tor 430 zum Tor 104 R_horiz%(Z1%,53) = FAHR_WEG_03% : R_vert%(Z1%,53) = 000 :R_stand%(Z1%,53) = 000 R_horiz%(Z1%,54) = FAHR_WEG_99% : R_vert%(Z1%,54) = 80 :R_stand%(Z1%,54) = 000 R_horiz%(Z1%,55) = FAHR_WEG_04% : R_vert%(Z1%,55) = 000 :R_stand%(Z1%,55) = 000 R_horiz%(Z1%,56) = FAHR_WEG_99% : R_vert%(Z1%,56) = 000 :R_stand%(Z1%,56) = 001 ' --- 3. Rundfahrt ------------------------------------------------------------- ' *** Fahrt vom Tor 104 zum Tor 430 R_horiz%(Z1%,57) = FAHR_WEG_03% : R_vert%(Z1%,57) = 000 :R_stand%(Z1%,57) = 000 R_horiz%(Z1%,58) = FAHR_WEG_99% : R_vert%(Z1%,58) = -80 :R_stand%(Z1%,58) = 000 R_horiz%(Z1%,59) = FAHR_WEG_04% : R_vert%(Z1%,59) = 000 :R_stand%(Z1%,59) = 000 R_horiz%(Z1%,60) = FAHR_WEG_99% : R_vert%(Z1%,60) = 000 :R_stand%(Z1%,60) = 001 ' *** Fahrt vom Tor 430 zum Tor 1 R_horiz%(Z1%,61) = FAHR_WEG_03% : R_vert%(Z1%,61) = 000 :R_stand%(Z1%,61) = 000 R_horiz%(Z1%,62) = FAHR_WEG_99% : R_vert%(Z1%,62) = -656:R_stand%(Z1%,62) = 000 R_horiz%(Z1%,63) = FAHR_WEG_04% : R_vert%(Z1%,63) = 000 :R_stand%(Z1%,63) = 000 R_horiz%(Z1%,64) = FAHR_WEG_99% : R_vert%(Z1%,64) = 000 :R_stand%(Z1%,64) = 001 ' *** Fahrt vom Tor 1 zum Tor 4 R_horiz%(Z1%,65) = FAHR_WEG_03% : R_vert%(Z1%,65) = 000 :R_stand%(Z1%,65) = 000 R_horiz%(Z1%,66) = FAHR_WEG_99% : R_vert%(Z1%,66) = 48 :R_stand%(Z1%,66) = 000 R_horiz%(Z1%,67) = FAHR_WEG_04% : R_vert%(Z1%,67) = 000 :R_stand%(Z1%,67) = 000 R_horiz%(Z1%,68) = FAHR_WEG_99% : R_vert%(Z1%,68) = 000 :R_stand%(Z1%,68) = 001 ' *** Fahrtm vo Tor 4 zum Tor 8 R_horiz%(Z1%,69) = FAHR_WEG_03% : R_vert%(Z1%,69) = 000 :R_stand%(Z1%,69) = 000 R_horiz%(Z1%,70) = FAHR_WEG_99% : R_vert%(Z1%,70) = 48 :R_stand%(Z1%,70) = 000 R_horiz%(Z1%,71) = FAHR_WEG_04% : R_vert%(Z1%,71) = 000 :R_stand%(Z1%,71) = 000 R_horiz%(Z1%,72) = FAHR_WEG_99% : R_vert%(Z1%,72) = 000 :R_stand%(Z1%,72) = 001 ' *** Fahrt vom Tor 8 zum Tor 48 R_horiz%(Z1%,73) = FAHR_WEG_03% : R_vert%(Z1%,73) = 000 :R_stand%(Z1%,73) = 000 R_horiz%(Z1%,74) = FAHR_WEG_99% : R_vert%(Z1%,74) = 400 :R_stand%(Z1%,74) = 000 R_horiz%(Z1%,75) = FAHR_WEG_04% : R_vert%(Z1%,75) = 000 :R_stand%(Z1%,75) = 000 R_horiz%(Z1%,76) = FAHR_WEG_99% : R_vert%(Z1%,76) = 000 :R_stand%(Z1%,76) = 001 ' *** Fahrt vom Tor 48 zu PVS R_horiz%(Z1%,77) = FAHR_WEG_07% : R_vert%(Z1%,77) = 000 :R_stand%(Z1%,77) = 000 R_horiz%(Z1%,78) = FAHR_WEG_99% : R_vert%(Z1%,78) = 320 :R_stand%(Z1%,78) = 000 R_horiz%(Z1%,79) = FAHR_WEG_05% : R_vert%(Z1%,79) = 000 :R_stand%(Z1%,79) = 000 R_horiz%(Z1%,80) = FAHR_WEG_99% : R_vert%(Z1%,80) = 000 :R_stand%(Z1%,80) = 001 ' Return | |
| | | Contenu sponsorisé
| Sujet: Re: game for practice | |
| |
| | | | game for practice | |
|
Sujets similaires | |
|
| Permission de ce forum: | Vous ne pouvez pas répondre aux sujets dans ce forum
| |
| |
| |