Jesteś tutaj

Do skryptu Sproxa na zaslone.

published by Anonim on sob., 2005-02-19 11:49

No wlasnie.
Czy daloby sie jakos zrobic by ten funkcjonalny skrypt

/alias {zz %1} {ob $1;/var Vchronie $1;/enablegroup {SproxZaslona}}

/action {Walczy z %2}{_
/var Vwrog $2;_
/var {Vwrog} {@Left($Vwrog, @Math(@Len($Vwrog)-1))};_
/macro {f1} {zaslon $Vchronie przed $Vwrog;przestan zaslaniac};_
/showme {@AnsiBold()@ForeYellow() F1 ====== >>> Zaslon $Vchronie przed $Vwrog @AnsiReset()};_
} {SproxZaslona}

/alias {#wyl_zas} {/disablegroup {SproxZaslona}

'sprzegal' sie z /showme { ZASLONILES TEGO - czyli tego ktorego wlasnie zaslonilismy?};_

Przy wiekszych bitwach byloby przydatne
Dzieki z gory :)

Forum:

Odpowiedz
1756 odsłon

Do skryptu Sproxa na zaslone.

Adres Submitted by Anonim on czw., 2005-02-24 11:11.

Skrypt nie dziala kiedy druzyna walczy z jednym wrogiem , a trzeba zaslonic przed innym. Przykladowo na golemach ten skrypt mi sie nie sprawdza, bo kogolwiek bym chcial zaslonic zaslonie przed pierwszym golemem. Daloby sie sie to troszke usprawnic ? ja neistety nie znam sie na tym.

Pozdrawiam

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Anonim on sob., 2005-03-19 22:11.

Witam,
nie wiem co sie dzieje?? czy juz nikt arkdiska nie uzywa? :(

Co do universalnej zaslony mam pomysl jednak narazie moje proby koncza sie dosc dziwnie - nie pisalem skryptow wczesniej i troche nie mam czasu aby kombinowac.
Jesli ktos ma pojecie jak to sie robi i moglby mi pomoc przy rozwoju skryptu prosze o odpowiedz

Pozdrawiam

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Arni on ndz., 2005-03-20 15:56.

A używałeś zasłony z Arkdiska 4.0.2 ? Ona Ci nie odpowiada?

Jeśli masz jakiś pomysł, to przedstaw go tutaj. Bo ja nie wiem, jak to zrobić, by mądrze wychwyciło np. ataki 4 NPC-ów na moją sześcioosobową drużynę, by wychwytywała np. jak ktoś z mojej drużyny zasłania kogoś innego przed NPC-em, jak jeden NPC wspiera drugiego w walce z moim sojusznikiem, jak przebija moją zasłonę na kogoś z mojej drużyny.
Daj mi pomysł, jak to zrobić, a ja Ci z uśmiechem na ustach oskryptuję.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Anonim on ndz., 2005-03-20 16:44.

Witam,
Jesli chodzi o zaslone z 4.0.2 u mnie nie dziala nic a nic.
Nic nie zmienialem no moze oprocz dodania w q.txt linii:

/calldll Reader Read {lokalne\q_tab.txt}
/calldll Reader Clean {lokalne\q_tab.txt}

no i paru prostych skryptow.
Nie wyskakuje mi okno z kondycja druzyny a przy dolaczaniu mam:

zapros xxx
Ok.
>
# Procedure not found.
Xxx dolacza do twojej druzyny.

Nie wiesz moze dlaczego tak jest albo co zmienic (?)

Co do tego skryptu widocznie nie pomyslalem o wszystkim, postaram sie w najblizszym czasie podsunac Ci pomysl.

Pozdrawiam

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Wodach on śr., 2005-05-04 15:34.

Co do skryptu na zaslony. Jak dziala ? czy wystarczy ze napisze zzXXX przed yyy i juz bedzie dzialac?

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by chlebik on pt., 2005-05-06 13:31.

Mi tesh nie dziela w ogole zaslanianie ze skryptu, ktory jest automatycznie dolaczany do Arkdiska. wyskakuje ten sam blad: "Dolacza do druzny... Procedure not found". Niech ktos napisze co i jak bo nie chce sie przenosic na MUSHa, gdzie skrypty na zaslone pierwszoligowe.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on pt., 2005-05-06 14:05.

A moglbys wkleic ten skrypt na strone? Moze moglbym zaradzic.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Arni on sob., 2005-05-07 00:06.

/action {%1 dolacza do druzyny} _
{_
/calldll Strings ItemAdd {Vdruzyna,"@Lower($1)"}_
}

Proste i logiczne. Powinno być AddItem zamiast ItemAdd :)

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by chlebik on sob., 2005-05-07 20:25.

U mnie w ogole te macra i insze nie dzialaja. Znaczy sie ostatnio polapalem, ze to uzywa dll'kow, a ja przy uruchamianiu arkdiska dostaje info, ze "Failed to load DLL". Co jest grane tak w ogole?

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on ndz., 2005-05-08 09:42.

Wykonaj komende /dll. Zobacz czy wsrod listy zaladowanych dll'ek znajduje sie Strings. Jesli nie ma to trzeba ja zaladowac komenda /loadlib Strings

Komunikat "Failed to load DLL" pojawia sie rowniez przy probach ponownego zaladowania dll'ki, ktora juz zostala zaladowana wczesniej.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by chlebik on ndz., 2005-05-08 12:04.

Kuling wrote:

Wykonaj komende /dll. Zobacz czy wsrod listy zaladowanych dll'ek znajduje sie Strings. Jesli nie ma to trzeba ja zaladowac komenda /loadlib Strings
Komunikat "Failed to load DLL" pojawia sie rowniez przy probach ponownego zaladowania dll'ki, ktora juz zostala zaladowana wczesniej.

Wykonalem komende i wsrod zaladowanych mam:

Arka
MMwin2
MiliSeconds
Pl
R
RawLog
Reader
SendSocket
Strings

Niby wszystko dziala i gra - mam najnowszego Arkdiska, wpisalem poprawki z ItemAdd i wciaz nic. Nawet sobie w pliku Q_Druzyna.txt zmienilem, ze zaslony nie wchodza na macro tylko na alias i absolutnie 0 reakcji (MUD nie odpowiada w sumie niczym), program tez nic nie wyswietla. Nie wiem moze to wazne - mam w swoich skryptach dopisany ten na zaslone podany kiedys na Twoim Necie (zp kogo kim), ale to chyba nie powinno miec wiekszego znaczenia. Pomozcie prosze bo o ile zaslona na aliasie sprawdza sie jak sie bije moby, to na walki w druzynach nie sprawdzi sie w ogole.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on ndz., 2005-05-08 13:19.

Ponawiam zatem prosbe sprzed kilku notek. Wklej skrypt na strone, bo nikt tutaj nie jest jasnowidzem. :)

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by chlebik on ndz., 2005-05-08 13:24.

Kuling wrote:

Ponawiam zatem prosbe sprzed kilku notek. Wklej skrypt na strone, bo nikt tutaj nie jest jasnowidzem. :)

To po prostu tresc pliku q_DRUZYNA.txt:


;---------------------------------------;
; Q_DRUZYNA.TXT
;   Oblusga druzyny
;
;  utworzony: 04-07-29
;  ostatnio: 04-11-03
;---------------------------------------;

; Zaslanianie na atak - uzywa dll'ki Pl do odmiany nazw.


;------- Opisy ------------------------
; Dolaczasz do druzyny xxx.
; xxx dolacza do twojej druzyny.
; xxx dolacza do druzyny yyy.
; Druzyne prowadzi yyy i oprocz ciebie sa w niej jeszcze: zzz.
; Druzyne prowadzi yyy i oprocz ciebie jest w niej jeszcze xxx.
; Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze xxx.
; Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: zzz.



;-------- Zmienna, w ktorej sa przechowywanie czlonkiowie druzyny
/var Vdruzyna {}

