Skocz do zawartości

  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • ✅ Pełny dostęp do działów i ukrytych treści
    • ✅ Możliwość pisania i odpowiadania w tematach
    • ✅ System prywatnych wiadomości
    • ✅ Zbieranie reputacji i rozwijanie swojego profilu
    • ✅ Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Rekomendowane odpowiedzi

arturkup.... Specjalista

arturkup....

Opublikowano
Specjalista

arturkup....

Opublikowano

Witam ponownie mam sprawe odnosnie skryptu dzieki któremu moge wyswietlic dany obrazek przed włączeniem programu.

Jaki on jest podajcie go bo ja próbowałem i mi nie wyszło oto jest skrypt i prosze jezeli mozna powiedziec w które mam miejsce to wkleic

 

 

#include <GUIConstantsEx.au3>

 

Opt("WinTitleMatchMode" ,4)

Opt("SendKeyDelay" ,25) ; te popierdólki to czasy ile ma być mysz / klawisz wciśnięte

Opt("SendKeyDownDelay" ,50)

Opt("MouseClickDownDelay",10)

Opt("MouseClickDelay" ,25)

Opt("MouseClickDragDelay",10)

 

HotKeySet("{F10}", "BUFF") ; jak wciśniesz F5 to zainicjuje funkcje BUFF()

HotKeySet("{F11}", "bot_sobie_czuwa") ; jak wciśniesz F5 to zainicjuje funkcje bot_sobie_czuwa()

 

GUICreate("BuffBot by Arczaniol1",330,140)

$ile = GUICtrlCreateCombo("2",10,10,35,20)

GuiCtrlSetData ($ile, "2|3|4|5|6|7|8|") ; ile cyfer w tym combo

$opis_ile = "Wybierz ilo osobowe PT"

GUICtrlCreateLabel($opis_ile,60,13)

$powtorki = GUICtrlCreateInput("1", 10,40,40,20)

$opis_powtorki = "Sprawdź swoje buffy i wpisz najdłuższy czas ładowania"

GUICtrlCreateLabel($opis_powtorki,60,43)

$Start = GUICtrlCreateButton("Zacznij buffować",10,70,150,20)

GUICtrlCreateLabel("Klawisz F10 = Start " & @CRLF & "Klawisz F11 = Pauza", 10, 100, 300,33) ;33 bo są 2 linie, normalnie starczy 13

 

GUISetState(@SW_SHOW)

 

bot_sobie_czuwa()

func bot_sobie_czuwa()

While 1

$msg = GUIGetMsg()

Select

Case $msg = $GUI_EVENT_CLOSE

Exit

Case $msg = $Start

BUFF()

EndSelect

 

sleep(30) ; żeby ci sie proc nie spalił

wend

endfunc

 

func BUFF()

 

$ile_w_BUFF = GUICtrlRead($ile)

$powtorki_w_BUFF = GUICtrlRead($powtorki)

 

 

for $i = 1 to $powtorki_w_BUFF

 

if $ile_w_BUFF = "2" then

MouseClick("right", 50, 85)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 120)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

elseif $ile_w_BUFF = "3" then

MouseClick("right", 50, 85)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 120)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 155)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

elseif $ile_w_BUFF = "4" then

MouseClick("right", 50, 85)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 120)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 155)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 190)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

elseif $ile_w_BUFF = "5" then

MouseClick("right", 50, 85)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 120)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 155)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 190)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 225)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

elseif $ile_w_BUFF = "6" then

MouseClick("right", 50, 85)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 120)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 155)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 190)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 225)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 260)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

elseif $ile_w_BUFF = "7" then

MouseClick("right", 50, 85)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 120)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 155)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 190)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 225)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 260)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 295)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

elseif $ile_w_BUFF = "8" then

MouseClick("right", 50, 85)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 120)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 155)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 190)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 225)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 260)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 295)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

MouseClick("right", 50, 330)

Send("1")

Sleep(3000)

Send("2")

Sleep(3000)

Send("3")

Sleep(3000)

endif

 

next

 

endfunc

 

Daje grubego plusa za dobra podpowiedz

Administrator Priv-Crafting

admh.png

 

Administrator GCraftt

Administrator TheEscape

RobeM Arcymistrz

RobeM

Opublikowano
Arcymistrz

RobeM

Opublikowano

chce wyswietlic chyba cos na kształt logo czy informacj o programie, ze jest autorem itp bzdety

If you = stupid then

insert(foot.in.your.ass)

end if

licznik-54-96732-stat.png

arturkup.... Specjalista

arturkup....

Opublikowano
Specjalista

arturkup....

  • Autor
Opublikowano

Tak dokładnie chodzi mi aby chwile przed właczeniem programu pokazał sie jakis obrazek (logo)

Administrator Priv-Crafting

admh.png

 

Administrator GCraftt

Administrator TheEscape

RobeM Arcymistrz

RobeM

Opublikowano
Arcymistrz

RobeM

Opublikowano

wyższa szkoła jazdy , ja głownie loga czy pop-up dorabiam do programów autorskich

 

jest code wizard w SciTE od tego albo pomysłowośc :)

 

Luknij na demo

To jest ukryta treść, proszę

If you = stupid then

insert(foot.in.your.ass)

end if

licznik-54-96732-stat.png

arturkup.... Specjalista

arturkup....

Opublikowano
Specjalista

arturkup....

  • Autor
Opublikowano

Mi sie wdaje ze gdzies na forum był skrypt który wyswietla logo przed włączeniem sie programu.Ale masz + za checi

Administrator Priv-Crafting

admh.png

 

Administrator GCraftt

Administrator TheEscape

RobeM Arcymistrz

RobeM

Opublikowano
Arcymistrz

RobeM

Opublikowano

zwykły pop-up , Code Wizard je robi , program masz w SciTE

If you = stupid then

insert(foot.in.your.ass)

end if

licznik-54-96732-stat.png

dziób tukana Budowniczy

dziób tukana

Opublikowano
Budowniczy

dziób tukana

Opublikowano

funkcja nazywa sie SplashImageOn

To jest ukryta treść, proszę

 

a już tak bardziej oftopowo.

jak zrzynasz jakiś prosty przykład i podpisujesz go jako swój imieniem nazwiskiem i fotografią rodzinną to wybieraj dobrą wersje bo sie inni po tobie będą sugerować złym przykładem

 

zamiast z postu 7 użyj albo tego z 6 albo z 8

http://www.mpcforum.pl/topic/100754-prosze-o-pomoc-w-autoit/

Gość
Ten temat został zamknięty. Brak możliwości dodania odpowiedzi.
 Udostępnij
Tematy
×
×
  • Dodaj nową pozycję...