Úklid regů v batohu

Vaše problémy, rady a skripty týkající se tohoto prográmku
Odpovědět
Dondor
Inkless
Inkless
Příspěvky: 29
Registrován: 08.09.2006 00:28:13
Kontaktovat uživatele:

Úklid regů v batohu

Příspěvek od Dondor »

Edit: Pro nově příchozí: Tak tohle byl původně topic o skriptu, kterým se přesunou všechny možný regy všude možně poházený v batohu do nějakého pytlíku. K tomu se tu objevily nějaký alternativy. JENŽE. Pak se tu páni skripteři porafali, pan moderátor z toho kus poslal do Pokecu a výsledný topic nedává moc smysl. Tak si to, milý čtenáři, užij :-)
/Edit


Jiná možnost, jak udržet pořádek v looterově batohu, je namést na začátku dungu všechny regy do jednoho rohu báglu a ty nově lootlé se budou samy uklízet rovnou na ně:

Kód: Vybrat vše

sub RegBroom()
   For var reg = 0x0F78 to 0x0F91
      UO.FindType(reg, -1, "backpack")
      If UO.FindCount() Then
         UO.MoveItem("finditem", -1, "backpack", 30, 140,0)
         Wait(500)
      EndIf
   Next
end sub
Edit2: Skript není odolný proti WorldSave. Přijde-li WS, je nutné skript manuálně přerušit.
Naposledy upravil(a) Dondor dne 26.08.2007 00:15:26, celkem upraveno 1 x.
Carda
Elder Letter
Elder Letter
Příspěvky: 211
Registrován: 07.09.2006 19:12:48

Příspěvek od Carda »

Pak ale nedoporučuju nešikovně umírat :p
http://dl.dropbox.com/u/36197238/Phoenix/Phoenix.Scripts.DP.7z
Jakub Bohem
Orc Writer
Orc Writer
Příspěvky: 77
Registrován: 26.09.2006 20:02:13
Kontaktovat uživatele:

Příspěvek od Jakub Bohem »

dokazes to udelat i tak abych vybral pitlik a nahazelo to do nej
Uživatelský avatar
Encore
Book Snake
Book Snake
Příspěvky: 81
Registrován: 07.09.2006 20:33:16
Kontaktovat uživatele:

Příspěvek od Encore »

Kód: Vybrat vše

sub RegPresun()
UO.AddObject("regpack")
while UO.Targeting()
   wait(200)
wend
   For var reg = 0x0F78 to 0x0F91
      UO.FindType(reg, -1, "backpack")
      If UO.FindCount() Then
         UO.MoveItem("finditem", -1, "regpack")
         Wait(500)
      EndIf
   Next
end sub
Přepisoval jsem to narychlo tady na fóru, ani jsem to nezkoušel, tak za případné chyby se omlouvám.
Thunder is good, thunder is impressive; but it is lightning that does all the work.