/action {^Druzyne prowadzi %1 i oprocz ciebie sa w niej jeszcze: %2} _
{_
	/var {Vdruzyna} {$1};_
	/var {tmp} {$2};_
	/calldll Strings Replace {tmp,"$tmp",", ",|};_
	/calldll Strings Replace {tmp,"$tmp"," i ",|};_
	/calldll Strings Replace {tmp,"$tmp",".",""};_
;	W Vdruzyna umieszczamy pelna liste
	/calldll Strings AddItem {Vdruzyna,"$tmp"};_
	/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Druzyne prowadzi %1 i oprocz ciebie jest w niej jeszcze %2} _
{_
	/var {Vdruzyna} {$1};_
	/var {tmp} {$2};_
	/calldll Strings Replace {tmp,"$tmp",".",""};_
	/calldll Strings Replace {tmp,"$tmp",".",""};_
;	W Vdruzyna umieszczamy pelna liste
	/calldll Strings AddItem {Vdruzyna,"$tmp"};_
	/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: %1} _
{_
	/var {Vdruzyna} {$1};_
	/calldll Strings Replace {Vdruzyna,"$Vdruzyna",", ","|"};_
	/calldll Strings Replace {Vdruzyna,"$Vdruzyna"," i ","|"};_
	/calldll Strings Replace {Vdruzyna,"$Vdruzyna",".",""};_
	/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze %1} _
{_
	/calldll Strings Replace {tmp,"$1",".",""};_
	/var {Vdruzyna} {@Lower($tmp)}_
}

; Trzeba uwzgledni tych, ktorzy juz wczesniej dolaczyli
/action {^Dolaczasz do druzyny %1.} {druzyna}


/action {%1 dolacza do twojej druzyny.} _
{_
	/calldll Strings AddItem {Vdruzyna,"@Lower($1)"}_
}

/action {%1 dolacza do druzyny} _
{_
	/calldll Strings AddItem {Vdruzyna,"@Lower($1)"}_
}

/empty druzynaZaslony
/var druzynaB {}
/empty zaslona

/loadlib Pl

/action {%1 atakuje %0.} _
{_
	/calldll Strings NumItems {count,"$Vdruzyna"};_
;tworzy liste odmienionych nazw czlonkow druzyny
	/empty druzynaB;_
	/loop {1,$count} {_
		/calldll Strings Item {tmp,"$Vdruzyna",$LoopCount};_
		/calldll Pl Odmien {tmp,d};_
		/calldll Strings AddItem {druzynaB,"$tmp"}_
	};_
; sprawdza czy $0 nalezy do druzyny
	/calldll Strings IsMember {tmp,"$druzynaB",$0};_
	/if ($tmp!=0) {_
		/calldll Pl Odmien {zaslona,@Lower($1),n};_
		/var zaslona {zaslon $0 przed $zaslona};_
		/calldll Strings IsMember {tmp,"$druzynaZaslony",$zaslona};_
		/if ($tmp=0) {_
			/calldll Strings AddItem {druzynaZaslony,$zaslona};_
			/calldll Strings Unique {druzynaZaslony};_
		};_
		/calldll Strings NumItems {tmp,"$druzynaZaslony"};_
; usuwamy pierwszy element, jezeli przekroczylismy limit
		/if ($tmp>3) {/calldll Strings Pop {tmp,druzynaZaslony}};_
		/calldll Strings IsMember {tmp,"$druzynaZaslony",$zaslona};_
		/sh {@AnsiBold()@ForeWhite()@BackBlue()CTRL+ $tmp - $zaslona}_
	}_
}

/alias {test} {/trig Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: Rama i Val.;/trig Gremlin atakuje 

rame.}

/macro {c1} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",1};_
	/if (@Len($tmp)>0) {$tmp}_
}

/macro {c2} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",2};_
	/if (@Len($tmp)>0) {$tmp}_
}

/macro {c3} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",3};_
	/if (@Len($tmp)>0) {$tmp}_
}

Sorki za lame, ale rzucilem babranie sie skryptami po pojsciu na studia i teraz chce sobie tylko czasem poexpic grzecznie :)

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on ndz., 2005-05-08 14:07.

Poprawilem troche ten skrypt. Byly na pewno 2 bledy. Nie wiem czy nie wiecej. Ale tak to jest z wersjami beta. Aha. Testowalem to tylko na lokalnym kompie. Nie mam mozliwosci sprawdzic tego na Arkadii.

;---------------------------------------;
; Q_DRUZYNA.TXT
;   Obsluga druzyny
;
;  utworzony: 2004-07-29
;  ostatnio: 2004-11-03
;  ostatnio: 2005-05-08, Kuling, 
;	Zamiana dopelniacza na biernik /calldll Pl Odmien {tmp,b};_
;	/calldll Strings IsMember {tmp,"$druzynaB",@Lower($0)};_
;
;---------------------------------------;

; Zaslanianie na atak - uzywa dll'ki Pl do odmiany nazw.


;------- Opisy ------------------------
; Dolaczasz do druzyny xxx.
; xxx dolacza do twojej druzyny.
; xxx dolacza do druzyny yyy.
; Druzyne prowadzi yyy i oprocz ciebie sa w niej jeszcze: zzz.
; Druzyne prowadzi yyy i oprocz ciebie jest w niej jeszcze xxx.
; Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze xxx.
; Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: zzz.



;-------- Zmienna, w ktorej sa przechowywanie czlonkiowie druzyny
/var Vdruzyna {}

/action {^Druzyne prowadzi %1 i oprocz ciebie sa w niej jeszcze: %2} _
{_
	/var {Vdruzyna} {$1};_
	/var {tmp} {$2};_
	/calldll Strings Replace {tmp,"$tmp",", ",|};_
	/calldll Strings Replace {tmp,"$tmp"," i ",|};_
	/calldll Strings Replace {tmp,"$tmp",".",""};_
;	W Vdruzyna umieszczamy pelna liste
	/calldll Strings AddItem {Vdruzyna,"$tmp"};_
	/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Druzyne prowadzi %1 i oprocz ciebie jest w niej jeszcze %2} _
{_
	/var {Vdruzyna} {$1};_
	/var {tmp} {$2};_
	/calldll Strings Replace {tmp,"$tmp",".",""};_
	/calldll Strings Replace {tmp,"$tmp",".",""};_
;	W Vdruzyna umieszczamy pelna liste
	/calldll Strings AddItem {Vdruzyna,"$tmp"};_
	/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: %1} _
{_
	/var {Vdruzyna} {$1};_
	/calldll Strings Replace {Vdruzyna,"$Vdruzyna",", ","|"};_
	/calldll Strings Replace {Vdruzyna,"$Vdruzyna"," i ","|"};_
	/calldll Strings Replace {Vdruzyna,"$Vdruzyna",".",""};_
	/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze %1} _
{_
	/calldll Strings Replace {tmp,"$1",".",""};_
	/var {Vdruzyna} {@Lower($tmp)}_
}

; Trzeba uwzgledni tych, ktorzy juz wczesniej dolaczyli
/action {^Dolaczasz do druzyny %1.} {druzyna}


/action {%1 dolacza do twojej druzyny.} _
{_
	/calldll Strings AddItem {Vdruzyna,"@Lower($1)"}_
}

/action {%1 dolacza do druzyny} _
{_
	/calldll Strings AddItem {Vdruzyna,"@Lower($1)"}_
}

/empty druzynaZaslony
/var druzynaB {}
/empty zaslona

/loadlib Pl

