Jump to content

Autoit


ne2ay

Recommended Posts

autoit konusunda uzman bir arkadaş lazım ama forumda paylaşılarak yapabilecegimiz sey degil biraz daha karısık o yuzden Özelime msn adresi atarsanız mutlaka dönerim

Yarıma ihtiyacım var yardım edecek arkadaşlara Simdiden tşk ederim

Not: Her takıldıgım konuda yardım et diye meskul etmem Arastırıp bulamadıgım cözemedigim Seylerde yardım edecek bir arkadaş lazım Sorularım kısa dır.

Link to comment
Share on other sites

Buradan yardım istemek yerine sorunu sor bence. Yoksa konuyu çöpe taşıyacağım.

bot yapmak istiyorum biz bu autoit programını hangi mantıga dayalı calıstıracagız

soru 1- silkroadonlinede mosterleri nasıl sectirebiliriz

soru 2- Elimdeki yardıcı bir program var ben kendi programımı calıstırdıgımda bu programda silkroadonline acıldıktan sonra açılsın istiyorum bunu nasıl sağlarım

Bunlara cevap alırsam soracagım biraz sorunlar var.

Link to comment
Share on other sites

  • Administrator

1-Tab tuşuna basınca seçiliyor mu? Seçilse bile ateş edince monsterin öldüğünü nasıl anlayacak program? Hiç bilgisi olmayan birinin bunları yapması zor. Ayrıca autoit'i de aşıyor biraz. Çünkü memory okuma gerekiyor burada.

2-

Eğer silkroadonline.exe açılrsa senin programın da açılır.

AdlibEnable("scriptim")
do
sleep(100)
until 1=2

func scriptim()

if ProcessExists("silkroadonline.exe") then
run("C:\Programimneyse\Artiko.exe")

EndIf
EndFunc[/CODE]

Link to comment
Share on other sites

Hayır tab tuşu ile secilmiyor öldügünü anlamamız basit onun için süre koyarız mesela kill 10 sn gibi bir zaman koyarız 10 saniye sonunda ölsede ölmesede digerine gecer

Bunu Bende biraz gruruma dokundu bu crak ve bot yapını yapan kisiler yabancılar ve türklerin bunu yapamıcagını söylediler bende aksini ortaya koyacagım

benim dosyalarım hazır ve çalışıyor

kodları öm den göndermemi istersen sadece sana gönderim Dagılmasını istemiyorum. exe halinde dagılsa daha güzel olacak ve her önüne gelen editlemicek

bunun icin bir çok çalışan program var bunları kırmak daha kolay ise bu programları getireyim buraya onlara bakalım ama ben Türk yapımı temiz kendimizin yaptıgı herkesin kullanabilecegi bir şey olsun istiyorum.

Link to comment
Share on other sites

Ben de oyunu bilmiyorum. Anlat, nasıl seçilir? Eğer autoit ile yapmak istiyorsan ufaktan öğrenmeye başlaman gerek. Çünkü üst seviyelerde birşey bu istediğin.

Bak Şöyle kendi levelin var ve monster yani yaratık kestikce levelin yukseliyor her kesme sonunda o kestigin monsterden birşeyler düşüyor ve bunları topluyorsun

toplamanın kısa yolu G harfi

bir monsteri sectikten sonra 1-2-3 slotlara koydugun atack skilleri var bunları vuruyorsun

bunları vurdurabiliyorum ama oyunda monster sectirme gibi bir sansım yok ama yaklasık bir monsteri ne kadar sürede kesecegi bellidir. veya bunun süresini inbox yapabiliriz

simdi ben buraya scripti atayım

