Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <class name="ClanPointsCalc" id="1">
- <alias name="luaDisplay" id="2">
- <value><![CDATA[-- ANSI Display Codes
- --
- cb = "[38;5;33m"
- cb2 = "[1;34m"
- cbb = "[5m[38;5;47m"
- cbnr = "[38;5;47m"
- cbr = "[5m[38;5;47m"
- cc = "[1;36m"
- cc2 = "[0;36m"
- cd = "[1;30m"
- cfb = "[0;30m"
- cg = "[38;5;47m"
- cg2 = "[1;32m"
- cgr = "[1;90m"
- clw = "[0;37m"
- cm = "[1;35m"
- cr = "[5;1;31m"
- cr2 = "[1;31m"
- csi = "["
- cw = "[1;97m"
- cy = "[1;33m"
- cyb = "[5;1;33m"
- eof = "[2J"
- eol = "[2K"
- esc = ""
- oc = "[38;5;214m"
- rc = "[0m"]]></value>
- <var name="ClanPoints" type="Record" id="5">
- <value>TotalPoints=1795|WarPoints=14|WarKillPoints=36|GoalPoints=59|TierPoints=250|CPPoints=522|RoomPoints=147|QPPoints=400|GQPoints=101|PupPoints=70|GoldPoints=6|CurrentRank=Arbiter|RemortPoints=190</value>
- <json>{"TotalPoints":1795,"WarPoints":14,"WarKillPoints":36,"GoalPoints":59,"TierPoints":250,"CPPoints":522,"RoomPoints":147,"QPPoints":400,"GQPoints":101,"PupPoints":70,"GoldPoints":6,"CurrentRank":"Arbiter","RemortPoints":190}</json>
- </var>
- <var name="RankMeCharacter" type="String" id="6">Anaristos</var>
- <trigger name="MyRank18" priority="16010" regex="true" enabled="false" id="7">
- <pattern>(?:\s+)?\d+\) (\w+)\s+\w+\s+(\d+)\s+(\d+)\s+\d+\s+\d+\s+(\d+)\s+(\d+)</pattern>
- <value>#IF (%upper( %1)=%upper( @RankMeCharacter)) {
- ClanPoints.RemortPoints = (%2 / 201) * 5
- ClanPoints.TierPoints = ((%2 - 1) / 1407) * 50
- ClanPoints.QPPoints = (%3 / 50000) * 40
- ClanPoints.GQPoints = %4
- ClanPoints.CPPoints = %5 / 5
- #T- MyRank18
- #T+ MyWarInfo
- warinfo @RankMeCharacter
- }</value>
- </trigger>
- <trigger name="GoalsDone" priority="16020" regex="true" enabled="false" id="8">
- <pattern>\| Luck.{43}Goals done\s+:\s+\[\s+(\d+)\s+\]\s+\|</pattern>
- <value>ClanPoints.GoalPoints = %1
- ;;
- #T- GoalsDone
- ;;
- #T+ Roster7
- ;;
- roster 7</value>
- </trigger>
- <trigger name="MyRank15" priority="16030" regex="true" enabled="false" id="9">
- <pattern>(?:\s+)?\d+\) (\w+)\s+\w+\s+\d+\s+(\d+)\s+[0-9.]+</pattern>
- <value>#IF (%upper( %1)=%upper( @RankMeCharacter)) {
- ClanPoints.RoomPoints = %2 / 200
- #T- MyRank15
- #T+ MyRank16
- myrank @RankMeCharacter 16
- }</value>
- </trigger>
- <trigger name="MyRank16" priority="16040" regex="true" enabled="false" id="10">
- <pattern>^\s*\d+\)\s*(\w+)\s*\w+\s*\d+\s*\d+\s*\d+\s*\d+\s*(\d+)\s*\d+$</pattern>
- <value>#IF (%upper( %1)=%upper( @RankMeCharacter)) {
- ClanPoints.PupPoints = (%2 / 1000) * 35
- #T- MyRank16
- #T+ Myrank18
- myrank @RankMeCharacter 18
- }</value>
- </trigger>
- <trigger name="MyWarInfo" priority="16050" regex="true" enabled="false" id="11">
- <pattern>Total Wars(?:\s+)?:\s+\[(?:\s+)?\d+\]\s+Won: \[(?:\s+)?(\d+)\]\s+Lost:\s+\[(?:\s+)?\d+\]\s+Kills:\s+\[(?:\s+)?(\d+)\]</pattern>
- <value>ClanPoints.WarPoints = %1
- ClanPoints.WarKillPoints = %2
- ;;
- #T- MyWarInfo
- #T+ GoalsDone
- ;;
- score</value>
- </trigger>
- <trigger name="Roster7" priority="16060" regex="true" enabled="false" id="12">
- <pattern>(?:\s+)?\d+\s+(\w+)\s+.{18}\s+\d+\s+([0-9,]+)\s+[0-9,]+\s+[0-9,]+</pattern>
- <value>#IF (%upper( %1)=%upper( @RankMeCharacter)) {
- ClanPoints.GoldPoints = %subchar( %2, ",") / 10000000
- #WAIT 2000
- #T- Roster7
- showrank
- }
- </value>
- </trigger>
- <alias name="getnewrankold" id="13">
- <value><![CDATA[ %if( %1<300, "Convert", %if( %1>299 AND %1<600, "Penitent", %if( %1>599 AND %1<800, "Vindicator", %if( %1>799 AND %1<1000, "Redeemer", %if( %1>999 AND %1<1400, "Arbiter", %if( %1>1399, "Awakener"))))))]]></value>
- </alias>
- <func name="getnewrank" id="14">
- <value>#LOCAL $index
- ;;
- $ranks = Convert|Penient|Vindicator|Redeemer|Arbiter|Awakener
- $total = 300|600|800|1000|1400
- $index = 1
- ;;
- #FORALL $total {#IF (%1 < %i) {#BREAK} {$index = $index + 1}}
- ;;
- #RETURN $ranks.$index</value>
- </func>
- <var name="Donations" id="16"> pts</var>
- <var name="Explored" id="17"> pts</var>
- <var name="Goals" id="18"> pts</var>
- <var name="Gqs" id="19"> pts</var>
- <var name="Pups" id="20"> pts</var>
- <var name="Qpts" id="21"> pts</var>
- <var name="Remorts" id="22">190 pts</var>
- <var name="Tiers" id="23">250 pts</var>
- <func name="getnewrankn" id="24"/>
- <alias name="showrankn" id="25">
- <value><![CDATA[ClanPoints.TotalPoints = 0
- ;;
- $keys = %dbkeys( @ClanPoints)
- ;;
- $keys = %delitem( "TotalPoints", $keys)
- $keys = %delitem( "Rank", $keys)
- $keys = %delitem( "CurrentRank", $keys)
- ;;
- #FORALL $keys {ClanPoints.TotalPoints = @ClanPoints.TotalPoints + @ClanPoints.%i}
- ;;
- $f1 = "&-9s"
- $f2 = "&4d"
- ;;
- #ECHO %cr
- ;;
- #ECHO <color yellow>Clan Rank Points for </color><color white>@RankMeCharacter</color><color white>:</color>
- ;;
- #ECHO %cr
- ;;
- #ECHO <color yeallow>%repeat( "-", 20)</color>
- ;;
- #ECHO <color yellow>%format( $f1, "Remorts = ")</color><color white>%format( $f2, @ClanPoints.RemortPoints)</color><color yellow> pts</color>
- #ECHO <color yellow>%format( $f1, "Tiers = ")</color><color white>%format( $f2, @ClanPoints.TierPoints)</color><color yellow> pts</color>
- #ECHO <color yellow>%format( $f1, "Pups = ")</color><color white>%format( $f2, @ClanPoints.PupPoints)</color><color yellow> pts</color>
- #ECHO <color yellow>%format( $f1, "Qpts = ")</color><color white>%format( $f2, @ClanPoints.QPPoints)</color><color yellow> pts</color>
- #ECHO <color yellow>%format( $f1, "Gqs = ")</color><color white>%format( $f2, @ClanPoints.GQPoints)</color><color yellow> pts</color>
- #ECHO <color yellow>%format( $f1, "Cps = ")</color><color white>%format( $f2, @ClanPoints.CPPoints)</color><color yellow> pts</color>
- #ECHO <color yellow>%format( $f1, "War Wins = ")</color><color white>%format( $f2, @ClanPoints.WarPoints)</color><color yellow> pts</color>
- #ECHO <color yellow>%format( $f1, "War Kills = ")</color><color white>%format( $f2, @ClanPoints.WarKillPoints)</color><color yellow> pts</color>
- #ECHO <color yellow>%format( $f1, "Donations = ")</color><color white>%format( $f2, @ClanPoints.GoldPoints)</color><color yellow> pts</color>
- #ECHO <color yellow>%format( $f1, "Explored = ")</color><color white>%format( $f2, @ClanPoints.RoomPoints)</color><color yellow> pts</color>
- #ECHO <color yellow>%format( $f1, "Goals = ")</color><color white>%format( $f2, @ClanPoints.GoalPoints)</color><color yellow> pts</color>
- ;;
- #ECHO %cr
- ;;
- #ECHO <color yellow>Total points for </color><color white>%proper( @RankMeCharacter)</color><color yellow> = </color><color white>@ClanPoints.TotalPoints</color><color yellow> pts</color>
- ;;
- #ECHO %cr
- ;;
- #ECHO <color yellow>Current Rank: </color><color white>@ClanPoints.CurrentRank</color>
- ;;
- #ECHO %cr
- ;;
- #ECHO <color yellow>New Earned Rank: </color><color white>@getnewrank( @ClanPoints.TotalPoints)</color>
- ;;
- #ECHO %cr]]></value>
- </alias>
- <alias name="showrank" id="1285">
- <value>ClanPoints.TotalPoints = 0
- ;;
- #LOOPDB @ClanPoints {#IF (%isnumber( %val) AND %key!= "TotalPoints") {ClanPoints.TotalPoints = @ClanPoints.TotalPoints + %val}}
- ;;
- $f1 = "&-9s"
- $f2 = "&4d"
- ;;
- winwrite (@cy + "Clan Rank Points for " + @cw + @RankMeCharacter + @cy + ":" + @rc)
- ;;
- winwritex (@cy + %repeat( "-", 20) + @rc)
- ;;
- winwritex (@cy + %format( $f1, "Remorts = ") + @cw + %format( $f2, @ClanPoints.RemortPoints) + @cy + " pts" + @rc)
- ;;
- winwritex (@cy + %format( $f1, "Tiers = ") + @cw + %format( $f2, @ClanPoints.TierPoints) + @cy + " pts" + @rc)
- ;;
- winwritex (@cy + %format( $f1, "Pups = ") + @cw + %format( $f2, @ClanPoints.PupPoints) + @cy + " pts" + @rc)
- ;;
- winwritex (@cy + %format( $f1, "Qpts = ") + @cw + %format( $f2, @ClanPoints.QPPoints) + @cy + " pts" + @rc)
- ;;
- winwritex (@cy + %format( $f1, "Gqs = ") + @cw + %format( $f2, @ClanPoints.GQPoints) + @cy + " pts" + @rc)
- ;;
- winwritex (@cy + %format( $f1, "Cps = ") + @cw + %format( $f2, @ClanPoints.CPPoints) + @cy + " pts" + @rc)
- ;;
- winwritex (@cy + %format( $f1, "War Wins = ") + @cw + %format( $f2, @ClanPoints.WarPoints) + @cy + " pts" + @rc)
- ;;
- winwritex (@cy + %format( $f1, "War Kills = ") + @cw + %format( $f2, @ClanPoints.WarKillPoints) + @cy + " pts" + @rc)
- ;;
- winwritex (@cy + %format( $f1, "Donations = ") + @cw + %format( $f2, @ClanPoints.GoldPoints) + @cy + " pts" + @rc)
- ;;
- winwritex (@cy + %format( $f1, "Explored = ") + @cw + %format( $f2, @ClanPoints.RoomPoints) + @cy + " pts" + @rc)
- ;;
- winwritex (@cy + %format( $f1, "Goals = ") + @cw + %format( $f2, @ClanPoints.GoalPoints) + @cy + " pts" + @rc)
- ;;
- winwrite (@cy + "Total points for " + @cw + %proper( @RankMeCharacter) + @cy " = " + @cw + @ClanPoints.TotalPoints + @cy + " pts" + @rc)
- ;;
- winwritex (@cy + "Current Rank: " + @cw + @ClanPoints.CurrentRank + @rc)
- ;;
- winwrite (@cy + "New Earned Rank: " + @cw + @getnewrank( @ClanPoints.TotalPoints) + @rc)</value>
- </alias>
- <alias name="rankme" id="2446">
- <value>#T+ "Myrank15"
- ;;
- myrank @RankMeCharacter 15</value>
- </alias>
- </class>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement