Bearbeiten von „Hilfe:Karten/Minimap-Hotspots-Scripte“

<div id="contentSub"><span class="subpages">&lt; [[Hilfe:Karten#Feldzusammenfassung/Minimap-Hotspots]]</span></div>

Eine Sammlung von Scripten, um Minimap-Hotspots zu erstellen:

==VBA==
Ein Codeschnipsel für ein Word-Makro, das das aktive Dokument mit den entsprechenden Vorlagendefinitionen überschreibt. Die Konstanten am Anfang des Makros müssen natürlich entsprechend angepasst werden.
<pre>
Sub MakeMinimapHotspots()
Const StartX = -825
Const StopX = -821
Const StartY = -780
Const StopY = -776
Const RangeX = 15 ' Breite des Bereichs in Pixeln
Const RangeY = 15 ' Höhe des Bereichs in Pixeln


Dim x As Integer
Dim y As Integer
Dim px As Integer
Dim py As Integer

  
  '' Achtung: alles im aktiven Dokument wird gelöscht:
  Selection.WholeStory
  Selection.Delete
  
  For y = StartY To StopY
    px = 0
    For x = StartX To StopX
      Selection.TypeText "{{Link-Div|#" & CStr(x) & "," & CStr(y) & "|" & CStr(RangeX) & "px|" & RangeY & "px|position:absolute;left:" & CStr(px) & "px;top:" & CStr(py) & "px;z-index:2;}}"
      Selection.TypeParagraph
      px = px + 15
    Next x
    py = py + 15
  Next y
End Sub
</pre>
== Javascript ==
Dieses Script steht auch [http://www.arbiedz.de/MakeMinimapHotspots.htm hier] zur direkten Verwendung zur Verfügung.
<pre>
<html>
  <head>
    <meta http-equiv="content-type" content="text/html;CHARSET=iso-8859-1">
    <title>Script zum Erstellen einer Karten/Minimap-Hotspots</title>
<script type="text/javascript">
<!--

function main() {
var px = 0;
var py = 0;

  document.Formular.Ausgabe.value = "";
  for (var y = eval(document.Formular.edit_y1.value); y <= eval(document.Formular.edit_y2.value); y++) {
    px = 0;
    for (var x = eval(document.Formular.edit_x1.value); x <= eval(document.Formular.edit_x2.value); x++) {
      document.Formular.Ausgabe.value += "{{Link-Div|#" + x + "," + y + "|" + eval(document.Formular.edit_width.value) + "px|" + eval(document.Formular.edit_height.value) + "px|position:absolute;left:" + px + "px;top:" + py + "px;z-index:2;}}" + "\n";
      px = px + eval(document.Formular.edit_width.value);
      }
    py = py + eval(document.Formular.edit_height.value);
    }
}

//-->
</script>

  </head>
<body>
<noscript>
<h1>Javascript muss aktiviert sein!</h1>
</noscript>
Script zum Erstellen einer Karten/Minimap-Hotspots. Einfach die x- und y-Startwerte eintragen und anschließend
die Ausgabe in den fwwiki-Artikel <tt>Vorlage:Feldzusammenfassung/Minimap-Hotspots/<i>Gebietsname</i></tt> eintragen.
(Version vom 21.10.08)
<form name="Formular" action="">
  <fieldset>
    <legend>Feldkoordinaten</legend>
      obere linke Ecke:<br>
      x<sub>1</sub>=<input name="edit_x1" type="text" size="5" maxlength="5" value="89">
      y<sub>1</sub>=<input name="edit_y1" type="text" size="5" maxlength="5" value="80">
      <p>
      untere rechte Ecke:<br>
      x<sub>2</sub>=<input name="edit_x2" type="text" size="5" maxlength="5" value="101">
      y<sub>2</sub>=<input name="edit_y2" type="text" size="5" maxlength="5" value="89">
  </fieldset>
  <fieldset>
    <legend>Kachelgröße (in Pixeln)</legend>
      Breite=<input name="edit_width" type="text" size="5" maxlength="5" value="15"> Höhe=<input name="edit_height" type="text" size="5" maxlength="5" value="15">
  </fieldset>
  <input type="button" value="Ausrechnen" onclick="main()"><br>
  <textarea cols="140" rows="25" name="Ausgabe"></textarea>
</form>

</body>
</html>
</pre>