/action {%1 atakuje %0.} _
{_
	/calldll Strings NumItems {count,"$Vdruzyna"};_
;tworzy liste odmienionych nazw czlonkow druzyny
	/empty druzynaB;_
	/loop {1,$count} {_
		/calldll Strings Item {tmp,"$Vdruzyna",$LoopCount};_
		/calldll Pl Odmien {tmp,b};_
		/calldll Strings AddItem {druzynaB,"$tmp"}_
	};_
; sprawdza czy $0 nalezy do druzyny
	/calldll Strings IsMember {tmp,"$druzynaB",@Lower($0)};_
	/if ($tmp!=0) {_
		/calldll Pl Odmien {zaslona,@Lower($1),n};_
		/var zaslona {zaslon $0 przed $zaslona};_
		/calldll Strings IsMember {tmp,"$druzynaZaslony",$zaslona};_
		/if ($tmp=0) {_
			/calldll Strings AddItem {druzynaZaslony,$zaslona};_
			/calldll Strings Unique {druzynaZaslony};_
		};_
		/calldll Strings NumItems {tmp,"$druzynaZaslony"};_
; usuwamy pierwszy element, jezeli przekroczylismy limit
		/if ($tmp>3) {/calldll Strings Pop {tmp,druzynaZaslony}};_
		/calldll Strings IsMember {tmp,"$druzynaZaslony",$zaslona};_
		/sh {@AnsiBold()@ForeWhite()@BackBlue()CTRL+ $tmp - $zaslona}_
	}_
}

/alias {test} {/trig Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: Rama, Val i maly krzaczasty gnom.}
/alias {test1} {/trig Gremlin atakuje Rame.}
/alias {test2} {/trig Gremlin atakuje Val.}
/alias {test3} {/trig Gremlin atakuje malego krzaczastego gnoma.}

/macro {c1} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",1};_
	/if (@Len($tmp)>0) {$tmp}_
}

/macro {c2} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",2};_
	/if (@Len($tmp)>0) {$tmp}_
}

/macro {c3} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",3};_
	/if (@Len($tmp)>0) {$tmp}_
}

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by chlebik on pon., 2005-05-09 01:08.

Kuling wrote:

Poprawilem troche ten skrypt. Byly na pewno 2 bledy. Nie wiem czy nie wiecej. Ale tak to jest z wersjami beta. Aha. Testowalem to tylko na lokalnym kompie. Nie mam mozliwosci sprawdzic tego na Arkadii.

Znaczy sie 2 bledy zlokalizowalem i jeszcze jedna literowke w czesci poswieconej zaslanianiu (zmiana literki, chyba z "d" na "b"). I w sumie jak do mnie ktos przystepuje to i owszem - klient nic nie wyswietla niby wszystko OK. Natomiast kiedy jako prowadzacy wpisze "druzyna" wowczas dostaje komunikat:

Strings: Bad parameter. Must be {<result variable>,[text],<pattern>,<sub text>}

Domyslam sie, ze to gdzies czegos nie ma, badz mala literowka. Widac progres Kuling jak sprawisz by to dzialalo to stawiam browara.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on pon., 2005-05-09 08:17.

A moglbys wkleic loga z tego zdarzenia. W zasadzie tylko linijki pojawiajaca sie po wywylaniu komendy 'druzyna'? Zle sie triger wywoluje, moze to z powodu specyficznych warunkow.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by chlebik on pon., 2005-05-09 10:43.

Oto pociewty log z sytuacji. Wzialem kumpla zoltka na bicie snotow:

zapros XXX
Ok.
> XXX dolacza do twojej druzyny.
ps
Przedstawiasz sie wszystkim.

Tutaj sobie idziemy po Kreutz wszystko OK, dochodzimy pod jaskinie

> Dziecinny kedzierzawowlosy snotling dlubie sobie w nosie, starajac sie cos z niego wydobyc. Pomaga w tym sobie sporej wielkosci drewniana lyzka.
otworz plecak
opusc nadziak
wloz nadziak do plecaka
Szary skorzany plecak juz jest otwarty.
> Opuszczasz zakrzywiony okuty nadziak.
> Wkladasz zakrzywiony okuty nadziak do otwartego szarego skorzanego plecaka.
> XXX atakuje dziecinnego kedzierzawowlosego snotlinga.
Dziecinny kedzierzawowlosy snotling krzyczy: Pomocy, Bija!!
Dziecinny kedzierzawowlosy snotling ledwo muska XXX poszczerbionym krzywym nozem, trafiajac go w korpus.
XXX powaznie rani dziecinnego kedzierzawowlosego snotlinga lewa stopa,
trafiajac go w lewe ramie.
Dziecinny kedzierzawowlosy snotling ledwo muska XXX poszczerbionym krzywym nozem, trafiajac go w korpus.
Dziecinny kedzierzawowlosy snotling ledwo muska XXX poszczerbionym krzywym nozem, trafiajac go w korpus.

> druzyna
Strings: Bad parameters. Must be {<result variable>,[text],<pattern>,<sub text>}
.
Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze XXX.
> Dziecinny kedzierzawowlosy snotling ledwo muska XXX poszczerbionym krzywym nozem, trafiajac go w nogi.
XXX rani dziecinnego kedzierzawowlosego snotlinga prawa piescia, trafiajac go w nogi.
XXX rani dziecinnego kedzierzawowlosego snotlinga lewa piescia, trafiajac go w nogi.
Nagle dziecinny kedzierzawowlosy snotling wykonuje zamaszysty cios
poszczerbionym krzywym nozem celujac w glowe XXX i trafia go lekko,
pozostawiajac niewielka rane!
XXX powaznie rani dziecinnego kedzierzawowlosego snotlinga prawa piescia, trafiajac go w korpus.
XXX powaznie rani dziecinnego kedzierzawowlosego snotlinga lewa piescia, trafiajac go w nogi.
Dziecinny kedzierzawowlosy snotling w panice wybiega na poludniowy-wschod.

Oczywiscie on mi sie przedstawil, a ja jemu. Jak widac z loga ja nie bilem, gdyz chcialem po prostu zobaczyc czy dziala, a snota bysmy ubili szybko :) Jezeli to wazne to wybiore sie i bede wspieral, ale to chyba na cos silniejszego bede musial isc. Odpisze po poludniu.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on pon., 2005-05-09 11:24.

;---------------------------------------;
; Q_DRUZYNA.TXT
;   Obsluga druzyny
;
;  utworzony: 2004-07-29
;  ostatnio: 2004-11-03
;  ostatnio: 2005-05-08, Kuling, 
;	Zamiana dopelniacza na biernik /calldll Pl Odmien {tmp,b};_
;	/calldll Strings IsMember {tmp,"$druzynaB",@Lower($0)};_
;  ostatnio: 2005-05-09, Kuling, 
;     Zmiana triggera dla w sytuacjach gdy druzyna jest dwuosobowa.
;
;---------------------------------------;

; Zaslanianie na atak - uzywa dll'ki Pl do odmiany nazw.


;------- Opisy ------------------------
; Dolaczasz do druzyny xxx.
; xxx dolacza do twojej druzyny.
; xxx dolacza do druzyny yyy.
; Druzyne prowadzi yyy i oprocz ciebie sa w niej jeszcze: zzz.
; Druzyne prowadzi yyy i oprocz ciebie jest w niej jeszcze xxx.
; Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze xxx.
; Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: zzz.



;-------- Zmienna, w ktorej sa przechowywanie czlonkiowie druzyny
/var Vdruzyna {}

/action {^Druzyne prowadzi %1 i oprocz ciebie sa w niej jeszcze: %2} _
{_
	/var {Vdruzyna} {$1};_
	/var {tmp} {$2};_
	/calldll Strings Replace {tmp,"$tmp",", ",|};_
	/calldll Strings Replace {tmp,"$tmp"," i ",|};_
	/calldll Strings Replace {tmp,"$tmp",".",""};_
;	W Vdruzyna umieszczamy pelna liste
	/calldll Strings AddItem {Vdruzyna,"$tmp"};_
	/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Druzyne prowadzi %1 i oprocz ciebie jest w niej jeszcze %2} _
{_
	/var {Vdruzyna} {$1};_
	/var {tmp} {$2};_
	/calldll Strings Replace {tmp,"$tmp",".",""};_
	/calldll Strings Replace {tmp,"$tmp",".",""};_
;	W Vdruzyna umieszczamy pelna liste
	/calldll Strings AddItem {Vdruzyna,"$tmp"};_
	/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: %1} _
{_
	/var {Vdruzyna} {$1};_
	/calldll Strings Replace {Vdruzyna,"$Vdruzyna",", ","|"};_
	/calldll Strings Replace {Vdruzyna,"$Vdruzyna"," i ","|"};_
	/calldll Strings Replace {Vdruzyna,"$Vdruzyna",".",""};_
	/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze %1.} _
{_
	/var {Vdruzyna} {@Lower($1)}_
}

