Jump to content

A Question to a instruction


sawdaw
 Share

Recommended Posts

Hi at all.. i m new here^^

I have a question to an instruction. The question is whether it is possible with Autoit a certain letter on the screen to be looked for. Thus so "type character search (0.0.1440.900," hello")" or something different one

does it give such a thing?

if then writes:)

Yours sincerely sawdaw

Link to comment
Share on other sites

Hi at all.. i m new here^^

I have a question to an instruction. The question is whether it is possible with Autoit a certain letter on the screen to be looked for. Thus so "type character search (0.0.1440.900," hello")" or something different one

does it give such a thing?

if then writes:)

Yours sincerely sawdaw

If you mean window text, then just use WinGetText(). If you mean a graphic of the word, then search the forum for "OCR".

:D

Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law
Link to comment
Share on other sites

I guess you're wanting to search for whenever someone types a word? Like if you type "hello", the script should trigger?

Otherwise, if you're looking for a way to scan for letters on the screen, then that could prove to be a problem.

Edited by FreeFry
Link to comment
Share on other sites

Opt("GUIOnEventMode", 1)
Opt("GUIOnEventMode", 2)
Opt("GUIOnEventMode", 3)
Opt("GUIOnEventMode", 4)
Opt("GUIOnEventMode", 5)
Opt("GUIOnEventMode", 6)
Opt("GUIOnEventMode", 7)


HotKeySet ("{F5}","start")
HotKeySet ("{F6}","stop")








#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=c:\dokumente und einstellungen\jule\desktop\aiobot form!!!^^.kxf
$aiobot = GUICreate("AIOBot 0.01v ", 587, 428, 216, 232)
GUISetIcon("D:\005.ico")
$autotrainin = GUICtrlCreateTab(0, 0, 586, 427)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$protectio = GUICtrlCreateTabItem("Protection")
$hpslider = GUICtrlCreateSlider(96, 40, 118, 21)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$hpprotectioncheck = GUICtrlCreateCheckbox("Wenn Hp<", 16, 40, 73, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label7 = GUICtrlCreateLabel("% Autop.", 216, 40, 52, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$mpprotectioncheck = GUICtrlCreateCheckbox("Wenn MP<", 16, 64, 81, 17)
$mpslider = GUICtrlCreateSlider(96, 64, 118, 21)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label8 = GUICtrlCreateLabel("% Autop.", 216, 64, 52, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$pillprotectioncheck = GUICtrlCreateCheckbox("Auto heil Poision nehmen", 16, 88, 169, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$brokencheck = GUICtrlCreateCheckbox("Wenn etwas kaputt ist zurück zur S.", 16, 112, 209, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Protect = GUICtrlCreateGroup("(Coming Soon)", 8, 24, 265, 121)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$autotraining = GUICtrlCreateTabItem("Auto Training")
$Label1 = GUICtrlCreateLabel("Skill1", 16, 48, 34, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$skill1 = GUICtrlCreateInput("", 56, 48, 41, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label2 = GUICtrlCreateLabel("Skill2", 16, 72, 34, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$skill2 = GUICtrlCreateInput("", 56, 72, 41, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label3 = GUICtrlCreateLabel("Skill3", 16, 96, 34, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$skill3 = GUICtrlCreateInput("", 56, 96, 41, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label4 = GUICtrlCreateLabel("Skill4", 16, 120, 34, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$skill4 = GUICtrlCreateInput("", 56, 120, 41, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label5 = GUICtrlCreateLabel("Skill5", 16, 144, 34, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFBF0)
$skill5 = GUICtrlCreateInput("", 56, 144, 41, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label6 = GUICtrlCreateLabel("Imbue", 104, 48, 39, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$imbue = GUICtrlCreateInput("", 144, 48, 41, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Skills = GUICtrlCreateGroup("Skills F1  (keys 1-5)", 8, 24, 185, 153)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Buffs F1 (keys 6-0)", 200, 24, 225, 161)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label10 = GUICtrlCreateLabel("(write how much seconds the buff uses)", 208, 40, 204, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Label13 = GUICtrlCreateLabel("Buff 1 (key6)", 208, 56, 68, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$buff1input = GUICtrlCreateInput("", 280, 56, 41, 23)
$Label14 = GUICtrlCreateLabel("Buff 2(key7)", 208, 80, 65, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$buff2input = GUICtrlCreateInput("", 280, 80, 41, 23)
$Label15 = GUICtrlCreateLabel("Buff 3(key8)", 208, 104, 65, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$buff3input = GUICtrlCreateInput("", 280, 104, 41, 23)
$Label16 = GUICtrlCreateLabel("Buff 4(key9)", 208, 128, 65, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$buff4input = GUICtrlCreateInput("", 280, 128, 41, 23)
$Label17 = GUICtrlCreateLabel("Buff 5(key0)", 208, 152, 68, 19)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$buff5input = GUICtrlCreateInput("", 280, 152, 41, 23)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$loop = GUICtrlCreateTabItem("Loop")
$rangeslider = GUICtrlCreateSlider(64, 56, 110, 21)
$Label11 = GUICtrlCreateLabel("range :", 16, 56, 42, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$rangeinput = GUICtrlCreateInput("0", 176, 56, 41, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetResizing(-1, $GUI_DOCKTOP+$GUI_DOCKHEIGHT)
GUICtrlSetState(-1, $GUI_DISABLE)
$gebiet = GUICtrlCreateButton("Jetziges Gebiet", 176, 80, 91, 25, 0)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label12 = GUICtrlCreateLabel("X", 24, 88, 11, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$inputx = GUICtrlCreateInput("1000", 40, 88, 49, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$yinput = GUICtrlCreateLabel("Y", 96, 88, 11, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$inputy = GUICtrlCreateInput("-1000", 112, 88, 49, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Hu = GUICtrlCreateGroup("Hunting Area", 8, 24, 321, 105)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group1 = GUICtrlCreateGroup("Buying", 8, 128, 321, 217)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$buyreturncheck = GUICtrlCreateCheckbox("Buy Return Scroll", 16, 152, 113, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$buyarrowcheck = GUICtrlCreateCheckbox("Buy Arrows", 16, 176, 97, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$buyarrowinput = GUICtrlCreateInput("250", 120, 176, 121, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$buyhpcheck = GUICtrlCreateCheckbox("Buy HP Pots", 16, 200, 97, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$buyhpcombo = GUICtrlCreateCombo("HP recovery poition(small)", 120, 200, 153, 25)
GUICtrlSetData(-1, "HP recovery poition (medium)|HP recovery poition (large)|HP recovery poition (x-large)")
$buympcheck = GUICtrlCreateCheckbox("Buy MP Pots", 16, 224, 97, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$buympcombo = GUICtrlCreateCombo("MP recovery poition (small)", 120, 224, 153, 25)
GUICtrlSetData(-1, "MP revery poition (medium)|MP recovery poition (large)|MP recovery poition (x-large)")
$buyhpinput = GUICtrlCreateInput("50", 280, 200, 41, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$buympinput = GUICtrlCreateInput("50", 280, 224, 41, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$buypillcheck = GUICtrlCreateCheckbox("Buy Universal Pill", 16, 248, 121, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$buypillcombo = GUICtrlCreateCombo("Universal Pill (small)", 144, 248, 129, 25)
GUICtrlSetData(-1, "Universal Pill (medium)|Universal Pill (large)")
$buypillinput = GUICtrlCreateInput("50", 280, 248, 41, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$buyreturncombo = GUICtrlCreateCombo("Normal", 136, 152, 121, 25)
GUICtrlSetData(-1, "Special")
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$horsemovecheck = GUICtrlCreateCheckbox("Ride on horse to Trainings place", 336, 88, 209, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$deathreturncheck = GUICtrlCreateCheckbox("On death return to city", 336, 56, 161, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$autorepaircheck = GUICtrlCreateCheckbox("Auto repair Weapons/clothes", 336, 120, 185, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$TabSheet1 = GUICtrlCreateTabItem("Tools")
GUICtrlSetState(-1,$GUI_SHOW)
$hide = GUICtrlCreateButton("Verstecke Silkroad", 16, 72, 139, 25, 0)
GUICtrlSetOnEvent ($hide,"hide")
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$show = GUICtrlCreateButton("Zeige Silkroad", 16, 104, 139, 25, 0)
GUICtrlSetOnEvent ($show,"show")
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$minimize = GUICtrlCreateButton("Minimiert Silkroad", 16, 136, 139, 25, 0)
GUICtrlSetOnEvent ($minimize,"minimize")
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$maximaze = GUICtrlCreateButton("Maximiert Silkroad", 16, 168, 139, 25, 0)
GUICtrlSetOnEvent ($maximaze,"maximaze")
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$startsilkroad = GUICtrlCreateButton("Startet Silkroad", 16, 40, 139, 25, 0)
GUICtrlSetOnEvent ($startsilkroad,"startsro")
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlCreateTabItem("")
$start = GUICtrlCreateButton("Start Training", 30, 376, 75, 25, 0)
GUICtrlSetOnEvent ($start,"start")
$stop = GUICtrlCreateButton("Stop Training", 166, 376, 75, 25, 0)
GUICtrlSetOnEvent ($stop,"stop")
$help = GUICtrlCreateButton("&Help", 472, 376, 75, 25, 0)
GUICtrlSetOnEvent ($help,"help")
$save = GUICtrlCreateButton("Save Settings", 336, 376, 75, 25, 0)
GUICtrlSetOnEvent ($save,"save")
$Label9 = GUICtrlCreateLabel("©sawdaw and Aang", 432, 400, 145, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $buyhpcombo
Case $help
EndSwitch
WEnd


Func help()
     MsgBox (0,"Help","F5 Start Bot.F6 Stop Bot.F7 AutoPick.F8 Stop AutoPick.")
 EndFunc
 
 While 1
   Sleep(1000)
WEnd

Func save()
    FileClose(FileWrite(FileOpen(@DesktopDir & '\Settings.txt', 2), $skill1&$skill2&$skill3&$skill4&$skill5&$imbue&$buyhpcombo))
EndFunc

Func start()
    Winsetstate ("AIOBot 0.01v","",@SW_HIDE )
    WinsetState ("SRO_Client","",@SW_SHOW)
    Sleep (3000)
    Send ("{F12}")
    While 1
    $start = Pixelsearch(550,550,1440,900,0xFFFFFF)
    if not @error Then
        MouseClick ("left",$start[0],$start[1],2,0)
        $readimbue = GuiCtrlRead ($imbue)
            Send ($readimbue)
            $readskill1 = GUICtrlRead ($skill1)
            Send ($readskill1 &$readimbue)
            Send ("g")
            Send ("g")
            Send ("g")
            Send ("g")
            Sleep (1000)
            $readskill2 = GUICtrlRead ($skill2)
            Send ($readskill2 &$readimbue)
            Send ("g")
            Send ("g")
            Send ("g")
            Send ("g")
            Sleep (1000)
            $readskill3 = GUICtrlRead ($skill3)
            Send ($readskill3 &$readimbue)
            Sleep (1000)
            Send ("g")
            Send ("g")
            Send ("g")
            Send ("g")
            $readskill4 = GUICtrlRead ($skill4)
            Send ($readskill4 &$readimbue)
            Sleep (1000)
            Send ("g")
            Send ("g")
            Send ("g")
            Send ("g")
            $readskill5 = GUICtrlRead ($skill5)
            Send ($readskill5 &$readimbue)
            Send ("g")
            Send ("g")
            Send ("g")
            Send ("g")
        EndIf
    WEnd
EndFunc
        

Func hide()
    Winsetstate ("SRO_Client","",@SW_HIDE)
EndFunc

Func show()
    WinSetState ("SRO_Client","",@SW_SHOW)
EndFunc
Func minimize()
    Winsetstate ("SRO_Client","",@SW_MINIMIZE)
EndFunc

Func maximaze()
    Winsetstate ("SRO_Client","",@SW_MAXIMIZE)
EndFunc

Func startsro()
    Run ("Loader.exe")
    Sleep (10000)
EndFunc

Func stop()
    WinSetState ("AIOBot 0.01v","",@SW_SHOW)
    While 1
        Sleep (2000)
    WEnd
EndFunc

if start is activated (I will provide still another input where one to the monsters names to register must for be searched am) is for the monster the names to look which one into the input registers.... let's see what you can show me or what you can do :D

Yours sincerely sawdaw

Link to comment
Share on other sites

madly... however you/it does not know "ocr" of programs thereby functions?

Come again?

Ocr can be used to read text of the screen(though, I've never come across any that works on transparent text).

I don't know if this game of yours has any cheat protection(if it's a MMORPG, then it most likely does), if it does then trying to read the memory of it could prove.. troublesome. :D

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...