#CLASS {Ocen}
#ALIAS ocen {#if (%1) {#va ocen_ndb {};#t+ Oceniasz_starannie;%literal( ocen %-1)}}
#ALIAS pokaz {#if (%1) {#t+ Lap_ocene;%literal( pokaz %-1)}}
#ALIAS sprzedaj {#if (%1) {#t+ Ocen_wartosci;%literal( sprzedaj %-1)}}
#ALIAS wycen {#if (%1) {#t+ Ocen_wartosci;%literal( wycen %-1)}}
#ALIAS wystaw {#if (%1) {#t+ Ocen_wartosci;%literal( wystaw %-1)}}
#ALIAS -szukaj {ocenw_pokaz}
#ALIAS ocen_aktualizuj_materialy {#showp Aktualizuje liste materialow...;#loopdb @ocen_ubranie_typ {#additem ocen_materialy {%val}};#loopdb @ocen_pojemnik_typ {#additem ocen_materialy {%val}};#show Ok.}
#ALIAS ocen_odloz {#if (%ismember( %1, %db( @ocen_ndb, %-3))) {odloz @odmien_liczebnik(%ismember(%1,%db(@ocen_ndb,%-3)),%2) %-3;#addkey ocen_ndb {%-3} {%delitem( %1, %db( @ocen_ndb, %-3))}} {#sh --> %item( Ten|Ta|Te, %2) @odmienp_bm(%-3) zostal%item( |a|o, %2) juz odlozon%item( y|a|e, %2).}}
#ALIAS ocen_zaloz {#if (%ismember( %1, %db( @ocen_ndb, %-3))) {zaloz @odmien_liczebnik(%ismember(%1,%db(@ocen_ndb,%-3)),%2) %-3}}
#ALIAS ocen_zabezpiecz {#if (%ismember( %1, %db( @ocen_ndb, %-3))) {zabezpiecz @odmien_liczebnik(%ismember(%1,%db(@ocen_ndb,%-3)),%2) %-3}}
#ALIAS ocen_zrzuc {#sh Rozpoczynam zrzut bazy przedmiotow na dysk.;#file 1 OC_DATA_%time( yy_mm_dd-hh_nn).txt;#wri 1 {-------------------- ZBROJE --------------------};#loopdb @ocen_zbroje_waga {#wri 1 {Opis: %key};#wri 1 {Typ: %db( @ocen_zbroje_typ, %key)};#wri 1 {Chroni: %db( @ocen_zbroje_chroni, %key)};#wri 1 {Waga: %val, Obj: %db( @ocen_zbroje_obj, %key)};#wri 1 {Wartosc: %db( @ocen_zbroje_wartosc, %key)};#wri 1 {Sprzedaz: %db( @{@ocen_sprzedaz_name(%key)}, %key)};#wri 1 {Pochodzenie: %db( @ocen_zbroje_pochodzenie, %key)};#wri 1 {Komentarz: %db( @ocen_zbroje_komentarz, %key)};#wri 1 {Aukcja: %db( @ocen_aukcja, %key)};#wri 1 {Zamowienie: %db( @{@ocen_zamowienie_name(%key)}, %key)};#wri 1 {------------------------------------------};#wri 1 {" "}};#wri 1 {" "};#wri 1 {-------------------- BRONIE --------------------};#loopdb @ocen_bron_waga {#wri 1 {Opis: %key};#wri 1 {Typ: %db( @ocen_bron_typ, %key)};#wri 1 {Rany: %db( @ocen_bron_rany, %key)};#wri 1 {Reka: %db( @ocen_bron_reka, %key)};#wri 1 {Waga: %val, Obj: %db( @ocen_bron_obj, %key)};#wri 1 {Wartosc: %db( @ocen_bron_wartosc, %key)};#wri 1 {Sprzedaz: %db( @{@ocen_sprzedaz_name(%key)}, %key)};#wri 1 {Pochodzenie: %db( @ocen_bron_pochodzenie, %key)};#wri 1 {Komentarz: %db( @ocen_bron_komentarz, %key)};#wri 1 {Aukcja: %db( @ocen_aukcja, %key)};#wri 1 {Zamowienie: %db( @{@ocen_zamowienie_name(%key)}, %key)};#if (%ismember( %key, @ocen_bron_magia)) {#wri 1 {"          MAGIK"}};#if (%ismember( %key, @ocen_bron_srebro)) {#wri 1 {"          SREBRO"}};#wri 1 {------------------------------------------};#wri 1 {" "}};#wri 1 {" "};#wri 1 {-------------------- TARCZE --------------------};#loopdb @ocen_tarcze_waga {#wri 1 {Opis: %key};#wri 1 {Waga: %val, Obj: %db( @ocen_tarcze_obj, %key)};#wri 1 {Wartosc: %db( @ocen_tarcze_wartosc, %key)};#wri 1 {Sprzedaz: %db( @{@ocen_sprzedaz_name(%key)}, %key)};#wri 1 {Pochodzenie: %db( @ocen_tarcze_pochodzenie, %key)};#wri 1 {Komentarz: %db( @ocen_tarcze_komentarz, %key)};#wri 1 {Aukcja: %db( @ocen_aukcja, %key)};#wri 1 {Zamowienie: %db( @{@ocen_zamowienie_name(%key)}, %key)};#wri 1 {------------------------------------------};#wri 1 {" "}};#wri 1 {" "};#wri 1 {----------- TARCZE NIE CHRONIACE ------------};#loopdb @ocen_puklerz_waga {#wri 1 {Opis: %key};#wri 1 {Waga: %val, Obj: %db( @ocen_puklerz_obj, %key)};#wri 1 {Wartosc: %db( @ocen_puklerz_wartosc, %key)};#wri 1 {Sprzedaz: %db( @{@ocen_sprzedaz_name(%key)}, %key)};#wri 1 {Pochodzenie: %db( @ocen_puklerz_pochodzenie, %key)};#wri 1 {Komentarz: %db( @ocen_puklerz_komentarz, %key)};#wri 1 {Aukcja: %db( @ocen_aukcja, %key)};#wri 1 {Zamowienie: %db( @{@ocen_zamowienie_name(%key)}, %key)};#wri 1 {------------------------------------------};#wri 1 {" "}};#wri 1 {" "};#wri 1 {--------------- EKWIPUNEK ----------------};#loopdb @ocen_ekw_waga {#wri 1 {Opis: %key};#wri 1 {Waga: %val, Obj: %db( @ocen_ekw_obj, %key)};#wri 1 {Wartosc: %db( @ocen_ekw_wartosc, %key)};#wri 1 {Sprzedaz: %db( @{@ocen_sprzedaz_name(%key)}, %key)};#wri 1 {Pochodzenie: %db( @ocen_ekw_pochodzenie, %key)};#wri 1 {Komentarz: %db( @ocen_ekw_komentarz, %key)};#wri 1 {------------------------------------------};#wri 1 {" "}};#wri 1 {" "};#wri 1 {--------------- UBRANIE ----------------};#loopdb @ocen_ubranie_waga {#wri 1 {Opis: %key};#wri 1 {Waga: %val, Obj: %db( @ocen_ubranie_obj, %key)};#wri 1 {Wartosc: %db( @ocen_ubranie_wartosc, %key)};#wri 1 {Typ: %db( @ocen_ubranie_typ, %key)};#wri 1 {Sprzedaz: %db( @{@ocen_sprzedaz_name(%key)}, %key)};#wri 1 {Pochodzenie: %db( @ocen_ubranie_pochodzenie, %key)};#wri 1 {Komentarz: %db( @ocen_ubranie_komentarz, %key)};#wri 1 {------------------------------------------};#wri 1 {" "}};#wri 1 {" "};#wri 1 {--------------- UBRANIE ----------------};#loopdb @ocen_pojemnik_waga {#wri 1 {Opis: %key};#wri 1 {Waga: %val, Obj: %db( @ocen_pojemnik_obj, %key)};#wri 1 {Wartosc: %db( @ocen_pojemnik_wartosc, %key)};#wri 1 {Typ: %db( @ocen_pojemnik_typ, %key)};#wri 1 {Sprzedaz: %db( @{@ocen_sprzedaz_name(%key)}, %key)};#wri 1 {Pochodzenie: %db( @ocen_pojemnik_pochodzenie, %key)};#wri 1 {Komentarz: %db( @ocen_pojemnik_komentarz, %key)};#wri 1 {------------------------------------------};#wri 1 {" "}};#wri 1 {" "};#wri 1 {--------------- INNE ----------------};#loopdb @ocen_inne_waga {#wri 1 {Opis: %key};#wri 1 {Waga: %val, Obj: %db( @ocen_inne_obj, %key)};#wri 1 {Wartosc: %db( @ocen_inne_wartosc, %key)};#wri 1 {Sprzedaz: %db( @{@ocen_sprzedaz_name(%key)}, %key)};#wri 1 {Pochodzenie: %db( @ocen_inne_pochodzenie, %key)};#wri 1 {Komentarz: %db( @ocen_inne_komentarz, %key)};#wri 1 {------------------------------------------};#wri 1 {" "}};#close 1;#sh Ok.}
#VAR ocen_db {mianciezka wytworna karacenawaga19kgobj4700mlzniszczenieMAXinne0wartosc2700chronikorpus|ramiona}
#VAR ocen_ndb {bierciezka wytworna karaceneciezka wytworna karacene1}
#VAR ocen_zniszczenie {kazdej chwil1j konserwacj2akanym stani2epskim stani3o zlym stani3 podniszczon4w zlym stani4 swoje pietn5dobrym stani6omitym staniMAX}
#VAR ocen_autor {Autor skrypu: Cerdin. Wyglad inspirowany skryptem Ethel.} {Autor skrypu: Cerdin. Wyglad inspirowany skryptem Ethel.}
#VAR ocen_format_wo {<color #868686>%if( !"%1", "<brak>", %if( (%ends( %1, ml))|(%ends( %1, kg)), %concat( %repeat( " ", 6-%len( %1)) %leftback( %1, 2), " ", %rightback( %1, 2)), %concat( %repeat( " ", 5-%len( %1)) %leftback( %1, 1), "  ", %rightback( %1, 1))))</color>}
#VAR ocen_format_wartosc {%if( %number( %1)<0, "<color #CCCCCC                                      >---</color>", %if( %1, @miedz_na_monety(%1), @miedz_na_monety(0)))}
#VAR ocen_sprzedaz_name {ocen_sprzedaz_%eval( %abs( %ascii( %1)-97)/6)}
#VAR ocen_zamowienie_name {ocen_zamowienie_%eval( %abs( %ascii( %1)-97)/6)}
#VAR ocen_kategorie_list {bron|zbroje|tarcze|puklerz|ekw|ubranie|pojemnik|inne}
#VAR ocen_kategorie_listo {bron|zbroja|tarcza|tarcza bez AC|ekwipunek|ubranie|pojemnik|inne}
#VAR ocen_kategorie_db {bronbronzbrojezbrojatarczetarczapuklerztarcza bez ACekwekwipunekubranieubraniepojemnikpojemnikinneinne}
#VAR ocen_kategorie_dbo {bronbronzbrojazbrojetarczatarczetarcza bez ACpuklerzekwipunekekwubranieubraniepojemnikpojemnikinneinne}
#VAR ocen_matchdb {wartosc-1}
#VAR ocen_czy_jeden_przedmiot {%if((%pos(",","%1"))|(%pos(" i ","%1"))|(%pos(" wiele "," %1"))|(%pos("ogromny stos"," %1"))|(%match("%1","%d"))|(%match(" %1"," {dwa|dwie|trzy|cztery|piec|szesc|siedem|osiem|dziewiec|dziesiec|jedenascie|dwanascie|trzynascie|czternascie|pietnascie|szesnascie|siedemnascie|osiemnascie|dziewietnascie|dwadziescia}")),0,1)}
#VAR ocen_wpis {}
#VAR ocen_materialy {z batystu|ze skory|z bawelny|z lnu|z futra|z zelaza|z aksamitu|z muslinu|z welny|z drewna}
#VAR ocen_ignore_end {0}
#VAR pomoc_ocena {   -szukaj        - otworz okno wyszukiwania w bazie ekwipunku;   -eq            - ocen zalozone zbroje i dobyte bronie, poczym pokaz ich stan w oknie;                    LUB wylacz okno jezeli jest wlaczone}
#TRIGGER "Oceniasz_starannie" {^Oceniasz starannie (*).$} {#t+ Lap_ocene;ocen_ndb.bier = %1} "" {disable}
#TRIGGER {pokazuje ci} {#t+ Lap_ocene}
#TRIGGER {^{|> }daj} {#t+ Ocen_wartosci} "" {case}
#CLASS 0
#CLASS {Ocen|Ocen_wpisy}
#ALIAS ocen_dodaj_zbroje {#va ocen_db.inne 0;#if (@za_lap_ocene) {#forall %replace( %replace( %replace( @ocen_db.chroni, ramiona, lewe ramie|prawe ramie), dlonie, lewa dlon|prawa dlon), stopy, lewa stope|prawa stope) {#addkey za_przedmioty {%db( @za_translate_zbr, %i)} {@ocen_db.mian};#addkey za_zniszczenie {%db( @za_translate_zbr, %i)} {%if( @ocen_db.zniszczenie="MAX", 5, @ocen_db.zniszczenie)}}};#if (!@oceno_tylko_ocen) {#if (@ocen_force_update or (!%db( @ocen_zbroje_waga, @ocen_db.mian))) {#class {Dane|.przedmioty};#addkey ocen_zbroje_waga {@ocen_db.mian} {@ocen_db.waga};#addkey ocen_zbroje_obj {@ocen_db.mian} {@ocen_db.obj};#addkey ocen_zbroje_wartosc {@ocen_db.mian} {@ocen_db.wartosc};#addkey ocen_zbroje_typ {@ocen_db.mian} {%1};#addkey ocen_zbroje_chroni {@ocen_db.mian} {@ocen_db.chroni};#class 0}}}
#ALIAS ocen_dodaj_bron {#if (@za_lap_ocene) {#if (@ocen_db.reka="w dowolnej rece") {#if (@za_przedmioty.pbron) {#addkey za_przedmioty {lbron} {@ocen_db.mian};#addkey za_zniszczenie {lbron} {%if( @ocen_db.zniszczenie="MAX", 7, @ocen_db.zniszczenie)};#addkey za_przedmioty {lbron_type} {%db( @za_translate_brn, %1)}} {#addkey za_przedmioty {pbron} {@ocen_db.mian};#addkey za_zniszczenie {pbron} {%if( @ocen_db.zniszczenie="MAX", 7, @ocen_db.zniszczenie)};#addkey za_przedmioty {pbron_type} {%db( @za_translate_brn, %1)}}};#if (@ocen_db.reka="w lewej rece") {#if (@za_przedmioty.lbron) {za_przedmioty.pbron=@za_przedmioty.lbron;za_zniszczenie.pbron=@za_zniszczenie.lbron;za_przedmioty.pbron_type=@za_przedmioty.lbron_type};#addkey za_przedmioty {lbron} {@ocen_db.mian};#addkey za_zniszczenie {lbron} {%if( @ocen_db.zniszczenie="MAX", 7, @ocen_db.zniszczenie)};#addkey za_przedmioty {lbron_type} {%db( @za_translate_brn, %1)}};#if (@ocen_db.reka="w prawej rece") {#if (@za_przedmioty.pbron) {za_przedmioty.lbron=@za_przedmioty.pbron;za_zniszczenie.lbron=@za_zniszczenie.pbron;za_przedmioty.lbron_type=@za_przedmioty.pbron_type};#addkey za_przedmioty {pbron} {@ocen_db.mian};#addkey za_zniszczenie {pbron} {%if( @ocen_db.zniszczenie="MAX", 7, @ocen_db.zniszczenie)};#addkey za_przedmioty {pbron_type} {%db( @za_translate_brn, %1)}};#if (@ocen_db.reka="oburacz") {#addkey za_przedmioty {pbron} {@ocen_db.mian};#addkey za_zniszczenie {pbron} {%if( @ocen_db.zniszczenie="MAX", 7, @ocen_db.zniszczenie)};#addkey za_przedmioty {pbron_type} {%db( @za_translate_brn, %1)};#addkey za_przedmioty {lbron} {}}};ocen_db.inne=0;#if (!@oceno_tylko_ocen) {#if (@ocen_force_update or (!%db( @ocen_bron_waga, @ocen_db.mian))) {#class {Dane|.przedmioty};#addkey ocen_bron_waga {@ocen_db.mian} {@ocen_db.waga};#addkey ocen_bron_obj {@ocen_db.mian} {@ocen_db.obj};#addkey ocen_bron_wartosc {@ocen_db.mian} {@ocen_db.wartosc};#addkey ocen_bron_typ {@ocen_db.mian} {%1};#addkey ocen_bron_rany {@ocen_db.mian} {@ocen_db.rany};#addkey ocen_bron_reka {@ocen_db.mian} {@ocen_db.reka};#class 0;ocen_db.update_prop = 1}}}
#ALIAS ocen_dodaj_tarcze {#if (@za_lap_ocene) {#addkey za_przedmioty {tar} {@ocen_db.mian};#addkey za_zniszczenie {tar} {@ocen_db.zniszczenie}};ocen_db.inne=0;#if (!@oceno_tylko_ocen) {#if (@ocen_force_update or (!%db( @ocen_tarcze_waga, @ocen_db.mian))) {#class {Dane|.przedmioty};#addkey ocen_tarcze_waga {@ocen_db.mian} {@ocen_db.waga};#addkey ocen_tarcze_obj {@ocen_db.mian} {@ocen_db.obj};#addkey ocen_tarcze_wartosc {@ocen_db.mian} {@ocen_db.wartosc};#class 0}}}
#ALIAS ocen_dodaj_puklerz {#if (@za_lap_ocene) {#addkey za_przedmioty {ntar} {@ocen_db.mian};#addkey za_zniszczenie {ntar} {@ocen_db.zniszczenie}};ocen_db.inne=0;#if (!@oceno_tylko_ocen) {#if (@ocen_force_update or (!%db( @ocen_puklerz_waga, @ocen_db.mian))) {#class {Dane|.przedmioty};#addkey ocen_puklerz_waga {@ocen_db.mian} {@ocen_db.waga};#addkey ocen_puklerz_obj {@ocen_db.mian} {@ocen_db.obj};#addkey ocen_puklerz_wartosc {@ocen_db.mian} {@ocen_db.wartosc};#class 0}}}
#ALIAS ocen_dodaj_ekw {ocen_db.inne=0;#if (!@oceno_tylko_ocen) {#if (@ocen_force_update or (!%db( @ocen_ekw_waga, @ocen_db.mian))) {#class {Dane|.przedmioty};#addkey ocen_ekw_waga {@ocen_db.mian} {@ocen_db.waga};#addkey ocen_ekw_obj {@ocen_db.mian} {@ocen_db.obj};#addkey ocen_ekw_wartosc {@ocen_db.mian} {@ocen_db.wartosc};#class 0}}}
#ALIAS ocen_dodaj_ubranie {ocen_db.inne=0;#if (!@oceno_tylko_ocen) {#if (@ocen_force_update or (!%db( @ocen_ubranie_waga, @ocen_db.mian))) {#class {Dane|.przedmioty};#addkey ocen_ubranie_waga {@ocen_db.mian} {@ocen_db.waga};#addkey ocen_ubranie_obj {@ocen_db.mian} {@ocen_db.obj};#addkey ocen_ubranie_wartosc {@ocen_db.mian} {@ocen_db.wartosc};#addkey ocen_ubranie_typ {@ocen_db.mian} {%-1};#class 0}}}
#ALIAS ocen_dodaj_pojemnik {ocen_db.inne=0;#if (!@oceno_tylko_ocen) {#if (@ocen_force_update or (!%db( @ocen_pojemnik_waga, @ocen_db.mian))) {#class {Dane|.przedmioty};#addkey ocen_pojemnik_waga {@ocen_db.mian} {@ocen_db.waga};#addkey ocen_pojemnik_obj {@ocen_db.mian} {@ocen_db.obj};#addkey ocen_pojemnik_wartosc {@ocen_db.mian} {@ocen_db.wartosc};#addkey ocen_pojemnik_typ {@ocen_db.mian} {%-1};#class 0}}}
#ALIAS ocen_dodaj_inne {ocen_db.inne=0;#if (!@oceno_tylko_ocen and @ocen_czy_jeden_przedmiot(@ocen_db.mian)) {#if (@ocen_force_update or (!%db( @ocen_inne_waga, @ocen_db.mian))) {#class {Dane|.przedmioty};#addkey ocen_inne_waga {@ocen_db.mian} {@ocen_db.waga};#addkey ocen_inne_obj {@ocen_db.mian} {@ocen_db.obj};#addkey ocen_inne_wartosc {@ocen_db.mian} {@ocen_db.wartosc};#class 0}}}
#ALIAS ocen_pokaz {#makewindow Ocen_Window open "scrolling=no|floating=yes|width=60c|height=20c|top=-35c|left=-70c|title="%proper( %-2);:Ocen_Window: #clr;:Ocen_Window: #sh "";:Ocen_Window: #sh %ansi( 6)@format_center(%upper( %-2),55);:Ocen_Window: #mxp %ansi( 3)@ocen_typ_przedmiotu(%1,%db(@ocen_%1_typ,%-2),%-2);:Ocen_Window: #sh "";:Ocen_Window: #mxp <send "ocen_wpisz_wartosc %-1" "Zmien cene sprzedazy przedmiotu.">Wartosc</send>: %format( "&62s", @ocen_format_wartosc(%db(@ocen_%1_wartosc,%-2))) %repeat( " ", 5)<send "ocen_wpisz_waga %-1" "Zmien wage przedmiotu">Waga</send>:%repeat( " ", 4) @ocen_format_wo(%db( @ocen_%1_waga, %-2));:Ocen_Window: #mxp <send "ocen_wpisz_sprzedaz %-1" "Zmien cene sprzedazy przedmiotu.">Sprzedaz</send>:%format( "&62s", @ocen_format_wartosc(%db(@{@ocen_sprzedaz_name(%-2)},%-2))) %repeat( " ", 5)<send "ocen_wpisz_obj %-1" "Zmien objetosc przedmiotu">Objetosc</send>: @ocen_format_wo(%db( @ocen_%1_obj, %-2));:Ocen_Window: #sh "";:Ocen_Window: #mxp <send "ocen_wpisz_pochodzenie %-1" "Zmien pochodzenie przedmiotu">Pochodzenie</send>: <color #868686> %if( %db( @ocen_%1_pochodzenie, %-2), %db( @ocen_%1_pochodzenie, %-2))</color>;:Ocen_Window: #if (%1=bron) {#sh "";#mxp <<send '"ocen_wpisz_rany %-1"' '"Zmien jakie rany zadaje ta bron"'>>Rany<</send>>: %repeat(" ",6)<<color #868686>>%format("&-20s",%if( %db( @ocen_%1_rany, %-2), %replace(%db( @ocen_%1_rany, %-2),"|"," ")))<</color>> <<send '"ocen_wpisz_reka %-1"' '"Zmien jak jest dobywana ta bron"'>>Dobywasz<</send>> <<color #868686>>%if( %db( @ocen_%1_reka, %-2), %db( @ocen_%1_reka, %-2))<</color>>};:Ocen_Window: #if (%1=zbroje) {#sh ""; #mxp <<send '"ocen_wpisz_chroni %-1"' '"Zmien jakie miejsca chroni ta zbroja"'>>Chroni<</send>>: %repeat(" ",6)<<color #868686>>%format("&-20s",%if( %db( @ocen_%1_chroni, %-2), %replace(%db( @ocen_%1_chroni, %-2),"|"," ")))<</color>>};:Ocen_Window: #if (%ismember(%1,{zbroje|bron|tarcze|puklerz})) {#sh "";#mxp  <<send '"ocen_wpisz_zamowienie %-1"' '"Zmien cene oferowana za ten przedmiot jezeli jakis sklepikarz go zamowil."'>>Zamowienie<</send>>: %format( "&64s", @ocen_format_wartosc(%db(@{@ocen_zamowienie_name(%-2)},%-2))) ;#mxp <<send '"ocen_wpisz_aukcja %-1"' '"Zmien cene oferowana za ten przedmiot na aukcji."'>>Aukcja<</send>>: %format( "&68s", @ocen_format_wartosc(%db(@ocen_aukcja,%-2)))};:Ocen_Window: #if (%1=bron and %ismember(%-2,@ocen_bron_magia)) {#sh "";#sh %ansi(6)"________________ : bron magiczna : ________________"};:Ocen_Window: #if (%1=bron and %ismember(%-2,@ocen_bron_srebro)) {#sh "";#sh %ansi(15)"________________ : bron srebrna : _______________"};:Ocen_Window: #sh "";:Ocen_Window: #mxp <send "ocen_wpisz_komentarz %-1" "Zmien komentarz do przedmiotu">Komentarz</send>: <color #868686>%if( %db( @ocen_%1_komentarz, %-2), %db( @ocen_%1_komentarz, %-2))</color>}
#ALIAS ocen_wpisz_wartosc {#va ocen_wpis {};#va ocen_matchdb {};#pr ocen_wpis "Wpisz wartosc dla --- %-2 --- w miedziakach lub formacie 12mt 34zl 45sr 56md. 0 by usunac, negatywne by oznaczyc brak mozliwosci.";#if (%match( @ocen_wpis, "^(%n)$", ocen_matchdb.wartosc)) {#class {Dane|.przedmioty};#addkey ocen_%1_wartosc {%-2} {@ocen_matchdb.wartosc};#class 0} {#if (%match( @ocen_wpis, "(%d){| }mt", ocen_matchdb.mt) or %match( @ocen_wpis, "(%d){| }zl", ocen_matchdb.zl) or %match( @ocen_wpis, "(%d){| }sr", ocen_matchdb.sr) or %match( @ocen_wpis, "(%d){| }md", ocen_matchdb.md)) {#class {Dane|.przedmioty};#addkey ocen_%1_wartosc {%-2} {%eval( %number( @ocen_matchdb.mt)*24000+%number( @ocen_matchdb.zl)*240+%number( @ocen_matchdb.sr)*12+%number( @ocen_matchdb.md))};#class 0} {#sh Nieprawidlowy format wartosci. Wpisz liczbe miedziakow lub wartosc w formacie XXmt YYzl ZZsr OOmd.}};ocen_pokaz %-1}
#ALIAS ocen_wpisz_sprzedaz {#va ocen_wpis {};#va ocen_matchdb {};#pr ocen_wpis "Wpisz kwote sprzedazy dla --- %-2 --- w miedziakach lub formacie 12mt 34zl 45sr 56md. 0 by usunac, negatywne by oznaczyc brak mozliwosci.";#if (%match( @ocen_wpis, "^(%n)$", ocen_matchdb.wartosc)) {#class {Dane|.przedmioty};#addkey @ocen_sprzedaz_name(%-2) {%-2} {@ocen_matchdb.wartosc};#class 0} {#if (%match( @ocen_wpis, "(%d){| }mt", ocen_matchdb.mt) or %match( @ocen_wpis, "(%d){| }zl", ocen_matchdb.zl) or %match( @ocen_wpis, "(%d){| }sr", ocen_matchdb.sr) or %match( @ocen_wpis, "(%d){| }md", ocen_matchdb.md)) {#class {Dane|.przedmioty};#addkey @ocen_sprzedaz_name(%-2) {%-2} {%eval( %number( @ocen_matchdb.mt)*24000+%number( @ocen_matchdb.zl)*240+%number( @ocen_matchdb.sr)*12+%number( @ocen_matchdb.md))};#class 0} {#sh Nieprawidlowy format wartosci. Wpisz liczbe miedziakow lub wartosc w formacie XXmt YYzl ZZsr OOmd.}};ocen_pokaz %-1}
#ALIAS ocen_wpisz_waga {#va ocen_wpis {};#va ocen_matchdb {};#pr ocen_wpis "Wpisz wage dla --- %-2 --- w formie 123 g lub 123kg. Jezeli pominiesz jednostke, zostana wpisane gramy.";#if (%match( @ocen_wpis, "^(%d){|g}$", ocen_matchdb.waga)) {#class {Dane|.przedmioty};#addkey ocen_%1_waga {%-2} {%if( !(%mod( @ocen_matchdb.waga, 1000)), %eval( %leftback( @ocen_matchdb.waga, 3)kg), @{ocen_matchdb.waga}g)};#class 0} {#if (%match( @ocen_wpis, "(%d)kg", ocen_matchdb.waga)) {#class {Dane|.przedmioty};#addkey ocen_%1_waga {%-2} {@{ocen_matchdb.waga}kg};#class 0} {#sh Nieprawidlowy format dla wagi. Wpisz liczbe gramow (g na koncu opcjonalne) lub liczbe kilogramow z kg na koncu.}};ocen_pokaz %-1}
#ALIAS ocen_wpisz_obj {#va ocen_wpis {};#va ocen_matchdb {};#pr ocen_wpis "Wpisz objetosc dla --- %-2 --- w formie 123ml lub 123l. Jezeli pominiesz jednostke, zostana wpisane mililitry.";#if (%match( @ocen_wpis, "^(%d){|ml}$", ocen_matchdb.obj)) {#class {Dane|.przedmioty};#addkey ocen_%1_obj {%-2} {%if( !(%mod( @ocen_matchdb.obj, 1000)), %eval( %leftback( @ocen_matchdb.obj, 3)l), @{ocen_matchdb.obj}ml)};#class 0} {#if (%match( @ocen_wpis, "(%d)l", ocen_matchdb.obj)) {#class {Dane|.przedmioty};#addkey ocen_%1_obj {%-2} {@{ocen_matchdb.obj}l};#class 0} {#sh Nieprawidlowy format dla wagi. Wpisz liczbe mililitrow (ml na koncu opcjonalne) lub liczbe litrow z l na koncu.}};ocen_pokaz %-1}
#ALIAS ocen_wpisz_pochodzenie {ocen_wpis = %pick( "p:Wybierz miejsce pochodzenia dla: %-2.", "o:1", "Dodaj nowe", @ocen_pochodzenia, "Usun pochodzenie");#if (@ocen_wpis="Dodaj nowe") {#class {Dane|.przedmioty};#forall %prompt( "", "Dodaj nowe miejsce pochodzenia. By dodac wiecej niz jedno na raz przedziel je symbolem | .") {#additem ocen_pochodzenia {%i}};ocen_pochodzenia = %sort( @ocen_pochodzenia);#class 0;ocen_wpisz_pochodzenie %-1} {#if (@ocen_wpis="Usun pochodzenie") {#forall %pick( "p:Wybierz miejsce pochodzenia do usuniecia:", @ocen_pochodzenia) {#delitem ocen_pochodzenia {%i}};ocen_wpisz_pochodzenie %-1} {#if (@ocen_wpis) {#class {Dane|.przedmioty};#addkey ocen_%1_pochodzenie {%-2} {@ocen_wpis};ocen_pokaz %-1;#class 0}}}}
#ALIAS ocen_wpisz_rany {ocen_wpis = %pick( "p:Wybierz jakie rany zadaje %-2.", "Klute", "Ciete", "Obuchowe");#if (@ocen_wpis) {#class {Dane|.przedmioty};#addkey ocen_%1_rany {%-2} {%lower( @ocen_wpis)};ocen_pokaz %-1;#class 0}}
#ALIAS ocen_wpisz_reka {ocen_wpis = %pick( "p:%proper(%-2). Dobywasz:", "o:1", "W prawej rece", "W lewej rece", "W dowolnej rece", "Oburacz");#if (@ocen_wpis) {#class {Dane|.przedmioty};#addkey ocen_%1_reka {%-2} {%lower( @ocen_wpis)};ocen_pokaz %-1;#class 0}}
#ALIAS ocen_wpisz_chroni {ocen_wpis = %pick( "p:%proper(%-2) chroni:", "Glowe|Korpus|Ramiona|Lewe ramie|Prawe ramie|Dlonie||Lewa dlon|Prawa dlon|Nogi|Stopy|Lewa stope|Prawa stope");#if (%ismember( "Ramiona", @ocen_wpis)) {ocen_wpis=%delitem( "Lewe ramie", %delitem( "Prawe ramie", @ocen_wpis))} {#if (%pos( "Lewe ramie|Prawe ramie", @ocen_wpis)) {ocen_wpis= %replace( @ocen_wpis, "Lewe ramie|Prawe ramie", "Ramiona")}};#if (%ismember( "Stopy", @ocen_wpis)) {ocen_wpis=%delitem( "Lewa stope", %delitem( "Prawa stope", @ocen_wpis))} {#if (%pos( "Lewa stope|Prawa stope", @ocen_wpis)) {ocen_wpis= %replace( @ocen_wpis, "Lewa stope|Prawa stope", "Stopy")}};#if (%ismember( "Dlonie", @ocen_wpis)) {ocen_wpis=%delitem( "Lewa dlon", %delitem( "Prawa dlon", @ocen_wpis))} {#if (%pos( "Lewa dlon|Prawa dlon", @ocen_wpis)) {ocen_wpis= %replace( @ocen_wpis, "Lewa dlon|Prawa dlon", "Dlonie")}};#if (@ocen_wpis) {#class {Dane|.przedmioty};#addkey ocen_%1_chroni {%-2} {%lower( @ocen_wpis)};ocen_pokaz %-1;#class 0}}
#ALIAS ocen_wpisz_aukcja {#va ocen_wpis {};#va ocen_matchdb {};#pr ocen_wpis "Wpisz minimalna cene dla --- %-2 --- na aukcji w miedziakach lub formacie 12mt 34zl 45sr 56md. 0 by usunac, negatywne by oznaczyc brak mozliwosci.";#if (%match( @ocen_wpis, "^(%n)$", ocen_matchdb.wartosc)) {#class {Dane|.przedmioty};#addkey ocen_aukcja {%-2} {@ocen_matchdb.wartosc};#class 0} {#if (%match( @ocen_wpis, "(%d){| }mt", ocen_matchdb.mt) or %match( @ocen_wpis, "(%d){| }zl", ocen_matchdb.zl) or %match( @ocen_wpis, "(%d){| }sr", ocen_matchdb.sr) or %match( @ocen_wpis, "(%d){| }md", ocen_matchdb.md)) {#class {Dane|.przedmioty};#addkey ocen_aukcja {%-2} {%eval( %number( @ocen_matchdb.mt)*24000+%number( @ocen_matchdb.zl)*240+%number( @ocen_matchdb.sr)*12+%number( @ocen_matchdb.md))};#class 0} {#sh Nieprawidlowy format wartosci. Wpisz liczbe miedziakow lub wartosc w formacie XXmt YYzl ZZsr OOmd.}};ocen_pokaz %-1}
#ALIAS ocen_wpisz_zamowienie {#va ocen_wpis {};#va ocen_matchdb {};#pr ocen_wpis "Wpisz minimalna cene dla --- %-2 --- na zamowienie w miedziakach lub formacie 12mt 34zl 45sr 56md. 0 by usunac, negatywne by oznaczyc brak mozliwosci.";#if (%match( @ocen_wpis, "^(%n)$", ocen_matchdb.wartosc)) {#class {Dane|.przedmioty};#addkey @ocen_zamowienie_name(%-2) {%-2} {@ocen_matchdb.wartosc};#class 0} {#if (%match( @ocen_wpis, "(%d){| }mt", ocen_matchdb.mt) or %match( @ocen_wpis, "(%d){| }zl", ocen_matchdb.zl) or %match( @ocen_wpis, "(%d){| }sr", ocen_matchdb.sr) or %match( @ocen_wpis, "(%d){| }md", ocen_matchdb.md)) {#class {Dane|.przedmioty};#addkey @ocen_zamowienie_name(%-2) {%-2} {%eval( %number( @ocen_matchdb.mt)*24000+%number( @ocen_matchdb.zl)*240+%number( @ocen_matchdb.sr)*12+%number( @ocen_matchdb.md))};#class 0} {#sh Nieprawidlowy format wartosci. Wpisz liczbe miedziakow lub wartosc w formacie XXmt YYzl ZZsr OOmd.}};ocen_pokaz %-1}
#ALIAS ocen_wpisz_komentarz {ocen_wpis = %prompt( %db( @ocen_%1_komentarz, %-2), "Ustaw komentarz dla: %-2.");#class {Dane|.przedmioty};#addkey ocen_%1_komentarz {%-2} {@ocen_wpis};#class 0;ocen_pokaz %-1}
#ALIAS ocen_wpisz_typ {#va ocen_wpis {};#if ("%1"="bron") {ocen_wpis=%pick( "o:1", "p:Wybierz nowy typ dla broni", bron drzewcowa|dwureczna maczuga|dwureczny miecz|dwureczny mlot|dwureczny topor|maczuga|miecz|mlot|sztylet)};#if ("%1"="zbroje") {ocen_wpis=%pick( "o:1", "p:Wybierz nowy typ dla zbroi", Lekka|Srednia|Ciezka)};#if (%ismember( "%1", ubranie|pojemnik)) {ocen_wpis=%pick( "o:1", "p:Wybierz nowy material wykonania", Aktualizuj|Inny, @ocen_materialy)};#if (@ocen_wpis) {#if (@ocen_wpis=Aktualizuj) {ocen_aktualizuj_materialy;ocen_wpisz_typ %-1} {#if (@ocen_wpis=Inny) {ocen_wpis=%prompt( ,"Podaj material");#if (@ocen_wpis) {#class {Dane|.przedmioty};#addkey ocen_%1_typ {%-2} {%lower( @ocen_wpis)};#class 0;ocen_pokaz %-1}} {#class {Dane|.przedmioty};#addkey ocen_%1_typ {%-2} {%lower( @ocen_wpis)};#class 0;ocen_pokaz %-1}}}}
#ALIAS ocen_inne_sub {#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz inne %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)Inne%ansi( 2)) (%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi(reset)%if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot))}
#ALIAS ocen_zbroje_sub {#mxp %ansi( 6)<send "ocen_pokaz zbroje %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)Zbroja%ansi( 2)) (%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi(reset)}
#VAR ocen_typ_przedmiotu {%repeat(" ",%eval(28-(%len(%db( @ocen_kategorie_db, %1))+%len(%2)-%if( "%2"="bron drzewcowa",5,0)+1+%if( "%1"="bron",2,0))/2))%if( %2, %if( %1=zbroje, %concat( %upper( %2), " ")))%if(%2,<<send '"ocen_wpisz_typ %1 %3"' '"Zmien typ przedmiotu"'>>)%upper( %db( @ocen_kategorie_db, %1))%if(%2,<</send>>)%if( %2, %if( %1=bron, %if( "%2"="bron drzewcowa", " (DRZEWCOWA)", %concat( " (", %upper( %2), ")")), %if( "%1"!="zbroje", %concat( " ", %upper( %2)))))}
#CLASS 0
#CLASS {Ocen|Ocen_wartosci} {disable}
#TRIGGER {^{|> }Dostajesz (*) monet{|y|a|e}.$} {}
#COND {^Sprzedajesz (*).$} {#if (@ocen_czy_jeden_przedmiot("%1")) {#class {Dane|.przedmioty};#addkey @ocen_sprzedaz_name(%1) {@odmienp_bm(%1)} {@conv_coin2md(%replace(%replace("%t1",", ","|")," i ","|"))};#class 0}} {within|param=1}
#TRIGGER {^{|> }Za (*) dostal{|a}bys (*) monet{|y|a|e}.$} {#if (@ocen_czy_jeden_przedmiot("%1")) {#class {Dane|.przedmioty};#addkey @ocen_sprzedaz_name(%1) {@odmienp_bm(%1)} {@conv_coin2md(%replace(%replace("%2",", ","|")," i ","|"))};#class 0}}
#TRIGGER {^{|> }* odbiera od ciebie (*) i wrecza ci (*) monet{|y|a|e}.$} {#class {Dane|.przedmioty};#addkey @ocen_zamowienie_name(%1) {@odmienp_bm(%1)} {@conv_coin2md(%replace(%replace("%2",", ","|")," i ","|"))};#class 0}
#TRIGGER {^{|> }Jesli naprawde chcesz wystawic (*) za (*) monet{|y|a|e} potwierdz to, powtarzajac komende.$} {#class {Dane|.przedmioty};#addkey ocen_aukcja {@odmienp_bm(%1)} {@conv_coin2md(%replace(%replace("%2",", ","|")," i ","|"))};#class 0}
#TRIGGER {>} {#t- Ocen_wartosci} "" {nocr|prompt}
#CLASS 0
#CLASS {Ocen|Ocen_wyszukaj}
#ALIAS ocenw_pokaz {#makewindow Ocen_Szukaj open "scrolling=no|floating=yes|width=60c|height=25c|top=-40c|left=-70c|title=Wyszukaj przedmioty";:Ocen_Szukaj: #clr;:Ocen_Szukaj: #sh "";:Ocen_Szukaj: #mxp %char( 32)@mxp_send(ocenw_wpisz_nazwa,Nazwa,"Nazwa lub czesc nazwy przedmiotu"):%repeat( " ", 5) %if( @ocenw_db.nazwa, %ansi( 15)@ocenw_db.nazwa, %ansi( 8)dowolnie)%ansi( reset);:Ocen_Szukaj: #mxp %char( 32)@mxp_send(ocenw_wpisz_rodzaj,Rodzaj,"Ustaw rodzaj przedmiotu"):%repeat( " ", 4) %if( @ocenw_db.rodzaj, %ansi( 15)%db( @ocen_kategorie_db, @ocenw_db.rodzaj), %ansi( 8)dowolnie)%ansi( reset);:Ocen_Szukaj: #if (%ismember( @ocenw_db.rodzaj, {bron|zbroje|ubranie|pojemnik})) {#mxp %char( 32)@mxp_send(ocenw_wpisz_typ,Typ,"Ustaw typ przedmiotu"):%repeat( " ", 7) %if( @ocenw_db.typ, %ansi( 15)@ocenw_db.typ, %ansi( 8)dowolnie)%ansi( reset)};:Ocen_Szukaj: #sh "";:Ocen_Szukaj: #mxp %char( 32)@mxp_send(ocenw_setrel wartosc,Wartosc,"O wartosci mniejszej rownej lub wiekszej"):%repeat( " ", 2) %if( @ocenw_db.wartosc_rel, %ansi( 15)@mxp_send_in(ocenw_setrel wartosc,@ocenw_frel(wartosc),Zmien relacje) @mxp_send_in(ocenw_setval wartosc,@ocen_format_wartosc_szukaj(@ocenw_db.wartosc_val),Zmien wartosc), %ansi( 8) dowolnie)%ansi( reset);:Ocen_Szukaj: #mxp %char( 32)@mxp_send(ocenw_setrel sprzedaz,Sprzedaz,"O wartosci sprzedazy mniejszej rownej lub wiekszej"):%repeat( " ", 1) %if( @ocenw_db.sprzedaz_rel, %ansi( 15)@mxp_send_in(ocenw_setrel sprzedaz,@ocenw_frel(sprzedaz),Zmien relacje) @mxp_send_in(ocenw_setval sprzedaz,@ocen_format_wartosc_szukaj(@ocenw_db.sprzedaz_val),Zmien wartosc), %ansi( 8) dowolnie)%ansi( reset);:Ocen_Szukaj: #sh "";:Ocen_Szukaj: #mxp %char( 32)@mxp_send(ocenw_wpisz_waga,Waga,"O wadze mniejszej rownej lub wiekszej"):%repeat( " ", 5) %if( @ocenw_db.waga_rel, %ansi( 15)@mxp_send_in(ocenw_setrel2 waga,@ocenw_frel(waga),Zmien relacje) @mxp_send_in(ocenw_wpisz_waga_val,@ocenw_db.waga_val,Zmien wartosc), %ansi( 8) dowolnie)%ansi( reset);:Ocen_Szukaj: #mxp %char( 32)@mxp_send(ocenw_wpisz_obj,Objetosc,"O objetosci mniejszej rownej lub wiekszej"):%repeat( " ", 1) %if( @ocenw_db.obj_rel, %ansi( 15)@mxp_send_in(ocenw_setrel2 obj,@ocenw_frel(obj),Zmien relacje) @mxp_send_in(ocenw_wpisz_obj_val,@ocenw_db.obj_val,Zmien wartosc), %ansi( 8) dowolnie)%ansi( reset);:Ocen_Szukaj: #sh "";:Ocen_Szukaj: #mxp %char( 32)@mxp_send(ocenw_wpisz_pochodzenie,Pochodz.,"Pochodzenie przedmiotu"):%repeat( " ", 3)%if( @ocenw_db.pochodzenie, %ansi( 15)@ocenw_db.pochodzenie, %ansi( 8)dowolnie)%ansi( reset);:Ocen_Szukaj: #if (@ocenw_db.rodzaj=bron) {#sh "";#mxp %char( 32)@mxp_send(ocenw_wpisz_rany,Rany,"Jakie zadaje rany"):%repeat( " ", 6) %if( @ocenw_db.rany, %ansi( 15)%replace( @ocenw_db.rany, "|", " "), %ansi( 8)dowolnie)%ansi( reset);#mxp %char( 32)@mxp_send(ocenw_wpisz_reka,Reka,"W jakiej rece dobywasz"):%repeat( " ", 6) %if( @ocenw_db.reka, %ansi( 15)%replace( @ocenw_db.reka, "|", " "), %ansi( 8)dowolnie)%ansi( reset)};:Ocen_Szukaj: #if (@ocenw_db.rodzaj=zbroje) {#sh "";#mxp %char( 32)@mxp_send(ocenw_wpisz_chroni,Chroni,"Jakie miejsca chroni"):%repeat( " ", 4) %if( @ocenw_db.chroni, %ansi( 15)%replace( @ocenw_db.chroni, "|", " "), %ansi( 8)dowolnie)%ansi( reset)};#if (%ismember( @ocenw_db.rodzaj, {bron|zbroje|tarcze|puklerz})) {:Ocen_Szukaj: #sh "";:Ocen_Szukaj: #mxp %char( 32)@mxp_send(ocenw_setrel zamowienie,Zamowienie,"Cena na zamowienie mniejsza rowna wieksza lub poprostu mozliwa"):%if( @ocenw_db.zamowienie_rel, %ansi( 15)@mxp_send_in(ocenw_setrel zamowienie,@ocenw_frel(zamowienie),Zmien relacje) @mxp_send_in(ocenw_setval zamowienie,@ocen_format_wartosc_szukaj(@ocenw_db.zamowienie_val),Zmien wartosc), %ansi( 8) dowolnie)%ansi( reset);:Ocen_Szukaj: #mxp %char( 32)@mxp_send(ocenw_setrel aukcja,Aukcja,"Cena na aukcji mniejsza rowna wieksza lub poprostu mozliwa do wystawienia"):%repeat( " ", 3) %if( @ocenw_db.aukcja_rel, %ansi( 15)@mxp_send_in(ocenw_setrel aukcja,@ocenw_frel(aukcja),Zmien relacje) @mxp_send_in(ocenw_setval aukcja,@ocen_format_wartosc_szukaj(@ocenw_db.aukcja_val),Zmien wartosc), %ansi( 8) dowolnie)%ansi( reset)};:Ocen_Szukaj: #if (@ocenw_db.rodzaj=bron) {#sh "";#mxp %char( 32)@mxp_send(ocenw_wpisz_cecha,Specjalna cecha,"Bron magiczna lub srebrna"): %if( @ocenw_db.cecha, %ansi( 15)%item( Bron magiczna|Bron srebrna|Bron niemagiczna|Bron niesrebrna|Bron niesrebrna i niemagiczna, @ocenw_db.cecha), %ansi( 8)dowolnie)%ansi( reset)};:Ocen_Szukaj: #sh "";:Ocen_Szukaj: #mxp %repeat( " ", 35)@mxp_send(ocenw_szukaj, SZUKAJ, Szukaj przedmiotow spelniajacych wprowadzone wymagania)%repeat( " ", 5)@mxp_send(ocenw_reset, RESET, Zresetuj ustawienia wyszukiwania do poczatkowych)}
#ALIAS ocenw_szukaj {ocenw_przygotuj;#makewindow Ocen_Wyniki open "scrolling=yes|floating=yes|width=50c|height=40c|top=-55c|left=-125c|title=Wyniki wyszukiwania";:Ocen_Wyniki: #clr;:Ocen_Wyniki: #sh "";:Ocen_Wyniki: #case (%ismember( @ocenw_db.rodzaj, magia|srebro|pochodzenie)) {#forall @ocen_bron_magia {#if (@ocenw_szukaj1(%i)) {#mxp @ocenw_pokaz_przedmiot(%i)}}} {#forall @ocen_bron_srebro {#if (@ocenw_szukaj1(%i)) {#mxp @ocenw_pokaz_przedmiot(%i)}}} {#loopdb @{ocen_@{ocenw_db.rodzaj}_pochodzenie} {#if (@ocenw_szukaj1(%key)) {#mxp @ocenw_pokaz_przedmiot(%key)}}} {#loopdb @{ocen_@{ocenw_db.rodzaj}_waga} {#if (@ocenw_szukaj1(%key)) {#mxp @ocenw_pokaz_przedmiot(%key)}}};:Ocen_Wyniki: #sh "";:Ocen_Wyniki: #sh "-------------------------------------------------";:Ocen_Wyniki: #sh "              Wyszukiwanie zakonczone ";:Ocen_Wyniki: #sh "";:Ocen_Wyniki: #sh %ansi( 4)"   x "%ansi( reset)- przedmiot nie ma wpisanego pochodzenia;:Ocen_Wyniki: #mxp %repeat( " ", 18) <send ":Ocen_Wyniki: #fr 0" "Mozesz takze kliknac kolkiem myszy."><color #88CC88>Wylacz scroll</color></send>}
#ALIAS ocenw_przygotuj {ocenw_db.nr = 1;ocenw_db.wg = %null;#if (@ocenw_db.nazwa) {#va ocenw_szukaj@ocenw_db.nr {"%if(@ocenw_snazwa(%~1,"%replace( %lower( @ocenw_db.nazwa), " ", "|")","%word( %lower( @ocenw_db.nazwa), 1)",1,"%numwords( @ocenw_db.nazwa)"),@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"};#add ocenw_db.nr 1};#if (@ocenw_db.cecha) {#case @ocenw_db.cecha {#va ocenw_szukaj@ocenw_db.nr {"%if(%ismember(%~1,@ocen_bron_magia),@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"};#if (!@ocenw_db.wg) {ocenw_db.wg = magia}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%ismember(%~1,@ocen_bron_srebro),@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"};#if (!@ocenw_db.wg) {ocenw_db.wg = srebro}} {#va ocenw_szukaj@ocenw_db.nr {"%if(!(%ismember(%~1,@ocen_bron_magia)),@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(!(%ismember(%~1,@ocen_bron_srebro)),@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(!((%ismember(%~1,@ocen_bron_magia))|(%ismember(%~1,@ocen_bron_srebro))),@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}};#add ocenw_db.nr 1};#if (@ocenw_db.typ) {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@ocen_"@ocenw_db.rodzaj"_typ,%~1)="%char( 34)@ocenw_db.typ%char( 34)",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"};#add ocenw_db.nr 1};#if (@ocenw_db.pochodzenie) {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@ocen_"@ocenw_db.rodzaj"_pochodzenie,%~1)="%char( 34)@ocenw_db.pochodzenie%char( 34)",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"};#add ocenw_db.nr 1;#if (!@ocenw_db.wg) {ocenw_db.wg = pochodzenie}};#if (@ocenw_db.wartosc_rel) {#case @ocenw_db.wartosc_rel {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@ocen_"@ocenw_db.rodzaj"_wartosc,%~1)<"@ocenw_db.wartosc_val",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@ocen_"@ocenw_db.rodzaj"_wartosc,%~1)>"@ocenw_db.wartosc_val",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@ocen_"@ocenw_db.rodzaj"_wartosc,%~1)="@ocenw_db.wartosc_val",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@ocen_"@ocenw_db.rodzaj"_wartosc,%~1)>0,@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@ocen_"@ocenw_db.rodzaj"_wartosc,%~1)<0,@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(!(%db(@ocen_"@ocenw_db.rodzaj"_wartosc,%~1)),@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}};#add ocenw_db.nr 1};#if (@ocenw_db.reka) {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@ocen_"@ocenw_db.rodzaj"_reka,%~1)="%char( 34)%lower( @ocenw_db.reka)%char( 34)",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"};#add ocenw_db.nr 1};#if (@ocenw_db.waga_rel) {#case @ocenw_db.waga_rel {#va ocenw_szukaj@ocenw_db.nr {"%if(@ocen_raw_size(%db(@ocen_"@ocenw_db.rodzaj"_waga,%~1))<"@ocen_raw_size(@ocenw_db.waga_val)",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(@ocen_raw_size(%db(@ocen_"@ocenw_db.rodzaj"_waga,%~1))>"@ocen_raw_size(@ocenw_db.waga_val)",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(@ocen_raw_size(%db(@ocen_"@ocenw_db.rodzaj"_waga,%~1))="@ocen_raw_size(@ocenw_db.waga_val)",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}};#add ocenw_db.nr 1};#if (@ocenw_db.obj_rel) {#case @ocenw_db.obj_rel {#va ocenw_szukaj@ocenw_db.nr {"%if(@ocen_raw_size(%db(@ocen_"@ocenw_db.rodzaj"_obj,%~1))<"@ocen_raw_size(@ocenw_db.obj_val)",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(@ocen_raw_size(%db(@ocen_"@ocenw_db.rodzaj"_obj,%~1))>"@ocen_raw_size(@ocenw_db.obj_val)",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(@ocen_raw_size(%db(@ocen_"@ocenw_db.rodzaj"_obj,%~1))="@ocen_raw_size(@ocenw_db.obj_val)",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}};#add ocenw_db.nr 1};#if (@ocenw_db.rany) {#va ocenw_szukaj@ocenw_db.nr {"%if(@ocenw_comp(%db(@ocen_bron_rany,%~1),"@ocenw_db.rany","%item( @ocenw_db.rany, 1)",1,"%numitems( @ocenw_db.rany)"),@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"};#add ocenw_db.nr 1};#if (@ocenw_db.chroni) {#va ocenw_szukaj@ocenw_db.nr {"%if(@ocenw_comp(%db(@ocen_zbroje_chroni,%~1),"%lower( @ocenw_db.chroni)","%item( %lower( @ocenw_db.chroni), 1)",1,"%numitems( @ocenw_db.chroni)"),@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"};#add ocenw_db.nr 1};#if (@ocenw_db.sprzedaz_rel) {#case @ocenw_db.sprzedaz_rel {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@{@ocen_sprzedaz_name(%~1)},%~1)<"@ocenw_db.sprzedaz_val",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@{@ocen_sprzedaz_name(%~1)},%~1)>"@ocenw_db.sprzedaz_val",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@{@ocen_sprzedaz_name(%~1)},%~1)="@ocenw_db.sprzedaz_val",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@{@ocen_sprzedaz_name(%~1)},%~1)>0,@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@{@ocen_sprzedaz_name(%~1)},%~1)<0,@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(!(%db(@{@ocen_sprzedaz_name(%~1)},%~1)),@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}};#add ocenw_db.nr 1};#if (@ocenw_db.zamowienie_rel) {#case @ocenw_db.zamowienie_rel {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@{@ocen_zamowienie_name(%~1)},%~1)<"@ocenw_db.zamowienie_val",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@{@ocen_zamowienie_name(%~1)},%~1)>"@ocenw_db.zamowienie_val",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@{@ocen_zamowienie_name(%~1)},%~1)="@ocenw_db.zamowienie_val",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@{@ocen_zamowienie_name(%~1)},%~1)>0,@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@{@ocen_zamowienie_name(%~1)},%~1)<0,@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(!(%db(@{@ocen_zamowienie_name(%~1)},%~1)),@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}};#add ocenw_db.nr 1};#if (@ocenw_db.aukcja_rel) {#case @ocenw_db.aukcja_rel {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@ocen_aukcja,%~1)<"@ocenw_db.aukcja_val",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@ocen_aukcja,%~1)>"@ocenw_db.aukcja_val",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@ocen_aukcja,%~1)="@ocenw_db.aukcja_val",@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@ocen_aukcja,%~1)>0,@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(%db(@ocen_aukcja,%~1)<0,@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}} {#va ocenw_szukaj@ocenw_db.nr {"%if(!(%db(@ocen_aukcja,%~1)),@ocenw_szukaj"%eval( @ocenw_db.nr+1)"(%~1),0)"}};#add ocenw_db.nr 1};#va ocenw_szukaj@ocenw_db.nr 1}
#ALIAS ocenw_reset {#va ocenw_db {};ocenw_db.rodzaj=bron;ocenw_pokaz}
#ALIAS ocenw_wpisz_nazwa {#pr ocenw_db.nazwa "Podaj calosc lub czesc nazwy przedmiotu. Pozostaw puste, by wyszukac przedmiot o dowolnej nazwie.";ocenw_pokaz}
#ALIAS ocenw_wpisz_rodzaj {ocen_wpis = %pick( "o:1", "p:Wybierz w jakim rodzaju przedmiotow ma byc wyszukiwane.", @ocen_kategorie_listo);#if (@ocen_wpis) {ocenw_db.rodzaj = %db( @ocen_kategorie_dbo, @ocen_wpis);ocenw_db.typ=%null};ocenw_pokaz}
#ALIAS ocenw_wpisz_typ {#va ocen_wpis {};#if (@ocenw_db.rodzaj="bron") {ocen_wpis=%pick( "o:1", "p:Wybierz nowy typ dla broni", bron drzewcowa|dwureczna maczuga|dwureczny miecz|dwureczny mlot|dwureczny topor|maczuga|miecz|mlot|topor|sztylet)};#if (@ocenw_db.rodzaj="zbroje") {ocen_wpis=%pick( "o:1", "p:Wybierz nowy typ dla zbroi", Lekka|Srednia|Ciezka)};#if (%ismember( @ocenw_db.rodzaj, ubranie|pojemnik)) {ocen_wpis=%pick( "o:1", "p:Wybierz nowy material wykonania", Aktualizuj, @ocen_materialy)};#if (@ocen_wpis) {#if (@ocen_wpis=Aktualizuj) {ocen_aktualizuj_materialy;ocenw_wpisz_typ} {ocenw_db.typ= %lower( @ocen_wpis);ocenw_pokaz}}}
#ALIAS ocenw_wpisz_waga {ocenw_setrel2 waga;#if (@ocenw_db.waga_rel and @ocenw_db.waga_rel < 4) {ocenw_wpisz_waga_val}}
#ALIAS ocenw_wpisz_waga_val {#va ocen_wpis {};#va ocen_matchdb {};#pr ocen_wpis "Wpisz wage dla  w formie 123 g lub 123kg. Jezeli pominiesz jednostke, zostana wpisane gramy.";#if (%match( @ocen_wpis, "^(%d){|g}$", ocen_matchdb.waga)) {ocenw_db.waga_val = %if( !(%mod( @ocen_matchdb.waga, 1000)), %eval( %leftback( @ocen_matchdb.waga, 3)kg), @{ocen_matchdb.waga}g)} {#if (%match( @ocen_wpis, "(%d)kg", ocen_matchdb.waga)) {ocenw_db.waga_val = @{ocen_matchdb.waga}kg} {#sh Nieprawidlowy format dla wagi. Wpisz liczbe gramow (g na koncu opcjonalne) lub liczbe kilogramow z kg na koncu.}};ocenw_pokaz}
#ALIAS ocenw_wpisz_obj {ocenw_setrel2 obj;#if (@ocenw_db.obj_rel and @ocenw_db.obj_rel < 4) {ocenw_wpisz_obj_val}}
#ALIAS ocenw_wpisz_obj_val {#va ocen_wpis {};#va ocen_matchdb {};#pr ocen_wpis "Wpisz objetosc dla --- %-2 --- w formie 123ml lub 123l. Jezeli pominiesz jednostke, zostana wpisane mililitry.";#if (%match( @ocen_wpis, "^(%d){|ml}$", ocen_matchdb.obj)) {ocenw_db.obj_val = %if( !(%mod( @ocen_matchdb.obj, 1000)), %eval( %leftback( @ocen_matchdb.obj, 3)l), @{ocen_matchdb.obj}ml)} {#if (%match( @ocen_wpis, "(%d)l", ocen_matchdb.obj)) {ocenw_db.obj_val = @{ocen_matchdb.obj}l} {#sh Nieprawidlowy format dla wagi. Wpisz liczbe mililitrow (ml na koncu opcjonalne) lub liczbe litrow z l na koncu.}};ocenw_pokaz}
#ALIAS ocenw_wpisz_pochodzenie {ocen_wpis = %pick( "p:Wybierz miejsce pochodzenia.", "o:1", Dowolnie|@ocen_pochodzenia);#if (@ocen_wpis) {ocenw_db.pochodzenie = %if( @ocen_wpis=Dowolnie, "", @ocen_wpis);ocenw_pokaz}}
#ALIAS ocenw_wpisz_rany {ocen_wpis = %pick( "p:Wybierz jakie rany ma zadawac wyszukiwana bron", "Dowolne", "Klute", "Ciete", "Obuchowe");#if (@ocen_wpis) {ocenw_db.rany = %if( %ismember( Dowolne, @ocen_wpis), "", %lower( @ocen_wpis));ocenw_pokaz}}
#ALIAS ocenw_wpisz_reka {ocen_wpis = %pick( "p:Wyszukaj bronie dobywane:", "o:1", "Dowolnie", "W prawej rece", "W lewej rece", "W dowolnej rece", "Oburacz");#if (@ocen_wpis) {ocenw_db.reka = %if( @ocen_wpis=Dowolnie, "", @ocen_wpis);ocenw_pokaz}}
#ALIAS ocenw_wpisz_chroni {ocen_wpis = %pick( "p:%proper(%-2) chroni:", "Dowolnie|Glowe|Korpus|Ramiona|Lewe ramie|Prawe ramie|Dlonie||Lewa dlon|Prawa dlon|Nogi|Stopy|Lewa stope|Prawa stope");#if (@ocen_wpis) {ocenw_db.chroni = %if( %ismember( Dowolnie, @ocen_wpis), "", @ocen_wpis);ocenw_pokaz}}
#ALIAS ocenw_wpisz_cecha {ocen_wpis = %pick( "p:Wyszukaj bronie dobywane:", "o:1", "Dowolnie", "Bron magiczna", "Bron srebrna", "Bron niemagiczna", "Bron niesrebrna", "Bron niesrebrna i niemagiczna");#if (@ocen_wpis) {ocenw_db.cecha = %if( @ocen_wpis=Dowolnie, "", %ismember( @ocen_wpis, Bron magiczna|Bron srebrna|Bron niemagiczna|Bron niesrebrna|Bron niesrebrna i niemagiczna));ocenw_pokaz}}
#ALIAS ocenw_setrel {ocen_wpis = %pick( "o:1", "p:Wybierz relacje.", Dowolna|Mniejsze niz|Wieksze niz|Rowne|Ma wartosc|Nie ma wartosci|Wartosc nieustalona);#if (@ocen_wpis) {#if (@ocen_wpis=Dowolna) {ocenw_db.%1_rel=%null} {ocenw_db.%1_rel=%ismember( @ocen_wpis, Mniejsze niz|Wieksze niz|Rowne|Ma wartosc|Nie ma wartosci|Wartosc nieustalona)}};#if (@ocenw_db.%1_rel>3) {ocenw_db.%1_val=%null};#if (@ocenw_db.%1_rel and @ocenw_db.%1_rel < 4) {ocenw_setval %1};ocenw_pokaz}
#ALIAS ocenw_setrel2 {ocen_wpis = %pick( "o:1", "p:Wybierz relacje.", Dowolna|Mniejsze niz|Wieksze niz|Rowne);#if (@ocen_wpis) {#if (@ocen_wpis=Dowolna) {ocenw_db.%1_rel=%null} {ocenw_db.%1_rel=%ismember( @ocen_wpis, Mniejsze niz|Wieksze niz|Rowne|Ma wartosc|Nie ma wartosci|Wartosc nieustalona)}};#if (@ocenw_db.%1_rel>3) {ocenw_db.%1_val=%null};ocenw_pokaz}
#ALIAS ocenw_setval {#va ocen_wpis {};#va ocen_matchdb {};#pr ocen_wpis "Wpisz wartosc w miedziakach lub formacie 12mt 34zl 45sr 56md. 0 lub puste by usunac, negatywne by oznaczyc brak mozliwosci.";#if (%match( @ocen_wpis, "^(%n)$", ocen_matchdb.wartosc)) {ocenw_db.%1_val = @ocen_matchdb.wartosc} {#if (%match( @ocen_wpis, "(%d){| }mt", ocen_matchdb.mt) or %match( @ocen_wpis, "(%d){| }zl", ocen_matchdb.zl) or %match( @ocen_wpis, "(%d){| }sr", ocen_matchdb.sr) or %match( @ocen_wpis, "(%d){| }md", ocen_matchdb.md)) {ocenw_db.%1_val = %eval( %number( @ocen_matchdb.mt)*24000+%number( @ocen_matchdb.zl)*240+%number( @ocen_matchdb.sr)*12+%number( @ocen_matchdb.md))} {#sh Nieprawidlowy format wartosci. Wpisz liczbe miedziakow lub wartosc w formacie XXmt YYzl ZZsr OOmd.}};ocenw_pokaz}
#VAR ocen_format_wartosc_szukaj {%if( %number( %1)<0, "---", %if( %1, @miedz_na_monety(%1), @miedz_na_monety(0)))}
#VAR ocen_raw_size {%number( %replace( %replace( %replace( %replace( %1, g, ""), ml, ""), k, 000), l, 000))}
#VAR ocenw_db {rodzajzbrojenazwanr1wgtyp}
#VAR ocenw_frel {{%case( @ocenw_db.%1_rel, "<", ">", "=", %ansi( 10)"", %ansi( 12)"x", %ansi( 11)"")}}
#VAR ocenw_szukaj1 {1}
#VAR ocenw_szukaj2 {1}
#VAR ocenw_szukaj3 {1}
#VAR ocenw_szukaj4 {%if(%db(@ocen_bron_pochodzenie,%1)="Mahakam - jaskinie vranow",@ocenw_szukaj5(%1),0)}
#VAR ocenw_szukaj5 {%if(%db(@ocen_bron_wartosc,%1)<0,@ocenw_szukaj6(%1),0)}
#VAR ocenw_szukaj6 {%if(%db(@ocen_bron_reka,%1)="W lewej rece",@ocenw_szukaj7(%1),0)}
#VAR ocenw_szukaj7 {%if(@ocen_raw_size(%db(@ocen_bron_waga,%1))>555,@ocenw_szukaj8(%1),0)}
#VAR ocenw_szukaj8 {%if(@ocen_raw_size(%db(@ocen_bron_obj,%1))>54,@ocenw_szukaj9(%1),0)}
#VAR ocenw_szukaj9 {%if(@ocenw_comp(%db(@ocen_bron_reka,%1),klute|ciete,klute,1,2),@ocenw_szukaj10(%1),0)}
#VAR ocenw_szukaj10 {%if(%db(@{@ocen_sprzedaz_name(%1)},%1)>222,@ocenw_szukaj11(%1),0)}
#VAR ocenw_szukaj11 {%if(%db(@{@ocen_zamowienie_name(%1)},%1)>111,@ocenw_szukaj12(%1),0)}
#VAR ocenw_szukaj12 {%if(%db(@ocen_aukcja,%1)>55,@ocenw_szukaj13(%1),0)}
#VAR ocenw_szukaj13 {%if(%db(@ocen_aukcja,%1)>55,@ocenw_szukaj14(%1),0)}
#VAR ocenw_snazwa {%if( %4>%5, 1, %if( %pos( %3, %1), @ocenw_snazwa(%1,%2,%item(%2,%eval(%4+1)),%eval(%4+1),%5), 0))}
#VAR ocenw_comp {%if(%4>%5,1,%if(%ismember(%3,%1),@ocenw_comp(%1,%2,%item(%2,%eval(%4+1)),%eval(%4+1),%5),0))}
#VAR ocenw_pokaz_przedmiot {-%if( %db( @{ocen_@{ocenw_db.rodzaj}_pochodzenie}, %1), "-", %ansi( 4)x%ansi( reset))> <send "ocen_pokaz @ocenw_db.rodzaj %1" "Pokaz szczegoly dla %1">%ansi( 6)%1</send>}
#CLASS 0
#CLASS {Ocen|Ocen_opcje}
#ALIAS menu1_ocen {#mxp @op_mxpRTN(oceno_tylko_ocen,5,5,Wylacz baze danych przedmiotow,ocen);#if (!@oceno_tylko_ocen) {#mxp @op_mxpTN(ocen_force_update,5,7,Wymus aktualizacje przedmiotow)}}
#VAR oceno_tylko_ocen {0}
#VAR ocen_force_update {0}
#CLASS 0
#CLASS {Ocen|Lap_ocene} {disable}
#TRIGGER {^Wyglada na to, ze (*).$} {#if (%db( @ocen_zniszczenie, %rightback( %leftback( %1, 1), 12))) {ocen_db.zniszczenie=%db( @ocen_zniszczenie, %rightback( %leftback( %1, 1), 12))}}
#TRIGGER {^Oceniasz, ze (*) waz{y|a} (%d) ({|kilo}gram){y|ow}, zas {jego|jej|ich} objetosc wynosi (%d) ({mili|})litr{|y|ow}.$} {#if (@ocen_db.inne=1) {#pri {ocen_inne_sub};#pri {ocen_dodaj_inne}};#if (@ocen_db.inne=2) {#pri {ocen_zbroje_sub};#pri {ocen_dodaj_zbroje}};ocen_db = %addkey( %addkey( %addkey( %addkey( %addkey( ,mian, %1), waga, %if( %mod( %2, 1000), %2, %number( %leftback( %2, 3))k)%if( %3=kilogram, k)g), obj, %if( %5, %if( %mod( %4, 1000), %4m, %number( %leftback( %4, 3))), %4)l), zniszczenie, @ocen_db.zniszczenie), inne, 1);#sub {""}}
#COND {^Wydaje ci sie, ze {jest|sa} (%w) okolo (%d) miedziak{|i|ow}.$} {ocen_db.wartosc=%2;#sub {%proper(%t1) (%if(%mod(%t2, 1000), %t2, %number( %leftback( %t2, 3))k)%if( %t3=kilogram, k)g|%if(%t5,%if( %mod( %t4, 1000), %t4m, %number( %leftback( %t4,3))),%t4)l) %1 %2md ( @miedz_na_monety(%2)) }} {within|param=1}
#TRIGGER {^Oceniasz, ze (*) waz{y|a} (%d) ({|kilo}gram){y|ow|}, zas {jego|jej|ich} dlugosc wynosi okolo (%a) metr{|y|ow}.$} {#if (@ocen_db.inne=1) {#pri {ocen_inne_sub};#pri {ocen_dodaj_inne}};#if (@ocen_db.inne=2) {#pri {ocen_zbroje_sub};#pri {ocen_dodaj_zbroje}};ocen_db = %addkey( %addkey( %addkey( %addkey( %addkey( ,mian, %1), waga, %if( %mod( %2, 1000), %2, %number( %leftback( %2, 3))k)%if( %3=kilogram, k)g), obj, %4 m), zniszczenie, @ocen_db.zniszczenie), inne, 1);#sub {""}}
#COND {^Wydaje ci sie, ze {jest|sa} (%w) okolo (%d) miedziak{|i|ow}.$} {ocen_db.wartosc=%2;#sub {%proper(%t1) (%if(%mod(%t2, 1000), %t2, %number( %leftback( %t2, 3))k)%if( %t3=kilogram, k)g|%t4 m) %1 %2md ( @miedz_na_monety(%2)) }} {within|param=1}
#TRIGGER {^Twoje doswiadczenie i umiejetnosci podpowiadaja ci, ze jak na (*) {jest|sa} on{|o|e|a} (*) i (*).$} {#pri {ocen_dodaj_bron %if(%begins(%1,ma),maczuga,%1)};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz bron %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)%1%ansi( 2)) wywazenie(%ansi( 7)%ismember( %leftback( %2, 1), {wyjatkowo zle wywazon|bardzo zle wywazon|zle wywazon|bardzo kiepsko wywazon|kiepsko wywazon|przyzwoicie wywazon|srednio wywazon|niezle wywazon|dosc dobrze wywazon|dobrze wywazon|bardzo dobrze wywazon|doskonale wywazon|perfekcyjnie wywazon|genialnie wywazon})%ansi( 2)|%ansi( 7)14%ansi( 2)) skutecznosc(%ansi( 7)%ismember( %leftback( %3, 1), {kompletnie nieskuteczn|strasznie nieskuteczn|bardzo nieskuteczn|raczej nieskuteczn|malo skuteczn|niezbyt skuteczn|raczej skuteczn|dosyc skuteczn|calkiem skuteczn|bardzo skuteczn|niezwykle skuteczn|wyjatkowo skuteczn|zabojczo skuteczn|fantastycznie skuteczn})%ansi( 2)|%ansi( 7)14%ansi( 2)) %ansi( 2)(%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)@ocen_db.zniszczenie%ansi( 14)|%ansi( 15)7%ansi( 14))%ansi(reset) %ansi(2)[%ansi( 7)%eval(%ismember( %leftback( %2, 1), {wyjatkowo zle wywazon|bardzo zle wywazon|zle wywazon|bardzo kiepsko wywazon|kiepsko wywazon|przyzwoicie wywazon|srednio wywazon|niezle wywazon|dosc dobrze wywazon|dobrze wywazon|bardzo dobrze wywazon|doskonale wywazon|perfekcyjnie wywazon|genialnie wywazon})+%ismember( %leftback( %3, 1), {kompletnie nieskuteczn|strasznie nieskuteczn|bardzo nieskuteczn|raczej nieskuteczn|malo skuteczn|niezbyt skuteczn|raczej skuteczn|dosyc skuteczn|calkiem skuteczn|bardzo skuteczn|niezwykle skuteczn|wyjatkowo skuteczn|zabojczo skuteczn|fantastycznie skuteczn}))%ansi( 2)|%ansi( 7)28%ansi(2)] %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Za {jego|jej|ich} pomoca mozna zadawac rany (*).$} {ocen_db.rany = %replace( %replace( "%1", ", ", "|"), " i ", "|")}
#TRIGGER {^Zauwazasz, iz t{a|en} {bron drzewcowa|topor|sztylet|miecz|mlot|maczuga|mlot}{dwureczny|} jest przystosowan? do chwytania (*).$} {ocen_db.reka = %1}
#TRIGGER {^Sadzac po delikatnym drzeniu w broni tej zostala zakleta jakas magia, bedzie wiec ona skuteczna przeciw wrogom odpornym na zwykle obrazenia.$} {#if (@ocen_db.update_prop) {#class {Dane|.przedmioty};#additem ocen_bron_magia {@ocen_db.mian};#class 0}}
#TRIGGER {^Do wykonania tej broni uzyto srebra, bedzie wiec ona skuteczna przeciw wrogom odpornym na zwykle obrazenia.$} {#if (@ocen_db.update_prop) {#class {Dane|.przedmioty};#additem ocen_bron_srebro {@ocen_db.mian};#class 0}}
#TRIGGER {^Twoje doswiadczenie i umiejetnosci podpowiadaja ci, ze jak na (%w) zbroje chroni{|a} on{|a|e} (*) przed obrazeniami cietymi, (*) przed klutymi i (*) przed obuchowymi.$} {#pri {ocen_dodaj_zbroje %1};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz zbroje %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)%proper( %1) Zbroja%ansi( 2)) klute(%ansi( 7)%ismember( %3, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) obuchowe(%ansi( 7)%ismember( %4, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) ciete(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) %ansi( 2)(%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)@ocen_db.zniszczenie%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %ansi(2)[%ansi( 7)%eval(%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})+%ismember( %3, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})+%ismember( %4, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie}))%ansi( 2)|%ansi( 7)36%ansi(2)] %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zaloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zaloz, Zaloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Twoje doswiadczenie i umiejetnosci podpowiadaja ci, ze jak na (%w) zbroje chroni{|a} on{|a|e} (*) przed obrazeniami klutymi, cietymi i obuchowymi.} {#pri {ocen_dodaj_zbroje %1};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz zbroje %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)%proper( %1) Zbroja%ansi( 2)) klute(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) obuchowe(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) ciete(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) %ansi( 2)(%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)@ocen_db.zniszczenie%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %ansi(2)[%ansi( 7)%eval(3*%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie}))%ansi( 2)|%ansi( 7)36%ansi(2)] %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zaloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zaloz, Zaloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Twoje doswiadczenie i umiejetnosci podpowiadaja ci, ze jak na (%w) zbroje chroni{|a} on{|a|e} (*) przed obrazeniami klutymi i obuchowymi oraz (*) przed cietymi.$} {#pri {ocen_dodaj_zbroje %1};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz zbroje %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)%proper( %1) Zbroja%ansi( 2)) klute(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) obuchowe(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) ciete(%ansi( 7)%ismember( %3, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) %ansi( 2)(%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)@ocen_db.zniszczenie%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %ansi(2)[%ansi( 7)%eval(2*%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})+%ismember( %3, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie}))%ansi( 2)|%ansi( 7)36%ansi(2)] %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zaloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zaloz, Zaloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Twoje doswiadczenie i umiejetnosci podpowiadaja ci, ze jak na (%w) zbroje chroni{|a} on{|a|e} (*) przed obrazeniami klutymi i cietymi oraz (*) przed obuchowymi.$} {#pri {ocen_dodaj_zbroje %1};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz zbroje %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)%proper( %1) Zbroja%ansi( 2)) klute(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) obuchowe(%ansi( 7)%ismember( %3, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) ciete(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) %ansi( 2)(%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)@ocen_db.zniszczenie%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %ansi(2)[%ansi( 7)%eval(2*%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})+%ismember( %3, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie}))%ansi( 2)|%ansi( 7)36%ansi(2)] %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zaloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zaloz, Zaloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Twoje doswiadczenie i umiejetnosci podpowiadaja ci, ze jak na (%w) zbroje chroni{|a} on{|a|e} (*) przed obrazeniami cietymi i obuchowymi oraz (*) przed klutymi.$} {#pri {ocen_dodaj_zbroje %1};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz zbroje %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)%proper( %1) Zbroja%ansi( 2)) klute(%ansi( 7)%ismember( %3, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) obuchowe(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) ciete(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) %ansi( 2)(%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)@ocen_db.zniszczenie%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %ansi(2)[%ansi( 7)%eval(2*%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})+%ismember( %3, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie}))%ansi( 2)|%ansi( 7)36%ansi(2)] %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zaloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zaloz, Zaloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Zaklada sie {go|ja|je} na (*).$} {ocen_db.inne=2;ocen_db.chroni = %replace( %replace( "%1", ", ", "|"), " i ", "|")}
#TRIGGER {^Twoje doswiadczenie i umiejetnosci podpowiadaja ci, ze chroni on{|a} (*) przed obrazeniami cietymi, (*) przed klutymi i (*) przed obuchowymi. Ponadto jest (*) w parowaniu ciosow.$} {#pri {ocen_dodaj_tarcze};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz tarcze %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)Tarcza%ansi( 2)) klute(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) obuchowe(%ansi( 7)%ismember( %3, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) ciete(%ansi( 7)%ismember( %1, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) skutecznosc(%ansi( 7)%ismember( %4, {kompletnie nieskuteczna|strasznie nieskuteczna|bardzo nieskuteczna|raczej nieskuteczna|malo skuteczna|niezbyt skuteczna|raczej skuteczna|dosyc skuteczna|calkiem skuteczna|bardzo skuteczna|niezwykle skuteczna|wyjatkowo skuteczna|zabojczo skuteczna|fantastycznie skuteczna})%ansi( 2)|%ansi( 7)14%ansi( 2)) (%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)@ocen_db.zniszczenie%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %ansi(2)[%ansi( 7)%eval(%ismember( %leftback( %2, 1), {wyjatkowo zle wywazon|bardzo zle wywazon|zle wywazon|bardzo kiepsko wywazon|kiepsko wywazon|przyzwoicie wywazon|srednio wywazon|niezle wywazon|dosc dobrze wywazon|dobrze wywazon|bardzo dobrze wywazon|doskonale wywazon|perfekcyjnie wywazon|genialnie wywazon})+%ismember( %leftback( %3, 1), {kompletnie nieskuteczn|strasznie nieskuteczn|bardzo nieskuteczn|raczej nieskuteczn|malo skuteczn|niezbyt skuteczn|raczej skuteczn|dosyc skuteczn|calkiem skuteczn|bardzo skuteczn|niezwykle skuteczn|wyjatkowo skuteczn|zabojczo skuteczn|fantastycznie skuteczn}))%ansi( 2)|%ansi( 7)28%ansi(2)]%if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zaloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zaloz, Zaloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Twoje doswiadczenie i umiejetnosci podpowiadaja ci, ze chroni on{a|} (*) przed obrazeniami klutymi, cietymi i obuchowymi. Ponadto jest (*) w parowaniu ciosow.$} {#pri {ocen_dodaj_tarcze};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz tarcze %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)Tarcza%ansi( 2)) klute(%ansi( 7)%ismember( %1, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) obuchowe(%ansi( 7)%ismember( %1, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) ciete(%ansi( 7)%ismember( %1, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) skutecznosc(%ansi( 7)%ismember( %2, {kompletnie nieskuteczna|strasznie nieskuteczna|bardzo nieskuteczna|raczej nieskuteczna|malo skuteczna|niezbyt skuteczna|raczej skuteczna|dosyc skuteczna|calkiem skuteczna|bardzo skuteczna|niezwykle skuteczna|wyjatkowo skuteczna|zabojczo skuteczna|fantastycznie skuteczna})%ansi( 2)|%ansi( 7)14%ansi( 2)) (%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)@ocen_db.zniszczenie%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %ansi(2)[%ansi( 7)%eval(3*%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie}))%ansi( 2)|%ansi( 7)36%ansi(2)] %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zaloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zaloz, Zaloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Twoje doswiadczenie i umiejetnosci podpowiadaja ci, ze chroni on{a|} (*) przed obrazeniami klutymi i obuchowymi oraz (*) przed cietymi. Ponadto jest (*) w parowaniu ciosow.$} {#pri {ocen_dodaj_tarcze};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz tarcze %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)Tarcza%ansi( 2)) klute(%ansi( 7)%ismember( %1, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) obuchowe(%ansi( 7)%ismember( %1, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) ciete(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) skutecznosc(%ansi( 7)%ismember( %3, {kompletnie nieskuteczna|strasznie nieskuteczna|bardzo nieskuteczna|raczej nieskuteczna|malo skuteczna|niezbyt skuteczna|raczej skuteczna|dosyc skuteczna|calkiem skuteczna|bardzo skuteczna|niezwykle skuteczna|wyjatkowo skuteczna|zabojczo skuteczna|fantastycznie skuteczna})%ansi( 2)|%ansi( 7)14%ansi( 2)) (%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)@ocen_db.zniszczenie%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %ansi(2)[%ansi( 7)%eval(2*%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})+%ismember( %3, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie}))%ansi( 2)|%ansi( 7)36%ansi(2)] %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zaloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zaloz, Zaloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Twoje doswiadczenie i umiejetnosci podpowiadaja ci, ze chroni on{a|n} (*) przed obrazeniami klutymi i cietymi oraz (*) przed obuchowymi. Ponadto jest (*) w parowaniu ciosow.$} {#pri {ocen_dodaj_tarcze};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz tarcze %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)Tarcza%ansi( 2)) klute(%ansi( 7)%ismember( %1, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) obuchowe(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) ciete(%ansi( 7)%ismember( %1, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) skutecznosc(%ansi( 7)%ismember( %3, {kompletnie nieskuteczna|strasznie nieskuteczna|bardzo nieskuteczna|raczej nieskuteczna|malo skuteczna|niezbyt skuteczna|raczej skuteczna|dosyc skuteczna|calkiem skuteczna|bardzo skuteczna|niezwykle skuteczna|wyjatkowo skuteczna|zabojczo skuteczna|fantastycznie skuteczna})%ansi( 2)|%ansi( 7)14%ansi( 2)) (%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)@ocen_db.zniszczenie%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %ansi(2)[%ansi( 7)%eval(2*%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})+%ismember( %3, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie}))%ansi( 2)|%ansi( 7)36%ansi(2)] %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zaloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zaloz, Zaloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Twoje doswiadczenie i umiejetnosci podpowiadaja ci, ze chroni on{a|} (*) przed obrazeniami cietymi i obuchowymi oraz (*) przed klutymi. Ponadto jest (*) w parowaniu ciosow.$} {#pri {ocen_dodaj_tarcze};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz tarcze %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)Tarcza%ansi( 2)) klute(%ansi( 7)%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) obuchowe(%ansi( 7)%ismember( %1, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) ciete(%ansi( 7)%ismember( %1, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})%ansi( 2)|%ansi( 7)12%ansi( 2)) skutecznosc(%ansi( 7)%ismember( %leftback( %1,1), {kompletnie nieskuteczn|strasznie nieskuteczn|bardzo nieskuteczn|raczej nieskuteczn|malo skuteczn|niezbyt skuteczn|raczej skuteczn|dosyc skuteczn|calkiem skuteczn|bardzo skuteczn|niezwykle skuteczn|wyjatkowo skuteczn|zabojczo skuteczn|fantastycznie skuteczn})%ansi( 2)|%ansi( 7)14%ansi( 2)) (%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)@ocen_db.zniszczenie%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %ansi(2)[%ansi( 7)%eval(2*%ismember( %2, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie})+%ismember( %3, {wyjatkowo zle|bardzo zle|zle|bardzo kiepsko|kiepsko|przyzwoicie|niezle|dosc dobrze|dobrze|bardzo dobrze|doskonale|perfekcyjnie}))%ansi( 2)|%ansi( 7)36%ansi(2)] %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zaloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zaloz, Zaloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Twoje doswiadczenie i umiejetnosci podpowiadaja ci, ze jest on{a|} (*) w parowaniu ciosow.$} {#pri {ocen_dodaj_puklerz};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz puklerz %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)Tarcza%ansi( 2)) skutecznosc(%ansi( 7)%ismember( %leftback( %1,1), {kompletnie nieskuteczn|strasznie nieskuteczn|bardzo nieskuteczn|raczej nieskuteczn|malo skuteczn|niezbyt skuteczn|raczej skuteczn|dosyc skuteczn|calkiem skuteczn|bardzo skuteczn|niezwykle skuteczn|wyjatkowo skuteczn|zabojczo skuteczn|fantastycznie skuteczn})%ansi( 2)|%ansi( 7)14%ansi( 2)) (%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)@ocen_db.zniszczenie%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zaloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zaloz, Zaloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Ten element ekwipunku wyglada na ({calkiem nowy|w miare nowy|troche zuzyty|w duzym stopniu zuzyty|kompletnie zuzyty}).$} {#pri {ocen_dodaj_ekw};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz ekw %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)Ekwipunek%ansi( 2)) (%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)%if(%begins(%1,c),MAX,%ismember(%1,{kompletnie zuzyty|w duzym stopniu zuzyty|troche zuzyty|w miare nowy}))%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Ubranie to zostalo wykonane (*) i wyglada na ({gotowe rozpasc sie w kazdej chwili|prawie calkiem znoszone|troche znoszone|w miare nowe|calkiem nowe}).$} {#pri {ocen_dodaj_ubranie %1};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz ubranie %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)Ubrania%ansi( 2)) (%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)%if(%begins(%2,c),MAX,%ismember(%2,{gotowe rozpasc sie w kazdej chwili|prawie calkiem znoszone|troche znoszone|w miare nowe}))%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^Ten pojemnik zostal wykonany (*) i wyglada na ({calkiem nowy|w miare nowy|troche zuzyty|w duzym stopniu zuzyty|kompletnie zuzyty}).$} {#pri {ocen_dodaj_pojemnik %1};#pri {#if (@ocen_ndb.bier) {#addkey ocen_ndb {@ocen_ndb.bier} {%additem(%eval(%numitems(%db(@ocen_ndb,@ocen_ndb.bier))+1),%db(@ocen_ndb,@ocen_ndb.bier))}}};#mxp @mxp_send("#va ocen_force_update 0;#sh --> Wylaczono wymuszana aktualizacje wpisow bazy przedmiotow.",%if(@ocen_force_update,%ansi(4)*),Wylacz wymuszona aktualizacje)%ansi( 6)<send "ocen_pokaz pojemnik %lower( @ocen_db.mian)" "Pokaz informacje dla %upper( @ocen_db.mian)">%upper( @ocen_db.mian)</send>%ansi( 2) (%ansi( 3)Ekwipunek%ansi( 2)) (%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)) %ansi( 14)(%ansi( 15)%if(%begins(%2,c),MAX,%ismember(%2,{kompletnie zuzyty|w duzym stopniu zuzyty|troche zuzyty|w miare nowy}))%ansi( 14)|%ansi( 15)5%ansi( 14))%ansi(reset) %if(@ocen_ndb.bier,@mxp_send_in(ocen_odloz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Odloz, Odloz ten przedmiot) @mxp_send_in(ocen_zabezpiecz %numitems(%db(@ocen_ndb,@ocen_ndb.bier)) @rodzaj_z_mianownika(@ocen_db.mian) @ocen_ndb.bier, Zabezpiecz, Zabezpiecz ten przedmiot))}
#TRIGGER {^>} {#if (@ocen_db.inne=1) {#pri {ocen_inne_sub};#pri {ocen_dodaj_inne}};#if (@ocen_db.inne=2) {#pri {ocen_zbroje_sub};#pri {ocen_dodaj_zbroje}};ocen_db.inne=0;ocen_ndb.bier = %null;#if (@ocen_ignore_end) {#if (@ocen_ignore_end<0) {ocen_ignore_end=0} {#add ocen_ignore_end -1}} {#t- Lap_ocene;#t- Oceniasz_starannie;#if (@za_lap_ocene) {#gagoff;#t- ungag_zalozone;#sh --> Ocena zakonczona;za_lap_ocene=0;za_uloz}}} "" {nocr|prompt}
#TRIGGER {^({Wydaje ci sie, ze |}){sa|jest} tu (%d) (sztuk{i|} %w) (%d) miedziak{|i|ow}.$} {ocen_db.wartosc=%4;#sub {%proper( @ocen_db.mian) (%ansi( 5)@ocen_db.waga%ansi( 2)|%ansi( 5)@ocen_db.obj%ansi( 2)),%if("%1",%ansi(3)" okolo"%ansi(reset),"") %2 %3 %4md ( @miedz_na_monety(%4)) }}
#CLASS 0
#CLASS {Ocen|Zalozone}
#ALIAS za_pokaz {#sh @{za_ansi_brn(pbron)}@{za_%10.1}@{za_%1ar.head1}@{za_ansi_brn(lbron)}@{za_%11.1};#sh @{za_ansi_brn(pbron)}@{za_%10.2}@{za_%1ar.head2}@{za_ansi_brn(lbron)}@{za_%11.2};#mxp @{za_ansi_brn(pbron)}%if( 1, @{za_%10.3}@{za_%1ar.head3}@{za_ansi_brn(lbron)}@{za_%11.3});#sh @{za_ansi_brn(pbron)}@{za_%10.4}@{za_%1ar.head4}@{za_ansi_brn(lbron)}@{za_%11.4};#sh @{za_ansi_brn(pbron)}@{za_%10.5}@{za_%1ar.head5}@{za_ansi_brn(lbron)}@{za_%11.5};#sh @{za_ansi_brn(pbron)}@{za_%10.6}@{za_%1ar.head6}@{za_ansi_brn(lbron)}@{za_%11.6};#sh @{za_ansi_brn(pbron)}@{za_%10.7}@{za_%2ar.larm1}@{za_%6ar.body1}@{za_%4ar.rarm1}@{za_ansi_brn(lbron)}@{za_%11.7};#sh @{za_ansi_brn(pbron)}@{za_%10.8}@{za_%2ar.larm2}@{za_%6ar.body2}@{za_%4ar.rarm2}@{za_ansi_brn(lbron)}@{za_%11.8};#mxp @{za_ansi_brn(pbron)}%if( 1, @{za_%10.9}@{za_%2ar.larm3}@{za_%6ar.body3}@{za_%4ar.rarm3}@{za_ansi_brn(lbron)}@{za_%11.9});#sh @{za_ansi_brn(pbron)}@{za_%10.10}@{za_%2ar.larm4}@{za_%6ar.body4}@{za_%4ar.rarm4}@{za_ansi_brn(lbron)}@{za_%11.10};#sh @{za_ansi_brn(pbron)}@{za_%10.11}@{za_%2ar.larm5}@{za_%6ar.body5}@{za_%4ar.rarm5}@{za_ansi_brn(lbron)}@{za_%11.11};#sh @{za_ansi_brn(pbron)}@{za_%10.12}@{za_%2ar.larm6}@{za_%6ar.body6}@{za_%4ar.rarm6}@{za_ansi_brn(lbron)}@{za_%11.12};#sh @{za_ansi_brn(pbron)}@{za_%10.13}@{za_%3ar.lhan1}@{za_%6ar.body7}@{za_%5ar.rhan1}@{za_ansi_brn(lbron)}@{za_%11.13};#mxp @{za_ansi_brn(pbron)}%if( 1, @{za_%10.14}@{za_%3ar.lhan2}@{za_%6ar.nogi1}@{za_%5ar.rhan2}@{za_ansi_brn(lbron)}@{za_%11.26});#mxp @{za_ansi_brn(pbron)}%if( 1, @{za_%10.15}@{za_%3ar.lhan3}@{za_%7ar.nogi2}@{za_%5ar.rhan3}@{za_ansi_brn(lbron)}@{za_%11.15});#sh @{za_ansi_brn(pbron)}@{za_%10.16}@{za_%7ar.nogi3}@{za_ansi_brn(lbron)}@{za_%11.16};#sh @{za_ansi_brn(pbron)}@{za_%10.17}@{za_%7ar.nogi4}@{za_ansi_brn(lbron)}@{za_%11.17};#sh @{za_ansi_brn(pbron)}@{za_%10.18}@{za_%7ar.nogi5}@{za_ansi_brn(lbron)}@{za_%11.18};#sh @{za_ansi_brn(pbron)}@{za_%10.19}@{za_%7ar.nogi6}@{za_ansi_brn(lbron)}@{za_%11.19};#sh @{za_ansi_brn(pbron)}@{za_%10.20}@{za_%7ar.nogi7}@{za_ansi_brn(lbron)}@{za_%11.20};#sh @{za_ansi_brn(pbron)}@{za_%10.21}@{za_%7ar.nogi8}@{za_ansi_brn(lbron)}@{za_%11.21};#sh @{za_ansi_brn(pbron)}@{za_%10.22}@{za_%7ar.nogi9}@{za_ansi_brn(lbron)}@{za_%11.22};#mxp @{za_ansi_brn(pbron)}%if( 1, @{za_%10.23}@{za_%8ar.lsto1}@{za_%9ar.rsto1}@{za_ansi_brn(lbron)}@{za_%11.23});#sh @{za_ansi_brn(pbron)}@{za_%10.24}@{za_%8ar.lsto2}@{za_%9ar.rsto2}@{za_ansi_brn(lbron)}@{za_%11.24};#sh @{za_ansi_brn(pbron)}@{za_%10.25}@{za_%8ar.lsto3}@{za_%9ar.rsto3}@{za_ansi_brn(lbron)}@{za_%11.25}}
#ALIAS za_uloz {#makewindow Zalozone open "scrolling=no|floating=yes|width=50c|height=27c|top=-42c|left=-124c|title=Stan uzbrojenia";:Zalozone: #clr;:Zalozone: #sh "";:Zalozone: za_pokaz [%if( @za_przedmioty.head, w, n)] [%if( @za_przedmioty.larm, w, n)] [%if( @za_przedmioty.lhan, w, n)] [%if( @za_przedmioty.rarm, w, n)] [%if( @za_przedmioty.rhan, w, n)] [%if( @za_przedmioty.body, w, n)] [%if( @za_przedmioty.nogi, w, n)] [%if( @za_przedmioty.lsto, w, n)] [%if( @za_przedmioty.rsto, w, n)] [%if( @za_przedmioty.pbron, @za_przedmioty.pbron_type, blk)] [%if( @za_przedmioty.tar, tar, %if( @za_przedmioty.ntar, ntar, %if( @za_przedmioty.lbron, @za_przedmioty.lbron_type, blk)))]}
#ALIAS -eq {#if (%window( Zalozone)) {#makewindow Zalozone close} {za_przedmioty = %null;za_zniszczenie = %null;ocen_ignore_end = 1;za_lap_ocene = 1;#sh --> Rozpoczynam ocene uzywanych broni i zbroi.;#t+ ungag_zalozone;#gagon;ocen zalozone zbroje;ocen dobyte bronie}}
#VAR za_nar {head1@za_ansi_nar(head)"            #             "head2@za_ansi_nar(head)"          .###.           "head3@za_ansi_nar(head)"         /^ V ^\          "head4@za_ansi_nar(head)"       | O   O |        "head5@za_ansi_nar(head)"           ^          "head6@za_ansi_nar(head)"         \`---'/          "larm1@za_ansi_nar(larm)"      "larm2@za_ansi_nar(larm)"    ,'"larm3@za_ansi_nar(larm)"   /  "larm4@za_ansi_nar(larm)"  |   "larm5@za_ansi_nar(larm)"  |  |"larm6@za_ansi_nar(larm)"  (  ("lhan1@za_ansi_nar(lhan)"  |  |"lhan2@za_ansi_nar(lhan)"  |  |"lhan3@za_ansi_nar(lhan)"  ''''"rarm1@za_ansi_nar(rarm)"       "rarm2@za_ansi_nar(rarm)"'.     "rarm3@za_ansi_nar(rarm)"  \    "rarm4@za_ansi_nar(rarm)"   |   "rarm5@za_ansi_nar(rarm)"|  |   "rarm6@za_ansi_nar(rarm)")  )   "rhan1@za_ansi_nar(rhan)"|  |   "rhan2@za_ansi_nar(rhan)"|  |   "rhan3@za_ansi_nar(rhan)"''''   "body1@za_ansi_nar(body)"___/     \___"body2@za_ansi_nar(body)"             "body3@za_ansi_nar(body)"             "body4@za_ansi_nar(body)"*           *"body5@za_ansi_nar(body)" |         | "body6@za_ansi_nar(body)"  \       /  "body7@za_ansi_nar(body)"   )--(   "nogi1@za_ansi_nar(nogi)"  /       \  "nogi2@za_ansi_nar(nogi)" |         | "nogi3@za_ansi_nar(nogi)"       |         |        "nogi4@za_ansi_nar(nogi)"       |___/^\___|        "nogi5@za_ansi_nar(nogi)"       ';  | |  ;'        "nogi6@za_ansi_nar(nogi)"        |  | |  |         "nogi7@za_ansi_nar(nogi)"        (  ) (  )         "nogi8@za_ansi_nar(nogi)"        |  | |  |         "nogi9@za_ansi_nar(nogi)"        |  | |  |         "lsto1@za_ansi_nar(lsto)"        |__|"lsto2@za_ansi_nar(lsto)"        (_o)"lsto3@za_ansi_nar(lsto)"            "rsto1@za_ansi_nar(rsto)" |__|         "rsto2@za_ansi_nar(rsto)" (o_)         "}
#VAR za_war {head1@za_ansi_war(head)"             .'"%char(34)"          "head2@za_ansi_war(head)"         ,.-/-.,          "head3@za_ansi_war(head)"        |  <send 'ocen_pokaz zbroje "@za_przedmioty.head"' '"@za_przedmioty.head"'><color #00FFFF>"@za_zniszczenie.head"</color></send>  |         "head4@za_ansi_war(head)"        | <:::> |         "head5@za_ansi_war(head)"        |       |         "head6@za_ansi_war(head)"         \'^'/          "larm1@za_ansi_war(larm)"   ___"larm2@za_ansi_war(larm)" ,'   "larm3@za_ansi_war(larm)" |_ <send 'ocen_pokaz zbroje "@za_przedmioty.larm"' '"@za_przedmioty.larm"'><color #00FFFF>"@za_zniszczenie.larm"</color></send> "larm4@za_ansi_war(larm)" | '-|"larm5@za_ansi_war(larm)" |   |"larm6@za_ansi_war(larm)" <>"lhan1@za_ansi_war(lhan)" |   |"lhan2@za_ansi_war(lhan)" |-<send 'ocen_pokaz zbroje "@za_przedmioty.lhan"' '"@za_przedmioty.lhan"'><color #00FFFF>*</color></send>-|"lhan3@za_ansi_war(lhan)" |||/ "rarm1@za_ansi_war(rarm)"___    "rarm2@za_ansi_war(rarm)"   '.  "rarm3@za_ansi_war(rarm)" <send 'ocen_pokaz zbroje "@za_przedmioty.rarm"' '"@za_przedmioty.rarm"'><color #00FFFF>"@za_zniszczenie.rarm"</color></send> _|  "rarm4@za_ansi_war(rarm)"|-' |  "rarm5@za_ansi_war(rarm)"|   |  "rarm6@za_ansi_war(rarm)"<>  "rhan1@za_ansi_war(rhan)"|   |  "rhan2@za_ansi_war(rhan)"|-<send 'ocen_pokaz zbroje "@za_przedmioty.rhan"' '"@za_przedmioty.rhan"'><color #00FFFF>*</color></send>-|  "rhan3@za_ansi_war(rhan)" \|||  "body1@za_ansi_war(body)"_.,'^|^|^',._"body2@za_ansi_war(body)"|     |     |"body3@za_ansi_war(body)"/   _ <send 'ocen_pokaz zbroje "@za_przedmioty.body"' '"@za_przedmioty.body"'><color #00FFFF>"@za_zniszczenie.body"</color></send> _   \"body4@za_ansi_war(body)"|.-'  |  '-.|"body5@za_ansi_war(body)"\     |     /"body6@za_ansi_war(body)" \    |    / "body7@za_ansi_war(body)"  >----<  "nogi1@za_ansi_war(body)" /_'-,|,-'_\ "nogi2@za_ansi_war(nogi)"|_ '-,<send 'ocen_pokaz zbroje "@za_przedmioty.nogi"' '"@za_przedmioty.nogi"'><color #00FFFF>"@za_zniszczenie.nogi"</color></send>,-' _|"nogi3@za_ansi_war(nogi)"      | '-,_|_,-' |       "nogi4@za_ansi_war(nogi)"      |____/^\____|       "nogi5@za_ansi_war(nogi)"       \   | |   /        "nogi6@za_ansi_war(nogi)"        |  | |  |         "nogi7@za_ansi_war(nogi)"        <> <>         "nogi8@za_ansi_war(nogi)"        |  | |  |         "nogi9@za_ansi_war(nogi)"        |-.| |.-|         "lsto1@za_ansi_war(lsto)"        |<send 'ocen_pokaz zbroje "@za_przedmioty.lsto"' '"@za_przedmioty.lsto"'><color #00FFFF>*</color></send>,|"lsto2@za_ansi_war(lsto)"       /[]\"lsto3@za_ansi_war(lsto)"       '---'"rsto1@za_ansi_war(rsto)" |,<send 'ocen_pokaz zbroje "@za_przedmioty.rsto"' '"@za_przedmioty.rsto"'><color #00FFFF>*</color></send>|         "rsto2@za_ansi_war(rsto)" /[]\        "rsto3@za_ansi_war(rsto)" '---'        "}
#VAR za_translate_zbr {gloweheadprawe ramielarmprawa dlonlhanlewe ramierarmlewa dlonrhankorpusbodynoginogiprawa stopelstolewa stopersto}
#VAR za_translate_brn {bron drzewcowabddwureczna maczugadmadwureczny mieczdmidwureczny mlotdmldwureczny topordtomaczugamamieczmimlotmltoportosztyletsz}
#VAR za_przedmioty {rhanpara rekawic ze skory wezalhanpara rekawic ze skory wezabodyturniejowa kunsztowna zbroja plytowaheadturniejowa kunsztowna zbroja plytowararmturniejowa kunsztowna zbroja plytowalarmturniejowa kunsztowna zbroja plytowanogistalowe szmelcowane nabiodrki}
#VAR za_zniszczenie {rhan5lhan5body5head5rarm5larm5nogi5}
#VAR za_ansi_nar {%ansi(3)}
#VAR za_ansi_war {%ansi( %if( %ismember( %1, lsto|rsto|lhan|rhan), 15, %item( 12|4|6|8|15, @za_zniszczenie.%1)))}
#VAR za_ansi_brn {%ansi( %item( 12|4|6|14|14|8|15, @za_zniszczenie.%1))}
#VAR za_tar {"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|@za_ansi_war(tar)" .---V---. "|(@za_ansi_war(tar)" |   |   | ")|(@za_ansi_war(tar)" |=======| ")|(@za_ansi_war(tar)" |  *<send 'ocen_pokaz tarcze "@za_przedmioty.tar"' '"@za_przedmioty.tar"'><color #00FFFF>"@za_zniszczenie.tar"</color></send>*  | ")|(@za_ansi_war(tar)" | \   / | ")|(@za_ansi_war(tar)" '.  |  ,' ")|@za_ansi_war(tar)"   \._./   "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|(@za_ansi_war(tar)" |  *<send 'ocen_pokaz tarcze "@za_przedmioty.tar"' '"@za_przedmioty.tar"'><color #00FFFF>"@za_zniszczenie.tar"</color></send>*  | ")|"           "|"           "|"           "|"           "|"           "}
#VAR za_ntar {"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|(@za_ansi_war(tar)"   /|\   ")|@za_ansi_war(tar)"  (==<send 'ocen_pokaz puklerz "@za_przedmioty.ntar"' '"@za_przedmioty.ntar"'><color #00FFFF>"@za_zniszczenie.ntar"</color></send>==)  "|@za_ansi_war(tar)"   \/_\/   "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|@za_ansi_war(tar)"  (==<send 'ocen_pokaz puklerz "@za_przedmioty.ntar"' '"@za_przedmioty.ntar"'><color #00FFFF>"@za_zniszczenie.ntar"</color></send>==)  "}
#VAR za_bd {"       A   "|("    ,| |   ")|("  .' : |   ")|("  | (  |,' ")|(" (   |=>- ")|("  | (  |`. ")|("  '. : |   ")|("    `| |   ")|("       |   ")|("       |   ")|("       |   ")|("     `.|,' ")|"       W   "|"       <send 'ocen_pokaz bron "@za_przedmioty.pbron"' '"@za_przedmioty.pbron"'><color #00FFFF>"@za_zniszczenie.pbron"</color></send>   "|("       |   ")|("       |   ")|("       |   ")|("       |   ")|("       |   ")|("       |   ")|("       |   ")|("       |   ")|("       |   ")|("       |   ")|"           "}
#VAR za_dma {"           "|"           "|"           "|"     n     "|"     x     "|"     x     "|"     x     "|"     x     "|"    /\    "|"        "|"        "|"        "|"        "|"    <send 'ocen_pokaz bron "@za_przedmioty.pbron"' '"@za_przedmioty.pbron"'><color #00FFFF>"@za_zniszczenie.pbron"</color></send>    "|"        "|"        "|"      "|"    "|"  `/  \'  "|"  (    )  "|"  -\,./  "|"  _.---._  "|" /_./ \._\ "|"           "|"           "}
#VAR za_dmi {"           "|"           "|"     _     "|"    ()    "|"    /    "|"    /    "|"    /    "|" /_/_\ "|"(       )"|" \,/\V/\,/ "|"        "|"        "|"       "|"   <send 'ocen_pokaz bron "@za_przedmioty.pbron"' '"@za_przedmioty.pbron"'><color #00FFFF>"@za_zniszczenie.pbron"</color></send>    "|"        "|"        "|"        "|"       "|"        "|"       "|"        "|"        "|"    \/    "|"     `     "|"           "}
#VAR za_dml {"           "|"           "|"           "|"     _     "|"    (o)    "|"    x    "|"    x    "|"    x    "|"    x    "|"    x    "|"    :    "|"    :    "|"    :    "|"    <send 'ocen_pokaz bron "@za_przedmioty.pbron"' '"@za_przedmioty.pbron"'><color #00FFFF>"@za_zniszczenie.pbron"</color></send>    "|"    :    "|"  :  "|"    :    "|" __  __ "|"  \/  "|"      "|"      "|"      "|"__/\__"|"    &    "|"           "}
#VAR za_dto {"           "|"           "|"           "|"           "|"           "|"           "|"        .^."|"        "|"        "|"        "|"        "|"        "|"        "|"        <send 'ocen_pokaz bron "@za_przedmioty.pbron"' '"@za_przedmioty.pbron"'><color #00FFFF>"@za_zniszczenie.pbron"</color></send>"|"     .> N"|"    ;' N"|"  ,;.  N"|" ,;#N"|" ;#N"|";#N"|"`;#N"|" `;.  N"|"  ';.  @ "|"    ':>    "|"           "}
#VAR za_ma {"           "|"           "|"           "|"  ,+.    "|" ,+.   "|" +   "|" '+'   "|"    Y      "|"    I      "|"    I      "|"    I      "|"    I      "|"    I      "|"    <send 'ocen_pokaz bron "@za_przedmioty.pbron"' '"@za_przedmioty.pbron"'><color #00FFFF>"@za_zniszczenie.pbron"</color></send>      "|"    X      "|"    X      "|"    X      "|"          "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"    <send 'ocen_pokaz bron "@za_przedmioty.lbron"' '"@za_przedmioty.lbron"'><color #00FFFF>"@za_zniszczenie.lbron"</color></send>      "}
#VAR za_mi {"           "|"           "|"           "|"    ,      "|"   / \     "|"         "|"   .     "|"   .     "|"   :     "|"   :     "|"   :     "|"   :     "|"   :     "|" [==<send 'ocen_pokaz bron "@za_przedmioty.pbron"' '"@za_przedmioty.pbron"'><color #00FFFF>"@za_zniszczenie.pbron"</color></send>==]   "|"   `x     "|"    x      "|"    x      "|"   (x)     "|"          "|"           "|"           "|"           "|"           "|"           "|"           "|" [==<send 'ocen_pokaz bron "@za_przedmioty.lbron"' '"@za_przedmioty.lbron"'><color #00FFFF>"@za_zniszczenie.lbron"</color></send>==]   "|"           "}
#VAR za_ml {"           "|"           "|"           "|"           "|"  __[X]_   "|"       \  "|"        > "|" ______/  "|"    [X]    "|"         "|"         "|"         "|"         "|"    <send 'ocen_pokaz bron "@za_przedmioty.pbron"' '"@za_przedmioty.pbron"'><color #00FFFF>"@za_zniszczenie.pbron"</color></send>    "|"    `x    "|"     x     "|"     x     "|"     U     "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"    <send 'ocen_pokaz bron "@za_przedmioty.lbron"' '"@za_przedmioty.lbron"'><color #00FFFF>"@za_zniszczenie.lbron"</color></send>    "}
#VAR za_to {"           "|"           "|"           "|"           "|"  ,  ^  .  "|" /I  I  I\ "|"(  ==+==  )"|" \I  Y  I/ "|"  '  I  '  "|"     I     "|"     I     "|"     I     "|"     I     "|"   . <send 'ocen_pokaz bron "@za_przedmioty.pbron"' '"@za_przedmioty.pbron"'><color #00FFFF>"@za_zniszczenie.pbron"</color></send> ,   "|"    `x    "|"     x     "|"     x     "|"     U     "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"   . <send 'ocen_pokaz bron "@za_przedmioty.lbron"' '"@za_przedmioty.lbron"'><color #00FFFF>"@za_zniszczenie.lbron"</color></send> ,   "}
#VAR za_sz {"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"          "|"   !!     "|"   !!     "|"   !!     "|"   !!     "|" <send 'ocen_pokaz bron "@za_przedmioty.pbron"' '"@za_przedmioty.pbron"'><color #00FFFF>"@za_zniszczenie.pbron"</color></send>   "|"    x      "|"    U      "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|" <send 'ocen_pokaz bron "@za_przedmioty.lbron"' '"@za_przedmioty.lbron"'><color #00FFFF>"@za_zniszczenie.lbron"</color></send>   "|"           "}
#VAR za_blk {"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "|"           "}
#VAR za_lap_ocene {0}
#REGEX "ungag_zalozone" {[A-Z]{3,}} {#ungag} "" {case|disable}
#CLASS 0
