daily pastebin goal
35%
SHARE
TWEET

Untitled

a guest Jul 22nd, 2018 49 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. on $*:TEXT:/^([@.!])last ?(5|\040Divine|\040Spectral|\040Arcane|\040Elysian)?$/Si:#Sigilpl0x:{
  2.   var %send = $iif(@ == $regml(1),msg $chan,notice $nick)
  3.   if (!$isfile(sigils.txt)) { %send $color2 $+ Oh no, there are no records! | return }
  4.   if ($regml(2) == 5) {
  5.     var %total = $lines(sigils.txt)
  6.     var %temp = %total - 5
  7.     var %temp = $iif(%temp < 1,1,%temp)
  8.     var %o = [Last 5] [Nick,sigil,time] $+ $chr(32)
  9.     while (%temp <= %total) {
  10.       tokenize 61 $read(sigils.txt,%temp)
  11.       var %o = %o $+($color2,[,$color1,$1,$color2,$chr(44),$chr(32),$color1,$3,$color2,$chr(44),$chr(32),$color1,$chr(32),$duration($calc($gmt - $2)),$chr(32),$color2,ago,])
  12.       inc %temp
  13.     }
  14.     %send %o
  15.   }
  16.   elseif ($regml(2)) {
  17.     %sig = $right($v1,-1)
  18.     echo -a %sig
  19.     %lines = $lines(sigils.txt)
  20.     while ((!%sig.found) && (%lines)) {
  21.       tokenize 61 $read(sigils.txt,%lines)
  22.       if (%sig == $3) {
  23.         echo -a found
  24.         var %sig.found = $3
  25.       }
  26.       dec %lines
  27.     }
  28.     if (%sig.found) {
  29.       %send $color2 $+ The last $color1 $+ $v1 $color2 $+ was received $+ $color1 $duration($calc($gmt - $2)) $color2 $+ ago. $color1 $+ $1 $color2 $+ got it!
  30.     }
  31.     else {
  32.       %send $color2 $+ I could not find a record of a $color1 $+  $regml(2) $color2 $+ sigil being found!
  33.     }
  34.   }
  35.   else {
  36.     tokenize 61 $read(sigils.txt,$lines(sigils.txt))
  37.     %send $color1 $+ $1 $color2 $+ received: $color1 $+ $3 $color2 $+ sigil $+ $color1 $duration($calc($gmt - $2)) $color2 $+ ago!
  38.   }
  39. }
  40. alias sigil.list {
  41.   if ($isfile(sigils.txt)) {
  42.     .fopen sigils sigils.txt
  43.     window -dk0 @Sigil_History
  44.     while ($fread(sigils)) {
  45.       tokenize 61 $v1
  46.       echo @sigil_history $asctime($calc($gmt - $2),$timestampfmt) $4 added $3 for $1
  47.     }
  48.     .fclose sigils
  49.   }
  50. }
  51.  
  52. ON $*:TEXT:/^[.!]change/Si:#Sigilplox: {
  53.   if ($nick isop $chan) {
  54.     if ($2 == sigil) {
  55.       set %sigil $iif($3 == Spectral,$+($chr(3),06,Spectral,$chr(3)),$iif($3 == Arcane,$+($chr(3),07,Arcane,$chr(3)),$iif($3 == Elysian,$+($chr(3),11,Elysian,$chr(3)),$iif($3 == Divine,$+($chr(3),03,Divine,$chr(3))))))
  56.       topic # 4,1Welcome 14to 10S3I6G5I7L8P9L12O2X 11| QFC: 194-195-583-63429074 |2,01 Sigil Count:3 Divine0: %dcount 10Elysian0: %ecount 7Arcane0: %acount 6Spectral0: %scount 10The last sigil: %nick - %sigil
  57.     }
  58.     if ($2 == spectral) && ($3 isnum) {
  59.       set %scount $3
  60.       topic # 0,01 Welcome to 2S3I4G56I7L8P9L111313 014X0 | 4QFC: 194-195-414-635778950 |0,110 Sigils0:3 Divine0: %dcount  10Elysian0: %ecount 7Arcane0: %acount  6Spectral: %scount 10The last sigil: %nick - %sigil
  61.     }
  62.     if ($2 == arcane) && ($3 isnum) {
  63.       set %acount $3
  64.       topic # 0,01 Welcome to 2S3I4G56I7L8P9L111313 014X0 | 4QFC: 194-195-414-635778950 |0,110 Sigils0:3 Divine0: %dcount  10Elysian0: %ecount 7Arcane0: %acount  6Spectral0: %scount 10The last sigil: %nick - %sigil
  65.     }
  66.     if ($2 == elysian) && ($3 isnum) {
  67.       set %ecount $3
  68.       topic # 0,01 Welcome to 2S3I4G56I7L8P9L111313 014X0 | 4QFC: 194-195-414-635778950 |0,110 Sigils0:3 Divine0: %dcount  10Elysian0: %ecount 7Arcane0: %acount  6Spectral0: %scount 10The last sigil: %nick - %sigil
  69.     }
  70.     if ($2 == divine) && ($3 isnum) {
  71.       set %dcount $3
  72.       topic # 0,01 Welcome to 2S3I4G56I7L8P9L111313 014X0 | 4QFC: 194-195-414-635778950 |0,110 Sigils0:3 Divine0: %dcount  10Elysian0: %ecount 7Arcane0: %acount  6Spectral0: %scount 10The last sigil: %nick - %sigil
  73.     }
  74.   }
RAW Paste Data
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
 
Top