CALL ...Aufrufen von fremden Scripts

andreaszeike — Tue, 28 May 2002 21:27:00 GMT

hier ist ein Beispiel für ein Script, das mit dem CALL-Befehl seinerseits Scripte aufruft:


 
 if Format=0 then 
 Ax=118.9 
 Ay=84.1
 CALL    "STEMPEL A0" PARAMETERS A =118.9, B =84.1
 else
 endif
 
 if Format=1 then 
 Ax=84.1 
 Ay=59.4
 CALL    "STEMPEL A1" PARAMETERS A =84.1, B =59.4
 else
 endif
 
 if Format=2 then 
 Ax=59.4
 Ay=42.0
 CALL    "STEMPEL A2" PARAMETERS A =59.4, B =42.0
 else
 endif
 
 if Format=3 then 
 Ax=42.0 
 Ay=29.7
 CALL    "STEMPEL A3" PARAMETERS A =42.0, B =29.7
 else
 endif
 
 if Format=4 then 
 Ax=21 
 Ay=29.7
 CALL    "STEMPEL A4" PARAMETERS A =21.0, B =29.7
 else
 endif
 
 if Format=5 then 
 Ax=a 
 Ay=b
 else
 endif
 
 rect2 0, 0, Ax, Ay  ! zeichnet Rahmen DIN A...

Das script ruft je nach Eintrag für den Parameter "format" mit CALL die zugehörige Stempel.gsm auf.

Ihr könnt Euch die Planstempel selbst zeichnen, müsst sie dann bloß als gsm abspeichen (mit dem richtigen Namen: Stempel A0.gsm, Stempel A1.gsm, u.s.w.)

Hier findet Ihr das fertige Objekt und ein paar Beispielstempel: eigener Plankopf.pla

Gruß, az

Thema "CALL ...Aufrufen von fremden Scripts" in Programmierung

CALL ...Aufrufen von fremden Scripts