https://wiki.stne.net/index.php?action=history&feed=atom&title=Scripting%3ASchildPortal 2026-05-14T06:14:08Z Versionsgeschichte für diese Seite in STNE-Wiki MediaWiki 1.16.0 https://wiki.stne.net/index.php?title=Scripting:SchildPortal&diff=12075&oldid=prev 2009-02-13T17:43:18Z

<p></p> <p><b>Neue Seite</b></p><div>Hier mal ein kleines Portal mit dem vorher eingestellte Verbündete die Schilde einer Basis (oder eines Schiffes) senken und heben können.<br /> <br /> &lt;pre&gt;<br /> <br /> #UseInterface Web, ShipPortal;<br /> <br /> // Benutzerberechtigungen festlegen<br /> Var validUser As Boolean = False;<br /> <br /> If(GuestUser.UserID = 12345) { // Eigene ID<br /> validUser = True;<br /> }<br /> If(GuestUser.AllianzID = 123) { // Alliazn erlaubt<br /> validUser = True;<br /> }<br /> <br /> If(validUser) {<br /> arbeite();<br /> } Else {<br /> println(&quot;Sie habe keine Berechtigung dies zu tun&quot;); // &lt;-- Text, der unauthorisierten Benutzern ausgegeben wird<br /> }<br /> <br /> <br /> <br /> Function println(text As String) {<br /> Response.Add(text);<br /> Response.Add(New CHtmlBreak());<br /> }<br /> // Hier wird die richtige Ansicht generiert<br /> Function arbeite() {<br /> <br /> // Formular öffnen<br /> Var form As New CHtmlForm(New CScriptUrl());<br /> Response.Add(form);<br /> form.Add(New CHtmlBreak());<br /> <br /> <br /> // Buttons druntertun<br /> form.Add(New CHtmlSubmitButton(&quot;Schilde Heben!&quot;, &quot;Schilde1&quot;));<br /> form.Add(New CHtmlSubmitButton(&quot;Schilde Senken!&quot;, &quot;Schilde2&quot;));<br /> }<br /> If(Request.Form.ContainsKey('Schilde1')) {<br /> MyShip.Aktion.SchildeAktivieren(True);<br /> println(&quot;Schilde wurden aktiviert&quot;));<br /> }<br /> If(Request.Form.ContainsKey('Schilde2')) {<br /> MyShip.Aktion.SchildeAktivieren(False);<br /> println(&quot;Schilde wurden gesenkt&quot;));<br /> }&lt;/pre&gt;</div>

White