start.ksgs 15 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167
  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. 'Dies ist eine Karte für das Spiel Linie.
  7. Maximale Spieleranzahl: 10
  8. Teamanzahl: 10
  9. Maximale Spieler pro Team: 1
  10. Spieltyp: Alle gegen Alle';x='5';y='5';br='545';hö='120'>
  11. <befehl='SetVariable';variable='GoldBild';wert=<befehl='_GetBild';pfad='data/bilder/system.ltdb';name='system.ltdb/gold.jpg'>;sichtbarkeit='global';typ='Bild'>
  12. <befehl='SetVariable';variable='SilberBild';wert=<befehl='_GetBild';pfad='data/bilder/system.ltdb';name='system.ltdb/silber.jpg'>;sichtbarkeit='global';typ='Bild'>
  13. <befehl='SetVariable';variable='KupferBild';wert=<befehl='_GetBild';pfad='data/bilder/system.ltdb';name='system.ltdb/kupfer.jpg'>;sichtbarkeit='global';typ='Bild'>
  14. <befehl='SetVariable';variable='BesitzStatus';wert=<befehl='_GetBesitzStatus'>;sichtbarkeit='global';typ='Zahl'>
  15. <befehl='SetVariable';variable='ErwerbbarStatus';wert=<befehl='_GetErwerbbarStatus'>;sichtbarkeit='global';typ='Zahl'>
  16. <befehl='Funktionsaufruf';funktion='TESTVERSION'>
  17. <befehl='Funktionsaufruf';funktion='VOLLVERSION'>
  18. }
  19. {name='TESTVERSION'#
  20. <befehl='Wenn';bedingung=<befehl='==';wert1="BesitzStatus";wert2='2'>;dann=<befehl='Return'>>
  21. <befehl='Wenn';bedingung=<befehl='==';wert1="BesitzStatus";wert2='1'>;sonst=<befehl='Überspringen';anzahl='4'>>
  22. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='versionbesitz';txt='Du besitzt die Testversion dieser Karte.';x='5';y='90';br='300';hö='20'>
  23. <befehl='ErstellLokalVariable';name='verbleibendT';typ='Text';wert='Anzahl verbleibender Spiele: '>
  24. <befehl='Funktionsaufruf';objekt="verbleibendT";funktion='anhängen';wert=<befehl='_GetTestVersionStatus'>>
  25. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='tvsv';txt="verbleibendT";x='5';y='110';br='300';hö='20'>
  26. <befehl='Wenn';bedingung=<befehl='==';wert1="BesitzStatus";wert2='1'>;dann=<befehl='Return'>>
  27. <befehl='Wenn';bedingung=<befehl='==';wert1="ErwerbbarStatus";wert2='2'>;dann=<befehl='Return'>>
  28. <befehl='Wenn';bedingung=<befehl='==';wert1="ErwerbbarStatus";wert2='0'>;dann=<befehl='Return'>>
  29. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='tve';txt='10 Spiele Testversion';x='5';y='280';br='300';hö='20'>
  30. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='tvkosten';txt='Kosten: ';x='5';y='305';br='50';hö='20'>
  31. <befehl='Funktionsaufruf';objekt="tvkosten";funktion='addOptionen';optionen='0x600'>
  32. <befehl='SetVariable';variable='Preis';wert=<befehl='_GetPreis';testversion='true'>;sichtbarkeit='lokal';typ='Zahl'>
  33. <befehl='ErstellLokalVariable';name='GoldT';typ='Text';wert=''>
  34. <befehl='ErstellLokalVariable';name='SilberT';typ='Text';wert=''>
  35. <befehl='ErstellLokalVariable';name='KupferT';typ='Text';wert=''>
  36. <befehl='Funktionsaufruf';objekt="GoldT";funktion='anhängen';wert=<befehl='/';wert1="Preis";wert2='10000';runden='ab'>>
  37. <befehl='Funktionsaufruf';objekt="SilberT";funktion='anhängen';wert=<befehl='/';wert1=<befehl='/';wert1="Preis";wert2='100';runden='ab'>;wert2='100';runden='rest'>>
  38. <befehl='Funktionsaufruf';objekt="KupferT";funktion='anhängen';wert=<befehl='/';wert1="Preis";wert2='100';runden='rest'>>
  39. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='TVGoldTF';txt="GoldT";x='60';y='305';br='0';hö='0'>
  40. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='TVSilberTF';txt="SilberT";x='90';y='305';br='0';hö='0'>
  41. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='TVKupferTF';txt="KupferT";x='120';y='305';br='0';hö='0'>
  42. <befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='addOptionen';optionen='0x600'>
  43. <befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='addOptionen';optionen='0x600'>
  44. <befehl='Funktionsaufruf';objekt="TVKupferTF";funktion='addOptionen';optionen='0x600'>
  45. <befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='setGrößeNachText'>
  46. <befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='setGrößeNachText'>
  47. <befehl='Funktionsaufruf';objekt="TVKupferTF";funktion='setGrößeNachText'>
  48. <befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='setHöhe';hö='20'>
  49. <befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='setHöhe';hö='20'>
  50. <befehl='Funktionsaufruf';objekt="TVKupferTF";funktion='setHöhe';hö='20'>
  51. <befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='getBreite'>>
  52. <befehl='Funktionsaufruf';objekt="TVKupferTF";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='getBreite'>>
  53. <befehl='Funktionsaufruf';objekt="TVKupferTF";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='getBreite'>>
  54. <befehl='Funktionsaufruf';funktion='BILD_ERSTELLEN';name='TVGoldBO';bild="GoldBild";x='60';y='305'>
  55. <befehl='Funktionsaufruf';funktion='BILD_ERSTELLEN';name='TVSilberBO';bild="SilberBild";x='90';y='305'>
  56. <befehl='Funktionsaufruf';funktion='BILD_ERSTELLEN';name='TVKupferBO';bild="KupferBild";x='120';y='305'>
  57. <befehl='Funktionsaufruf';objekt="TVGoldBO";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='getBreite'>>
  58. <befehl='Funktionsaufruf';objekt="TVSilberBO";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='getBreite'>>
  59. <befehl='Funktionsaufruf';objekt="TVSilberBO";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='getBreite'>>
  60. <befehl='Funktionsaufruf';objekt="TVKupferBO";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVGoldTF";funktion='getBreite'>>
  61. <befehl='Funktionsaufruf';objekt="TVKupferBO";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVSilberTF";funktion='getBreite'>>
  62. <befehl='Funktionsaufruf';objekt="TVKupferBO";funktion='addX';x=<befehl='Funktionsaufruf';objekt="TVKupferTF";funktion='getBreite'>>
  63. <befehl='Funktionsaufruf';funktion='KNOPF_ERSTELLEN';name='TVKaufen';txt='Erwerben';x='5';y='330';br='100';hö='20'>
  64. <befehl='Funktionsaufruf';objekt="TVKaufen";funktion='setMausEreignis';fname='TVKME'>
  65. <befehl='SetVariable';variable='Geld';wert=<befehl='_GetKupfer'>;sichtbarkeit='lokal';typ='Zahl'>
  66. <befehl='Wenn';bedingung=<befehl='<=';wert1="Preis";wert2="Geld">;dann=<befehl='Return'>>
  67. <befehl='Funktionsaufruf';objekt="TVKaufen";funktion='löscheOptionen';optionen='0x2'>
  68. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='TVNGK';txt='Du hast nicht genug Geld.';x='5';y='355';br='200';hö='20'>
  69. }
  70. {name='VOLLVERSION'#
  71. <befehl='Wenn';bedingung=<befehl='==';wert1="BesitzStatus";wert2='2'>;sonst=<befehl='Überspringen';anzahl='1'>>
  72. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='versionbesitz';txt='Du besitzt die Vollversion dieser Karte.';x='5';y='90';br='300';hö='20'>
  73. <befehl='Wenn';bedingung=<befehl='==';wert1="BesitzStatus";wert2='2'>;dann=<befehl='Return'>>
  74. <befehl='Wenn';bedingung=<befehl='==';wert1="ErwerbbarStatus";wert2='1'>;dann=<befehl='Return'>>
  75. <befehl='Wenn';bedingung=<befehl='==';wert1="ErwerbbarStatus";wert2='0'>;dann=<befehl='Return'>>
  76. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='vve';txt='Vollversion';x='0';y='280';br='100';hö='20'>
  77. <befehl='Funktionsaufruf';objekt="vve";funktion='setGrößeNachText'>
  78. <befehl='Funktionsaufruf';objekt="vve";funktion='setX';x=<befehl='-';wert1='550';wert2=<befehl='Funktionsaufruf';objekt="vve";funktion='getBreite'>>>
  79. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='vvkosten';txt='Kosten: ';x='410';y='305';br='50';hö='20'>
  80. <befehl='Funktionsaufruf';objekt="vvkosten";funktion='addOptionen';optionen='0x600'>
  81. <befehl='SetVariable';variable='Preis';wert=<befehl='_GetPreis';testversion='false'>;sichtbarkeit='lokal';typ='Zahl'>
  82. <befehl='ErstellLokalVariable';name='GoldT';typ='Text';wert=''>
  83. <befehl='ErstellLokalVariable';name='SilberT';typ='Text';wert=''>
  84. <befehl='ErstellLokalVariable';name='KupferT';typ='Text';wert=''>
  85. <befehl='Funktionsaufruf';objekt="GoldT";funktion='anhängen';wert=<befehl='/';wert1="Preis";wert2='10000';runden='ab'>>
  86. <befehl='Funktionsaufruf';objekt="SilberT";funktion='anhängen';wert=<befehl='/';wert1=<befehl='/';wert1="Preis";wert2='100';runden='ab'>;wert2='100';runden='rest'>>
  87. <befehl='Funktionsaufruf';objekt="KupferT";funktion='anhängen';wert=<befehl='/';wert1="Preis";wert2='100';runden='rest'>>
  88. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='VVGoldTF';txt="GoldT";x='470';y='305';br='0';hö='0'>
  89. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='VVSilberTF';txt="SilberT";x='500';y='305';br='0';hö='0'>
  90. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='VVKupferTF';txt="KupferT";x='530';y='305';br='0';hö='0'>
  91. <befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='addOptionen';optionen='0x600'>
  92. <befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='addOptionen';optionen='0x600'>
  93. <befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='addOptionen';optionen='0x600'>
  94. <befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='setGrößeNachText'>
  95. <befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='setGrößeNachText'>
  96. <befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='setGrößeNachText'>
  97. <befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='setHöhe';hö='20'>
  98. <befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='setHöhe';hö='20'>
  99. <befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='setHöhe';hö='20'>
  100. <befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='addX';x=<befehl='-';wert1='0';wert2=<befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='getBreite'>>>
  101. <befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='addX';x=<befehl='-';wert1='0';wert2=<befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='getBreite'>>>
  102. <befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='addX';x=<befehl='-';wert1='0';wert2=<befehl='Funktionsaufruf';objekt="VVSilberTF";funktion='getBreite'>>>
  103. <befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='addX';x=<befehl='-';wert1='0';wert2=<befehl='Funktionsaufruf';objekt="VVKupferTF";funktion='getBreite'>>>
  104. <befehl='Funktionsaufruf';objekt="VVGoldTF";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="VVGoldTF";funktion='getBreite'>>>
  106. <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'>
  107. <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'>
  108. <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'>
  109. <befehl='Funktionsaufruf';objekt="vvkosten";funktion='setX';x=<befehl='-';wert1=<befehl='Funktionsaufruf';objekt="VVGoldTF";funktion='getX'>;wert2='55'>>
  110. <befehl='Funktionsaufruf';funktion='KNOPF_ERSTELLEN';name='VVKaufen';txt='Erwerben';x='450';y='330';br='100';hö='20'>
  111. <befehl='Funktionsaufruf';objekt="VVKaufen";funktion='setMausEreignis';fname='VVKME'>
  112. <befehl='SetVariable';variable='Geld';wert=<befehl='_GetKupfer'>;sichtbarkeit='lokal';typ='Zahl'>
  113. <befehl='Wenn';bedingung=<befehl='<=';wert1="Preis";wert2="Geld">;dann=<befehl='Return'>>
  114. <befehl='Funktionsaufruf';objekt="VVKaufen";funktion='löscheOptionen';optionen='0x2'>
  115. <befehl='Funktionsaufruf';funktion='TEXT_ERSTELLEN';name='VVNGK';txt='Du hast nicht genug Geld.';x='390';y='355';br='160';hö='20'>
  116. }
  117. {name='BILD_ERSTELLEN';übergabe=[name='name';typ='Text'];übergabe=[name='bild';typ='Bild'];übergabe=[name='x';typ='Zahl'];übergabe=[name='y';typ='Zahl']#
  118. <befehl='ErstellGlobalVariable';name="name";typ='BildObjekt'>
  119. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setBild';bild="bild">
  120. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setOptionen';optionen='0x1'>
  121. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setPosition';x="x";y="y">
  122. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setGrößeNachBild'>
  123. <befehl='Funktionsaufruf';objekt="Fenster";funktion='addMember';obj=<befehl='GetVariable';name="name">>
  124. }
  125. {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']#
  126. <befehl='ErstellGlobalVariable';name="name";typ='TextFeld';wert="txt">
  127. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setOptionen';optionen='0x101'>
  128. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setFläche';x="x";y="y";br="br";hö="hö">
  129. <befehl='Funktionsaufruf';objekt="Fenster";funktion='addMember';obj=<befehl='GetVariable';name="name">>
  130. }
  131. {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']#
  132. <befehl='ErstellGlobalVariable';name="name";typ='Knopf';wert="txt">
  133. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='addOptionen';optionen='0x1'>
  134. <befehl='Funktionsaufruf';objekt=<befehl='GetVariable';name="name">;funktion='setFläche';x="x";y="y";br="br";hö="hö">
  135. <befehl='Funktionsaufruf';objekt="Fenster";funktion='addMember';obj=<befehl='GetVariable';name="name">>
  136. }
  137. {name='TVKME';übergabe=[name='me';typ='MausEreignis']#
  138. <befehl='Wenn';bedingung=<befehl='==';wert1=<befehl='Funktionsaufruf';objekt="me";funktion='getEreignisId'>;wert2='3'>;sonst=<befehl='Return'>>
  139. <befehl='_Kaufen';testversion='true'>
  140. }
  141. {name='VVKME';übergabe=[name='me';typ='MausEreignis']#
  142. <befehl='Wenn';bedingung=<befehl='==';wert1=<befehl='Funktionsaufruf';objekt="me";funktion='getEreignisId'>;wert2='3'>;sonst=<befehl='Return'>>
  143. <befehl='_Kaufen';testversion='false'>
  144. }
  145. {name='MAUS';übergabe=[name='me';typ='MausEreignis']#
  146. <befehl='Funktionsaufruf';objekt="Fenster";funktion='mausEreignis';me="me">
  147. }
  148. {name='TASTATUR';übergabe=[name='te';typ='TastaturEreignis']#
  149. <befehl='Funktionsaufruf';objekt="Fenster";funktion='tastaturEreignis';te="te">
  150. }
  151. {name='TICK';typ='Wahrheitswert';übergabe=[name='zeit';typ='Kommazahl']#
  152. <befehl='Return';wert=<befehl='Funktionsaufruf';objekt="Fenster";funktion='tick';zeit="zeit">>
  153. }
  154. {name='RENDER';übergabe=[name='xOff';typ='Zahl'];übergabe=[name='yOff';typ='Zahl'];übergabe=[name='zRObj';typ='Bild']#
  155. <befehl='Funktionsaufruf';objekt="Fenster";funktion='render';x="xOff";y="yOff";zrobj="zRObj">
  156. }