; Trzeba uwzgledni tych, ktorzy juz wczesniej dolaczyli
/action {^Dolaczasz do druzyny %1.} {druzyna}


/action {%1 dolacza do twojej druzyny.} _
{_
	/calldll Strings AddItem {Vdruzyna,"@Lower($1)"}_
}

/action {%1 dolacza do druzyny} _
{_
	/calldll Strings AddItem {Vdruzyna,"@Lower($1)"}_
}

/empty druzynaZaslony
/var druzynaB {}
/empty zaslona

/loadlib Pl

/action {%1 atakuje %0.} _
{_
	/calldll Strings NumItems {count,"$Vdruzyna"};_
;tworzy liste odmienionych nazw czlonkow druzyny
	/empty druzynaB;_
	/loop {1,$count} {_
		/calldll Strings Item {tmp,"$Vdruzyna",$LoopCount};_
		/calldll Pl Odmien {tmp,b};_
		/calldll Strings AddItem {druzynaB,"$tmp"}_
	};_
; sprawdza czy $0 nalezy do druzyny
	/calldll Strings IsMember {tmp,"$druzynaB",@Lower($0)};_
	/if ($tmp!=0) {_
		/calldll Pl Odmien {zaslona,@Lower($1),n};_
		/var zaslona {zaslon $0 przed $zaslona};_
		/calldll Strings IsMember {tmp,"$druzynaZaslony",$zaslona};_
		/if ($tmp=0) {_
			/calldll Strings AddItem {druzynaZaslony,$zaslona};_
			/calldll Strings Unique {druzynaZaslony};_
		};_
		/calldll Strings NumItems {tmp,"$druzynaZaslony"};_
; usuwamy pierwszy element, jezeli przekroczylismy limit
		/if ($tmp>3) {/calldll Strings Pop {tmp,druzynaZaslony}};_
		/calldll Strings IsMember {tmp,"$druzynaZaslony",$zaslona};_
		/sh {@AnsiBold()@ForeWhite()@BackBlue()CTRL+ $tmp - $zaslona}_
	}_
}

/alias {testm} {/trig Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: Rama, Val i maly krzaczasty gnom.;/var Vdruzyna}
/alias {testp} {/trig Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze XXX.;/var Vdruzyna}
/alias {test1} {/trig Gremlin atakuje Rame.}
/alias {test2} {/trig Gremlin atakuje Val.}
/alias {test3} {/trig Gremlin atakuje malego krzaczastego gnoma.}
/alias {test1} {/trig Gremlin atakuje XXX.}

/macro {c1} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",1};_
	/if (@Len($tmp)>0) {$tmp}_
}

/macro {c2} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",2};_
	/if (@Len($tmp)>0) {$tmp}_
}

/macro {c3} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",3};_
	/if (@Len($tmp)>0) {$tmp}_
}

Poprawilem jedynie triga

Cytat:

/action {^Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze %1}

Bedzie lepiej. :)

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by chlebik on pon., 2005-05-09 11:56.

Cytat:

Poprawilem jedynie triga
Cytat:
/action {^Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze %1}

Bedzie lepiej. :)

Albo mi sie wydaje, albo nie masz triga na Dolaczasz do druzyny XXX i jestes jej jedynym czlonkiem Natomiast co do poprawek - zmienilem ten trig - komunikatu o bledzie przy przystepowaniu kolesia nie ma, ale macra wciaz nie dzialaja.

Czy tylko ja mam taki problem, a u innych dziala, czy jest to blad u kazdego?

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on pon., 2005-05-09 12:01.

To, ze macro sie nie dodaje moze byc spowodowane brakiem odmiany XXX. U mnie testy daly rade dla XXX. Nie wiem jak z prawdziwym imieniem.

Jesli wywolasz komende /var Vdruzyna to zobaczysz liste osob w druzynie. Jesli /var druzynaB to liste odmienionych imion w bierniku. Warto sprawdzic obie wartosci.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by chlebik on pon., 2005-05-09 12:05.

Kuling wrote:

To, ze macro sie nie dodaje moze byc spowodowane brakiem odmiany XXX. U mnie testy daly rade dla XXX. Nie wiem jak z prawdziwym imieniem.

W takim razie musisz sie chyba pobawic :) Zapytam tez mozgow MudMastera z TN - Sproxa i Rythina, moze oni cos wstukali lepszego i dzialajacego. A na razie trzeba leciec na te chrzaniona uczelnie :(

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on pon., 2005-05-09 12:09.

Idz sobie idz :) Od tygodnia siedze do 20 w robocie wiec rozrywki mi nie brakuje :P

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Arni on pon., 2005-05-09 14:36.

A ze Sproxem i Rythinem to trafiłeś jak kulą w płot, bo o ile mi wiadomo, to oni już się arkdiskiem nie zajmują, a tej biblioteki to pewnie nawet nie znaja :>

Poza tym błąd jest w tej linijce

/calldll Strings Replace {Vdruzyna,"$Vdruzyna",".",""};

Nie mozna zamienić czegoś na "pusty znak"

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by chlebik on pon., 2005-05-09 16:30.

Arni wrote:

A ze Sproxem i Rythinem to trafiłeś jak kulą w płot, bo o ile mi wiadomo, to oni już się arkdiskiem nie zajmują, a tej biblioteki to pewnie nawet nie znaja :>

Szkoda. Kiedy wywoluje zmienna /var Vdruzyna to pojawia sie mi sie cos takiego:

{Vdruzyna} {$Vdruzyna|imie czlonka druzyny} {}

natomiast przy /var druzynaB

# Defined variable:

Wnioskuje, ze ta zmienna w ogole nie istniala w momencie uruchomienia programu, albo tez ma wartosc nieokreslona (pusta).

Da sie cos z tym zrobic? Naprawde nie chce tracic 6 miechow przyzwyczajenia z graniem pod arkdiskiem. Do tej pory sie sprawdzalo jak bije sie spokojnie potworki, ale jak pojawiaja sie walki druzynowe wowczas bez bindow jest ciezko.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on pon., 2005-05-09 16:46.

I znow prosze o log.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by chlebik on pon., 2005-05-09 17:09.

Kuling wrote:

I znow prosze o log.

To jest log :) Wczesniej tylko do mnie dolaczyl i nic sie nie pojawilo (tzn. tylko komunikat arki wyskoczyl).

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by MistrzParadoksu on pon., 2005-05-30 02:08.

To mogly ktos podac ostateczny ksztalt tego skryptu i powiedziec jak uzywac tej zaslony?Bo zamieszanie straszne w tym topiku.Jest wogole ostateczny ksztalt?Dziala zaslona?Przynajmniej na mobki.Bede wdzieczny

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on pon., 2005-05-30 10:47.

"Prawie ostateczny" to ten wklejony w ostatnim poscie. Zawiera nadal bledy wiec jest wersja testowa. Nic nie stoi na przeszkodzie zeby troche sie nia pobawic, poprawic ewentualne bledy, albo zglosic je tutaj.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by zawi on śr., 2005-08-31 13:24.

Ja mam osobista prosbe. Wiele osob korzystajach np z zmuda ma skypt co widac na logach, ktory pozwala na super szybkie zaslony np
XX atakuje YYY
>>CTRL+! zaslon YYY przed XXX<< itp.
Czy dalo by sie zrobic cos takiego pod arkdisk i mm? dodam, ze korzystam ze starszego arkdiska 3.08 czy jakos tak. Ostatecznie zmienie jezeli ten skrypt dziala tylko na nowszym.
Z gory dziekuje za pomoc

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Arni on śr., 2005-08-31 16:57.

