API tools faq
paste
Advertisement
Guest User

Untitled

a guest
May 19th, 2017
223
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 22.82 KB | None | 0 0
raw download clone embed print report
  1. ; / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - \
  2. ; | Wyrm's mIRC Scripts - Guest Identifier Script |
  3. ; | Automatic name detection from hostnames, including with automatic database construction |
  4. ; \ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - /
  5.  
  6. ; To add any channel use /wms.guestid.setup WC [PUB]
  7. ; In any channel you want added, where:
  8. ; WC is the wildcard pattern you wish to match against (*guest* will likely be most useful)
  9. ; Giving any second argument will make announcements about the identity of the new person public (ie messages the channel instead of using echo)
  10.  
  11. ALIAS wms.guestid.combine {
  12. ; Example usage:
  13. ; wms.guestid.combine confusedDolphin .+olphin.*
  14. ; $1 - nick
  15. ; $2 - regex to match against nick
  16. var %nick = $1
  17. var %addy = $address($1,2)
  18. if (%addy == $null) return
  19. var %regex = $+($chr(47),$replace($replace(%addy,*,\*),.,\.),\/,$2-,$chr(47))
  20. var %i = 1
  21. var %k
  22. while (%i <= $var(%wms.guestid.database.*)) {
  23. %k = $numtok(%wms.guestid.database. [ $+ [ %i ] ] ,32))
  24. while (%k >= 0) {
  25. %node = $gettok(%wms.guestid.database. [ $+ [ %i ] ] ,%k,32))
  26. if ($regex( %node , [ %regex ] ) > 0) {
  27. set %wms.guestid.database. [ $+ [ %i ] ] $deltok(%wms.guestid.database. [ $+ [ %i ] ] ,%k,32)
  28. }
  29. dec %k
  30. }
  31. inc %i
  32. }
  33. wms.guestid.add $1 $address($1,2) 1
  34. }
  35. ALIAS wms.guestid.setup {
  36. if ($1 == $null) { echo 7 -a $timestamp 4You need to specify a wildcard to match the nicks against. | return }
  37. if ($2 != $null) {
  38. if (%wms.guestid.chanlist == $null) set %wms.guestid.chanlist [ # $+ : $+ [ $network ] $+ :pub: $+ [ $1 ] ]
  39. else set %wms.guestid.chanlist [ %wms.guestid.chanlist # $+ : $+ [ $network ] $+ :pub: $+ [ $1 ]] ]
  40. echo 7 -a $timestamp 4Added # on $network to list of channels. Will match7 $1 4against all nicks joining, and will announce publicly any known identities.
  41. }
  42. else {
  43. echo 7 -a $timestamp 4Added # on $network to list of channels. Will match7 $1 4against all nicks joining.
  44. if (%wms.guestid.chanlist == $null) set %wms.guestid.chanlist [ # $+ : $+ [ $network ] $+ :priv: $+ [ $1 ] ]
  45. else set %wms.guestid.chanlist [ %wms.guestid.chanlist # $+ : $+ [ $network ] $+ :priv: $+ [ $1 ] ]
  46. }
  47. if (%wms.guestid.database.1 == $null) set %wms.guestid.database.1
  48. }
  49. ALIAS wms.guestid.tidy {
  50. var %id1, %i = 1, %j, %k, %l
  51. while (%i <= $var(wms.guestid.database.*,0)) {
  52. %j = 1
  53. while (%j <= $numtok(%wms.guestid.database. [ $+ [ %i ] ] ,32)) {
  54. %id1 = $gettok(%wms.guestid.database. [ $+ [ %i ] ] ,%j,32)
  55. %k = %i
  56. while (%k <= $var(wms.guestid.database.*,0)) {
  57. %l = $calc( %j +1)
  58. while (%l <= $numtok(%wms.guestid.database. [ $+ [ %k ] ] ,32)) {
  59. if (%id1 == $gettok(%wms.guestid.database. [ $+ [ %k ] ] ,%l,32)) set %wms.guestid.database. [ $+ [ %k ] ] $deltok(%wms.guestid.database. [ $+ [ %k ] ] ,%l,32)
  60. else inc %l
  61. }
  62. inc %k
  63. }
  64. inc %j
  65. }
  66. inc %i
  67. }
  68. }
  69. ALIAS wms.guestid.add {
  70. ;$1 name
  71. ;$2 ip
  72. ;$3 table number
  73. if (%wms.guestid.database. [ $+ [ $3 ] ] == $null) set %wms.guestid.database. [ $+ [ $3 ] ]
  74. if ($istok( %wms.guestid.database. [ $+ [ $3 ] ] , [ $2 ] $+ $chr(47) $+ [ $1 ] ,32)) return
  75. if ($numtok(%wms.guestid.database. [ $+ [ $3 ] ] ,32) < 40) set %wms.guestid.database. [ $+ [ $3 ] ] %wms.guestid.database. [ $+ [ $3 ] ] [ $2 ] $+ $chr(47) $+ [ $1 ]
  76. else wms.guestid.add.recursive $1 $2 $calc( [ $3 ] +1 )
  77. }
  78. ALIAS wms.guestid.add.recursive wms.guestid.add $1-
  79. ALIAS wms.guestid.lookup {
  80. ;$1 host
  81. var %dbnum = 0
  82. var %num = 0
  83. var %nick
  84. var %nicklist
  85. while (%dbnum < $var(%wms.guestid.database.*,0)) {
  86. inc %dbnum
  87. var %n = $numtok(%wms.guestid.database. [ $+ [ %dbnum ] ] ,32)
  88. var %i = 1
  89. while (%i <= %n) {
  90. if ($gettok($gettok(%wms.guestid.database. [ $+ [ %dbnum ] ] ,%i,32),1,47) == $1) {
  91. %nick = $gettok($gettok(%wms.guestid.database. [ $+ [ %dbnum ] ] ,%i,32),2,47)
  92. %nicklist = %nicklist $gettok($gettok(%wms.guestid.database. [ $+ [ %dbnum ] ] ,%i,32),2,47)
  93. inc %num
  94. }
  95. inc %i
  96. }
  97. }
  98. %i = 1
  99. %n = $numtok(%nicklist,32)
  100. var %nicks
  101. while (%i < %n) {
  102. %nicks = %nicks $gettok(%nicklist,%i,32) $+ ,
  103. inc %i
  104. }
  105. %nicks = $left(%nicks,-1) or %nick
  106. if ($prop == num) return %num
  107. if ($prop == nick) return %nick
  108. if ($prop == nicks) return %nicks
  109. }
  110. ALIAS wms.guestid.ghost {
  111. var %n $nick($2,0)
  112. var %i = 1
  113. var %exists = $false
  114. var %nicklist,%nicks
  115. while (%i <= %n) {
  116. if (($3 != $nick($2,%i)) && ($address($nick($2,%i),2) == $1)) { %nicklist = %nicklist $nick($2,%i) | %exists = $true }
  117. inc %i
  118. }
  119. if ($numtok(%nicklist,32) < 2) %nicks = %nicklist
  120. else {
  121. %i = 1
  122. %n = $numtok(%nicklist,32)
  123. while (%i < %n) {
  124. %nicks = %nicks $gettok(%nicklist,%i,32) $+ ,
  125. inc %i
  126. }
  127. %nicks = $left(%nicks,-1) or %nick
  128. }
  129. if ($prop == exists) return %exists
  130. else return %nicks
  131. }
  132. on *:NICK: {
  133. var %n = $numtok(%wms.guestid.chanlist,32)
  134. var %i = 1
  135. var %chanlist
  136. var %net,%p,%wc
  137. while (%i <= %n) {
  138. %chanlist = $gettok(%wms.guestid.chanlist,%i,32)
  139. %net = $gettok(%chanlist,2,58)
  140. %p = $gettok(%chanlist,3,58)
  141. %wc = $gettok(%chanlist,4-,58)
  142. if (($network == %net) && (%wc iswm $nick)) {
  143. wms.guestid.add $newnick $address($newnick,2) 1
  144. break
  145. }
  146. inc %i
  147. }
  148. }
  149. on *:JOIN:#: {
  150. var %n = $numtok(%wms.guestid.chanlist,32)
  151. var %i = 1
  152. var %possibles
  153. var %chanlist
  154. var %chan,%net,%p,%wc
  155. while (%i <= %n) {
  156. %chanlist = $gettok(%wms.guestid.chanlist,%i,32)
  157. %chan = $gettok(%chanlist,1,58)
  158. %net = $gettok(%chanlist,2,58)
  159. %p = $gettok(%chanlist,3,58)
  160. %wc = $gettok(%chanlist,4-,58)
  161. if ((# == %chan) && ($network == %net) && (%wc iswm $nick)) {
  162. %possibles = %possibles %chanlist
  163. }
  164. inc %i
  165. }
  166. if (%possibles == $null) return
  167. %i = 1
  168. %n = $numtok(%possibles,32)
  169. while (%i <= %n) {
  170. if (%p != $gettok($gettok(%possibles,%i,32),3,58)) {
  171. echo 4 # $timestamp Name matches both private and public wildcards! Using private to be safe.
  172. %p = priv
  173. break
  174. }
  175. inc %i
  176. }
  177. var %num = $wms.guestid.lookup($address($nick,2)).num
  178. var %str
  179. if (%num == 0) {
  180. if ($wms.guestid.ghost($address($nick,2),#,$nick).exists) {
  181. %str = 7That's $wms.guestid.ghost($address($nick,2),#,$nick) pissing about with another connection...
  182. }
  183. else %str = 7nfi who that is, will work it out when they reveal themselves!
  184. }
  185. else if (%num == 1) %str = 7That's $wms.guestid.lookup($address($nick,2)).nick $+ !
  186. else if (%num > 1) %str = 7That's $wms.guestid.lookup($address($nick,2)).nicks $+ !
  187. if (%p == something itll never be) {
  188. msg # %str
  189. scon 1 echo -gt line 146 id script throws error! % str is: %str
  190. }
  191. else echo 4 # $timestamp %str
  192. }
  193. ALIAS wms.guestid.update {
  194. var %j, %i = 1
  195. var %both
  196. var %nick
  197. var %addy
  198. wms.guestid.tidy
  199. var %wms.TEMP.1 *!*@EE60ABB5.7B6FE80C.3F13CD5B.IP/Wyrm *!*@synIRC-B3BFDB14.star.bris.ac.uk/FistOFun *!*@235CBFA6.F64FD24B.EA659B29.IP/charky *!*@synIRC-26A6276.bethere.co.uk/BattlePope *!*@synIRC-8B98ED03.cable.ubr07.aztw.blueyonder.co.uk/Loweko *!*@318D7C44.AA4DD6D2.F76ABBC2.IP/BSR *!*@EBE01352.B13C9085.948414C0.IP/charky *!*@synIRC-F286FE5F.sotn.cable.ntl.com/helloteam *!*@synIRC-5DFD14F1.star.bris.ac.uk/FistOFun *!*@synIRC-9FD74795.terminal.tdcmobil.dk/Flare *!*@synIRC-C55A1863.terminal.tdcmobil.dk/Flare *!*@synIRC-BD57D80C.terminal.tdcmobil.dk/Flare *!*@synIRC-705AB44F.gly.bris.ac.uk/mayflower *!*@synIRC-2F5733D7.terminal.tdcmobil.dk/Flare *!*@synIRC-386DEFAC.terminal.tdcmobil.dk/Flare *!*@synIRC-F2305B8.terminal.tdcmobil.dk/Flare *!*@synIRC-5064C915.terminal.tdcmobil.dk/Flare *!*@synIRC-15996E13.gly.bris.ac.uk/mayflower *!*@synIRC-B10029DA.terminal.tdcmobil.dk/Flare *!*@synIRC-CB7E7382.terminal.tdcmobil.dk/Flare *!*@synIRC-C02402F0.range86-161.btcentralplus.com/GTatHome *!*@synIRC-F286FE5F.sotn.cable.ntl.com/charky *!*@synIRC-E72D3704.range86-166.btcentralplus.com/GTatHome *!*@synIRC-524A0DED.dsl.pipex.com/Fake-Face *!*@43E919A7.B9739DD4.63637687.IP/charky *!*@5C2D4DAA.966B9AF9.3A885D3D.IP/charky *!*@synIRC-2A71911B.onyx.net/Scruffy *!*@8D1E998B.1202EF88.63637687.IP/charky *!*@700F7013.37C27BE5.59A2944A.IP/charky *!*@56877763.ADA29DF8.67028D06.IP/charky *!*@synIRC-E562B659.range86-177.btcentralplus.com/GTatHome *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@synIRC-E4AB2487.lns6-c12.dsl.pol.co.uk/joshiba *!*@6AE2138E.25B9A296.556045B1.IP/Sshhh *!*@E5C7F669.F0B3776B.C4687893.IP/Mitcian *!*@synIRC-BDA55CF8.zone4.bethere.co.uk/VenusDeLiz *!*@synIRC-4C671C31.co.uk/Amy *!*@synIRC-4C671C31.co.uk/IRConan *!*@synIRC-11FC378D.cs.york.ac.uk/Octothorpe *!*@synIRC-D173EAAE.resnet.bris.ac.uk/poacheR
  200. var %wms.TEMP.2 *!*@synIRC-45A3F7DE.resnet.bris.ac.uk/timesend *!*@synIRC-EC027C77.resnet.bris.ac.uk/POEcube *!*@C35947EB.A74803AE.948414C0.IP/charky *!*@1FEF5563.AB269114.D017A69.IP/jsk *!*@synIRC-7D8E1CFF.resnet.bris.ac.uk/fatal *!*@synIRC-7017369A.maths.bris.ac.uk/Havokroft *!*@synIRC-95122DE2.maths.bris.ac.uk/Havokroft *!*@synIRC-791A707.resnet.bris.ac.uk/EtherealOne *!*@synIRC-5225E19E.cable.ubr08.aztw.blueyonder.co.uk/Pretzel *!*@647BC5A7.6EAB7639.7BCD0AF8.IP/samurite *!*@synIRC-58934566.hor.ucl.ac.uk/reddd *!*@synIRC-D3E9D921.hor.ucl.ac.uk/Antoin *!*@B5CF7F89.5946AEA9.BBE3CF9A.IP/Caroline *!*@synIRC-1A275176.pcr.bris.ac.uk/Robbo *!*@synIRC-26A6276.bethere.co.uk/Pretzel *!*@synIRC-66A72F31.cable.ubr09.aztw.blueyonder.co.uk/DrRobotnick *!*@synIRC-FF307DDC.resnet.bris.ac.uk/Vity *!*@synIRC-60A5E2CC.resnet.bris.ac.uk/J *!*@synIRC-60A5E2CC.resnet.bris.ac.uk/fallen_hero *!*@40E69D8D.339ACB8E.C0C96999.IP/BattlePope *!*@synIRC-D788A49.ubu.bris.ac.uk/McG *!*@synIRC-6D95B0B7.cable.ubr08.wolv.blueyonder.co.uk/DrRobotnick *!*@synIRC-EDC1790A.cable.ubr12.aztw.blueyonder.co.uk/Moreta *!*@synIRC-C2534FCB.maths.bris.ac.uk/Havokroft *!*@synIRC-A5EFCBDF.cable.ubr04.mort.blueyonder.co.uk/Stupidolphin *!*@3BA8306D.854AD596.92E6D8B7.IP/Shazz *!*@synIRC-939C8C4E.bethere.co.uk/BraveSirRobbo *!*@synIRC-52F8EFEC.maths.bris.ac.uk/Uni-Face *!*@synIRC-A5EFCBDF.cable.ubr04.mort.blueyonder.co.uk/stupidolhpin *!*@synIRC-632C8FB9.cable.ubr22.aztw.blueyonder.co.uk/Noodle *!*@synIRC-3A208346.range86-147.btcentralplus.com/Scooby *!*@synIRC-A807ABA7.resnet.bris.ac.uk/hOZ *!*@synIRC-C113095A.resnet.bris.ac.uk/Molubdos *!*@synIRC-EDE59596.maths.bris.ac.uk/Havokroft *!*@synIRC-C385CDB.maths.bris.ac.uk/Havokroft *!*@synIRC-68D7AB9.resnet.bris.ac.uk/EtherealsOtherOne *!*@synIRC-78EDBF6F.resnet.bris.ac.uk/Desustorm *!*@synIRC-965CB138.bethere.co.uk/WarningForever *!*@synIRC-94A94147.maths.bris.ac.uk/Uni-Face *!*@3E5E57D8.B9AF86F9.F76ABBC2.IP/Scoooby
  201. var %wms.TEMP.3 *!*@1F27B559.D50808A1.8ABABB11.IP/charky *!*@synIRC-2A71911B.onyx.net/Scruff *!*@synIRC-DC579589.aztw.cable.virginmedia.com/KitchenPuter *!*@synIRC-CF461898.phy.bris.ac.uk/Sshhh *!*@synIRC-EC027C77.resnet.bris.ac.uk/Cube *!*@synIRC-47002454.gr5.adsl.brightview.com/desukatie *!*@synIRC-D788A49.ubu.bris.ac.uk/pikmindoctor *!*@synIRC-221BE51C.resnet.bris.ac.uk/McG *!*@synIRC-58AEB588.plusnet.pcl-ag01.dyn.plus.net/Sshhh
  202. var %wms.TEMP.4 *!*@synIRC-26A6276.bethere.co.uk/Pretzel *!*@3B85898C.7667EFB.8ABABB11.IP/charky *!*@synIRC-2A71911B.onyx.net/scruffy *!*@6453290D.69E6F3D1.4CA7C67E.IP/Desukatie *!*@synIRC-45A3F7DE.resnet.bris.ac.uk/timesend *!*@synIRC-A59BE431.zone5.bethere.co.uk/Scoooby *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@synIRC-5225E19E.cable.ubr08.aztw.blueyonder.co.uk/Pretzel *!*@synIRC-1C5B131A.cable.ubr08.hawk.blueyonder.co.uk/Mideval *!*@3E5E57D8.B9AF86F9.F76ABBC2.IP/Scoooby *!*@1F27B559.D50808A1.8ABABB11.IP/charky *!*@synIRC-2A71911B.onyx.net/Scruff *!*@synIRC-EC027C77.resnet.bris.ac.uk/Cube *!*@synIRC-47002454.gr5.adsl.brightview.com/desukatie *!*@synIRC-221BE51C.resnet.bris.ac.uk/McG *!*@synIRC-7DD79B5B.croy.cable.virginmedia.com/StupidDolphin *!*@synIRC-2A71911B.onyx.net/ScruffyRehab *!*@E6EFD55.905B8612.556045B1.IP/Sshhh *!*@synIRC-A59BE431.zone5.bethere.co.uk/Scoobee *!*@synIRC-308D548E.glowfrog.com/StupidDolphin *!*@synIRC-D991A290.dynamic.dsl.as9105.com/EtherealOne *!*@6E5E3F09.57639098.E1D0A678.IP/ScoobyatDans *!*@synIRC-308D548E.glowfrog.com/stupidolphin *!*@synIRC-24DCFE3C.aztw.cable.virginmedia.com/WildFire *!*@synIRC-7DD79B5B.croy.cable.virginmedia.com/stupidolphin *!*@synIRC-EC2C40FE.plusnet.thn-ag3.dyn.plus.net/Sshhh *!*@synIRC-94985396.plusnet.thn-ag1.dyn.plus.net/Sshhh *!*@synIRC-58AEB588.plusnet.pcl-ag01.dyn.plus.net/Sshhh
  203. var %wms.TEMP.5 *!*@AE344893.1F3E38BE.6808EECE.IP/Nood|e *!*@synIRC-C1AB7093.range86-146.btcentralplus.com/dangerman *!*@61790A4A.CAF7EA70.6808EECE.IP/Nood|e *!*@synIRC-D28BDDBD.cable.ubr10.aztw.blueyonder.co.uk/Sshhh *!*@synIRC-2C83BD11.gr5.adsl.brightview.com/desukatie *!*@synIRC-6015EDB.gr7.adsl.brightview.com/Desukatie *!*@synIRC-BE1964DF.static.beotel.net/Eli0t *!*@synIRC-B73ABF06.rb5.adsl.brightview.com/Desukatie *!*@synIRC-9EF9F9B3.morgyn.org/M *!*@synIRC-E58AD7A2.cable.ubr01.aztw.blueyonder.co.uk/MentalMike *!*@AC035F90.BD220E3E.BBE3CF9A.IP/Mentalmike *!*@AC035F90.BD220E3E.BBE3CF9A.IP/mentalmike *!*@AC035F90.BD220E3E.BBE3CF9A.IP/MentalMike *!*@AC035F90.BD220E3E.BBE3CF9A.IP/MentalMike *!*@swlans.co.uk/mentalmike *!*@AC035F90.BD220E3E.BBE3CF9A.IP/Caroline *!*@swlans.co.uk/M *!*@synIRC-E58AD7A2.cable.ubr01.aztw.blueyonder.co.uk/MentalMike *!*@synIRC-A59BE431.zone5.bethere.co.uk/Scooby *!*@synIRC-CF461898.phy.bris.ac.uk/Sshhh|Uni *!*@synIRC-559DA0B4.bb.sky.com/Desukatie *!*@synIRC-162778D5.phy.bris.ac.uk/Sshhh|Uni *!*@synIRC-A774A48C.resnet.bris.ac.uk/DesuAmy *!*@synIRC-3D6B695D.cable.ubr07.aztw.blueyonder.co.uk/Mitcian *!*@A50660EE.D34099A4.71B16992.IP/RoF_Lectures *!*@synIRC-83042272.gr6.adsl.brightview.com/Desukatie *!*@synIRC-791A707.resnet.bris.ac.uk/EtherealOne *!*@synIRC-791A707.resnet.bris.ac.uk/EtherealOne *!*@synIRC-A59BE431.zone5.bethere.co.uk/Scoooby *!*@synIRC-A59BE431.zone5.bethere.co.uk/Scooby *!*@5F629EA0.D46D2DDF.948414C0.IP/charky *!*@synIRC-58C08A1A.maths.bris.ac.uk/Havokroft *!*@synIRC-A59BE431.zone5.bethere.co.uk/Sshhh *!*@synIRC-308D548E.glowfrog.com/StupidDolphin *!*@synIRC-A774A48C.resnet.bris.ac.uk/OriginsBOT *!*@5F629EA0.D46D2DDF.948414C0.IP/charky *!*@synIRC-C9A10B84.bb.sky.com/Desukatie *!*@synIRC-57DFEB36.aztw.cable.virginmedia.com/Pretzel *!*@synIRC-C385CDB.maths.bris.ac.uk/Havokroft *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict
  204. var %wms.TEMP.6 *!*@synIRC-6B69DE03.phy.bris.ac.uk/helloteam *!*@synIRC-CF461898.phy.bris.ac.uk/Sshhh|Uni *!*@synIRC-C385CDB.maths.bris.ac.uk/Havokroft *!*@synIRC-39926BB0.range86-177.btcentralplus.com/GTatHome *!*@synIRC-39926BB0.range86-177.btcentralplus.com/GTatHome *!*@synIRC-4C671C31.co.uk/Amy *!*@synIRC-4C671C31.co.uk/irconan *!*@synIRC-26FCF8B1.range86-177.btcentralplus.com/GTatHome *!*@synIRC-26FCF8B1.range86-177.btcentralplus.com/GTatHome *!*@synIRC-791A1284.range86-178.btcentralplus.com/GTatHome *!*@synIRC-791A1284.range86-178.btcentralplus.com/GTatHome *!*@synIRC-2AC892BB.bb.sky.com/Desukatie *!*@synIRC-DC65C34.maths.bris.ac.uk/Havokroft *!*@synIRC-A59BE431.zone5.bethere.co.uk/Scooby *!*@synIRC-F4095B6C.hor.ic.ac.uk/Esvandiary|The *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@synIRC-2EE699A6.aztw.cable.virginmedia.com/Loweko *!*@synIRC-26A6276.bethere.co.uk/Pretzel *!*@synIRC-57DFEB36.aztw.cable.virginmedia.com/Pretzel *!*@synIRC-A9B898DC.range86-178.btcentralplus.com/AdmiralGT *!*@E2477122.B9AF86F9.F76ABBC2.IP/helloteam *!*@synIRC-5C096D52.range86-146.btcentralplus.com/sithe *!*@synIRC-6B69DE03.phy.bris.ac.uk/helloteam *!*@synIRC-D788A49.ubu.bris.ac.uk/EtherealOne *!*@synIRC-95122DE2.maths.bris.ac.uk/Havokroft *!*@synIRC-6F4CF579.aztw.cable.virginmedia.com/IRntConan *!*@synIRC-82F4FA78.zone13.bethere.co.uk/Capuchin *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@synIRC-A59BE431.zone5.bethere.co.uk/Sccoooby *!*@synIRC-DB5D8F3.aztw.cable.virginmedia.com/jammietoo *!*@synIRC-7CC28D9E.aztw.cable.virginmedia.com/Anubhav *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@9982EE03.B9AF86F9.F76ABBC2.IP/helloteam *!*@synIRC-806A9649.phy.bris.ac.uk/Sshhh|Uni *!*@synIRC-95122DE2.maths.bris.ac.uk/Havokroft *!*@4DEA5757.B9AF86F9.F76ABBC2.IP/helloteam *!*@E646F7FB.38824BB4.556045B1.IP/Sshhh|home *!*@synIRC-A59BE431.zone5.bethere.co.uk/Scooby *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@synIRC-95122DE2.maths.bris.ac.uk/Havokroft
  205. var %wms.TEMP.7 *!*@synIRC-EAA9751F.phy.bris.ac.uk/Sshhh|Uni *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@synIRC-806FD773.zone9.bethere.co.uk/JP *!*@synIRC-3D4E1110.zem.org.uk/TP2k *!*@synIRC-A59BE431.zone5.bethere.co.uk/Sshhh|out *!*@synIRC-2EB142C.gr7.adsl.brightview.com/Desukatie *!*@synIRC-2EB142C.gr7.adsl.brightview.com/desukatie *!*@synIRC-B56163D0.maths.bris.ac.uk/Havokroft *!*@4DEA5757.B9AF86F9.F76ABBC2.IP/helloteam *!*@4DEA5757.B9AF86F9.F76ABBC2.IP/helloteam *!*@synIRC-AA4E2AAE.plusnet.ptn-ag1.dyn.plus.net/Sshhh|Home *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@synIRC-AA4E2AAE.plusnet.ptn-ag1.dyn.plus.net/Sshhh|Home *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@synIRC-AA4E2AAE.plusnet.ptn-ag1.dyn.plus.net/Sshhh|Home *!*@synIRC-AA4E2AAE.plusnet.ptn-ag1.dyn.plus.net/Sshhh|Home *!*@synIRC-26A6276.bethere.co.uk/BattlePope *!*@synIRC-26A6276.bethere.co.uk/BattlePope *!*@synIRC-478E2472.dsl.pipex.com/Tookah *!*@synIRC-7DD79B5B.croy.cable.virginmedia.com/stupidolphin *!*@synIRC-26A6276.bethere.co.uk/BattlePope *!*@synIRC-965CB138.bethere.co.uk/WiFi *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@synIRC-643132E5.phy.bris.ac.uk/Sshhh|Uni *!*@4DEA5757.B9AF86F9.F76ABBC2.IP/helloteam *!*@synIRC-57DFEB36.aztw.cable.virginmedia.com/Pretzel *!*@synIRC-1BEF1A59.zone6.bethere.co.uk/Capuchin *!*@synIRC-1BEF1A59.zone6.bethere.co.uk/Capuchin *!*@synIRC-2EE699A6.aztw.cable.virginmedia.com/Loweko *!*@synIRC-1BEF1A59.zone6.bethere.co.uk/Capuchin *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@synIRC-7DD79B5B.croy.cable.virginmedia.com/stupidolphin *!*@synIRC-5E86AFD0.phy.bris.ac.uk/Sshhh|Uni *!*@synIRC-7DD79B5B.croy.cable.virginmedia.com/stupidolphin *!*@synIRC-142949E6.rb3.adsl.brightview.com/Desukatie *!*@ECB9E90.D33A91A1.AF217246.IP/IRConan *!*@synIRC-57DFEB36.aztw.cable.virginmedia.com/PretzelOnHousemateLaptop *!*@synIRC-57DFEB36.aztw.cable.virginmedia.com/PretzelWeb
  206. var %wms.TEMP.8 *!*@synIRC-7DD79B5B.croy.cable.virginmedia.com/Stupidolphin
  207. var %wms.TEMP.9 *!*@EE60ABB5.7B6FE80C.3F13CD5B.IP/Wyrm *!*@synIRC-B3BFDB14.star.bris.ac.uk/FistOFun *!*@235CBFA6.F64FD24B.EA659B29.IP/charky *!*@synIRC-26A6276.bethere.co.uk/BattlePope *!*@synIRC-8B98ED03.cable.ubr07.aztw.blueyonder.co.uk/Loweko *!*@318D7C44.AA4DD6D2.F76ABBC2.IP/BSR *!*@EBE01352.B13C9085.948414C0.IP/charky *!*@synIRC-F286FE5F.sotn.cable.ntl.com/helloteam *!*@synIRC-5DFD14F1.star.bris.ac.uk/FistOFun *!*@synIRC-9FD74795.terminal.tdcmobil.dk/Flare *!*@synIRC-C55A1863.terminal.tdcmobil.dk/Flare *!*@synIRC-BD57D80C.terminal.tdcmobil.dk/Flare *!*@synIRC-705AB44F.gly.bris.ac.uk/mayflower *!*@synIRC-2F5733D7.terminal.tdcmobil.dk/Flare *!*@synIRC-386DEFAC.terminal.tdcmobil.dk/Flare *!*@synIRC-F2305B8.terminal.tdcmobil.dk/Flare *!*@synIRC-5064C915.terminal.tdcmobil.dk/Flare *!*@synIRC-15996E13.gly.bris.ac.uk/mayflower *!*@synIRC-B10029DA.terminal.tdcmobil.dk/Flare *!*@synIRC-CB7E7382.terminal.tdcmobil.dk/Flare *!*@synIRC-C02402F0.range86-161.btcentralplus.com/GTatHome *!*@synIRC-F286FE5F.sotn.cable.ntl.com/charky *!*@synIRC-E72D3704.range86-166.btcentralplus.com/GTatHome *!*@synIRC-524A0DED.dsl.pipex.com/Fake-Face *!*@43E919A7.B9739DD4.63637687.IP/charky *!*@5C2D4DAA.966B9AF9.3A885D3D.IP/charky *!*@synIRC-2A71911B.onyx.net/Scruffy *!*@8D1E998B.1202EF88.63637687.IP/charky *!*@700F7013.37C27BE5.59A2944A.IP/charky *!*@56877763.ADA29DF8.67028D06.IP/charky *!*@synIRC-E562B659.range86-177.btcentralplus.com/GTatHome *!*@F5AC37FA.5AB823F4.14B23BC6.IP/Socaddict *!*@synIRC-E4AB2487.lns6-c12.dsl.pol.co.uk/joshiba *!*@6AE2138E.25B9A296.556045B1.IP/Sshhh *!*@E5C7F669.F0B3776B.C4687893.IP/Mitcian *!*@synIRC-BDA55CF8.zone4.bethere.co.uk/VenusDeLiz *!*@synIRC-4C671C31.co.uk/Amy *!*@synIRC-4C671C31.co.uk/IRConan *!*@synIRC-11FC378D.cs.york.ac.uk/Octothorpe *!*@synIRC-D173EAAE.resnet.bris.ac.uk/poacheR
  208. var %wms.TEMP.10 *!*@synIRC-45A3F7DE.resnet.bris.ac.uk/timesend *!*@synIRC-EC027C77.resnet.bris.ac.uk/POEcube *!*@C35947EB.A74803AE.948414C0.IP/charky *!*@1FEF5563.AB269114.D017A69.IP/jsk *!*@synIRC-7D8E1CFF.resnet.bris.ac.uk/fatal *!*@synIRC-7017369A.maths.bris.ac.uk/Havokroft *!*@synIRC-95122DE2.maths.bris.ac.uk/Havokroft *!*@synIRC-791A707.resnet.bris.ac.uk/EtherealOne *!*@synIRC-5225E19E.cable.ubr08.aztw.blueyonder.co.uk/Pretzel *!*@647BC5A7.6EAB7639.7BCD0AF8.IP/samurite *!*@synIRC-58934566.hor.ucl.ac.uk/reddd *!*@synIRC-D3E9D921.hor.ucl.ac.uk/Antoin *!*@B5CF7F89.5946AEA9.BBE3CF9A.IP/Caroline *!*@synIRC-1A275176.pcr.bris.ac.uk/Robbo *!*@synIRC-26A6276.bethere.co.uk/Pretzel *!*@synIRC-66A72F31.cable.ubr09.aztw.blueyonder.co.uk/DrRobotnick *!*@synIRC-FF307DDC.resnet.bris.ac.uk/Vity *!*@synIRC-60A5E2CC.resnet.bris.ac.uk/J *!*@synIRC-60A5E2CC.resnet.bris.ac.uk/fallen_hero *!*@40E69D8D.339ACB8E.C0C96999.IP/BattlePope *!*@synIRC-D788A49.ubu.bris.ac.uk/McG *!*@synIRC-6D95B0B7.cable.ubr08.wolv.blueyonder.co.uk/DrRobotnick *!*@synIRC-EDC1790A.cable.ubr12.aztw.blueyonder.co.uk/Moreta *!*@synIRC-C2534FCB.maths.bris.ac.uk/Havokroft *!*@synIRC-A5EFCBDF.cable.ubr04.mort.blueyonder.co.uk/Stupidolphin *!*@3BA8306D.854AD596.92E6D8B7.IP/Shazz *!*@synIRC-939C8C4E.bethere.co.uk/BraveSirRobbo *!*@synIRC-52F8EFEC.maths.bris.ac.uk/Uni-Face *!*@synIRC-A5EFCBDF.cable.ubr04.mort.blueyonder.co.uk/stupidolhpin *!*@synIRC-632C8FB9.cable.ubr22.aztw.blueyonder.co.uk/Noodle *!*@synIRC-3A208346.range86-147.btcentralplus.com/Scooby *!*@synIRC-A807ABA7.resnet.bris.ac.uk/hOZ *!*@synIRC-C113095A.resnet.bris.ac.uk/Molubdos *!*@synIRC-EDE59596.maths.bris.ac.uk/Havokroft *!*@synIRC-C385CDB.maths.bris.ac.uk/Havokroft *!*@synIRC-68D7AB9.resnet.bris.ac.uk/EtherealsOtherOne *!*@synIRC-78EDBF6F.resnet.bris.ac.uk/Desustorm *!*@synIRC-965CB138.bethere.co.uk/WarningForever *!*@synIRC-94A94147.maths.bris.ac.uk/Uni-Face *!*@3E5E57D8.B9AF86F9.F76ABBC2.IP/Scoooby
  209. while (%i <= $var(wms.TEMP.*,0)) {
  210. %j = 1
  211. e %i
  212. while (%j <= $numtok(%wms.TEMP. [ $+ [ %i ] ] ,32)) {
  213. %both = $gettok(%wms.TEMP. [ $+ [ %i ] ] ,%j,32)
  214. %nick = $gettok(%both,2,47)
  215. %addy = $gettok(%both,1,47)
  216. wms.guestid.add %nick %addy 1
  217. e %i %j
  218. inc %j
  219. }
  220. inc %i
  221. }
  222. %i = 1
  223. while (%i <= $numtok(%wms.guestid.database,32)) {
  224. %both = $gettok(%wms.guestid.database,%i,32)
  225. %nick = $gettok(%both,2,47)
  226. %addy = $gettok(%both,1,47)
  227. wms.guestid.add %nick %addy 1
  228. inc %i
  229. }
  230. unset %wms.guestid.database
  231. if ($numtok(%wms.guestid.chanlist,32) == 0) {
  232. %wms.guestid.chanlist = #cogs:synIRC:priv:*guest*
  233. echo 04 -agt Added *guest* joining COGS to the list of hostnames to record
  234. }
  235. echo 04 -agt Upgrade complete!
  236. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!