Erbitte Hilfe bei einfachem Script!

AdvancedNewbie · 10/25/2008, 11:47

Zur Vorgeschichte... Ich farme Vaettiere im HM in der Jaga Moräne mit Budger Schwarzpulver. Ich muss dafür relativ schnell die Fässer von Budger nehmen und wieder ablegen. Da dieses wilde auf der Tastatur gehämmere meine Frau aber ein wenig stört habe ich mir gedacht ich mache mir ein Script das nur die Funktion hat die Fässer anzunehmen und abzulegen.
Nun besitzte ich aber leider nur "sehr rudimentäre" Programmierkenntnisse.
Also habe ich aus dem Publicscript von Master Gunners HFFF mir die Zeilen rausgesucht die mir für diese Aufgabe wichtig erschienen.
Wenn ich nun allerdings Budger in GW anwähle und Pos1 (Home) auf meiner Tastatur drücke passiert gar nix.
Numpad 7 ist Aktion Ausführen (annehmen) und Numpad 8 ist Gegenstand wegwerfen zugewiesen. Per Hand funktioniert das ganze auch... Nur das Script will irgendwie nicht... Gebt mir doch bitte mal einen Tipp was ich falschmache. Bin auch lernwillig ^^

Hier mal mein Script

HotKeySet("{HOME}", "_startrun")

Func _startrun()
Send("{NUMPAD7}")
$rndnumber = Random(1000, 2000)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(1000, 2000)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD7}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)
Send("{NUMPAD8}")
$rndnumber = Random(200, 300)
Sleep($rndnumber)

EndFunc

If Not WinActivate("Guild Wars") Then
WinActivate("Guild Wars")
EndIf

If Not WinActivate("Guild Wars") Then
WinActivate("Guild Wars")
EndIf

Danke jetzt schoneinmal für Hilfe!!!

~~xSharkoonX~~ · 10/25/2008, 11:53

unten an script

while 1
sleep(10)
wend

dran weil wenn du nur die func hast bleibt das prog nicht offen ...es macht nur das winactivate und schließt sich wieder

mfg

_revo · 10/25/2008, 11:59

und noch dazu kannst du die func sehr verkürzen

:

Code:

Func _startrun()
    Send("{NUMPAD7}")
    Sleep(Random(1000, 2000))
    Send("{NUMPAD8}")
    Sleep(Random(1000, 2000))
    for $i=0 to 32 ;32 = Anzahl der Wiederholungen
        Send("{NUMPAD7}")
        Sleep(Random(200, 300))
        Send("{NUMPAD8}")
        Sleep (Random(200, 300))
    next
EndFunc

AdvancedNewbie · 10/25/2008, 12:04

Ich danke euch ^^ ... Nun funktionierts! Und schon hab ich wieder was gelernt.
Vielen Dank nochmals!!!!