Hallo Klaus,
Danke für die schnelle Reaktion.
Hier das Script. Es bewegt ein Image von einer Spinne nach oben an einem Faden (Grafik) und wechselt bei einem bestimmten Punkt die Richtung. Die Variable tSpinne1 kommt von einem externen Script. Einige der global Vars gehören nicht zu dem Script, aber ich hab das jetzt soviel hin und her geschoben , das ich immer alles mit kopiert habe. Das andere Script ist eigentlich genau gleich bis auf die Variablen ,die natürlich anders definiert sind und eine anderer Richtungswechsel erfolgt.Das zweite Script arbeitet dann auch mit der Variablen tSpinne2 die ebenfalls von einem externen Script geliefert wird. Ich hätte nun gern, wenn es geht, das beide Images „Spinne1“ u. „Spinne2″ gleichzeitig starten. Wie gesagt, beide Script laufen gut, nur leider immer nacheinander.
global tZaehler,tZaehler2,tZaehler3,tTS,tTS2/*TopSpinne*/,tHG,tHG2/*heightLinie*/, tHBL,tHBL2/*BottonLinie*/, tLS,tLS2/*LeftSpinne*/,tWechselRichtung,tWechselRichtung2,tSpinne1,tSpinne2
on spinne1Bewegen
if the top of img“spinne1″ < 110 then
spinneWaagerechtSpinne1
else
spinneSenkrechtSpinne1
end if
end spinne1Bewegen
on spinneWaagerechtSpinne1
set the angle of img“spinne1″ to 90
if tZaehler2 is not empty then
repeat with x = 1 to tZaehler2
set the left of img“spinne1″ to tLS – x
wait 30 milliseconds
end repeat
subtract tSpinne1 from tLS
put tLS into tLS
put empty into tZaehler2
else
repeat with x = 1 to tSpinne1
set the left of img“spinne1″ to tLS – x
wait 30 milliseconds
end repeat
subtract tSpinne1 from tLS
put tLS into tLS
end if
end spinneWaagerechtSpinne1
on spinneSenkrechtSpinne1
repeat with x=1 to tSpinne1
set the top of img“spinne1″ to tTS – x
put tTS-x into tWechselRichtung
if tWechselRichtung = 109 then
put the left of img“spinne1″ into tLS
subtract x from tSpinne1
put tSpinne1 into tZaehler2
spinneWaagerechtSpinne1
exit spinneSenkrechtSpinne1
end if
set the bottom of graphic“line1″ to tHBL – x
set the height of graphic“line1“ to tHG – x
wait 30 milliseconds
end repeat
put tTS – tSpinne1 into tNew
put tNew into tTS
put tHG – tSpinne1 into tNew2
put tNew2 into tHG
put tHBL – tSpinne1 into tNew3
put tNew3 into tHBL
end spinneSenkrechtSpinne1
__________________
Vielen Dank für Deine Hilfe, Grüsse Heiko
