Brutalia2
Forum › Zinglordos cucclimuccli › Boltos script

Boltos script

Mclod Jatekos
#1
M
Mclod
Jatekos
boltban a lista parancs után a név elött [színkód,rarityszám]-al írja az adott tárgy rarityjét, ha nincs a targylistan az item akkor az egesz nev pirosan villog.


Új aliast ide: 
INVENTORY/ALIASES/szinmagyarazo
#ECHO Szinmagyarazat: 

#ECHO %ansi(7)Mindennapos%ansi(reset)|%ansi(2)Gyakori%ansi(reset)|%ansi(3)Atlagos%ansi(reset)|%ansi(4)Nem tul ritka%ansi(reset)|%ansi(5)Eleg ritka%ansi(reset)|%ansi(15)Ritka%ansi(reset)|%ansi(13)Nagyon ritka%ansi(reset)|%ansi(11)Borzasztoan ritka%ansi(reset)|%ansi(14)Alig latni%ansi(reset)|%ansi(12)Egyedi darab%ansi(reset)|%ansi(10)A targy szinte nem is letezik%ansi(reset)|%ansi(9)A targy az Abruni Olimpiai Jatekok nyeremenye%ansi(reset)


ÚJ alias:
INVENTORY/ALIASES/lista
#IF (%null(%params)) {

#send lista

#WAIT 2000 

szinmagyarazo

} {

#send lista %params

}


INVENTORY/BAG/kiveszed és felveszedben módosítások (ugyanott mindkettőnél)
[list=1]
[*]//SET itemeket egyedi alatt is tartsuk meg#IF (!%null(@row.item("i_set")) AND @rarity <= 5) {  <-- 5-ot módosítsd 9-re mert mostmár az jelenti az egyedi darabot
[*]  #IF ( @rarity >=6) {  <-- itt is 9-esre módisítsd//baszo cucc , megtartjuk! egyenlore nem zsakoljuk
[*]#IF (@rarity >= 5 ) {$csakazertis = 1} <-- itt is 9-esre módosítsd        #CALL $row2.Next()        
[/list]

INVENTORY/BAG/TRIGGERS/ItemRarity  <-- ez egy funkció itt kezeli hogy melyik rarity szint hanyas számot kapja meg
#IF ($rarity == "Mindennapos") { rarity=0}

#IF ($rarity == "Gyakori") {rarity=1}

#IF ($rarity == "Atlagos") {rarity=2}

#IF ($rarity == "Nem tul ritka") {rarity=3}

#IF ($rarity == "Eleg ritka") {rarity=4}

#IF ($rarity == "Ritka") {rarity=5}

#IF ($rarity == "Nagyon ritka") {rarity=6}

#IF ($rarity == "Borzasztoan ritka") {rarity=7}

#IF ($rarity == "Alig latni") {rarity=8}

#IF ($rarity == "Egyedi darab") {rarity=9}

#IF ($rarity == "A targy szinte nem is letezik") {rarity=10}

#IF ($rarity == "A targy az Abruni Olimpiai Jatekok nyeremenye") {rarity=11}



INVENTORY/BOLT
New változó : colour
New trigger: Sorszam        Targy                    Szint    Eladasi ertek
       value:    szinmagyarazo

New Trigger: ^(%d)~)(%s)(*)(%s)(%d)(%s)(*) arany
         Value: 
#VA itemListNum {%1}

#VA itemListName {%3}

//sql inject miatt ki kell szedni az apostrofot

#if (%pos("'",@itemListName)) {#va itemListName {%concat(%remove("'",@itemListName))} }

//kiszedjuk az egyedi neveket

#if (%pos("lathatatlan",@itemListName)) {#va itemListName %replace(@itemListName,"lathatatlan","")}

#if (%pos("magikus",@itemListName)) {#va itemListName %replace(@itemListName,"magikus","")}

#if (%pos("mergezett",@itemListName)) {#va itemListName %replace(@itemListName,"mergezett","")}