Czy dałoby się zrobić ? Pewnie by dało. Sęk w tym, że, jak widać, na tym forum pozostała jedna osoba, która od czasu do czasu pisze jakieś skrypty. A ja mam już tyle rzeczy naobiecanych, że więcej już nawet obiecywać nie będę.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by zawi on śr., 2005-08-31 17:59.

Rozumiem. Mimo to bylbym wdzieczny gdyby ktos zajrzal w kod albo wkleil cos wlasnego. Ten tutaj nie dziala w ogole, a ten zalaczony w najnowszym arkdisku 4.0.2 w pliku Q_DRUZYNA wyrzuca jakis blad przy braniu do druzyny ( no procedure cos tam).

powtórz

hm

Adres Submitted by zawi on czw., 2006-03-30 16:04.

Czy moze ktos w koncu zobaczyc jaki jest blad w tej zaslonie? jest wiele osob, ktore czekaja na ten skypt...

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on pt., 2006-03-31 09:13.

No mam juz troche wiecej czasu. Moglbys wyłuszczyć w czym jest dokładnie problem?

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by zawi on pt., 2006-03-31 23:06.

No problem jest taki, ze to w ogole nie dziala:) Jezeli masz czas Kulingu to przejrzyj ten skrypt i zobacz dlaczego to nie chodzi.

Dorzucam jeszcze tresc mojej poprzedniej notki:
Ja mam osobista prosbe. Wiele osob korzystajach np z zmuda ma skypt co widac na logach, ktory pozwala na super szybkie zaslony np
XX atakuje YYY
>>CTRL+! zaslon YYY przed XXX<< itp.
Czy dalo by sie zrobic cos takiego pod arkdisk i mm? dodam, ze korzystam ze starszego arkdiska 3.08 czy jakos tak. Ostatecznie zmienie jezeli ten skrypt dziala tylko na nowszym.
Z gory dziekuje za pomoc

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on pt., 2006-04-07 09:13.

Po analizie tego co mi przyslales moge powiedziec jedynie tyle, ze nie bardzo mialo to prawo zadzialac. Dll'ka pl nie odmienia imion wiec akcje w stylu "Goblin atakuje Denisa." nie dzialaja.

Ponadto bylo wywolanie /loadlib {Strings.dll} zamiast /loadlib {Strings}.

Innymi slowy nie da sie (albo za slabo sie wczytalem) tego przerobic bez zmiany dll'ki {Pl}.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by zawi on ndz., 2006-04-09 08:17.

A czy bylbys w stanie dokonac tych zmian w tej dllce? Bylbym bardzo wdzieczny.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by MistrzParadoksu on ndz., 2006-04-09 10:56.

To ja tez bylbym wdzieczny :D A tak powaznie to naprawde przydalyby sie te zaslony w koncu. Tylko nie ma sie kto tym zajac. Z roznych powodow :) Kuling jest jakas szansa?

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by zawi on ndz., 2006-04-09 16:51.

To napisal Sprox na temat dll na twoj necie:

"Ja sie tym bawilem.
Blad jest banalny ale nie dalem rady smile.gif
Powlaczalem wszedzie echo gdzie sie da.
Znalazlem blad, ale za slaby jestem smile.gif

Pamietam ze jedn blad to byla zwykla literowka w nazwie funkcji chyba

AB i BA nazwy czlonow zmienione.
A drugi problem byl z ifem.
Podczas sprawdzania czy osoba ktora chcemy zaslonic jest z naszej druzyny bral pod uwage imie z malej litery."

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on pon., 2006-04-10 08:42.

O ile dobrze zrozumialem to dll'ka PL robi odmiany automatycznie. Niestety jest caly szereg słów w tym imiona, ktorych odmienić nie można. Nie widze możliwości rozszerzenia bazy odmian w dll'ce bez jej fizycznej modyfikacji. Moge sie mylic, dokumentacja jest dość uboga.

Co do Spoxa, to sprobuje sie z nim skontaktowac i spytac co miał na mysli.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by zawi on pt., 2006-04-21 08:21.

Nowy problem za ktory mialem byc uduszony:)

Oto skrypt na zaslone, dziala po wpisanie zz np arga i wyskakuje mi w opisie F3 zaslon arga przed xxx

/alias {zz %1} {ob $1;/var Vchronie $1;/enablegroup {SproxZaslona}}
/action {Walczy z %2}{_
/var Vwrog $2;_
/var {Vwrog} {@Left($Vwrog, @Math(@Len($Vwrog)-1))};_
/macro {f3} {zaslon $Vchronie przed $Vwrog};_
/showme {@AnsiBold()@ForeYellow() F3 ====== >>> Zaslon $Vchronie przed $Vwrog @AnsiReset()};_
} {SproxZaslona}