[url=http://www.theitcrowd.cz/tricka/]RTFM[/url]
[b][url=http://www.temnyhaj.yw.sk]Komixy ze světa UO, každý týden nový.[/url][/b]
Carda
Elder Letter
Elder Letter
Příspěvky: 211
Registrován: 07.09.2006 19:12:48

Příspěvek od Carda »

Jn, todle mi právě připadá dost silně nepraktický, dycky na ten pytlík klikat :p
http://dl.dropbox.com/u/36197238/Phoenix/Phoenix.Scripts.DP.7z
Uživatelský avatar
Encore
Book Snake
Book Snake
Příspěvky: 81
Registrován: 07.09.2006 20:33:16
Kontaktovat uživatele:

Příspěvek od Encore »

Pravda...
Takže jinak:

Kód: Vybrat vše

sub zadej_regpack()
UO.AddObject("regpack")
while UO.Targeting()
   wait(200)
wend
end sub

Kód: Vybrat vše

sub RegPresun()
   For var reg = 0x0F78 to 0x0F91
      UO.FindType(reg, -1, "backpack")
      If UO.FindCount() Then
         UO.MoveItem("finditem", -1, "regpack")
         Wait(500)
      EndIf
   Next
end sub
Na začátku výpravy (nebo bohužel po každém pádu klienta) zapneš jenou script zadej_regpack a zaměříš jím batoh, do kterého přesouvat regy. A potom už jenom zapínáš script RegPresun.

BTW: Nezapínejte ho po lootnutí každé mrtvoly, ale pouze párkrát za dung, jinak by změna systému lootu neměla moc velký smysl. :roll:

Edit: Oprava prvního scriptu - chyběl end sub.
Thunder is good, thunder is impressive; but it is lightning that does all the work.

[url=http://www.theitcrowd.cz/tricka/]RTFM[/url]
[b][url=http://www.temnyhaj.yw.sk]Komixy ze světa UO, každý týden nový.[/url][/b]
Uživatelský avatar
Encore
Book Snake
Book Snake
Příspěvky: 81
Registrován: 07.09.2006 20:33:16
Kontaktovat uživatele:

Příspěvek od Encore »

Mám pocit, že UO.Saveconfig() /případně ,saveconfig/ ukládá pouze nastavení Yoka (to co jde změnit na záložce Main apod.), nikoliv hodnoty proměnných ze hry/scriptu. Ale monžá se pletu, chtělo by to prozkoušet.
Thunder is good, thunder is impressive; but it is lightning that does all the work.

[url=http://www.theitcrowd.cz/tricka/]RTFM[/url]
[b][url=http://www.temnyhaj.yw.sk]Komixy ze světa UO, každý týden nový.[/url][/b]
Carda
Elder Letter
Elder Letter
Příspěvky: 211
Registrován: 07.09.2006 19:12:48

Příspěvek od Carda »

Encore: Ukládá i objekty.
http://dl.dropbox.com/u/36197238/Phoenix/Phoenix.Scripts.DP.7z
Uživatelský avatar
Wizzy
Evil League Of Evil
Příspěvky: 1437
Registrován: 07.09.2006 19:19:46
Kontaktovat uživatele:

Příspěvek od Wizzy »

Carda píše:Ukládá i objekty.
ty se ukladaj samy pokud hru vypnes standartne pres logout > X nebo jen X

mizej jen pri cc
Naposledy upravil(a) Wizzy dne 25.08.2007 11:02:17, celkem upraveno 1 x.
ICQ:242676139 | IRC: #dp

... Vision vs Speech test ...
Carda
Elder Letter
Elder Letter
Příspěvky: 211
Registrován: 07.09.2006 19:12:48

Příspěvek od Carda »

(tu byli nějaký blbosti)

Edit: Ale nevim, možná máš spešl edici yoka, nebo nějakýho super klienta nebo si prostě bůh, ale mě to teda při normální odlogu a vypnutí klienta (log out -> ok -> quit) objekty neukládá.
http://dl.dropbox.com/u/36197238/Phoenix/Phoenix.Scripts.DP.7z
Uživatelský avatar
Encore
Book Snake
Book Snake
Příspěvky: 81
Registrován: 07.09.2006 20:33:16
Kontaktovat uživatele:

Příspěvek od Encore »

To Carda: Vyzkoušeno, ,savegonfig ukládá i objekty.

To Wizzy: Samy se neukládaj, ani když použiješ logout. Taky vyzkoušeno na Yoku 505.18 a clientu 1.26.4b (a nevěřím, že 1.26.4a by tohle uměl, když to je záležitost spíš Yoka).

BTW: Cardo, co to je tady za Edity? :-D
Naposledy upravil(a) Encore dne 25.08.2007 11:16:17, celkem upraveno 1 x.
Thunder is good, thunder is impressive; but it is lightning that does all the work.

[url=http://www.theitcrowd.cz/tricka/]RTFM[/url]
[b][url=http://www.temnyhaj.yw.sk]Komixy ze světa UO, každý týden nový.[/url][/b]
Carda
Elder Letter
Elder Letter
Příspěvky: 211
Registrován: 07.09.2006 19:12:48

Příspěvek od Carda »

Aha.

Edit: Encore: Pozor postuješ tu úplně nejvíc "nedpfriendly" skripty, odnesou tě mimozemšťani a budou tě sondovat studenými nástroji po celém těle!

Btw. Aspoň vyzkoušíme jak sou modové aktivní, než to smažou no :p
http://dl.dropbox.com/u/36197238/Phoenix/Phoenix.Scripts.DP.7z
Uživatelský avatar
Wizzy
Evil League Of Evil
Příspěvky: 1437
Registrován: 07.09.2006 19:19:46
Kontaktovat uživatele:

Příspěvek od Wizzy »

Encore píše: To Wizzy: Samy se neukládaj, ani když použiješ logout. Taky vyzkoušeno na Yoku 505.18 a clientu 1.26.4b (a nevěřím, že 1.26.4a by tohle uměl, když to je záležitost spíš Yoka).
na tom samim se mi po logout > X a znovuspusteni klienta normalne ulozej a po nalogovani de v klidu ,useobject xxx


,addobject neco
logout > X
spusteni klienta > login
a ",useobject neco" funguje
ICQ:242676139 | IRC: #dp

... Vision vs Speech test ...
Uživatelský avatar
Encore
Book Snake
Book Snake
Příspěvky: 81
Registrován: 07.09.2006 20:33:16
Kontaktovat uživatele:

Příspěvek od Encore »

Ještě je otázka, jestli je Logout > Quit a Logout > X to samé.
U mě je vidět malá prodleva před zavřením okna, pokud použiju Quit, pokud použiju X tak zmizí hned.
Edited by Bluespace: Pročištěno, upraven název.
Thunder is good, thunder is impressive; but it is lightning that does all the work.

[url=http://www.theitcrowd.cz/tricka/]RTFM[/url]
[b][url=http://www.temnyhaj.yw.sk]Komixy ze světa UO, každý týden nový.[/url][/b]
Carda
Elder Letter
Elder Letter
Příspěvky: 211
Registrován: 07.09.2006 19:12:48

Příspěvek od Carda »

Encore píše:Ještě je otázka, jestli je Logout > Quit a Logout > X to samé.
Není no. Ono bych řekl, že standartnější je teda vypínat to přes quit a ne přes křížek. Proto je lepší použít uo.saveconfig. Bohužel Wizzyho způsob odlogu přes křížek je dle něj asi jedinej způsob -> on přeci musí mít pravdu!!!
Jinak, Wizzy pls, kterej skript z těhdle je lepčí (víc dp-odladěnej), abych ho mohl používat? :-(

Kód: Vybrat vše

sub Cleaner()
	var batoh = "0x4001E132"
	For var reg = 0x0F78 to 0x0F91
		UO.FindType(reg, -1, "backpack")
		If UO.FindCount() Then
			MoveItem("finditem", -1, batoh)
		EndIf
	Next
	UO.Print("Presunuto.")
end sub
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Sub MoveItem(what, quantity, to)
	var timeout = 10000
	var container = UO.ContainerOf(what)
	UO.MoveItem(what, quantity, to)
	Wait(500)
	While container == UO.ContainerOf(what) && timeout
		timeout = timeout - 100
		Wait(100)
	Wend
end sub

Kód: Vybrat vše

sub Cleaner()
	var batoh = "0x4001E132"
	UO.DeleteJournal()
	For var reg = 0x0F78 to 0x0F91
		UO.FindType(reg, -1, "backpack")
		If UO.FindCount() Then
			UO.MoveItem("finditem", -1, batoh)
			Wait(500)
			WS()
		EndIf
	Next
	UO.Print("Presunuto.")
end sub
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Sub WS()
	If UO.InJournal("World save has been initiated.") Then # nejsem si jistej jak ta hlaska je :-)
		UO.Print("SAVE!!!")
		UO.Click("self")
		Repeat
			Wait(100)
		Until UO.InJournal(UO.GetName("self"))
		UO.DeleteJournal()
	Endif
end sub

Kód: Vybrat vše

sub Cleaner()
	var batoh = "0x4001E132"
	UO.DeleteJournal()
	For var reg = 0x0F78 to 0x0F91
		UO.FindType(reg, -1, "backpack")
		If UO.FindCount() Then
			UO.MoveItem("finditem", -1, batoh)
			Wait(500)
			If UO.InJournal("World save has been initiated.") Then # nejsem si jistej jak ta hlaska je :-(
				UO.ShutdownWindows("force")
			Endif
		EndIf
	Next
	UO.Print("Presunuto.")
end sub
Prosím pomoc, todle nemám odkud zkopírovat no :-( A bez tvýho svolení si nedovolim nic takovýho použít :-(
http://dl.dropbox.com/u/36197238/Phoenix/Phoenix.Scripts.DP.7z
Uživatelský avatar
Drakulia
Book Snake
Book Snake
Příspěvky: 111
Registrován: 08.09.2006 19:13:37
Bydliště: Brittain, next2 East Bank
Kontaktovat uživatele:

Příspěvek od Drakulia »

Carda píše:...

Kód: Vybrat vše

UO.ShutdownWindows("force")
Tak to ten 3ti scriptik je v celku funny :)
Alkohol je nepřítel lidstva. Nepřátel se nelekejme a na množství nehleďme.

Nikdy neříkej, že něco nejde, protože se najde blbec, který neví, že to nejde a UDĚLÁ TO !!!
Uživatelský avatar
Tommy
Paper Elemental
Paper Elemental
Příspěvky: 319
Registrován: 24.10.2006 21:06:43

Příspěvek od Tommy »

Kód: Vybrat vše

sub Cleaner() 
   var batoh = "0x4001E132" 
   UO.DeleteJournal() 
   For var reg = 0x0F78 to 0x0F91 
      UO.FindType(reg, -1, "backpack") 
      If UO.FindCount() Then 
         UO.MoveItem("finditem", -1, batoh) 
         Wait(500) 
         If UO.InJournal("World save has been initiated.") Then # nejsem si jistej jak ta hlaska je :-( 
            UO.ShutdownWindows("force") 
         Endif 
      EndIf 
   Next 
   UO.Print("Presunuto.") 
end sub
Ty, cardo, a jak to že mě to vyplo počítač ? :(
Neberte život tak vážně, stejně z něj nevyváznete živí.
UO - Dark Paradise - YoutubeChannel
https://www.youtube.com/channel/UCDX--rk_wDwG-gYSUyOE_FA
Dante
Book Snake
Book Snake
Příspěvky: 104
Registrován: 07.09.2006 20:55:50
Kontaktovat uživatele:

Příspěvek od Dante »

Tommy píše:

Kód: Vybrat vše

sub Cleaner() 
   var batoh = "0x4001E132" 
   UO.DeleteJournal() 
   For var reg = 0x0F78 to 0x0F91 
      UO.FindType(reg, -1, "backpack") 
      If UO.FindCount() Then 
         UO.MoveItem("finditem", -1, batoh) 
         Wait(500) 
         If UO.InJournal("World save has been initiated.") Then # nejsem si jistej jak ta hlaska je :-( 
            UO.ShutdownWindows("force") 
         Endif 
      EndIf 
   Next 
   UO.Print("Presunuto.") 
end sub
Ty, cardo, a jak to že mě to vyplo počítač ? :(
viz drakuliov post ;)
Uživatelský avatar
Wizzy
Evil League Of Evil
Příspěvky: 1437
Registrován: 07.09.2006 19:19:46
Kontaktovat uživatele:

Příspěvek od Wizzy »

Carda píše:...
nebud furt urazenej :( prece te muj nazor vubec nezajima 8)
ICQ:242676139 | IRC: #dp

... Vision vs Speech test ...
Carda
Elder Letter
Elder Letter
Příspěvky: 211
Registrován: 07.09.2006 19:12:48

Příspěvek od Carda »

:-( Psal sem k tomu dodatek, že si mě trošku špatně pochopil, resp. myslel sem to trošku jinak, ale to bys musel nejdřív moje posty číst, než na ně odpovíš :p
Ten první skript je zároveň laguvzdornej (dyž se reg nestihne přesunout do 500ms, tak čeká dál), ale za save tam možná nějaký ty tři requesty pošle no. Druhej je jenom ošetřenej na ws a pauzne se. Třetí je speciálně pro Wizzyho :p
http://dl.dropbox.com/u/36197238/Phoenix/Phoenix.Scripts.DP.7z
Odpovědět