#if (%pos("fertozott",@itemListName)) {#va itemListName %replace(@itemListName,"fertozott","")}

#if (%pos("ragyog",@itemListName)) {#va itemListName %replace(@itemListName,"ragyog","")}

#if (%pos("(kk)",@itemListName)) {#va itemListName %replace(@itemListName,"(kk)","")}

//kiszedjuk a jeleket

#if (%pos("(",@itemListName)) {#va itemListName %replace(@itemListName,"(","")}

#if (%pos(")",@itemListName)) {#va itemListName %replace(@itemListName,")","")}

#if (%pos("+",@itemListName)) {#va itemListName %replace(@itemListName,"+","")}

//kiszedjuk a szokozoket az elejerol es a vegerol

#va itemListName {%trim(@itemListName)}

//kisbetu, mert az qrva fontos :>

#VA itemListName {%lower(@itemListName)}

#VA itemListLvl {%5}

row = %sql(targylista, %concat("SELECT * FROM items WHERE name = '"@itemListName"' AND min_szint = '"@itemListLvl"' "))

#IF (@row.RecordCount() == 0) {

  #IF ( %pos("ekszerek runaja",@itemListName) OR

        %pos("fegyverek runaja",@itemListName) OR

        %pos("pancelok runaja",@itemListName)) {

          #PSUB {%ansi(29)[-]%ansi(reset) %3} %x3

        } {

          #PSUB {%ansi(29)[*]%ansi(reset) %ansi(bold,red,blink)%3%ansi(reset)} %x3

          #CALL @row.Next

          }

  } {

#IF (@row.Item("rarity") == "Mindennapos") {colour="7";rarity=0}

#IF (@row.Item("rarity") == "Gyakori") {colour="2";rarity=1}

#IF (@row.Item("rarity") == "Atlagos") {colour="3";rarity=2}

#IF (@row.Item("rarity") == "Nem tul ritka") {colour="4";rarity=3}

#IF (@row.Item("rarity") == "Eleg ritka") {colour="5";rarity=4}

#IF (@row.Item("rarity") == "Ritka") {colour="15";rarity=5}

#IF (@row.Item("rarity") == "Nagyon ritka") {colour="13";rarity=6}

#IF (@row.Item("rarity") == "Borzasztoan ritka") {colour="11";rarity=7}

#IF (@row.Item("rarity") == "Alig latni") {colour="14";rarity=8}

#IF (@row.Item("rarity") == "Egyedi darab") {colour="12";rarity=9}

#IF (@row.Item("rarity") == "A targy szinte nem is letezik") {colour="10";rarity=10}

#IF (@row.Item("rarity") == "A targy az Abruni Olimpiai Jatekok nyeremenye") {colour="9";rarity=11}

#IF (!%null(@row.Item("i_set")) OR @row.Item("i_set") != "") {colour="blink,cyan";rarity=6}

#PSUB {%ansi(@colour)[@rarity] %ansi(reset)%3} %x3

#CALL @row.Next

}

//#IF (%pos(@hp,%line)) {szinmagyarazo}


New Class: INVENTORY/KONYVTAR
New Trigger: ^~[(%d)~] (*) $
           Value      :
       
#IF (%zonenum == 98) {

#VA itemListNum {%1}

#VA itemListName {%2}

//sql inject miatt ki kell szedni az apostrofot

#if (%pos("'",@itemListName)) {#va itemListName {%concat(%remove("'",@itemListName))} }

//kiszedjuk az egyedi neveket

#if (%pos("lathatatlan",@itemListName)) {#va itemListName %replace(@itemListName,"lathatatlan","")}

#if (%pos("magikus",@itemListName)) {#va itemListName %replace(@itemListName,"magikus","")}

#if (%pos("mergezett",@itemListName)) {#va itemListName %replace(@itemListName,"mergezett","")}

#if (%pos("fertozott",@itemListName)) {#va itemListName %replace(@itemListName,"fertozott","")}