/alias {#wyl_zas} {/disablegroup {SproxZaslona}

Autorem jest Sprox. Problem jest taki, ze gdy gracz walczy z innym graczem to skrypt dodaje imie wroga z duzej litery a arka zada z malej.
i np gdy Zool walczy z Argiem to ja pod F3 mam "zaslon zoola przed Argiem" a to musi byc wszystko z malych literek.

Drugi problem to to,ze skrypt wylapuje tylko 1 wroga. Czy mozliwe jest aby wprowadzic licznik i gdy Zooll walczy z 1 hobgobem, 2 i 3 hobgoem po zz zolla miec np ctrl+1 zaslon przed 1, ctrl +2 zaslon przed 2 itd??
Wiem, ze to pracochlonne dlatego prosze o pomoc wszystkich a nie tylko Mistrza K.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Kuling on pt., 2006-04-21 08:24.

Cytat:

Problem jest taki, ze gdy gracz walczy z innym graczem to skrypt dodaje imie wroga z duzej litery a arka zada z malej.
i np gdy Zool walczy z Argiem to ja pod F3 mam "zaslon zoola przed Argiem" a to musi byc wszystko z malych literek.

Jesli problemem jest niewlasciwa wielkosc liter w tekscie "zaslon zoola przed Argiem" to nalezy znalezc w skrypcie gdzie ten tekst jest tworzony.

Tworzony jest tutaj:
/macro {f3} {zaslon $Vchronie przed $Vwrog};

Nalezy zastosowac funkcje @Lower(), ktora powoduje, ze wszystko co przyjmie jako argument zamienia na male litery. Dodalem @Lower() w dwa miejsca, jedno to imie zaslaniajacego, drugie to zaslanianego.
Poprawiona linijka bedzie wygladac
/macro {f3} {zaslon @Lower($Vchronie) przed @Lower($Vwrog)};

A caly poprawny kod wyglada tak jak ponizej.

/alias {zz %1} {ob $1;/var Vchronie $1;/enablegroup {SproxZaslona}}
/action {Walczy z %2}{_
/var Vwrog $2;_
/var {Vwrog} {@Left($Vwrog, @Math(@Len($Vwrog)-1))};_
/macro {f3} {zaslon @Lower($Vchronie) przed @Lower($Vwrog)};_
/showme {@AnsiBold()@ForeYellow() F3 ====== >>> Zaslon $Vchronie przed $Vwrog @AnsiReset()};_
} {SproxZaslona}
/alias {#wyl_zas} {/disablegroup {SproxZaslona}

Na rozwiazanie drugiego problemu nie mam czasu.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by zawi on pt., 2006-04-21 19:16.

Bardzo dziekuje!!!

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by zawi on wt., 2006-05-09 23:50.

Czy ktos rozwiazal juz problem zaslon?

No i czy moglby ktos rozpoczac prace nad przebudowa Pl dll? bez tego skrypt Sproxa nie ruszy :(

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by zawi on sob., 2006-05-13 03:04.

Sprox poparwil skrypt i musze potwierdziec bo sam testowalem, ze DZIALA!
Jest tylko problem z bidowaniem wrogow. Na poczatku daje ich po koleii ctrl+1, 2 a pozniej juz tylko 3. Poza tym jest tez problem z odmiana imion niestandardowych. Jezeli ktos potrafi to prosze o pomoc.
Oto skrypt:

;---------------------------------------;
; Q_DRUZYNA.TXT
; Oblusga druzyny
;
; utworzony: 04-07-29
; ostatnio: 04-11-03
;---------------------------------------;

; Zaslanianie na atak - uzywa dll'ki Pl do odmiany nazw.
; Poprawial Sprox.

;------- Opisy ------------------------
; Dolaczasz do druzyny xxx.
; xxx dolacza do twojej druzyny.
; xxx dolacza do druzyny yyy.
; Druzyne prowadzi yyy i oprocz ciebie sa w niej jeszcze: zzz.
; Druzyne prowadzi yyy i oprocz ciebie jest w niej jeszcze xxx.
; Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze xxx.
; Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: zzz.
; Druzyne prowadzi Wilibald, zas ty jestes jej jedynym czlonkiem.

;-------- Zmienna, w ktorej sa przechowywanie czlonkiowie druzyny
/var Vdruzyna {}

/action {^Druzyne prowadzi %1 i oprocz ciebie sa w niej jeszcze: %2} _
{_
/var {Vdruzyna} {$1};_
/var {tmp} {$2};_
/calldll Strings Replace {tmp,"$tmp",", ",|};_
/calldll Strings Replace {tmp,"$tmp"," i ",|};_
/calldll Strings Replace {tmp,"$tmp",".",""};_
; W Vdruzyna umieszczamy pelna liste
/calldll Strings AddItem {Vdruzyna,"$tmp"};_
/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {Druzyne prowadzi %1, zas ty jestes jej jedynym czlonkiem} _
{_

/var {Vdruzyna} {@Lower($1)};_
}

/action {^Druzyne prowadzi %1 i oprocz ciebie jest w niej jeszcze %2} _
{_
/var {Vdruzyna} {$1};_
/var {tmp} {$2};_
/calldll Strings Replace {tmp,"$tmp",".",""};_
/calldll Strings Replace {tmp,"$tmp",".",""};_
; W Vdruzyna umieszczamy pelna liste
/calldll Strings AddItem {Vdruzyna,"$tmp"};_
/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: %1} _
{_
/var {Vdruzyna} {$1};_
/calldll Strings Replace {Vdruzyna,"$Vdruzyna",", ","|"};_
/calldll Strings Replace {Vdruzyna,"$Vdruzyna"," i ","|"};_
/calldll Strings Replace {Vdruzyna,"$Vdruzyna",".",""};_
/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze %1} _
{_
/var {tmp} {$1};_
/calldll Strings Replace {tmp,"$1",".",""};_
/var {Vdruzyna} {@Lower($tmp)};_
}

; Trzeba uwzgledni tych, ktorzy juz wczesniej dolaczyli
/action {^Dolaczasz do druzyny %1.} {druzyna}

/action {%1 dolacza do twojej druzyny.} _
{_
/calldll Strings AddItem {Vdruzyna,"@Lower($1)"};_
}

/action {%1 dolacza do druzyny} _
{_
/calldll Strings AddItem {Vdruzyna,"@Lower($1)"};_
}

/empty druzynaZaslony
/var druzynaB {}
/empty zaslona

/loadlib Pl

/action {%1 atakuje %0.} _
{_
/calldll Strings NumItems {count,"$Vdruzyna"};_
;tworzy liste odmienionych nazw czlonkow druzyny
/empty druzynaB;_
/loop {1,$count} {_
/calldll Strings Item {tmp,"$Vdruzyna",$LoopCount};_
/calldll Pl Odmien {tmp,d};_
/calldll Strings AddItem {druzynaB,"$tmp"}_
};_
/var {Vkogobije} {@Lower($0)};_
/var {ktoatakuje} {@Lower($1)};_

/calldll Strings IsMember {tmp,"$druzynaB",$Vkogobije};_
/showme {Jesli tu widzisz 0 to nie dziala zaslona na ta osobe -- > $tmp};_
/if ($tmp!=0) {_
/calldll Pl Odmien {zaslona,"$ktoatakuje",n};_
/var zaslona {zaslon @Lower($0) przed $zaslona};_
/calldll Strings IsMember {tmp,"$druzynaZaslony",$zaslona};_
/if ($tmp=0) {_
/calldll Strings AddItem {druzynaZaslony,$zaslona};_
/calldll Strings Unique {druzynaZaslony};_
};_

; ##########################################################
; TO JESZCZE TRZEBA NAPRAWIC.
; ##########################################################

/calldll Strings NumItems {tmp,"$druzynaZaslony"};_
; usuwamy pierwszy element, jezeli przekroczylismy limit
/if ($tmp>3) {/calldll Strings Pop {tmp,druzynaZaslony}};_
/calldll Strings IsMember {tmp,"$druzynaZaslony",$zaslona};_
/sh {@AnsiBold()@ForeWhite()@BackBlue()CTRL+ $tmp - $zaslona}_
}_
}

/macro {c1} {_
/calldll Strings Item {tmp,"$druzynaZaslony",1};_
/if (@Len($tmp)>0) {$tmp}_
}

/macro {c2} {_
/calldll Strings Item {tmp,"$druzynaZaslony",2};_
/if (@Len($tmp)>0) {$tmp}_
}

/macro {c3} {_
/calldll Strings Item {tmp,"$druzynaZaslony",3};_
/if (@Len($tmp)>0) {$tmp}_
}

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Achven on sob., 2006-05-13 11:17.

zawi wrote:

Sprox poparwil skrypt i musze potwierdziec bo sam testowalem, ze DZIALA!
Jest tylko problem z bidowaniem wrogow. Na poczatku daje ich po koleii ctrl+1, 2 a pozniej juz tylko 3. Poza tym jest tez problem z odmiana imion niestandardowych. Jezeli ktos potrafi to prosze o pomoc.
...

/macro {c1} {_
/calldll Strings Item {tmp,"$druzynaZaslony",1};_
/if (@Len($tmp)>0) {$tmp}_
}

/macro {c2} {_
/calldll Strings Item {tmp,"$druzynaZaslony",2};_
/if (@Len($tmp)>0) {$tmp}_
}

/macro {c3} {_
/calldll Strings Item {tmp,"$druzynaZaslony",3};_
/if (@Len($tmp)>0) {$tmp}_
}

Nie wiem czy Cie dobrze zrozumialem, czy o to chodzi?

/macro {c4} {_
/calldll Strings Item {tmp,"$druzynaZaslony",4};_
/if (@Len($tmp)>0 {$tmp}_
}
i tak az do {c0}- dziesiaty druzynnik.
Potem mozna jeszcze {a1}- jedenasty, {a2}- dwunasty... {a0}- dwudziesty
Tak na chlopski rozum jakby zastapic te macro aliasem, np. zamiast
/macro {c3} {_
/calldll Strings Item {tmp,"$druzynaZaslony",3};_
/if (@Len($tmp)>0) {$tmp}_
}
dac
/alias {3}... {11}... {111} itd. tez powinno dzialac

To co wkleiles to kompletny poprawiony skrypt Q_Druzyna?
Oczoplasu prawde mowiac dostalem probujac sie w tym polapac :).
Jesli nie, czy nie sprawilo by ci klopotu wklejenie kompletnego skryptu?
Bylbym Ci bardzo wdzieczny.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by zawi on ndz., 2006-05-14 09:51.

A oto najnowsza poprawiona wersja. Nadal ma problem z niektorymi imionami. Jezeli ktos ma pomysl na poprawe prosze pisac. No i zglaszajcie co nie dziala. Przypominam, po dolaczenie kogos lub jezeli to wy dolaczacie do druzyny wpiszcie "druzyna" !!!
Poza tym licznik zeruje sie sam, ale po 8 przeciwniku zaczyna od CTRL+0 i to niestety nie zadziala. Kolejny potwor jest juz CTRL+1 i juz dziala okej wszystko dalej.

;---------------------------------------;
; Q_DRUZYNA.TXT
; Obsluga druzyny
;
; utworzony: 04-07-29
; ostatnio: 13-05-2006
; Pozdro dla kaplicy Rh :P !
;---------------------------------------;

; Zaslanianie na atak - uzywa dll'ki Pl do odmiany nazw.
; Poprawial Sprox.

;------- Opisy ------------------------
; Dolaczasz do druzyny xxx.
; xxx dolacza do twojej druzyny.
; xxx dolacza do druzyny yyy.
; Druzyne prowadzi yyy i oprocz ciebie sa w niej jeszcze: zzz.
; Druzyne prowadzi yyy i oprocz ciebie jest w niej jeszcze xxx.
; Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze xxx.
; Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: zzz.
; Druzyne prowadzi xxx, zas ty jestes jej jedynym czlonkiem.

;-------- Zmienna, w ktorej sa przechowywanie czlonkiowie druzyny
/var Vdruzyna {}

/action {^Druzyne prowadzi %1 i oprocz ciebie sa w niej jeszcze: %2} _
{_
/var {Vdruzyna} {$1};_
/var {tmp} {$2};_
/calldll Strings Replace {tmp,"$tmp",", ",|};_
/calldll Strings Replace {tmp,"$tmp"," i ",|};_
/calldll Strings Replace {tmp,"$tmp",".",""};_
; W Vdruzyna umieszczamy pelna liste
/calldll Strings AddItem {Vdruzyna,"$tmp"};_
/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {Druzyne prowadzi %1, zas ty jestes jej jedynym czlonkiem} _
{_

/var {Vdruzyna} {@Lower($1)};_
}

/action {^Druzyne prowadzi %1 i oprocz ciebie jest w niej jeszcze %2} _
{_
/var {Vdruzyna} {$1};_
/var {tmp} {$2};_
/calldll Strings Replace {tmp,"$tmp",".",""};_
/calldll Strings Replace {tmp,"$tmp",".",""};_
; W Vdruzyna umieszczamy pelna liste
/calldll Strings AddItem {Vdruzyna,"$tmp"};_
/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: %1} _
{_
/var {Vdruzyna} {$1};_
/calldll Strings Replace {Vdruzyna,"$Vdruzyna",", ","|"};_
/calldll Strings Replace {Vdruzyna,"$Vdruzyna"," i ","|"};_
/calldll Strings Replace {Vdruzyna,"$Vdruzyna",".",""};_
/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze %1} _
{_
/var {tmp} {$1};_
/calldll Strings Replace {tmp,"$1",".",""};_
/var {Vdruzyna} {@Lower($tmp)};_
}

; Trzeba uwzgledni tych, ktorzy juz wczesniej dolaczyli
/action {^Dolaczasz do druzyny %1.} {druzyna}

/action {%1 dolacza do twojej druzyny.} _
{_
/calldll Strings AddItem {Vdruzyna,"@Lower($1)"};_
}

/action {%1 dolacza do druzyny} _
{_
/calldll Strings AddItem {Vdruzyna,"@Lower($1)"};_
}

/empty druzynaZaslony
/var druzynaB {}
/empty zaslona

/loadlib Pl

/action {%1 atakuje %0.} _
{_
/calldll Strings NumItems {count,"$Vdruzyna"};_
;tworzy liste odmienionych nazw czlonkow druzyny
/empty druzynaB;_
/loop {1,$count} {_
/calldll Strings Item {tmp,"$Vdruzyna",$LoopCount};_
/calldll Pl Odmien {tmp,d};_
/calldll Strings AddItem {druzynaB,"$tmp"}_
};_
/var {Vkogobije} {@Lower($0)};_
/var {ktoatakuje} {@Lower($1)};_

/calldll Strings IsMember {tmp,"$druzynaB",$Vkogobije};_
/showme {Jesli tu widzisz 0 to nie dziala zaslona na ta osobe -- > $tmp};_
/if ($tmp!=0) {_
/calldll Pl Odmien {zaslona,"$ktoatakuje",n};_
/var zaslona {zaslon @Lower($0) przed $zaslona};_
/calldll Strings IsMember {tmp,"$druzynaZaslony",$zaslona};_
/if ($tmp=0) {_
/calldll Strings AddItem {druzynaZaslony,$zaslona};_
/calldll Strings Unique {druzynaZaslony};_
};_

; ##########################################################
; TO JESZCZE TRZEBA NAPRAWIC.
; ##########################################################
/calldll Strings NumItems {tmp,"$druzynaZaslony"};_
/if ($tmp>9) {/calldll Strings Pop {tmp,druzynaZaslony,druzynaZaslony}};_
/calldll Strings IsMember {tmp,"$druzynaZaslony",$zaslona};_
/sh {@AnsiBold()@ForeWhite()@BackBlue()CTRL+ $tmp - $zaslona}_
}_
}

/macro {c1} {_
/calldll Strings Item {tmp,"$druzynaZaslony",1};_
/if (@Len($tmp)>0) {$tmp}_
}

/macro {c2} {_
/calldll Strings Item {tmp,"$druzynaZaslony",2};_
/if (@Len($tmp)>0) {$tmp}_
}

/macro {c3} {_
/calldll Strings Item {tmp,"$druzynaZaslony",3};_
/if (@Len($tmp)>0) {$tmp}_

}

/macro {c4} {_
/calldll Strings Item {tmp,"$druzynaZaslony",4};_
/if (@Len($tmp)>0) {$tmp}_
}

/macro {c5} {_
/calldll Strings Item {tmp,"$druzynaZaslony",5};_
/if (@Len($tmp)>0) {$tmp}_
}

/macro {c6} {_
/calldll Strings Item {tmp,"$druzynaZaslony",6};_
/if (@Len($tmp)>0) {$tmp}_
}

/macro {c7} {_
/calldll Strings Item {tmp,"$druzynaZaslony",7};_
/if (@Len($tmp)>0) {$tmp}_
}

/macro {c8} {_
/calldll Strings Item {tmp,"$druzynaZaslony",8};_
/if (@Len($tmp)>0) {$tmp}_
}
/macro {c9} {_
/calldll Strings Item {tmp,"$druzynaZaslony",9};_
/if (@Len($tmp)>0) {$tmp}_
}

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by EmCek on ndz., 2006-05-14 23:32.

Witam, tu Sprox.

Jesli ktos pobierze ten wyzej przedstawiony skrypt to prosilbym o jakis komentarz czy to dziala.

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by EmCek on pon., 2006-05-15 01:28.

Witam serdecznie.

Jako ze skrypt korzysta z dll'ki PL ma problem z odmiana niektorych imion.
Wychodzac naprzeciw ( ;-) ) waszym oczekiwaniom dodalem mozliwosc wprowadzenia imienia osobiscie.
Zatem jak to dziala?
Jesli wszystko idzie ok, ktos dolacza do waszej druzyny to piszecie 'druzyna'
System robi wszystko za nas..
Idziemy na expa i ktos atakuje czlonka druzyny, ale zaslona sie nie binduje.
Wyskakuje prawdopodobnie napis
Jesli tu widzisz dwa zera to nie dziala zaslona na ta osobe -- > 0 , 0.
Oznacza to, ze zaslona zle odmienila imie czlonka druzyny i musimy wprowadzic je recznie.
Aliasem
#dd sproxa
(od 'DruzynaDodaj')
Wpisujemy #dd a potem imie w bierniku, jesli osob jest wiecej to oddzielamy je znakiem |
Przyklad? Prosze:
#dd sproxa|xorpsa
Jesli dodalismy osobe do druzyny, po ataku powinnismy zobaczyc juz tekst
Jesli tu widzisz dwa zera to nie dziala zaslona na ta osobe -- > 0 , 2
i zaslona podbinduje sie.

Jest to kolejna wersja do testow, jak cos nie dziala pisac.
Jezeli wam zle binduje odmiane wrogow to macie poprostu problem.

Oto kod skryptu:

;---------------------------------------;
; Q_DRUZYNA.TXT
;   Oblusga druzyny
;
;  utworzony: 04-07-29
;  modyfikacja : 
;  Sprox 9  maja 2006: Sigen mnie meczy, zagladam do kodu...
;  Sprox 12 maja 2006: zaslona dziala na tyle na ile pozwala dll'ka
;  Sprox 14 maja 2006: prawie polnoc.. <ziew>. jako ze Dll'ka Pl ma problem z odmiana imion dodalem mozliwosc 
;                recznego wprowadzenia imienia o niestandardowej odmianie. Dziekuje Isirit, ktora dzielnie
;                pomagala testowac zmiany w skrypcie.
;---------------------------------------;

; Zaslanianie na atak - uzywa dll'ki Pl do odmiany nazw.
; Poprawial Sprox.

;------- Opisy ------------------------
; Dolaczasz do druzyny xxx.
; xxx dolacza do twojej druzyny.
; xxx dolacza do druzyny yyy.
; Druzyne prowadzi yyy i oprocz ciebie sa w niej jeszcze: zzz.
; Druzyne prowadzi yyy i oprocz ciebie jest w niej jeszcze xxx.
; Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze xxx.
; Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: zzz.
; Druzyne prowadzi xxx , zas ty jestes jej jedynym czlonkiem.


;-------- Zmienna, w ktorej sa przechowywanie czlonkiowie druzyny

/alias {#dd %0} {/calldll Strings AddItem {druzynaC,"$0"}
/var Vdruzyna {}
/action {^Druzyne prowadzi %1 i oprocz ciebie sa w niej jeszcze: %2} _
{_
	/var {Vdruzyna} {$1};_
	/var {tmp} {$2};_
	/calldll Strings Replace {tmp,"$tmp",", ",|};_
	/calldll Strings Replace {tmp,"$tmp"," i ",|};_
	/calldll Strings Replace {tmp,"$tmp",".",""};_
;	W Vdruzyna umieszczamy pelna liste
	/calldll Strings AddItem {Vdruzyna,"$tmp"};_
	/var Vdruzyna {@Lower($Vdruzyna)}_
}




/action {Druzyne prowadzi %1, zas ty jestes jej jedynym czlonkiem} _
{_

	/var {Vdruzyna} {@Lower($1)};_
}

/action {^Druzyne prowadzi %1 i oprocz ciebie jest w niej jeszcze %2} _
{_
	/var {Vdruzyna} {$1};_
	/var {tmp} {$2};_
	/calldll Strings Replace {tmp,"$tmp",".",""};_
	/calldll Strings Replace {tmp,"$tmp",".",""};_
;	W Vdruzyna umieszczamy pelna liste
	/calldll Strings AddItem {Vdruzyna,"$tmp"};_
	/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Przewodzisz druzynie, w ktorej oprocz ciebie sa jeszcze: %1} _
{_
	/var {Vdruzyna} {$1};_
	/calldll Strings Replace {Vdruzyna,"$Vdruzyna",", ","|"};_
	/calldll Strings Replace {Vdruzyna,"$Vdruzyna"," i ","|"};_
	/calldll Strings Replace {Vdruzyna,"$Vdruzyna",".",""};_
	/var Vdruzyna {@Lower($Vdruzyna)}_
}

/action {^Przewodzisz druzynie, w ktorej oprocz ciebie jest jeszcze %1} _
{_
	/var {tmp} {$1};_
	/calldll Strings Replace {tmp,"$1",".",""};_
	/var {Vdruzyna} {@Lower($tmp)};_
}

; Trzeba uwzgledni tych, ktorzy juz wczesniej dolaczyli
/action {^Dolaczasz do druzyny %1.} {druzyna}


/action {%1 dolacza do twojej druzyny.} _
{_
	/calldll Strings AddItem {Vdruzyna,"@Lower($1)"};_
}

/action {%1 dolacza do druzyny} _
{_
	/calldll Strings AddItem {Vdruzyna,"@Lower($1)"};_
}

/empty druzynaZaslony
/var druzynaB {}
/empty zaslona

/loadlib Pl

/action {%1 atakuje %0.} _
{_
	/calldll Strings NumItems {count,"$Vdruzyna"};_
;tworzy liste odmienionych nazw czlonkow druzyny
	/empty druzynaB;_
	/loop {1,$count} {_
		/calldll Strings Item {tmp,"$Vdruzyna",$LoopCount};_
                /calldll Pl Odmien {tmp,d};_
		/calldll Strings AddItem {druzynaB,"$tmp"}_
	};_
/var {Vkogobije} {@Lower($0)};_
/var {ktoatakuje} {@Lower($1)};_


	/calldll Strings IsMember {tmp,"$druzynaB",$Vkogobije};_
        /calldll Strings IsMember {tmp2,"$druzynaC",$Vkogobije};_
/showme {Jesli tu widzisz dwa zera to nie dziala zaslona na ta osobe -- > $tmp , $tmp2};_
	/if {$tmp!=0 || $tmp2!=0} {_
		/calldll Pl Odmien {zaslona,"$ktoatakuje",n};_
		/var zaslona {zaslon @Lower($0) przed $zaslona};_
		/calldll Strings IsMember {tmp,"$druzynaZaslony",$zaslona};_
		/if ($tmp=0) {_
			/calldll Strings AddItem {druzynaZaslony,$zaslona};_
			/calldll Strings Unique {druzynaZaslony};_
		};_

; ##########################################################
; TO JESZCZE TRZEBA NAPRAWIC.
; ##########################################################
		/calldll Strings NumItems {tmp,"$druzynaZaslony"};_
		/if ($tmp>9) {/calldll Strings Pop {tmp,druzynaZaslony,druzynaZaslony}};_
		/calldll Strings IsMember {tmp,"$druzynaZaslony",$zaslona};_
		/sh {@AnsiBold()@ForeWhite()@BackBlue()CTRL+ $tmp - $zaslona}_
	}_
}

/macro {c1} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",1};_
	/if (@Len($tmp)>0) {$tmp}_
}

/macro {c2} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",2};_
	/if (@Len($tmp)>0) {$tmp}_
}

/macro {c3} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",3};_
	/if (@Len($tmp)>0) {$tmp}_


}

/macro {c4} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",4};_
	/if (@Len($tmp)>0) {$tmp}_
}

/macro {c5} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",5};_
	/if (@Len($tmp)>0) {$tmp}_
}

