Ich hab schon lange gesucht.Bin aber nicht auf die Lösung gestoßen irgendwas ist falsch aber was ?
Das Script:
[execute]
Action=registerKeyDownEvent
Key=A
Value=1
next=2
[2]
Action=registerKeyUpEvent
Key=A
Value=2
next=
Tastenpatch on:
MidiTickClear.scriptKeySupportOn
Play SE:MidiTickClear.script
Play SE:Keylist.script
Switch 1 ON
In Common event (Switch 1 ON) Parallel progress
Play SE}etMousePos
Var.0001Mod.MidiPlaypos.(tick.)
Wait:0,01
Common event 2 (Parallel progress)
Fork:Var.0001 same 1
Messg.: A
End case
Fork:Var.0001 same
End case
Hoffe ihr wisst die Lösung.
Mfg. Mr.D 8)