start.ksgs 15 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169
  1. {name='MAIN'#
  2. <befehl='ErstellGlobalVariable';name='Fenster';typ='Fenster'>
  3. <befehl='Funktionsaufruf';objekt="Fenster";funktion='setGröße';br='555';hö='380'>
  4. <befehl='Funktionsaufruf';objekt="Fenster";funktion='setOptionen';opt='0x3'>
  5. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='beschreibung';txt=
  6. 'Bei dem Spiel Linie bewegen sich alle Spieler in einer konstanten Geschwindigkeit
  7. durch ein Spielfeld. Die Sieler können nur auf ihre Richtung einfluss nehmen, indem
  8. sie von sich aus gesehen entweder eine Linkskurve oder eine Rechtskurve machen.
  9. Jeder Spieler hinterlässt beim bewegen eine Linie, die von keinem Spieler berührt
  10. werden darf. Berührt ein Spieler eine solche Linie, hat er die Runde verloren. Jedes
  11. Spiel besteht aus mehreren Runden. Gewinnen tut am ende der Spieler, der in den
  12. meißten Runden am längsten überlebt hat. Viel Spaß beil Spielen!';x='5';y='5';br='545';hö='120'>
  13. <befehl='SetVariable';variable='GoldBild';wert=<befehl='_GetBild';pfad='data/bilder/system.ltdb';name='system.ltdb/gold.jpg'>;sichtbarkeit='global';typ='Bild'>
  14. <befehl='SetVariable';variable='SilberBild';wert=<befehl='_GetBild';pfad='data/bilder/system.ltdb';name='system.ltdb/silber.jpg'>;sichtbarkeit='global';typ='Bild'>
  15. <befehl='SetVariable';variable='KupferBild';wert=<befehl='_GetBild';pfad='data/bilder/system.ltdb';name='system.ltdb/kupfer.jpg'>;sichtbarkeit='global';typ='Bild'>
  16. <befehl='SetVariable';variable='BesitzStatus';wert=<befehl='_GetBesitzStatus'>;sichtbarkeit='global';typ='Zahl'>
  17. <befehl='SetVariable';variable='ErwerbbarStatus';wert=<befehl='_GetErwerbbarStatus'>;sichtbarkeit='global';typ='Zahl'>
  18. <befehl='Funktionsaufruf';funktion='TESTVERSION'>
  19. <befehl='Funktionsaufruf';funktion='VOLLVERSION'>
  20. }
  21. {name='TESTVERSION'#
  22. <befehl='Wenn';bedingung=<befehl='==';wert1="BesitzStatus";wert2='2'>;dann=<befehl='Return'>>
  23. <befehl='Wenn';bedingung=<befehl='==';wert1="BesitzStatus";wert2='1'>;sonst=<befehl='Überspringen';anzahl='4'>>
  24. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='versionbesitz';txt='Du besitzt die Testversion dieses Spiels.';x='5';y='125';br='300';hö='20'>
  25. <befehl='ErstellLokalVariable';name='verbleibendT';typ='Text';wert='Anzahl verbleibender Spiele: '>
  26. <befehl='Funktionsaufruf';objekt="verbleibendT";funktion='anhängen';wert=<befehl='_GetTestVersionStatus'>>
  27. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='tvsv';txt="verbleibendT";x='5';y='145';br='300';hö='20'>
  28. <befehl='Wenn';bedingung=<befehl='==';wert1="BesitzStatus";wert2='1'>;dann=<befehl='Return'>>
  29. <befehl='Wenn';bedingung=<befehl='==';wert1="ErwerbbarStatus";wert2='2'>;dann=<befehl='Return'>>
  30. <befehl='Wenn';bedingung=<befehl='==';wert1="ErwerbbarStatus";wert2='0'>;dann=<befehl='Return'>>
  31. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='tve';txt='10 Spiele Testversion';x='5';y='280';br='300';hö='20'>
  32. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='tvkosten';txt='Kosten: ';x='5';y='305';br='50';hö='20'>
  33. <befehl='Funktionsaufruf';objekt="tvkosten";funktion='addOptionen';optionen='0x600'>
  34. <befehl='SetVariable';variable='Preis';wert=<befehl='_GetPreis';testversion='true'>;sichtbarkeit='lokal';typ='Zahl'>
  35. <befehl='ErstellLokalVariable';name='GoldT';typ='Text';wert=''>
  36. <befehl='ErstellLokalVariable';name='SilberT';typ='Text';wert=''>
  37. <befehl='ErstellLokalVariable';name='KupferT';typ='Text';wert=''>
  38. <befehl='Funktionsaufruf';objekt="GoldT";funktion='anhängen';wert=<befehl='/';wert1="Preis";wert2='10000';runden='ab'>>
  39. <befehl='Funktionsaufruf';objekt="SilberT";funktion='anhängen';wert=<befehl='/';wert1=<befehl='/';wert1="Preis";wert2='100';runden='ab'>;wert2='100';runden='rest'>>
  40. <befehl='Funktionsaufruf';objekt="KupferT";funktion='anhängen';wert=<befehl='/';wert1="Preis";wert2='100';runden='rest'>>
  41. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='TVGoldTF';txt="GoldT";x='60';y='305';br='0';hö='0'>
  42. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='TVSilberTF';txt="SilberT";x='90';y='305';br='0';hö='0'>
  43. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='TVKupferTF';txt="KupferT";x='120';y='305';br='0';hö='0'>
  44. <befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='addOptionen';optionen='0x600'>
  45. <befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='addOptionen';optionen='0x600'>
  46. <befehl='Funktionsaufruf';objekt="TVKupferTF";funktion='addOptionen';optionen='0x600'>
  47. <befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='setGrößeNachText'>
  48. <befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='setGrößeNachText'>
  49. <befehl='Funktionsaufruf';objekt="TVKupferTF";funktion='setGrößeNachText'>
  50. <befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='setHöhe';hö='20'>
  51. <befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='setHöhe';hö='20'>
  52. <befehl='Funktionsaufruf';objekt="TVKupferTF";funktion='setHöhe';hö='20'>
  53. <befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='getBreite'>>
  54. <befehl='Funktionsaufruf';objekt="TVKupferTF";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='getBreite'>>
  55. <befehl='Funktionsaufruf';objekt="TVKupferTF";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='getBreite'>>
  56. <befehl='Funktionsaufruf';funktion='BILD_ERSTELLEN';name='TVGoldBO';bild="GoldBild";x='60';y='305'>
  57. <befehl='Funktionsaufruf';funktion='BILD_ERSTELLEN';name='TVSilberBO';bild="SilberBild";x='90';y='305'>
  58. <befehl='Funktionsaufruf';funktion='BILD_ERSTELLEN';name='TVKupferBO';bild="KupferBild";x='120';y='305'>
  59. <befehl='Funktionsaufruf';objekt="TVGoldBO";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='getBreite'>>
  60. <befehl='Funktionsaufruf';objekt="TVSilberBO";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='getBreite'>>
  61. <befehl='Funktionsaufruf';objekt="TVSilberBO";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='getBreite'>>
  62. <befehl='Funktionsaufruf';objekt="TVKupferBO";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='getBreite'>>
  63. <befehl='Funktionsaufruf';objekt="TVKupferBO";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='getBreite'>>
  64. <befehl='Funktionsaufruf';objekt="TVKupferBO";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVKupferTF";funktion='getBreite'>>
  65. <befehl='Funktionsaufruf';funktion='KNOPF_ERSTELLEN';name='TVKaufen';txt='Erwerben';x='5';y='330';br='100';hö='20'>
  66. <befehl='Funktionsaufruf';objekt="TVKaufen";funktion='setMausEreignis';fname='TVKME'>
  67. <befehl='SetVariable';variable='Geld';wert=<befehl='_GetKupfer'>;sichtbarkeit='lokal';typ='Zahl'>
  68. <befehl='Wenn';bedingung=<befehl='<=';wert1="Preis";wert2="Geld">;dann=<befehl='Return'>>
  69. <befehl='Funktionsaufruf';objekt="TVKaufen";funktion='löscheOptionen';optionen='0x2'>
  70. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='TVNGK';txt='Du hast nicht genug Geld.';x='5';y='355';br='200';hö='20'>
  71. }
  72. {name='VOLLVERSION'#
  73. <befehl='Wenn';bedingung=<befehl='==';wert1="BesitzStatus";wert2='2'>;sonst=<befehl='Überspringen';anzahl='1'>>
  74. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='versionbesitz';txt='Du besitzt die Vollversion dieses Spiels.';x='5';y='125';br='300';hö='20'>
  75. <befehl='Wenn';bedingung=<befehl='==';wert1="BesitzStatus";wert2='2'>;dann=<befehl='Return'>>
  76. <befehl='Wenn';bedingung=<befehl='==';wert1="ErwerbbarStatus";wert2='1'>;dann=<befehl='Return'>>
  77. <befehl='Wenn';bedingung=<befehl='==';wert1="ErwerbbarStatus";wert2='0'>;dann=<befehl='Return'>>
  78. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='vve';txt='Vollversion';x='0';y='280';br='100';hö='20'>
  79. <befehl='Funktionsaufruf';objekt="vve";funktion='setGrößeNachText'>
  80. <befehl='Funktionsaufruf';objekt="vve";funktion='setX';x=<befehl='-';wert1='550';wert2=<befehl='Funktionsaufruf';objekt="vve";funktion='getBreite'>>>
  81. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='vvkosten';txt='Kosten: ';x='410';y='305';br='50';hö='20'>
  82. <befehl='Funktionsaufruf';objekt="vvkosten";funktion='addOptionen';optionen='0x600'>
  83. <befehl='SetVariable';variable='Preis';wert=<befehl='_GetPreis';testversion='false'>;sichtbarkeit='lokal';typ='Zahl'>
  84. <befehl='ErstellLokalVariable';name='GoldT';typ='Text';wert=''>
  85. <befehl='ErstellLokalVariable';name='SilberT';typ='Text';wert=''>
  86. <befehl='ErstellLokalVariable';name='KupferT';typ='Text';wert=''>
  87. <befehl='Funktionsaufruf';objekt="GoldT";funktion='anhängen';wert=<befehl='/';wert1="Preis";wert2='10000';runden='ab'>>
  88. <befehl='Funktionsaufruf';objekt="SilberT";funktion='anhängen';wert=<befehl='/';wert1=<befehl='/';wert1="Preis";wert2='100';runden='ab'>;wert2='100';runden='rest'>>
  89. <befehl='Funktionsaufruf';objekt="KupferT";funktion='anhängen';wert=<befehl='/';wert1="Preis";wert2='100';runden='rest'>>
  90. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='VVGoldTF';txt="GoldT";x='470';y='305';br='0';hö='0'>
  91. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='VVSilberTF';txt="SilberT";x='500';y='305';br='0';hö='0'>
  92. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='VVKupferTF';txt="KupferT";x='530';y='305';br='0';hö='0'>
  93. <befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='addOptionen';optionen='0x600'>
  94. <befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='addOptionen';optionen='0x600'>
  95. <befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='addOptionen';optionen='0x600'>
  96. <befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='setGrößeNachText'>
  97. <befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='setGrößeNachText'>
  98. <befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='setGrößeNachText'>
  99. <befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='setHöhe';hö='20'>
  100. <befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='setHöhe';hö='20'>
  101. <befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='setHöhe';hö='20'>
  102. <befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='addX';x=<befehl='-';wert1='0';wert2=<befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='getBreite'>>>
  103. <befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='addX';x=<befehl='-';wert1='0';wert2=<befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='getBreite'>>>
  104. <befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='addX';x=<befehl='-';wert1='0';wert2=<befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='getBreite'>>>
  105. <befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='addX';x=<befehl='-';wert1='0';wert2=<befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='getBreite'>>>
  106. <befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='addX';x=<befehl='-';wert1='0';wert2=<befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='getBreite'>>>
  107. <befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='addX';x=<befehl='-';wert1='0';wert2=<befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='getBreite'>>>
  108. <befehl='Funktionsaufruf';funktion='BILD_ERSTELLEN';name='VVGoldBO';bild="GoldBild";x=<befehl='+';wert1=<befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='getX'>;wert2=<befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='getBreite'>>;y='305'>
  109. <befehl='Funktionsaufruf';funktion='BILD_ERSTELLEN';name='VVSilberBO';bild="SilberBild";x=<befehl='+';wert1=<befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='getX'>;wert2=<befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='getBreite'>>;y='305'>
  110. <befehl='Funktionsaufruf';funktion='BILD_ERSTELLEN';name='VVKupferBO';bild="KupferBild";x=<befehl='+';wert1=<befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='getX'>;wert2=<befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='getBreite'>>;y='305'>
  111. <befehl='Funktionsaufruf';objekt="vvkosten";funktion='setX';x=<befehl='-';wert1=<befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='getX'>;wert2='55'>>
  112. <befehl='Funktionsaufruf';funktion='KNOPF_ERSTELLEN';name='VVKaufen';txt='Erwerben';x='450';y='330';br='100';hö='20'>
  113. <befehl='Funktionsaufruf';objekt="VVKaufen";funktion='setMausEreignis';fname='VVKME'>
  114. <befehl='SetVariable';variable='Geld';wert=<befehl='_GetKupfer'>;sichtbarkeit='lokal';typ='Zahl'>
  115. <befehl='Wenn';bedingung=<befehl='<=';wert1="Preis";wert2="Geld">;dann=<befehl='Return'>>
  116. <befehl='Funktionsaufruf';objekt="VVKaufen";funktion='löscheOptionen';optionen='0x2'>
  117. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='VVNGK';txt='Du hast nicht genug Geld.';x='390';y='355';br='160';hö='20'>
  118. }
  119. {name='BILD_ERSTELLEN';übergabe=[name='name';typ='Text'];übergabe=[name='bild';typ='Bild'];übergabe=[name='x';typ='Zahl'];übergabe=[name='y';typ='Zahl']#
  120. <befehl='ErstellGlobalVariable';name="name";typ='BildObjekt'>
  121. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setBild';bild="bild">
  122. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setOptionen';optionen='0x1'>
  123. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setPosition';x="x";y="y">
  124. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setGrößeNachBild'>
  125. <befehl='Funktionsaufruf';objekt="Fenster";funktion='addMember';obj=<befehl='GetVariable';name="name">>
  126. }
  127. {name='TEXT_ERSTELLEN';übergabe=[name='name';typ='Text'];übergabe=[name='txt';typ='Text'];übergabe=[name='x';typ='Zahl'];übergabe=[name='y';typ='Zahl'];übergabe=[name='br';typ='Zahl'];übergabe=[name='hö';typ='Zahl']#
  128. <befehl='ErstellGlobalVariable';name="name";typ='TextFeld';wert="txt">
  129. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setOptionen';optionen='0x101'>
  130. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setFläche';x="x";y="y";br="br";hö="hö">
  131. <befehl='Funktionsaufruf';objekt="Fenster";funktion='addMember';obj=<befehl='GetVariable';name="name">>
  132. }
  133. {name='KNOPF_ERSTELLEN';übergabe=[name='name';typ='Text'];übergabe=[name='txt';typ='Text'];übergabe=[name='x';typ='Zahl'];übergabe=[name='y';typ='Zahl'];übergabe=[name='br';typ='Zahl'];übergabe=[name='hö';typ='Zahl']#
  134. <befehl='ErstellGlobalVariable';name="name";typ='Knopf';wert="txt">
  135. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='addOptionen';optionen='0x1'>
  136. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setFläche';x="x";y="y";br="br";hö="hö">
  137. <befehl='Funktionsaufruf';objekt="Fenster";funktion='addMember';obj=<befehl='GetVariable';name="name">>
  138. }
  139. {name='TVKME';übergabe=[name='me';typ='MausEreignis']#
  140. <befehl='Wenn';bedingung=<befehl='==';wert1=<befehl='Funktionsaufruf';objekt="me";funktion='getEreignisId'>;wert2='3'>;sonst=<befehl='Return'>>
  141. <befehl='_Kaufen';testversion='true'>
  142. }
  143. {name='VVKME';übergabe=[name='me';typ='MausEreignis']#
  144. <befehl='Wenn';bedingung=<befehl='==';wert1=<befehl='Funktionsaufruf';objekt="me";funktion='getEreignisId'>;wert2='3'>;sonst=<befehl='Return'>>
  145. <befehl='_Kaufen';testversion='false'>
  146. }
  147. {name='MAUS';übergabe=[name='me';typ='MausEreignis']#
  148. <befehl='Funktionsaufruf';objekt="Fenster";funktion='mausEreignis';me="me">
  149. }
  150. {name='TASTATUR';übergabe=[name='te';typ='TastaturEreignis']#
  151. <befehl='Funktionsaufruf';objekt="Fenster";funktion='tastaturEreignis';te="te">
  152. }
  153. {name='TICK';typ='Wahrheitswert';übergabe=[name='zeit';typ='Kommazahl']#
  154. <befehl='Return';wert=<befehl='Funktionsaufruf';objekt="Fenster";funktion='tick';zeit="zeit">>
  155. }
  156. {name='RENDER';übergabe=[name='xOff';typ='Zahl'];übergabe=[name='yOff';typ='Zahl'];übergabe=[name='zRObj';typ='Bild']#
  157. <befehl='Funktionsaufruf';objekt="Fenster";funktion='render';x="xOff";y="yOff";zrobj="zRObj">
  158. }