/macro {c6} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",6};_
	/if (@Len($tmp)>0) {$tmp}_
}

/macro {c7} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",7};_
	/if (@Len($tmp)>0) {$tmp}_
}

/macro {c8} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",8};_
	/if (@Len($tmp)>0) {$tmp}_
}
/macro {c9} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",9};_
	/if (@Len($tmp)>0) {$tmp}_
}


/macro {c0} {_
	/calldll Strings Item {tmp,"$druzynaZaslony",0};_
	/if (@Len($tmp)=0) {$tmp}_
}

Pozdrawiam cieplo.

Sprox

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by Krociatko on czw., 2006-08-24 16:23.

Czy tworca dll'ki badz ktos kto wie jak ja edytowac moze ma jakis pomysl i chec by dodac poza dllka (z dodatkowego pliku) odmiany niestandardowe. W tym zabawa nieco trudniejsza nie tylko 3 wyrazowe ale takze czterowyrazowe?

powtórz

Do skryptu Sproxa na zaslone.

Adres Submitted by zawi on czw., 2006-08-24 17:25.

Poczytaj wczesniejsze posty. Wystarczajaca wiedze do przerobienia i dlubania w dll ma Kuling. Niestety on jest zbyt zaparacowany.
Odpowiedz jest jedna - musimy sie cieszyc tym co mamy

Ps. Kuling raz powiedzial, ze moglby to zrobic, chce tylko 5000zl :D :wink:

powtórz

Strony

Theme provided by Danetsoft under GPL license from Danang Probo Sayekti