Advertisement
Guest User

Some exaples of my old mIRC bot's script functionality

a guest
Feb 18th, 2018
481
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 3.72 KB | None | 0 0
  1. /*
  2. Examples of some of the aliases my bot had for easier ways for me to manually manage it so that I didn't need to deal with the awful and long/confusing process of interacting with Chanserv/Nickserv bots and/or opening the script itself constantly.
  3.  
  4. Includes:
  5. -adding/deleting channels to the bot's autojoin when connecting
  6. -adding/deleting channels to the bot's channel blacklist
  7. -adding/deleting nicknames/users to the bot's user blacklist
  8. */
  9.  
  10. alias chans.add {
  11.   if (!$1) {
  12.     set %chans.bot $addtok(%chans.bot,$chan,44)
  13.     set %chans.bot $sorttok(%chans.bot,44)
  14.   }
  15.   else if ($left($1,1) == $chr(35)) {
  16.     set %chans.bot $addtok(%chans.bot,$1,44)
  17.     set %chans.bot $sorttok(%chans.bot,44)
  18.     if ($me !ison $1) join $1
  19.   }
  20. }
  21. alias chans.del {
  22.   if (!$1) {
  23.     set %chans.bot $remtok(%chans.bot,$chan,44)
  24.     if ($me ison $chan) part $chan
  25.   }
  26.   else {
  27.     if ($left($1,1) == $chr(35)) set %chans.bot $remtok(%chans.bot,$1,44)
  28.     if ($me ison $1) part $1 $iif($2,$2-)
  29.   }
  30. }
  31.  
  32. alias blist.addchan {
  33.   var %chan $iif(!$1,$chan,$1)
  34.   set %chans.Blacklist $sorttok($addtok(%chans.Blacklist,%chan,44),44), %chans.bot $remtok(%chans.bot,%chan,44)
  35.   if ($me ison %chan) part %chan channel blacklisted: $iif(($2) && ($left($1,1) == $chr(35)),$2-,reason unspecified)
  36.   echo -e %chan was $iif(!$istok(%chans.Blacklist,%chan,44),not $+ $chr(32)) $+ added to channel blacklist.
  37. }
  38. alias blist.delchan {
  39.   if ($left($1,1) == $chr(35)) set %chans.Blacklist $remtok(%chans.Blacklist,$1,44)
  40.   echo -e $1 was $iif($istok(%chans.Blacklist,$1,44),not) deleted from channel blacklist.
  41. }
  42. alias blist.addnick {
  43.   if ($left($1,1) != $chr(35)) {
  44.     set %nicks.Blacklist $addtok(%nicks.Blacklist,$1,44)
  45.     set %nicks.Blacklist $sorttok(%nicks.Blacklist,44)
  46.   }
  47. }
  48. alias blist.delnick { if ($left($1,1) != $chr(35)) set %nicks.Blacklist $remtok(%nicks.Blacklist,$1,44) }
  49.  
  50.  
  51.  
  52. /* Examples of some of the variables the bot had, including showing the list of blacklisted nicknames and channels that it stored along with things such as the channels it had on its autojoin right before I terminated it in 2013
  53. */
  54.  
  55. %nicks.Blacklist [Hi]Powr,[MM]Mash,Aiden,Alex|Waar,APK,CareCup,ChanServ,COACH,Daffers,Daffy,Daft,Dafty,Daftydil,Darren,Doop433,Flame_OG,IHideKeys,IHideKeys|Away,IHK,IHKDicer,Jordan|BNC,king,Lost,Lua`,NadRoJ,Netflix,Nicole,Obese,Ohb,Poseidon,Seaulone,Selo,Sergen,Slushie,sooley,Titties,Villiska,XD3,Zeebraah,Zippo
  56. %nicks.FloodPrivilege ``Luke,``Luke|Away,Justine,Justine|Away,Matilda,Rachel,Rach|Away,Sam,Fire`,Fire`Away
  57. %chans.Blacklist #aiden,#andrew,#banter,#bnc,#boss_busters,#capacity-reached,#chaotic,#Clan-Ambush,#clan-ef,#clan-eop,#clan-x,#corruption,#Cysgu,#daft,#Dark,#DC_Rs,#debian,#divination,#don,#dubstep,#fapper,#fatality,#fow,#frogman,#fuzy,#g0dz,#gobblesmash,#havoc,#horse,#illegal,#irclan,#liam,#meowy,#mew2,#Nova_DM,#nova_help,#obbyevents,#obywa,#ph,#pure-clan,#rangerman22,#richard,#robot-unit,#ron,#rot,#rs2007,#rupert4na,#sammy,#scratsoisking,#selection,#sheep,#sovereign,#Syndicate,#techbnc,#TheKitchen,#throwback,#top_secret,#torii,#triviabot,#tuf,#tuna,#umadbro,#view,#vr,#w17,#w54,#war-bs,#war-rs,#wilno,#xuso,#zer0tolerance,#zombie
  58. %chans.Exceptions #Luke,#Comets,#africa2,#ngr,#ngr.support,#Team_Blkass,#Starburst,#superelmer
  59. %chans.ActivityMax #fatality,#malkav,#ngr,#Team_Blkass,#Doomstep,#Equalise
  60. %chans.ActivityMin #Badboy,#techbnc,#bnc
  61. %genericAnswer yes,no,maybe,idk,perhaps,possibly,not sure,i dont know,of course,yeah,yea,ye,yeh,yh,nop,nope
  62. %chans.bot #Aimee,#badboy,#battle-scape,#coach,#confetti,#dogf,#extortion,#hide-out,#hippo,#Itachi,#killzone,#kool,#Logan,#Luke,#malkav,#Merk,#mystic,#newt,#ngr,#nitrodex,#Nova,#Olivier,#Paid_Leech,#Redemption,#slushie,#soulwars,#Starburst,#superelmer,#team_blkass,#waar
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement