API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Nov 27th, 2013
6
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 33.25 KB | None | 0 0
raw download clone embed print report
  1.  
  2. on *:TEXT:*:?:{
  3.   if ($1 == !coopip) {
  4.     if ($nick isop #coop-east) || ($nick ishop #coop-east) { /coopippm $2- }
  5.   }
  6.   if ($1 == !coopstart) {
  7.     if (%coopon == on) {
  8.       if ($nick isop $chan) || ($nick ishop $chan) { /coopstart2 $2- }
  9.     }
  10.   }
  11.   if ($1 == !invite) || ($1 == invite) { /coopinvite $nick }
  12. }
  13.  
  14. on *:PART:#coop-east:{
  15.   if (%coopon == on) && (%cooprun = off) { /removepart $nick }
  16.   if (%cooprun == on) { /coopinviteset $nick }
  17. }
  18.  
  19. on *:TEXT:*:#coop-east,#sixpax:{
  20.   if ($me isop #coop-east) || ($me ishop #coop-east) {
  21.     if ($1 == !lock) {  if (%cooprun == on) { mode #coop-east +v $nick } }
  22.     if ($1 == !unlock) {  if (%cooprun == on) { mode #coop-east -v $nick } }
  23.     if ($1 == !ip) {
  24.       if (%cooprun == on) && (%coopip != $null) {
  25.         if ($nick isvoice $chan) { /notice $nick 4ip is 9 %coopip 4 ....  11 No Leaking !!!!!! | mode #coop-east -v $nick  }
  26.       }
  27.     }
  28.     if ($1 == !soj) {  
  29.       if (%coopon == on) {
  30.         /addsojs $nick $2
  31.       }
  32.       if (%coopon != on) {  /msg #coop-east 11,1 There are no planned Coops right now... }
  33.  
  34.     }
  35.     if ($1 == !removeme) {  if (%coopon == on) { /removeme $nick } }
  36.     if ($1 == !fd) {  if (%coopon == on) { /addfd $nick fd } }
  37.     if ($1 == !fg) {  if (%coopon == on) { /addfd $nick fg } }
  38.     if ($1 == !sojlist) {
  39.       if (%coopon == on) {
  40.         if ($nick isop $chan) || ($nick ishop $chan) { /listsojs }
  41.       }
  42.     }
  43.     if ($1 == !total) {
  44.       if (%coopon == on) { /listsojs }
  45.       if (%coopon != on) {  /msg #coop-east 11,1 There are no planned Coops right now... }
  46.     }
  47.     if ($1 == !remove) {
  48.       if (%coopon == on) {
  49.         if ($nick isop $chan) || ($nick ishop $chan) { /removeme $2 }
  50.       }
  51.     }
  52.     if ($1 == !add) {
  53.       if (%coopon == on) {
  54.         if ($nick isop $chan) || ($nick ishop $chan) { /addsojs $2 $3 }
  55.       }
  56.     }
  57.     if ($1 == !help) {
  58.       if ($nick isop $chan) || ($nick ishop $chan) { /coopophelp | /coophelp | goto skipit }
  59.       if ($nick isreg $chan) { /coophelp | goto skipit }
  60.       if ($nick isvoice $chan) { /coophelp | goto skipit }
  61.       :skipit
  62.       if (%coopon != on) {  /msg #coop-east 11,1 There are no planned Coops right now... }
  63.       if (%coopon == on) {  /msg #coop-east 11,1 There is a planned Coop at ... 4,1 %cooptime }
  64.     }
  65.     if ($1 == !coop) {
  66.       /coophelp
  67.       if (%coopon != on) {  /msg #coop-east 11,1 There are no planned Coops right now... }
  68.       if (%coopon == on) {  /msg #coop-east 11,1 There is a planned Coops at ... 4,1 %cooptime }
  69.     }
  70.     if ($1 == !coopon) {
  71.       if ($nick isop $chan) || ($nick ishop $chan) { /coopon $2- }
  72.     }
  73.     if ($1 == !coopstart) {
  74.       if (%coopon == on) {
  75.         if ($nick isop $chan) || ($nick ishop $chan) { /coopstart2 $2- }
  76.       }
  77.     }
  78.     if ($1 == !coopoff) {
  79.       if (%coopon == on) {
  80.         if ($nick isop $chan) || ($nick ishop $chan) { /coopoff }
  81.       }
  82.     }
  83.     if ($1 == !coopkill) {
  84.       if (%coopon == on) {
  85.         if ($nick isop $chan) || ($nick ishop $chan) { /coopkill }
  86.       }
  87.     }
  88.     if ($1 == !cooprules) {
  89.       if (%coopon == on) {
  90.         if ($nick isop $chan) || ($nick ishop $chan) { /cooprules }
  91.       }
  92.     }
  93.   }
  94. }
  95.  
  96. alias /add { /addsojs $1 $2 }
  97. alias /remove { /removeme $1 }
  98. alias /sojlist { /listsojs }
  99. alias /total { /listsojs }
  100. alias /walktime { /msg #coop-east 11,1 There is a planned Coop at ... 4,1 %cooptime }
  101.  
  102. alias /coophelp {
  103.   /msg #coop-east 11,1 Coop Commands are... 4,1 !soj ## , !soj -## , !fd , !fg , !removeme
  104. }
  105.  
  106. alias /coopophelp {
  107.   /msg $nick 11,1 Coop Commands for ops are... 4,1 , !coopon , !coopstart , !coopip (in pm to bot) , !coopoff , !coopkill ,  !total , !sojlist , !add nick ## , !remove nick ## , !cooprules  
  108. }
  109.  
  110. alias /sixscript {
  111.   echo 7,1 - - 4,1 MOSTLY all /commands can be used as !commands..... Only COOP commands tho......
  112.   echo 7,1 - - 4,1 Users commands...  7,1 - - !soj ## , !fd , !fg , !removeme
  113.   echo 7,1 - - 4,1 Coop commands...  7,1 - - !remove name ## , !add name ## , !sojs , !sojlist , !coopon sojgame//pass
  114.   echo 7,1 - - 4,1 /Coopon 7,1 - -  Starts soj buyin requests etc.
  115.   echo 7,1 - - 4,1 /Coopstart 7,1 - - Starts coop , Msgs channel all NON !lock will be banned in 1 Minute. Popup for soj game.
  116.   echo 7,1 - - 4,1 /Coopip 4,1 IP# 7,1 - - Sets the IP# and Tells Channel to type !ip to get the IP#
  117.   echo 7,1 - - 4,1 /Coopoff 7,1 - - Ends coop Script. Resets all variables to off or null
  118.   echo 7,1 - - 4,1 /Cooprules 7,1 - - Tells the channel Coop rules.
  119.   echo 7,1 - - 4,1 /Rules 7,1 - - Tells the channel Item Give away rules.
  120.   echo 7,1 - - 4,1 /Cloneules 7,1 - - Tells the channel D-Clone Give away rules.
  121.   echo 7,1 - - 4,1 /Clone 4,1 game//pass 7,1 - - Gives away that game//pass using random quote game. (Only NON +V can play this one!!!)
  122.   echo 7,1 - - 4,1 /Vclone 4,1 game//pass 7,1 - - Gives away that game//pass using random quote game. (ANYONE can play this one!!!)
  123.   echo 7,1 - - 4,1 /Givegame 4,1 game//pass 7,1 - - Sets the game//pass of mule game for giving away ITEMS.
  124.   echo 7,1 - - 4,1 /Give 4,1 Item Description Goes Here 7,1 - - Gives away that Item using random quote game. (ANYONE can play this one!!!)
  125.   echo 7,1 - - 4,1 /Stopclone 7,1 - - Stops the current clone giveaway AND ALSO 4,1 RESETS 7,1 the winners list...
  126.   echo 7,1 - - 4,1 /Stopgive 7,1 - - Stops the current Item giveaway AND ALSO 4,1 RESETS 7,1 the winners list...
  127.   echo 7,1 - - 4,1 /Ignoreadd , /ignorelist , /Ignoredel 7,1 - - Adds , Lists , or Deletes users from the IGNORE list on the Giveaways.
  128.   echo 7,1 - - 4,1 /Resetwinner 7,1 - - Resets ALL winner lists !!!!! 4,1 Leaves the current game running!!!!!
  129. }
  130. alias /addsojs {
  131.   if ($2 <= 0) { goto negativenum }
  132.   if ($2 !isnum) || ($2 > 100) { /msg #coop-east 11,1 Ummm thats not a Valid number...  Please enter Sojs correctly | goto end }
  133.   set %coopnick $1
  134.   set %coopchek $gettok($readini(cooplog.ini,sojs,%coopnick),1,32)
  135.   if (%coopchek == fg) || (%coopchek == fd) { /msg #coop-east 11,1 You have already bought in.. if you wish to change your buyin please do 4,1 !Removeme 11,1 first !!!! | goto end }
  136.   if (%coopchek != $null) { %coopsojs = %coopchek + $2 | writeini cooplog.ini sojs %coopnick %coopsojs | set %coopsoj $2 }
  137.   if (%coopchek == $null) { set %coopsoj $2 | writeini cooplog.ini sojs %coopnick %coopsoj }
  138.   if (%cooptotal != $null) { set %cooptemp %cooptotal | %cooptotal = %cooptemp + %coopsoj }
  139.   if (%cooptotal == $null) { set %cooptotal $2 }
  140.   set %coopchek $gettok($readini(cooplog.ini,sojs,%coopnick),1,32)
  141.   /msg #coop-east 11,1 Added 4,1 %coopnick 11,1 with 4,1 %coopsoj 11,1 Sojs ... for a total of 4,1 %coopchek
  142.   /totaladd %coopnick
  143.   mode #coop-east +v %coopnick
  144.   /msg #coop-east 11,1 Total soj count is now up to 4,1 %cooptotal 11,1 Sojs
  145.   goto end
  146.   :negativenum
  147.   set %coopnick $1
  148.   set %coopchek $gettok($readini(cooplog.ini,sojs,%coopnick),1,32)
  149.   if (%coopchek == fg) || (%coopchek == fd) { /msg #coop-east 11,1 You have already bought in.. if you wish to change your buyin please do 4,1 !Removeme 11,1 first !!!! | goto end }
  150.   if (%coopchek == $null) { /msg #coop-east 11,1 Ummm thats not a Valid entry...  Please enter Sojs correctly ... | goto end }
  151.   if (%coopchek != $null) {
  152.     %coopsoj = %coopchek + $2
  153.     if (%coopsoj <= 0) { set %coopsoj %coopchek | mode #coop-east -v %coopnick | remini cooplog.ini sojs %coopnick | /totalrem %coopnick | /msg #coop-east 11,1 Removed 4,1 %coopnick 11,1 with 4,1 %coopsoj 11,1 Sojs | goto skip }
  154.     if (%coopsoj >= 1) { writeini cooplog.ini sojs %coopnick %coopsoj | /msg #coop-east 4,1 %coopnick 11,1 is now at 4,1 %coopsoj 11,1 Sojs }
  155.     if (%cooptotal != $null) { set %cooptemp %cooptotal | %cooptotal = %cooptemp + $2 }
  156.     /msg #coop-east 11,1 Total soj count is now up to 4,1 %cooptotal 11,1 Sojs
  157.     goto endd
  158.     :skip
  159.     if (%cooptotal != $null) { set %cooptemp %cooptotal | %cooptotal = %cooptemp - %coopsoj }
  160.     if (%cooptotal == $null) { set %cooptotal $null }
  161.     /msg #coop-east 11,1 Total soj count is now up to 4,1 %cooptotal 11,1 Sojs
  162.     :endd
  163.   }
  164.   :end
  165. }
  166. alias /addfd {
  167.   set %coopnick $1
  168.   set %coopsoj $2
  169.   set %coopchek $gettok($readini(cooplog.ini,sojs,%coopnick),1,32)
  170.   if (%coopchek != $null) { /msg #coop-east 11,1 You have already bought in.. if you wish to change your buyin please do 4,1 !Removeme 11,1 first !!!! | goto end }
  171.   writeini cooplog.ini sojs %coopnick %coopsoj
  172.   /totaladd %coopnick
  173.   /msg #coop-east 11,1 Added 4,1 %coopnick 11,1 with 4,1 %coopsoj 11,1 Buyin
  174.   mode #coop-east +v %coopnick
  175.   /msg #coop-east 11,1 Total soj count is Still 4,1 %cooptotal 11,1 Sojs
  176.   :end
  177. }
  178. alias /remsojs {
  179.   if ($2 <= 0) { /msg #coop-east 11,1 Dont use negative numbers plz... use !removeme to remove yourself from Coop | goto end }
  180.   if ($2 !isnum) || ($2 > 100) { /msg #coop-east 11,1 Ummm thats not a Valid number.rem..  Please enter Sojs correctly | goto end }
  181.   set %coopnick $1
  182.   set %coopchek $gettok($readini(cooplog.ini,sojs,%coopnick),1,32)
  183.   if (%coopchek == fg) || (%coopchek == fd) { goto nonsoj }
  184.   if (%coopchek != $null) {
  185.     %coopsoj = %coopchek - $2
  186.     if (%coopsoj <= 0) { set %coopsoj %coopchek | mode #coop-east -v %coopnick | /totalrem %coopnick | remini cooplog.ini sojs %coopnick | /msg #coop-east 11,1 Removed 4,1 %coopnick 11,1 with 4,1 %coopsoj 11,1 Sojs | goto skip }
  187.     if (%coopsoj >= 1) { writeini cooplog.ini sojs %coopnick %coopsoj | /msg #coop-east 4,1 %coopnick 11,1 is now at 4,1 %coopsoj 11,1 Sojs | goto nonneg }
  188.   }
  189.   :skip
  190.   if (%coopchek == $null) { /msg #coop-east 4,1 %coopnick 11,1 Was not in my list for Sojs | goto end }
  191.   if (%cooptotal != $null) { set %cooptemp %cooptotal | %cooptotal = %cooptemp - %coopsoj }
  192.   if (%cooptotal == $null) { set %cooptotal $null }
  193.   /msg #coop-east 11,1 Total soj count is now up to 4,1 %cooptotal 11,1 Sojs
  194.   goto end
  195.   :nonneg
  196.   if (%cooptotal != $null) { set %cooptemp %cooptotal | %cooptotal = %cooptemp - $2 }
  197.  
  198.   /msg #coop-east 11,1 Total soj count is now up to 4,1 %cooptotal 11,1 Sojs
  199.   goto end
  200.   :nonsoj
  201.   remini cooplog.ini sojs %coopnick
  202.   /msg #coop-east 11,1 Removed 4,1 %coopnick 11,1 with 4,1 %coopchek 11,1 Buyin
  203.   /totalrem %coopnick
  204.   mode #coop-east -v %coopnick
  205.   /msg #coop-east 11,1 Total soj count is Still 4,1 %cooptotal 11,1 Sojs
  206.   :end
  207. }
  208.  
  209. alias /removeme {
  210.   set %coopnick $1
  211.   set %coopchek $gettok($readini(cooplog.ini,sojs,%coopnick),1,32)
  212.   if (%coopchek == fg) || (%coopchek == fd) { goto nonsoj }
  213.   if (%coopchek != $null) {
  214.     if (%cooptotal != $null) {
  215.       set %cooptemp %cooptotal
  216.       %cooptotal = %cooptemp - %coopchek
  217.       mode #coop-east -v %coopnick
  218.       /totalrem %coopnick
  219.       remini cooplog.ini sojs %coopnick
  220.       /msg #coop-east 11,1 Removed 4,1 %coopnick 11,1 with 4,1 %coopchek 11,1 Sojs
  221.       /msg #coop-east 11,1 Total soj count is now up to 4,1 %cooptotal 11,1 Sojs
  222.       goto end
  223.     }
  224.     :nonsoj
  225.     remini cooplog.ini sojs %coopnick
  226.     /msg #coop-east 11,1 Removed 4,1 %coopnick 11,1 with 4,1 %coopchek 11,1 Buyin
  227.     mode #coop-east -v %coopnick
  228.     /totalrem %coopnick
  229.     /msg #coop-east 11,1 Total soj count is Still 4,1 %cooptotal 11,1 Sojs
  230.     :end
  231.   }
  232. }
  233.  
  234. alias /removepart {
  235.   set %coopnick $1
  236.   set %coopchek $gettok($readini(cooplog.ini,sojs,%coopnick),1,32)
  237.   if (%coopchek == fg) || (%coopchek == fd) { goto nonsoj }
  238.   if (%coopchek != $null) {
  239.     if (%cooptotal != $null) {
  240.       set %cooptemp %cooptotal
  241.       %cooptotal = %cooptemp - %coopchek
  242.       remini cooplog.ini sojs %coopnick
  243.       /msg #coop-east 11,1 Removed 4,1 %coopnick 11,1 with 4,1 %coopchek 11,1 Sojs ..... 7,1 User left the channel ....
  244.       /totalrem %coopnick
  245.       /msg #coop-east 11,1 Total soj count is now up to 4,1 %cooptotal 11,1 Sojs
  246.       goto end
  247.     }
  248.     :nonsoj
  249.     remini cooplog.ini sojs %coopnick
  250.     /msg #coop-east 11,1 Removed 4,1 %coopnick 11,1 with 4,1 %coopchek 11,1 Buyin ..... 7,1 User left the channel ....
  251.     /totalrem %coopnick
  252.     /msg #coop-east 11,1 Total soj count is Still 4,1 %cooptotal 11,1 Sojs
  253.     :end
  254.   }
  255. }
  256.  
  257. alias coopinviteset {
  258.   set %invnik $1
  259.   if (%coopinv1 == $null) { set %coopinv1 %invnik | goto end }
  260.   if (%coopinv2 == $null) { set %coopinv2 %invnik | goto end }
  261.   if (%coopinv3 == $null) { set %coopinv3 %invnik | goto end }
  262.   if (%coopinv3 == $null) { set %coopinv3 %invnik | goto end }
  263.   :end
  264. }
  265.  
  266. alias /coopinvite {
  267.   set %invnik $1
  268.   if (%invnik == %coopinv1) { /invite %invnik #coop-east | set %coopinv1 $null | goto end }
  269.   if (%invnik == %coopinv2) { /invite %invnik #coop-east | set %coopinv2 $null | goto end }
  270.   if (%invnik == %coopinv3) { /invite %invnik #coop-east | set %coopinv3 $null | goto end }
  271.   if (%invnik == %coopinv4) { /invite %invnik #coop-east | set %coopinv4 $null | goto end }
  272.   /msg $nick sorry, you are not on the coop list
  273.   :end
  274. }
  275.  
  276.  
  277. alias /listsojs {
  278.   /msg #coop-east 11,1 Total sojs so far.... 4,1 %cooptotal
  279.   if (%coopnam1 != $null) {
  280.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam1),1,32)
  281.     if (%numsojs > 0) {
  282.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam1 4,1 %numsojs 11,1 Buyin | goto skipend1 }
  283.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam1 4,1 %numsojs 11,1 Buyin | goto skipend1 }
  284.       /msg #coop-east 11,1 %coopnam1 4,1 %numsojs 11,1 Sojs
  285.       :skipend1
  286.     }
  287.   }
  288.   if (%coopnam2 != $null) {
  289.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam2),1,32)
  290.     if (%numsojs > 0) {
  291.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam2 4,1 %numsojs 11,1 Buyin | goto skipend2 }
  292.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam2 4,1 %numsojs 11,1 Buyin | goto skipend2 }
  293.       /msg #coop-east 11,1 %coopnam2 4,1 %numsojs 11,1 Sojs
  294.       :skipend2
  295.     }
  296.   }
  297.   if (%coopnam3 != $null) {
  298.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam3),1,32)
  299.     if (%numsojs > 0) {
  300.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam3 4,1 %numsojs 11,1 Buyin | goto skipend3 }
  301.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam3 4,1 %numsojs 11,1 Buyin | goto skipend3 }
  302.       /msg #coop-east 11,1 %coopnam3 4,1 %numsojs 11,1 Sojs
  303.       :skipend3
  304.     }
  305.   }
  306.   if (%coopnam4 != $null) {
  307.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam4),1,32)
  308.     if (%numsojs > 0) {
  309.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam4 4,1 %numsojs 11,1 Buyin | goto skipend4 }
  310.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam4 4,1 %numsojs 11,1 Buyin | goto skipend4 }
  311.       /msg #coop-east 11,1 %coopnam4 4,1 %numsojs 11,1 Sojs
  312.       :skipend4
  313.     }
  314.   }
  315.   if (%coopnam5 != $null) {
  316.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam5),1,32)
  317.     if (%numsojs > 0) {
  318.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam5 4,1 %numsojs 11,1 Buyin | goto skipend5 }
  319.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam5 4,1 %numsojs 11,1 Buyin | goto skipend5 }
  320.       /msg #coop-east 11,1 %coopnam5 4,1 %numsojs 11,1 Sojs
  321.       :skipend5
  322.     }
  323.   }
  324.   if (%coopnam6 != $null) {
  325.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam6),1,32)
  326.     if (%numsojs > 0) {
  327.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam6 4,1 %numsojs 11,1 Buyin | goto skipend6 }
  328.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam6 4,1 %numsojs 11,1 Buyin | goto skipend6 }
  329.       /msg #coop-east 11,1 %coopnam6 4,1 %numsojs 11,1 Sojs
  330.       :skipend6
  331.     }
  332.   }
  333.   if (%coopnam7 != $null) {
  334.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam7),1,32)
  335.     if (%numsojs > 0) {
  336.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam7 4,1 %numsojs 11,1 Buyin | goto skipend7 }
  337.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam7 4,1 %numsojs 11,1 Buyin | goto skipend7 }
  338.       /msg #coop-east 11,1 %coopnam7 4,1 %numsojs 11,1 Sojs
  339.       :skipend7
  340.     }
  341.   }
  342.   if (%coopnam8 != $null) {
  343.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam8),1,32)
  344.     if (%numsojs > 0) {
  345.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam8 4,1 %numsojs 11,1 Buyin | goto skipend8 }
  346.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam8 4,1 %numsojs 11,1 Buyin | goto skipend8 }
  347.       /msg #coop-east 11,1 %coopnam8 4,1 %numsojs 11,1 Sojs
  348.       :skipend8
  349.     }
  350.   }
  351.   if (%coopnam9 != $null) {
  352.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam9),1,32)
  353.     if (%numsojs > 0) {
  354.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam9 4,1 %numsojs 11,1 Buyin | goto skipend9 }
  355.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam9 4,1 %numsojs 11,1 Buyin | goto skipend9 }
  356.       /msg #coop-east 11,1 %coopnam9 4,1 %numsojs 11,1 Sojs
  357.       :skipend9
  358.     }
  359.   }
  360.   if (%coopnam10 != $null) {
  361.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam10),1,32)
  362.     if (%numsojs > 0) {
  363.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam10 4,1 %numsojs 11,1 Buyin | goto skipend10 }
  364.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam10 4,1 %numsojs 11,1 Buyin | goto skipend10 }
  365.       /msg #coop-east 11,1 %coopnam10 4,1 %numsojs 11,1 Sojs
  366.       :skipend10
  367.     }
  368.   }
  369.   if (%coopnam11 != $null) {
  370.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam11),1,32)
  371.     if (%numsojs > 0) {
  372.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam11 4,1 %numsojs 11,1 Buyin | goto skipend11 }
  373.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam11 4,1 %numsojs 11,1 Buyin | goto skipend11 }
  374.       /msg #coop-east 11,1 %coopnam11 4,1 %numsojs 11,1 Sojs
  375.       :skipend11
  376.     }
  377.   }
  378.   if (%coopnam12 != $null) {
  379.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam12),1,32)
  380.     if (%numsojs > 0) {
  381.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam12 4,1 %numsojs 11,1 Buyin | goto skipend12 }
  382.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam12 4,1 %numsojs 11,1 Buyin | goto skipend12 }
  383.       /msg #coop-east 11,1 %coopnam12 4,1 %numsojs 11,1 Sojs
  384.       :skipend12
  385.     }
  386.   }
  387.   if (%coopnam13 != $null) {
  388.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam13),1,32)
  389.     if (%numsojs > 0) {
  390.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam13 4,1 %numsojs 11,1 Buyin | goto skipend13 }
  391.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam13 4,1 %numsojs 11,1 Buyin | goto skipend13 }
  392.       /msg #coop-east 11,1 %coopnam13 4,1 %numsojs 11,1 Sojs
  393.       :skipend13
  394.     }
  395.   }
  396.   if (%coopnam14 != $null) {
  397.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam14),1,32)
  398.     if (%numsojs > 0) {
  399.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam14 4,1 %numsojs 11,1 Buyin | goto skipend14 }
  400.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam14 4,1 %numsojs 11,1 Buyin | goto skipend14 }
  401.       /msg #coop-east 11,1 %coopnam14 4,1 %numsojs 11,1 Sojs
  402.       :skipend14
  403.     }
  404.   }
  405.   if (%coopnam15 != $null) {
  406.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam15),1,32)
  407.     if (%numsojs > 0) {
  408.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam15 4,1 %numsojs 11,1 Buyin | goto skipend15 }
  409.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam15 4,1 %numsojs 11,1 Buyin | goto skipend15 }
  410.       /msg #coop-east 11,1 %coopnam15 4,1 %numsojs 11,1 Sojs
  411.       :skipend15
  412.     }
  413.   }
  414.   if (%coopnam16 != $null) {
  415.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam16),1,32)
  416.     if (%numsojs > 0) {
  417.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam16 4,1 %numsojs 11,1 Buyin | goto skipend16 }
  418.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam16 4,1 %numsojs 11,1 Buyin | goto skipend16 }
  419.       /msg #coop-east 11,1 %coopnam16 4,1 %numsojs 11,1 Sojs
  420.       :skipend16
  421.     }
  422.   }
  423.   if (%coopnam17 != $null) {
  424.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam17),1,32)
  425.     if (%numsojs > 0) {
  426.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam17 4,1 %numsojs 11,1 Buyin | goto skipend17 }
  427.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam17 4,1 %numsojs 11,1 Buyin | goto skipend17 }
  428.       /msg #coop-east 11,1 %coopnam17 4,1 %numsojs 11,1 Sojs
  429.       :skipend17
  430.     }
  431.   }
  432.   if (%coopnam18 != $null) {
  433.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam18),1,32)
  434.     if (%numsojs > 0) {
  435.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam18 4,1 %numsojs 11,1 Buyin | goto skipend18 }
  436.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam18 4,1 %numsojs 11,1 Buyin | goto skipend18 }
  437.       /msg #coop-east 11,1 %coopnam18 4,1 %numsojs 11,1 Sojs
  438.       :skipend18
  439.     }
  440.   }
  441.   if (%coopnam19 != $null) {
  442.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam19),1,32)
  443.     if (%numsojs > 0) {
  444.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam19 4,1 %numsojs 11,1 Buyin | goto skipend19 }
  445.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam19 4,1 %numsojs 11,1 Buyin | goto skipend19 }
  446.       /msg #coop-east 11,1 %coopnam19 4,1 %numsojs 11,1 Sojs
  447.       :skipend19
  448.     }
  449.   }
  450.   if (%coopnam20 != $null) {
  451.     set %numsojs $gettok($readini(cooplog.ini,sojs,%coopnam20),1,32)
  452.     if (%numsojs > 0) {
  453.       if (%numsojs == fd) { /msg #coop-east 11,1 %coopnam20 4,1 %numsojs 11,1 Buyin | goto skipend20 }
  454.       if (%numsojs == fg) { /msg #coop-east 11,1 %coopnam20 4,1 %numsojs 11,1 Buyin | goto skipend20 }
  455.       /msg #coop-east 11,1 %coopnam20 4,1 %numsojs 11,1 Sojs
  456.       :skipend20
  457.     }
  458.   }
  459. }
  460.  
  461.  
  462.  
  463. alias /listsoz {
  464.   /msg #coop-east 11,1 Total sojs so far.... 4,1 %cooptotal
  465.   set %devnum $nick(#coop-east,0,a)
  466.   var %x = 1
  467.   :nextt
  468.   set %sernick $nick(#coop-east,%x,a)
  469.   set %numsojs $gettok($readini(cooplog.ini,sojs,%sernick),1,32)
  470.   if (%numsojs > 0) {
  471.     if (%numsojs == fd) { /msg #coop-east 11,1 %sernick 4,1 %numsojs 11,1 Buyin | goto skipend }
  472.     if (%numsojs == fg) { /msg #coop-east 11,1 %sernick 4,1 %numsojs 11,1 Buyin | goto skipend }
  473.     /msg #coop-east 11,1 %sernick 4,1 %numsojs 11,1 Sojs
  474.     :skipend
  475.   }
  476.   inc %x
  477.   if (%x <= %devnum) goto nextt
  478. }
  479.  
  480. alias /coopon {
  481.   set %coopon on
  482.   set %cooptime $1-
  483.   echo 7,1 - - Coop Script has been started
  484.   /msg #coop-east 11,1 Type 4,1 !soj ## , !fd , !fg 11,1 to buy into the Coop
  485.   /msg #coop-east 11,1 There is a planned Coop at ... 4,1 %cooptime
  486. }
  487.  
  488. alias /coopstart {
  489.   set %cooprun on
  490.   echo 7,1 - - Coop is now  4,1 ON
  491.   set %sojgame $$?="SOJ game//pass:"
  492.   /msg #coop-east 11,1 Coop starting  in 1 minute !!!!  Buy-in NOW or get banned...
  493.   /msg #coop-east 11,1 Type 4,1 !soj ## , !fd , !fg 11,1 to buy into the Coop
  494.   .timerrules 1 10 /cooprules
  495.   .timerbancoop 1 60 /autoban
  496.   .timerdevo 1 65 /autodevoice
  497.   .timersojg 1 70  /msg #coop-east 11,1 SOJ Pay game is...  4,1 %sojgame 11,1 Time to pay up!!!!!
  498. }
  499.  
  500. alias /coopstart2 {
  501.   set %cooprun on
  502.   set %sojgame $1-
  503.   /msg #coop-east 11,1 Coop starting  in 1 minute !!!!  Buy-in NOW or get banned...
  504.   /msg #coop-east 11,1 Type 4,1 !soj ## , !fd , !fg 11,1 to buy into the Coop
  505.   .timerrules 1 10 /cooprules
  506.   .timerbancoop 1 60 /autoban
  507.   .timerdevo 1 65 /autodevoice
  508.   .timersojg 1 70  /msg #coop-east 11,1 SOJ Pay game is...  4,1 %sojgame 11,1 Time to pay up!!!!!
  509. }
  510.  
  511. alias /coopip {
  512.   if (%cooprun == on) {
  513.     set %coopip $1-
  514.     /msg #coop-east 11,1 Type 4,1 !ip 11,1 To receive tonights IP#  
  515.   }
  516.   if (%cooprun == off) {
  517.     echo 7,1 - - Coop is NOT  4,1 ON
  518.   }
  519. }
  520.  
  521. alias /coopippm {
  522.   if (%cooprun == on) {
  523.     set %coopip $1-
  524.     /msg #coop-east 11,1 Type 4,1 !ip 11,1 To receive tonights IP#  
  525.   }
  526.   if (%cooprun == off) {
  527.     /msg $nick Coop is NOT  4,1 ON
  528.   }
  529. }
  530.  
  531. alias /coopoff {
  532.   /notice #coop-east 11,1 Diablo has Walked the Earth ...  4,1 on %coopip 11,1
  533.   /msg #coop-east 11,1 Diablo has Walked the Earth ...  4,1 on %coopip 11,1
  534.   /msg #coop-east 7,1 Thanks for Taking part in our Walk Today !!!!!
  535.   /autodevoice
  536.   mode #coop-east -i
  537.   set %coopip $null
  538.   set %cooprun off
  539.   set %coopon off
  540.   set %cooptotal $null
  541.   set %cooptemp $null
  542.   set %coopsoj $null
  543.   set %coopchek $null
  544.   set %coopinv1 $null
  545.   set %coopinv2 $null
  546.   set %coopinv3 $null
  547.   set %coopinv4 $null
  548.   set %cooptnik $null
  549.   set %coopnamt $null
  550.   set %cnt $null
  551.   set %invnik $null
  552.   /clearcoop
  553.   /remini cooplog.ini sojs
  554.   echo 7,1 - - Coop is now  4,1 OFF
  555. }
  556.  
  557. alias /coopkill {
  558.   set %coopip $null
  559.   set %cooprun off
  560.   set %coopon off
  561.   set %cooptotal $null
  562.   set %cooptemp $null
  563.   set %coopsoj $null
  564.   set %coopchek $null
  565.   set %coopinv1 $null
  566.   set %coopinv2 $null
  567.   set %coopinv3 $null
  568.   set %coopinv4 $null
  569.   set %cooptnik $null
  570.   set %coopnamt $null
  571.   set %cnt $null
  572.   set %invnik $null
  573.   /clearcoop
  574.   /remini cooplog.ini sojs
  575.   echo 7,1 - - Coop is now  4,1 OFF
  576.   /msg #coop-east 7,1 - - Coop is now  4,1 OFF  
  577.   /autodevoice
  578. }
  579.  
  580. alias /clearcoop {
  581.   var %x = 1
  582.   :nextt
  583.   set %coopnam $+ %x $null
  584.   inc %x
  585.   if (%x <= 20) goto nextt
  586. }
  587.  
  588. alias /totalrem {
  589.   set %cnt $1
  590.   if (%coopnam1 == %cnt) { set %coopnam1 $null | goto end }
  591.   if (%coopnam2 == %cnt) { set %coopnam2 $null | goto end }
  592.   if (%coopnam3 == %cnt) { set %coopnam3 $null | goto end }
  593.   if (%coopnam4 == %cnt) { set %coopnam4 $null | goto end }
  594.   if (%coopnam5 == %cnt) { set %coopnam5 $null | goto end }
  595.   if (%coopnam6 == %cnt) { set %coopnam6 $null | goto end }
  596.   if (%coopnam7 == %cnt) { set %coopnam7 $null | goto end }
  597.   if (%coopnam8 == %cnt) { set %coopnam8 $null | goto end }
  598.   if (%coopnam9 == %cnt) { set %coopnam9 $null | goto end }
  599.   if (%coopnam10 == %cnt) { set %coopnam10 $null | goto end }
  600.   if (%coopnam11 == %cnt) { set %coopnam11 $null | goto end }
  601.   if (%coopnam12 == %cnt) { set %coopnam12 $null | goto end }
  602.   if (%coopnam13 == %cnt) { set %coopnam13 $null | goto end }
  603.   if (%coopnam14 == %cnt) { set %coopnam14 $null | goto end }
  604.   if (%coopnam15 == %cnt) { set %coopnam15 $null | goto end }
  605.   if (%coopnam16 == %cnt) { set %coopnam16 $null | goto end }
  606.   if (%coopnam17 == %cnt) { set %coopnam17 $null | goto end }
  607.   if (%coopnam18 == %cnt) { set %coopnam18 $null | goto end }
  608.   if (%coopnam19 == %cnt) { set %coopnam19 $null | goto end }
  609.   if (%coopnam20 == %cnt) { set %coopnam20 $null | goto end }
  610.   :end
  611. }
  612.  
  613. alias /totaladd {
  614.   set %cnt $1
  615.   if (%coopnam1 == %cnt) || (%coopnam2 == %cnt) || (%coopnam3 == %cnt) || (%coopnam4 == %cnt) || (%coopnam5 == %cnt) || (%coopnam6 == %cnt) || (%coopnam7 == %cnt) || (%coopnam8 == %cnt) || (%coopnam9 == %cnt) || (%coopnam10 == %cnt) || (%coopnam11 == %cnt) || (%coopnam12 == %cnt) || (%coopnam13 == %cnt) || (%coopnam14 == %cnt) || (%coopnam15 == %cnt) || (%coopnam16 == %cnt) || (%coopnam17 == %cnt) || (%coopnam18 == %cnt) || (%coopnam19 == %cnt) || (%coopnam20 == %cnt) { goto end }
  616.   if (%coopnam1 == $null) { set %coopnam1 %cnt | goto end }
  617.   if (%coopnam2 == $null) { set %coopnam2 %cnt | goto end }
  618.   if (%coopnam3 == $null) { set %coopnam3 %cnt | goto end }
  619.   if (%coopnam4 == $null) { set %coopnam4 %cnt | goto end }
  620.   if (%coopnam5 == $null) { set %coopnam5 %cnt | goto end }
  621.   if (%coopnam6 == $null) { set %coopnam6 %cnt | goto end }
  622.   if (%coopnam7 == $null) { set %coopnam7 %cnt | goto end }
  623.   if (%coopnam8 == $null) { set %coopnam8 %cnt | goto end }
  624.   if (%coopnam9 == $null) { set %coopnam9 %cnt | goto end }
  625.   if (%coopnam10 == $null) { set %coopnam10 %cnt | goto end }
  626.   if (%coopnam11 == $null) { set %coopnam11 %cnt | goto end }
  627.   if (%coopnam12 == $null) { set %coopnam12 %cnt | goto end }
  628.   if (%coopnam13 == $null) { set %coopnam13 %cnt | goto end }
  629.   if (%coopnam14 == $null) { set %coopnam14 %cnt | goto end }
  630.   if (%coopnam15 == $null) { set %coopnam15 %cnt | goto end }
  631.   if (%coopnam16 == $null) { set %coopnam16 %cnt | goto end }
  632.   if (%coopnam17 == $null) { set %coopnam17 %cnt | goto end }
  633.   if (%coopnam18 == $null) { set %coopnam18 %cnt | goto end }
  634.   if (%coopnam19 == $null) { set %coopnam19 %cnt | goto end }
  635.   if (%coopnam20 == $null) { set %coopnam20 %cnt | goto end }
  636.   :end
  637. }
  638.  
  639. alias /autodevoice {
  640.   set %devnum $nick(#coop-east,0,v)
  641.   var %x = 1
  642.   :nextt
  643.   mode #coop-east -v $nick(#coop-east,%x,v)
  644.   inc %x
  645.   if (%x <= %devnum) goto nextt
  646. }
  647.  
  648. alias /autoban {
  649.   mode #coop-east +i
  650.   set %bannum $nick(#coop-east,0,r)
  651.   var %x = 1
  652.   :nextt
  653.   kick #coop-east $nick(#coop-east,%x,r) Gotta !lock if you Wanna Rock !!!!
  654.   inc %x
  655.   if (%x < %bannum) goto nextt
  656. }
  657.  
  658. alias /cooprules {
  659.   /msg #coop-east 9,1 Llisten up!! Use 7,1 !soj ## , !soj -## , !fg , !fd 9,1 If you plan to be in the Coop//Match Walk.
  660.   /msg #coop-east 9,1 Buyin is Normally 10 sojs unless you are hunting over 10 keys.  FG//FD May be taken depending on Host.
  661.   /msg #coop-east 9,1 Once the hunt starts type !lock when you find a game on the IP being hunted.
  662.   /msg #coop-east 9,1 All decisions by the 4,1 HOST 9,1 are final!!!!
  663.   /msg #coop-east 11 NEVER 9,1 Leak the IP, do not REPEAT the IP anywhere !!!!!!  
  664. }
  665.  
  666.  
  667.  
  668.  
  669. on +1:TEXT:*:#:{
  670.   if (%giveaway == on) {
  671.     set %giveguess $1-
  672.     if (%giveguess == %givephrase) {
  673.       set %givewin $nick
  674.       set %giveaway off
  675.       /msg # 9,1 %givewin 4,1 ,  was the FIRST to type " 7,1 %givephrase 4,1 " ...  Check your PM !!!!!
  676.       ;;      /mode #east-uber-trist -v %givewin
  677.       /msg %givewin 4,1 Please join 9,1 %givegame 4,1 ASAP for your item......
  678.       set %nickt $nick $+ !*@*
  679.       /auser 2 %nickt
  680.     }
  681.   }
  682.   if (%cloneaway == on) {
  683.     set %cloneguess $1-
  684.     if (%cloneguess == %clonephrase) {
  685.       if ($nick isreg $chan) {
  686.         set %clonewin $nick
  687.         set %cloneaway off
  688.         /msg # 9,1 %clonewin 4,1 ,  was the FIRST to type " 7,1 %clonephrase 4,1 " ...   Check your PM NOW !!!!!
  689.         /msg %clonewin 4,1 Please join 9,1 %clonegame 4,1 ASAP !!!!!!
  690.         set %nickt $nick $+ !*@*
  691.         /auser 2 %nickt
  692.       }
  693.     }
  694.   }
  695.   if (%vcloneaway == on) {
  696.     set %vcloneguess $1-
  697.     if (%vcloneguess == %vclonephrase) {
  698.       set %vclonewin $nick
  699.       set %vcloneaway off
  700.       /msg # 9,1 %vclonewin 4,1 ,  was the FIRST to type " 7,1 %vclonephrase 4,1 " ...   Check your PM NOW !!!!!
  701.       /msg %vclonewin 4,1 Please join 9,1 %vclonegame 4,1 ASAP !!!!!!
  702.       set %nickt $nick $+ !*@*
  703.       /auser 2 %nickt
  704.     }
  705.   }
  706. }
  707.  
  708. alias /rules {
  709.   /msg # 9,1 Llisten up!! 7,1 If you win, please join, get your item and leave ASAP.. 4,1 Once you win, you will be ignored by bot until I reset the list !!
  710.   /msg # 9,1 In other words.. ONLY play if you WANT the item... 11Copy // Pasting will get you Ignored from the game for good !!!!  
  711. }
  712.  
  713. alias /clonerules {
  714.   /msg # 9,1 Llisten up !!! 7,1 Do Not play if you are REALM DOWN !! 4,1 Once you win, you will be ignored by bot until I reset the list !!
  715.   /msg # 9,1 In other words... ONLY play if you can join the game ... 11Copy // Pasting will get you Ignored from the game for good !!!  14B15y 4: 8S9i10X11P12a13X 
  716. }
  717.  
  718. alias /clone {
  719.   set %cloneaway on
  720.   set %clonephrase $read givephrase.txt
  721.   set %clonegame $1-
  722.   /msg # 4,1 Is giving away a 7,1 FREE 4,1 SCL game ....  First person to type 9,1 %clonephrase 4,1 gets it !!!!!  (CaPs DonT MaTTeR) .. 14B15y 4: 8S9i10X11P12a13X 
  723. }
  724.  
  725. alias /vclone {
  726.   set %vcloneaway on
  727.   set %vclonephrase $read givephrase.txt
  728.   set %vclonegame $1-
  729.   /msg # 4,1 Is giving away a 7,1 FREE 4,1 SCL game ....  First person to type 9,1 %vclonephrase 4,1 gets it !!!!!  (CaPs DonT MaTTeR) .. 14B15y 4: 8S9i10X11P12a13X 
  730. }
  731.  
  732. alias /give {
  733.   if (%givegame = $null) { echo 7,1 - - Please set you give away game first by using the 4,1 /givegame game//pass 7,1 comand 14B15y 4: 8S9i10X11P12a13X  | goto ended }
  734.   set %giveaway on
  735.   set %givephrase $read givephrase.txt
  736.   set %giveitem $1-
  737.   /msg # 4,1 Is giving away 7,1 %giveitem 4,1 SCL .. First person to type 9,1 %givephrase 4,1 gets it !!!!!  (CaPs DonT MaTTeR) .. 14B15y 4: 8S9i10X11P12a13X 
  738.   :ended
  739. }
  740.  
  741. alias /givegame {
  742.   set %givegame $1-
  743.   echo 7,1 - - givegame set to 4,1 %givegame 14B15y 4: 8S9i10X11P12a13X 
  744. }
  745.  
  746. alias /ignoreadd {
  747.   set %ignick $1 $+ !*@*
  748.   /auser 5 %ignick
  749.   echo 7,1 - - Ignore turned ON for user :: 4,1 %ignick :: 7,1 level 5 14B15y 4: 8S9i10X11P12a13X 
  750. }
  751. alias /ignorelist {
  752.   /ulist 5
  753. }
  754. alias /ignoredel {
  755.   set %ignick $1 $+ !*@*
  756.   /ruser 5 %ignick
  757.   echo 7,1 - - Ignore turned OFF for user :: 4,1 %ignick :: 7,1 level 5 14B15y 4: 8S9i10X11P12a13X 
  758. }
  759.  
  760. alias /stopclone {
  761.   set %cloneaway off
  762.   set %vcloneaway off
  763.   /rlevel 2
  764.   echo 7,1 - - Clone give away Stopped... all winners in level 2 have been removed.. 14B15y 4: 8S9i10X11P12a13X 
  765. }
  766. alias /stopgive {
  767.   set %giveaway off
  768.   /rlevel 2
  769.   echo 7,1 - - Item give away Stopped... all winners in level 2 have been removed.. 14B15y 4: 8S9i10X11P12a13X 
  770. }
  771.  
  772.  
  773. alias /resetwinner {
  774.   /rlevel 2
  775.   echo 7,1 - - All winners in level 2 have been removed.. 14B15y 4: 8S9i10X11P12a13X 
  776. }
  777.  
  778. alias /slap {
  779.   /me slaps $1 around for an hour or two with a huge Octopus !!!!!
  780. }
  781. alias /beat {
  782.   /me grabs $1 and beats 'em over the head with a small Whale !!!!!
  783. }
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!