#if (%pos("ragyog",@itemListName)) {#va itemListName %replace(@itemListName,"ragyog","")}

#if (%pos("(kk)",@itemListName)) {#va itemListName %replace(@itemListName,"(kk)","")}

//kiszedjuk a jeleket

#if (%pos("(",@itemListName)) {#va itemListName %replace(@itemListName,"(","")}

#if (%pos(")",@itemListName)) {#va itemListName %replace(@itemListName,")","")}

#if (%pos("+",@itemListName)) {#va itemListName %replace(@itemListName,"+","")}

//kiszedjuk a szokozoket az elejerol es a vegerol

#va itemListName {%trim(@itemListName)}

//kisbetu, mert az qrva fontos :>

#VA itemListName {%lower(@itemListName)}





row = %sql(targylista, %concat("SELECT * FROM items WHERE name = '"@itemListName"' "))

#IF (@row.RecordCount() == 0) {

  #IF ( %pos("ekszerek runaja",@itemListName) OR

        %pos("fegyverek runaja",@itemListName) OR

        %pos("pancelok runaja",@itemListName)) {

          #PSUB {%ansi(29)[-]%ansi(reset) %3} %x3

        } {

          #PSUB {%ansi(29)

%ansi(reset) %ansi(bold,red,blink)%3%ansi(reset)} %x3

          #CALL @row.Next

          }

  } {#IF (@row.Item("rarity") == "Mindennapos") {colour="7";rarity=0}

#IF (@row.Item("rarity") == "Gyakori") {colour="2";rarity=1}

#IF (@row.Item("rarity") == "Atlagos") {colour="3";rarity=2}

#IF (@row.Item("rarity") == "Nem tul ritka") {colour="4";rarity=3}

#IF (@row.Item("rarity") == "Eleg ritka") {colour="5";rarity=4}

#IF (@row.Item("rarity") == "Ritka") {colour="15";rarity=5}

#IF (@row.Item("rarity") == "Nagyon ritka") {colour="13";rarity=6}

#IF (@row.Item("rarity") == "Borzasztoan ritka") {colour="11";rarity=7}

#IF (@row.Item("rarity") == "Alig latni") {colour="14";rarity=8}

#IF (@row.Item("rarity") == "Egyedi darab") {colour="12";rarity=9}

#IF (@row.Item("rarity") == "A targy szinte nem is letezik") {colour="10";rarity=10}

#IF (@row.Item("rarity") == "A targy az Abruni Olimpiai Jatekok nyeremenye") {colour="9";rarity=11}



#PSUB {%ansi(bold,@colour)[@rarity] %ansi(reset)%2} %x2

#CALL @row.Next

}

}






színek csak úgy hogy itt legyen :) 
#IF (@row.Item("rarity") == "Mindennapos") {colour="7";rarity=0}
#IF (@row.Item("rarity") == "Gyakori") {colour="2";rarity=1}
#IF (@row.Item("rarity") == "Atlagos") {colour="3";rarity=2}
#IF (@row.Item("rarity") == "Nem tul ritka") {colour="4";rarity=3}
#IF (@row.Item("rarity") == "Eleg ritka") {colour="5";rarity=4}
#IF (@row.Item("rarity") == "Ritka") {colour="15";rarity=5}
#IF (@row.Item("rarity") == "Nagyon ritka") {colour="13";rarity=6}
#IF (@row.Item("rarity") == "Borzasztoan ritka") {colour="11";rarity=7}
#IF (@row.Item("rarity") == "Alig latni") {colour="14";rarity=8}
#IF (@row.Item("rarity") == "Egyedi darab") {colour="12";rarity=9}
#IF (@row.Item("rarity") == "A targy szinte nem is letezik") {colour="10";rarity=10}
#IF (@row.Item("rarity") == "A targy az Abruni Olimpiai Jatekok nyeremenye") {colour="9";rarity=11}
Lepj be a hozzaszolashoz!
Stílus