Ama script uzerinde calıstıgım icin tam olarak dizayn yapmadım en kolayı dizay bence en sona bıraktım

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=C:\Documents and Settings\Administrator\Desktop\_1.kxf
$_1 = GUICreate("WWW.TurkFantasy.Com", 795, 550, 193, 126)
GUICtrlCreateTab(10, 42, 860, 548, $TCS_MULTILINE)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
GUICtrlCreateTabItem("Genel Ayarlar")
GUICtrlCreateLabel("Press START to start botting", 48, 80, 500, 28)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("Press SAVE to save your settings", 48, 311, 548, 52)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("At any time during botting, Press F6 to PAUSE bot", 152, 414, 300, 100)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("Kullanıcı Adı", 22, 138, 68, 20)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$start = GUICtrlCreateButton("Başla", 124, 231, 86, 23, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$save = GUICtrlCreateButton("Kaydet", 228, 232, 79, 23, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$load = GUICtrlCreateButton("Aç", 321, 232, 100, 24, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$exit = GUICtrlCreateButton("Çıkış", 430, 232, 100, 24, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateInput("", 108, 136, 93, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("Sifre", 20, 169, 69, 20)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateInput("", 108, 168, 92, 22, BitOR($ES_PASSWORD,$ES_AUTOHSCROLL))
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button1 = GUICtrlCreateButton("Giriş", 216, 136, 89, 57, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Pic1 = GUICtrlCreatePic("", 568, 160, 180, 188, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUICtrlCreateTabItem("Atack Buf Ayarları")
GUICtrlCreateGroup("Asist Skil [F3]", 20, 133, 205, 295)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$buff1check = GUICtrlCreateCheckbox("", 50, 183, 25, 25)
$buff2check = GUICtrlCreateCheckbox("", 50, 213, 25, 25)
$buff3check = GUICtrlCreateCheckbox("", 50, 243, 25, 25)
$buff4check = GUICtrlCreateCheckbox("", 50, 273, 25, 25)
$buff5check = GUICtrlCreateCheckbox("", 50, 303, 25, 25)
$buff6check = GUICtrlCreateCheckbox("", 50, 333, 25, 25)
$buff7check = GUICtrlCreateCheckbox("", 50, 363, 25, 25)
$buff8check = GUICtrlCreateCheckbox("", 50, 393, 25, 25)
$buff1duration = GUICtrlCreateInput("", 87, 186, 40, 22)
$buff2duration = GUICtrlCreateInput("", 87, 216, 40, 22)
$buff3duration = GUICtrlCreateInput("", 87, 246, 40, 22)
$buff4duration = GUICtrlCreateInput("", 87, 276, 40, 22)
$buff5duration = GUICtrlCreateInput("", 87, 306, 40, 22)
$buff6duration = GUICtrlCreateInput("", 87, 336, 40, 22)
$buff7duration = GUICtrlCreateInput("", 87, 366, 40, 22)
$buff8duration = GUICtrlCreateInput("", 87, 396, 40, 22)
$buff1input = GUICtrlCreateInput("1", 173, 186, 52, 22)
$buff1slot = GUICtrlCreateUpdown($buff1input)
GUICtrlSetLimit(-1, 8, 1)
$buff2input = GUICtrlCreateInput("2", 173, 216, 52, 22)
$buff2slot = GUICtrlCreateUpdown($buff2input)
GUICtrlSetLimit(-1, 8, 1)
$buff3input = GUICtrlCreateInput("3", 173, 246, 52, 22)
$buff3slot = GUICtrlCreateUpdown($buff3input)
GUICtrlSetLimit(-1, 8, 1)
$buff4input = GUICtrlCreateInput("4", 173, 276, 52, 22)
$buff4slot = GUICtrlCreateUpdown($buff4input)
GUICtrlSetLimit(-1, 8, 1)
$buff5input = GUICtrlCreateInput("5", 173, 306, 52, 22)
$buff5slot = GUICtrlCreateUpdown($buff5input)
GUICtrlSetLimit(-1, 8, 1)
$buff6input = GUICtrlCreateInput("6", 173, 336, 52, 22)
$buff6slot = GUICtrlCreateUpdown($buff6input)
GUICtrlSetLimit(-1, 8, 1)
$buff7input = GUICtrlCreateInput("7", 173, 366, 52, 22)
$buff7slot = GUICtrlCreateUpdown($buff7input)
GUICtrlSetLimit(-1, 8, 1)
$buff8input = GUICtrlCreateInput("8", 173, 396, 52, 22)
$buff8slot = GUICtrlCreateUpdown($buff8input)
GUICtrlSetLimit(-1, 8, 1)
GUICtrlCreateGroup("", 30, 143, 55, 30)
GUICtrlCreateLabel("Enable", 40, 153, 4, 4)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", 95, 143, 50, 30)
GUICtrlCreateLabel("Duration", 100, 153, 4, 4)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateLabel("secs", 130, 191, 4, 4)
GUICtrlCreateLabel("secs", 130, 221, 4, 4)
GUICtrlCreateLabel("secs", 130, 251, 4, 4)
GUICtrlCreateLabel("secs", 130, 281, 4, 4)
GUICtrlCreateLabel("secs", 130, 311, 4, 4)
GUICtrlCreateLabel("secs", 130, 341, 4, 4)
GUICtrlCreateLabel("secs", 130, 371, 4, 4)
GUICtrlCreateLabel("secs", 130, 401, 4, 4)
GUICtrlCreateLabel("Slot", 180, 153, 4, 4)
GUICtrlCreateGroup("", 170, 143, 40, 30)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateLabel("Please check the box on the left if you need the function", 20, 73, 4, 4)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("Please enter the duration if there", 20, 83, 4, 4)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("It is best to use the default slots. DO not duplicate slots", 20, 93, 4, 4)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("Script will trigger when Durability is critical", 20, 103, 4, 4)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("IF you are using TOWN option, put TOWN SCROLL at slot 0", 20, 113, 4, 4)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$clickscreen = GUICtrlCreateCheckbox("Right click on screen before buff", 536, 136, 180, 20)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Berserk = GUICtrlCreateCheckbox("Use Berserk when full", 544, 165, 120, 20)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Giant = GUICtrlCreateCheckbox("Only For Giants", 546, 185, 120, 20)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateGroup("Atack Skil [F4]", 300, 129, 205, 152)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$WepSkill = GUICtrlCreateCheckbox("Use Skills", 320, 144, 80, 25)
$WepReg = GUICtrlCreateInput("1", 410, 140, 52, 22)
$WepNo1 = GUICtrlCreateUpdown($WepReg)
GUICtrlSetLimit(-1, 9, 0)
$WepChamp = GUICtrlCreateInput("3", 410, 162, 52, 22)
$WepNo2 = GUICtrlCreateUpdown($WepChamp)
GUICtrlSetLimit(-1, 9, 0)
$WepGiant = GUICtrlCreateInput("5", 410, 184, 52, 22)
$WepNo3 = GUICtrlCreateUpdown($WepGiant)
GUICtrlSetLimit(-1, 9, 0)
$WepTime = GUICtrlCreateInput("150", 320, 174, 67, 22)
$WepDelay = GUICtrlCreateUpdown($WepTime)
GUICtrlSetLimit(-1, 999, 100)
GUICtrlCreateLabel("Regular", 450, 144, 44, 12)
GUICtrlCreateLabel("Champion", 450, 166, 44, 20)
GUICtrlCreateLabel("Giant", 448, 188, 52, 20)
GUICtrlCreateLabel("msesc", 375, 177, 4, 4)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$ShutDown = GUICtrlCreateCheckbox("Shut Down PC", 20, 590, 90, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$NODC = GUICtrlCreateCheckbox("No DC in town", 120, 590, 90, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$OhMamma = GUICtrlCreateInput("5", 245, 593, 52, 20)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Protecting = GUICtrlCreateUpdown($OhMamma)
GUICtrlSetLimit(-1, 60, 5)
GUICtrlCreateLabel("Minimize time", 283, 596, 205, 80)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateTabItem("NPC Ayarları")
GUICtrlSetState(-1,$GUI_SHOW)
GUICtrlCreateGroup("Durability", 35, 95, 155, 187)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox1 = GUICtrlCreateCheckbox("", 65, 135, 25, 25)
$Checkbox2 = GUICtrlCreateCheckbox("Log out", 110, 135, 60, 25)
$Checkbox3 = GUICtrlCreateCheckbox("Town", 110, 155, 60, 25)
$Checkbox4 = GUICtrlCreateCheckbox("Yedek Silaha Geç", 65, 180, 116, 25)
GUICtrlCreateGroup("", 45, 105, 55, 30)
GUICtrlCreateLabel("Enable", 55, 115, 4, 4)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateLabel("Reaction", 115, 115, 44, 20)
GUICtrlCreateGroup("", 105, 105, 65, 30)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("Kurda Pot Bas [F4]", 246, 94, 155, 124)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox5 = GUICtrlCreateCheckbox("", 260, 134, 16, 25)
$Checkbox6 = GUICtrlCreateCheckbox("Attack", 276, 202, 50, 20)
$Checkbox7 = GUICtrlCreateCheckbox("Follow", 336, 202, 50, 20)
$Slider1 = GUICtrlCreateSlider(266, 172, 120, 18)
$Input1 = GUICtrlCreateInput("6", 349, 137, 60, 22)
$petslot = GUICtrlCreateUpdown($Input1)
GUICtrlSetLimit(-1, 9, 1)
GUICtrlCreateGroup("", 256, 104, 55, 30)
GUICtrlCreateLabel("Enable", 266, 114, 4, 4)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", 346, 104, 40, 30)
GUICtrlCreateLabel("Slot", 356, 114, 4, 4)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("Health %", 256, 158, 140, 40)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label1 = GUICtrlCreateLabel("Açık", 280, 139, 41, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("Check Pots [F4]", 442, 97, 155, 187)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox8 = GUICtrlCreateCheckbox("HP", 472, 112, 40, 25)
$Checkbox9 = GUICtrlCreateCheckbox("Log out", 517, 112, 60, 25)
$Checkbox10 = GUICtrlCreateCheckbox("Town", 517, 132, 60, 25)
$Checkbox11 = GUICtrlCreateCheckbox("MP Açık", 472, 192, 72, 25)
$Checkbox12 = GUICtrlCreateCheckbox("Log out", 461, 248, 60, 25)
$Checkbox13 = GUICtrlCreateCheckbox("Town", 525, 252, 60, 25)
$Input2 = GUICtrlCreateInput("8", 472, 137, 52, 22)
$HPslot = GUICtrlCreateUpdown($Input2)
GUICtrlSetLimit(-1, 9, 1)
$Input3 = GUICtrlCreateInput("7", 472, 162, 52, 22)
$HPSave = GUICtrlCreateUpdown($Input3)
GUICtrlSetLimit(-1, 9, 1)
$Input4 = GUICtrlCreateInput("9", 472, 217, 52, 22)
$MPslot = GUICtrlCreateUpdown($Input4)
GUICtrlSetLimit(-1, 9, 1)
GUICtrlCreateLabel("Back-Up pots", 520, 165, 76, 20)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateTabItem("Credits")
GUICtrlCreateLabel("Credits all given to En5 for his original bot script", 20, 73, 4, 4)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("I only added more functions to make botting more enjoyable o.O", 20, 88, 4, 4)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("Any questions/problems please pm retard00 in GZP", 20, 103, 4, 4)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("or you may pm retard in 0x33.org", 20, 118, 4, 4)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("*Note script will work in all resulations.", 20, 148, 4, 4)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

Case $WepSkill
Case $Checkbox4
EndSwitch
WEnd[/CODE]

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...