Advertisement
Guest User

Untitled

a guest
Jul 23rd, 2019
91
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.62 KB | None | 0 0
  1. <class name="Theme" id="1729">
  2. <class name="prompt" id="1730">
  3. <var name="reply_to" usedef="true" id="1731">
  4. <value>nobody</value>
  5. <default>nobody</default>
  6. </var>
  7. <var name="dbl_left" usedef="true" id="1732">
  8. <value>0</value>
  9. <default>0</default>
  10. </var>
  11. <var name="prompt" usedef="true" id="1733">
  12. <value>on</value>
  13. <default>on</default>
  14. </var>
  15. <trigger priority="25960" enabled="false" id="1734">
  16. <pattern>^(%d)/(%d)Hp (%d)/(%d)Ma (%d)/(%d)Mv(*)T:(%d) ~$(%d)</pattern>
  17. <value>#SUBSTITUTE {%ansi(@theme_color2)%1%ansi(@theme_color1)/%ansi(@theme_color2)%2%ansi(@theme_color1)Hp %ansi(@theme_color2)%3%ansi(@theme_color1)/%ansi(@theme_color2)%4%ansi(@theme_color1)Ma %ansi(@theme_color2)%5%ansi(@theme_color1)/%ansi(@theme_color2)%6%ansi(@theme_color1)Mv%ansi(high,black)%7%ansi(@theme_color2)T:%ansi(@theme_color1)%8 %ansi(@theme_color1)~$%ansi(@theme_color2)%9%char(32)%ansi(reset)}</value>
  18. </trigger>
  19. <trigger name="yes_double_prompt" priority="25970" enabled="false" id="1735">
  20. <pattern>&#177;(%n) Dbl: (%d) Tnl:(%d) Qt:(%d)$</pattern>
  21. <value>#SUBSTITUTE {%ansi(@theme_color1)~&#177;%ansi(@theme_color2)%1 %ansi(@theme_color1)Dbl: %ansi(@theme_color2)%2 %ansi(@theme_color1)Tnl:%ansi(@theme_color2)%3 %ansi(@theme_color1)Qt:%ansi(@theme_color2)%4%ansi(reset)}</value>
  22. </trigger>
  23. <trigger name="no_double_prompt" priority="25980" enabled="false" id="1736">
  24. <pattern>&#177;(%n) Tnl:(%d) Qt:(%d)$</pattern>
  25. <value>#SUBSTITUTE {%ansi(@theme_color1)~&#177;%ansi(@theme_color2)%1 %ansi(@theme_color1)Tnl:%ansi(@theme_color2)%2 %ansi(@theme_color1)Qt:%ansi(@theme_color2)%3%ansi(reset)}</value>
  26. </trigger>
  27. <trigger priority="25990" id="1737">
  28. <pattern>^Exits: (*)|~[ Enemy: (%d)~%~] ~[Me: (%d)~%H/(%d)~%M/(%d)~%M~]~[(*)~]~[(*)~] T:(%d)(*)QT:(%d)$</pattern>
  29. <value>#LOCAL triple double daily
  30. tells = %8
  31. #IF %begins( %9, " Dbl") {
  32. dbl_left = %trim( %rightback( %9, 2))
  33. $double = yes
  34. } {
  35. dbl_left = 0
  36. $double = no
  37. }
  38. #IF ((@daily_dbl_left &gt; 0) AND (@dbl_left &gt; 0)) {$triple = yes} {$triple = no}
  39. #IF (@daily_dbl_left &gt; 0) {$daily = yes}
  40. #SUBSTITUTE {%ansi(@theme_color1)Exits: %ansi(@theme_color2)%1%ansi(@theme_color1)~|%ansi(@theme_color2)~[ %ansi(@theme_color1)Enemy: %ansi(@theme_color2)%2%ansi(@theme_color1)~%%ansi(@theme_color2)~] ~[ %ansi(@theme_color1)Me: %ansi(@theme_color2)%3%ansi(@theme_color1)~%H/%ansi(@theme_color2)%4%ansi(@theme_color1)~%M/%ansi(@theme_color2)%5%ansi(@theme_color1)~%M%ansi(@theme_color2)~]%ansi(@theme_color1)~[%ansi(@theme_color2)%6%ansi(@theme_color1)~]~[%ansi(@theme_color2)%7%ansi(@theme_color1)~] T: %ansi(@theme_color2)%8 %ansi( @theme_color1)%if( $triple = "yes", Trpl, Dbl)%char( 58)%ansi( @theme_color2)%char( 32)@dbl_left%if( $daily = "yes",%concat(".",@daily_dbl_left," ")," ")%ansi(@theme_color1)QT: %ansi(@theme_color2)%10%ansi(reset)}</value>
  41. <notes>Exits: NEW|[ Enemy: 1%] [Me: 88%H/81%M/100%M][][] T:0 QT:0</notes>
  42. </trigger>
  43. <trigger priority="33490" id="1738">
  44. <pattern>^|T:(%d)|(*)|(*)|QT:(%d)|$</pattern>
  45. <value>#LOCAL triple double daily
  46. tells = %1
  47. #IF (%2 = %char( 32)) {reply_to = nobody}
  48. #IF %begins( %3, %char( 32)) {
  49. dbl_left = %trim( %rightback( %3, 2))
  50. $double = yes
  51. } {
  52. dbl_left = 0
  53. $double = no
  54. }
  55. #IF ((@daily_dbl_left &gt; 0) AND (@dbl_left &gt; 0)) {$triple = yes} {$triple = no}
  56. #IF (@daily_dbl_left &gt; 0) {$daily = yes}
  57. #IF (@prompt = "on") {#SUBSTITUTE {%ansi(reset)%ansi( @theme_color2)%char( 124)%ansi( @theme_color1)Tells%char( 58) %ansi( @theme_color2)%1%char( 124)%ansi( @theme_color1)%if( %2 != " ", %ansi( @theme_color2)%replace( %replace( %right( %2, 1), %char( 40), %null), %char( 41)%char( 32), %null), Reply%char( 58)%char( 32)%ansi( @theme_color2)Nobody)%ansi( @theme_color2)%char( 124)%ansi( @theme_color1)%if( $triple = "yes", Trpl, Dbl)%char( 58)%ansi( @theme_color2)%char( 32)@dbl_left%if( $daily = "yes",%concat(".",@daily_dbl_left),"")%ansi( @theme_color2)%char( 124)%ansi( @theme_color1)QT%char( 58) %ansi( @theme_color1)%4%ansi( @theme_color2)%char( 124)%ansi(reset)}} {#GAG}
  58. //#SHOW {|%3|}</value>
  59. </trigger>
  60. <trigger priority="33630" id="1739">
  61. <pattern>^Room: (*) Exits: (*)</pattern>
  62. <value>#IF (@prompt = "on") {#SUBSTITUTE {%ansi(@theme_color1)Room: %ansi(@theme_color2)%1 %ansi(@theme_color1)Exits: %ansi(@theme_color2)%2%ansi(reset)}} {#GAG}</value>
  63. </trigger>
  64. <trigger priority="33640" id="1740">
  65. <pattern>^You will no longer see prompts.$</pattern>
  66. <value>prompt = off</value>
  67. </trigger>
  68. <trigger priority="33650" id="1741">
  69. <pattern>^You will now see prompts.$</pattern>
  70. <value>prompt = on</value>
  71. </trigger>
  72. <trigger priority="35420" id="1742">
  73. <pattern>^(%d)/(%d)|(%d)/(%d)|(%d)/(%d)</pattern>
  74. <value>#GAG
  75. //#SUBSTITUTE {%ansi(@theme_color1)HP%ansi(@theme_color2): %ansi(@theme_color2)%1%ansi(@theme_color1)/%ansi(@theme_color2)%2 %ansi(@theme_color1)MA%ansi(@theme_color2): %ansi(@theme_color2)%3%ansi(@theme_color1)/%ansi(@theme_color2)%4 %ansi(@theme_color1)MV%ansi(@theme_color2): %ansi(@theme_color2)%5%ansi(@theme_color1)/%ansi(@theme_color2)%6}</value>
  76. </trigger>
  77. </class>
  78. <alias name="settheme" autoappend="true" id="1743">
  79. <value><![CDATA[$temp_mxp1 = "$"
  80. $temp_mxp2 = "$"
  81. $temp_mud1 = "G"
  82. #IF (%ismember( %1, @theme_colors) AND %ismember( %2, @theme_colors)) {
  83. #LOOPDB @theme_colors_db {#IF (%val = %1) {theme_color1 = %case( %key, "high,black", red, green, blue, cyan, magenta, yellow, gray, "high,red", "high,green", "high,blue", "high,cyan", "high,magenta", "high,yellow", "high,white")}}
  84. #LOOPDB @theme_colors_db {#IF (%val = %2) {theme_color2 = %case( %key, "high,black", red, green, blue, cyan, magenta, yellow, gray, "high,red", "high,green", "high,blue", "high,cyan", "high,magenta", "high,yellow", "high,white")}}
  85. #LOOPDB @theme_colors_db {#IF (%val = %1) {theme_color1_mud = %case( %key, D, r, g, b, c, m, y, w, R, G, B, C, M, Y, W)}}
  86. #LOOPDB @theme_colors_db {#IF (%val = %2) {theme_color2_mud = %case( %key, D, r, g, b, c, m, y, w, R, G, B, C, M, Y, W)}}
  87. #LOOPDB @theme_colors_db {#IF (%val = %1) {$temp_mxp1 = %case( %key, 505050, aa0000, 00aa00, 4b4bff, 00aaaa, 960096, aaaa00, aaaaaa, ff0000, 00ff00, 3551FF, 44ffff, C800C8, ffff00, ffffff)}}
  88. theme_color1_mxp = %concat("$",$temp_mxp1)
  89. theme_color2_mxp = %concat("$",$temp_mxp2)
  90. #LOOPDB @theme_colors_db {#IF (%val = %1) {$temp_mud1 = %case( %key, gray, red, green, blue, cyan, magenta, yellow, bwhite, bred, bgreen, bblue, bcyan, bmagenta, byellow, white)}}
  91. colorset DefaultChan $temp_mud1
  92. colorset Auction $temp_mud1
  93. colorset Exits $temp_mud1
  94. colorset Roomnames $temp_mud1
  95. map
  96. replay
  97. #MXP %ansi( @theme_color1)Ansi color theme set to: %ansi( @theme_color1)PRIMARY %ansi( @theme_color2)SECONDARY
  98. #MXP %ansi( @theme_color1)MXP Colors set to: ~<font color=@theme_color1_mxp~>PRIMARY~<~/font~> ~<font color=@theme_color2_mxp~>SECONDARY~<~/font~>
  99. echo Mud colors set to: %char( 64)@theme_color1_mud~PRIMARY %char( 64)@theme_color2_mud~SECONDARY
  100. } {
  101. #SHOW {%ansi( @theme_color1)Please enter valid mud colors in proper case%char( 58)}
  102. #FORALL @theme_colors {#IF (%i = "black") {#SHOW {%ansi( high, black)black}} {#IF (%i = "white") {#SHOW {%ansi( grey)white}} {#SHOW {%ansi( %i)%i}}}}
  103. }]]></value>
  104. </alias>
  105. <var name="theme_color1" id="1744">cyan</var>
  106. <var name="theme_color1_mxp" id="1745">$00aaaa</var>
  107. <var name="theme_color2_mxp" id="1746">$$</var>
  108. <var name="theme_color1_mud" id="1747">c</var>
  109. <var name="theme_color2_mud" id="1748">W</var>
  110. <var name="theme_colors_db" type="Record" id="1749">
  111. <value>9=Red|8=white|7=yellow|6=magenta|5=cyan|4=blue|3=green|2=red|1=black|15=White|14=Yellow|13=Magenta|12=Cyan|11=Blue|10=Green</value>
  112. <json>{"9":"Red","8":"white","7":"yellow","6":"magenta","5":"cyan","4":"blue","3":"green","2":"red","1":"black","15":"White","14":"Yellow","13":"Magenta","12":"Cyan","11":"Blue","10":"Green"}</json>
  113. <notes>black|red|green|blue|cyan|magenta|yellow|white|Red|Green|Blue|Cyan|Magenta|Yellow|White</notes>
  114. </var>
  115. <var name="theme_color2" type="Literal" id="1750">high,white</var>
  116. <trigger priority="15680" id="1751">
  117. <pattern>^Right here you see:$</pattern>
  118. <value>#COLOR @theme_color1_mxp</value>
  119. </trigger>
  120. <trigger priority="15690" id="1752">
  121. <pattern>^(*) from here you see:$</pattern>
  122. <value>#COLOR @theme_color1_mxp</value>
  123. </trigger>
  124. <trigger priority="15700" id="1753">
  125. <pattern>WHOOOOOOOOOOOOSH!</pattern>
  126. <value>#COLOR @theme_color1_mxp</value>
  127. </trigger>
  128. <trigger priority="23480" id="1754">
  129. <pattern>^ Who list sorted by : (*)$</pattern>
  130. <value>#SUBSTITUTE {%ansi(@theme_color1)Who list sorted by: %ansi(@theme_color2)%1%ansi(reset)}</value>
  131. </trigger>
  132. <trigger priority="51740" id="1755">
  133. <pattern>&#174;</pattern>
  134. <value><![CDATA[#SUB {<font face=courier>&#174;</font>}]]></value>
  135. </trigger>
  136. <alias name="testtheme" id="3085">
  137. <value>#show %if( %ismember( %left( %1, 1), @alphabet), %1, b%1)
  138. //$theme_color1 = %case(%ismember(%1,@theme_colors),high%char(44)black,red,green,blue,cyan,magenta,brown,grey,high%char(44)red,high%char(44)green,high%char(44)blue,high%char(44)cyan,high%char(44)magenta,high%char(44)yellow,high%char(44)white)
  139. //#show %1 - $theme_color1
  140. //#LOOPDB @theme_colors {#IF (%val = %1) {#SHOW theme_color1_mud = %case( %key, "high,black", red, green, blue, cyan, magenta, yellow, gray, "high,red", "high,green", "high,blue", "high,cyan", "high,magenta", "high,yellow", "high,white")}}
  141. //#LOOPDB @theme_colors {#IF (%val = %2) {#SHOW theme_color2_mud = %case( %key, "high,black", red, green, blue, cyan, magenta, yellow, gray, "high,red", "high,green", "high,blue", "high,cyan", "high,magenta", "high,yellow", "high,white")}}
  142. // theme_color1 = %case(%ismember(%1,@theme_colors),high%char(44)black,red,green,blue,cyan,magenta,brown,grey,high%char(44)red,high%char(44)green,high%char(44)blue,high%char(44)cyan,high%char(44)magenta,high%char(44)yellow,high%char(44)white)
  143. // theme_color2 = %case(%ismember(%2,@theme_colors),high%char(44)black,red,green,blue,cyan,magenta,brown,grey,high%char(44)red,high%char(44)green,high%char(44)blue,high%char(44)cyan,high%char(44)magenta,high%char(44)yellow,high%char(44)white)
  144. // theme_color1_mud = %case(%ismember(%1,@theme_colors),D,r,g,b,c,m,y,w,R,G,B,C,M,Y,W)
  145. // theme_color2_mud = %case(%ismember(%2,@theme_colors),D,r,g,b,c,m,y,w,R,G,B,C,M,Y,W)
  146. // theme_color1_mxp = %case( %ismember( %1, @theme_colors), ~$505050, ~$aa0000, ~$00aa00, ~$4b4bff, ~$00aaaa, ~$960096, ~$aaaa00, ~$aaaaaa, ~$ff0000, ~$00ff00, ~$3551FF, ~$44ffff, ~$C800C8, ~$ffff00, ~$ffffff)
  147. // theme_color2_mxp = %case( %ismember( %2, @theme_colors), ~$505050, ~$aa0000, ~$00aa00, ~$4b4bff, ~$00aaaa, ~$960096, ~$aaaa00, ~$aaaaaa, ~$ff0000, ~$00ff00, ~$3551FF, ~$44ffff, ~$C800C8, ~$ffff00, ~$ffffff)
  148. // colorset DefaultChan %if( %ismember( %left( %1, 1), @alphabet), %1, b%1)
  149. // colorset Auction %if( %ismember( %left( %1, 1), @alphabet), %1, b%1)
  150. // colorset Exits %if( %ismember( %left( %1, 1), @alphabet), %1, b%1)
  151. // colorset Roomnames %if( %ismember( %left( %1, 1), @alphabet), %1, b%1)
  152.  
  153. </value>
  154. </alias>
  155. <var name="theme_colors" type="StringList" id="3086">
  156. <value>Red|white|yellow|magenta|cyan|blue|green|red|black|White|Yellow|Magenta|Cyan|Blue|Green</value>
  157. <json>["Red","white","yellow","magenta","cyan","blue","green","red","black","White","Yellow","Magenta","Cyan","Blue","Green"]</json>
  158. <notes>black|red|green|blue|cyan|magenta|yellow|white|Red|Green|Blue|Cyan|Magenta|Yellow|White</notes>
  159. </var>
  160. </class>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement