Hi, Leute. Wo liegt das Problem bei dem Scipt? In OOO3 sendet es (außer bei space) immer RORORORORO...
Spoiler anzeigen
#requireadminHotKeySet ("a", "A")HotKeySet ("b", "B")HotKeySet ("c", "C")HotKeySet ("d", "D")
HotKeySet ("e", "E")HotKeySet ("f", "F")HotKeySet ("g", "G")HotKeySet ("h", "H")HotKeySet ("i", "I")HotKeySet ("j", "J")HotKeySet ("k", "K")HotKeySet ("l", "L")HotKeySet ("m", "M")HotKeySet ("n", "N")HotKeySet ("o", "O")HotKeySet ("p", "P")HotKeySet ("q", "Q")HotKeySet ("r", "R")HotKeySet ("s", "S")HotKeySet ("t", "T")HotKeySet ("u", "U")HotKeySet ("v", "V")HotKeySet ("w", "W")HotKeySet ("x", "X")HotKeySet ("y", "Y")HotKeySet ("z", "Z")HotKeySet ("{SPACE}", "space")HotKeySet ("{F7}", "_Exit")Dosleep (250)Until 1=2Func A()Send ("Alpha")EndFuncDosleep (250)Until 1=2Func B()Send ("Bravo")EndFuncDosleep (250)Until 1=2Func C()Send ("Charlie")EndFuncDosleep (250)Until 1=2Func D()Send ("Delta")EndFuncDosleep (250)Until 1=2Func E()Send ("Echo")EndFuncDosleep (250)Until 1=2Func F()Send ("Foxtrott")EndFuncDosleep (250)Until 1=2Func G()Send ("Golf")EndFuncDosleep (250)Until 1=2Func H()Send ("Hotel")EndFuncDosleep (250)Until 1=2Func I()Send ("India")EndFuncDosleep (250)Until 1=2Func J()Send ("Juliett")EndFuncDosleep (250)Until 1=2Func K()Send ("Kilo")EndFuncDosleep (250)Until 1=2Func L()Send ("Lima")EndFuncDosleep (250)Until 1=2Func M()Send ("Mike")EndFuncDosleep (250)Until 1=2Func N()Send ("November")EndFuncDosleep (250)Until 1=2Func O()Send ("Oscar")EndFuncDosleep (250)Until 1=2Func P()Send ("Papa")EndFuncDosleep (250)Until 1=2Func Q()Send ("Quėbec")EndFuncDosleep (250)Until 1=2Func R()Send ("Romeo")EndFuncDosleep (250)Until 1=2Func S()Send ("Sierra")EndFuncDosleep (250)Until 1=2Func T()Send ("Tango")EndFuncDosleep (250)Until 1=2Func U()Send ("Uniform")EndFuncDosleep (250)Until 1=2Func V()Send ("Victor")EndFuncDosleep (250)Until 1=2Func W()Send ("Whiskey")EndFuncDosleep (250)Until 1=2Func X()Send ("X-Ray")EndFuncDosleep (250)Until 1=2Func Y()Send ("Yankee")EndFuncDosleep (250)Until 1=2Func Z()Send ("Zulu")EndFuncDosleep (250)Until 1=2Func space()Send ("§")EndFuncDosleep (250)Until 1=2Func _Exit()ExitEndFunc
Danke im Vorraus...