rendered paste body[variables]
n0=%udc config.mrc|1.0|Bot Configuration|remote|Initial Release|config.mrc
n1=%udf config.mrc
n2=%udv 1.0
n3=%udn Bot Configuration
n4=%uds remote
n5=%udi Initial Release
n6=%udl config.mrc
n7=%fbud_read $true
n8=%fbud }
n9=%sr
n10=%RSStats </body>
n11=%RSSsread.458186 3
n12=%RSSsskill.458186 Overall
n13=%RSSsrank.458186
n14=%RSSsread.655747 3
n15=%RSSsskill.655747 Overall
n16=%RSSsrank.655747
n17=%RSSsread.588240 3
n18=%RSSsskill.588240 Overall
n19=%RSSsrank.588240
n20=%RSSsread.115680 3
n21=%RSSsskill.115680 Overall
n22=%RSSsrank.115680
[aliases]
n0=/op /mode # +ooo $$1 $2 $3
n1=/dop /mode # -ooo $$1 $2 $3
n2=/j /join #$$1 $2-
n3=/p /part #
n4=/n /names #$$1
n5=/w /whois $$1
n6=/k /kick # $$1 $2-
n7=/q /query $$1
n8=/send /dcc send $1 $2
n9=/chat /dcc chat $1
n10=/ping /ctcp $$1 ping
n11=se {
n12= return $readini(Settings.ini,$1,$2)
n13=}
n14=rsn {
n15= if ($2) { return $2 }
n16= if ($readini(RSN.ini,n,$address($1,3),rsn)) { return $ifmatch }
n17= else { return $1 }
n18=}
n19=saka {
n20= return $iif($readini(Skills/TS.ini,$1,aka),$ifmatch,$1)
n21=}
n22=skill {
n23= if ($prop == lvl) { var %get = 2 }
n24= if ($prop == exp) { var %get = 3 }
n25= if ($prop == rank) { var %get = 1 }
n26= if (!$1 || !$2) { return Error }
n27= if (!$hget($1,$2)) { return - }
n28= return $remove($gettok($hget($1,$2),%get,32),$chr(44))
n29=}
n30=nohtml {
n31= var %x,%i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x)
n32= %x = $replace(%x, ,$null)
n33= return %x
n34=}
n35=order {
n36= .tokenize 32 $1
n37= var %a = 1,%ordrd
n38= while (%a <= $0) {
n39= if ($($+($,%a),2) >= $gettok(%ordrd,1,32)) { %ordrd = $($+($,%a),2) %ordrd }
n40= else { %ordrd = %ordrd $($+($,%a),2) }
n41= inc %a
n42= }
n43= return %ordrd
n44=}
n45=exp {
n46= var %x = 1, %level = $calc($1 - 1), %xp = 0
n47= while (%x <= %level) {
n48= var %TempXp = $calc($floor($calc(%x + 300 * 2 ^ (%x / 7))) / 4)
n49= inc %xp %TempXp
n50= inc %x
n51= }
n52= return $int(%xp)
n53=}
n54=combat.base {
n55= var %def = $1,%hp = $2,%pray = $3
n56= var %A = $calc(%def * 100)
n57= var %B = $calc(%hp * 100)
n58= var %C = $iif(*.* iswm $calc(%pray / 2),$calc((%pray -1) * 50),$calc(%pray * 50))
n59= return $calc((%a + %B + %C) / 400)
n60=}
n61=combat.class {
n62= var %att = $1,%str = $2,%range = $3,%mage = $4
n63= var %A = $calc(%att * 130)
n64= var %B = $calc(%str * 130)
n65= var %C = $iif(*.* iswm $calc(%range / 2),$calc(((%range - 1) + (%range * 2)) * 65),$calc(%range * 195))
n66= var %D = $iif(*.* iswm $calc(%mage / 2),$calc(((%mage - 1) + (%mage * 2)) * 65),$calc(%mage * 195))
n67= var %melee = $calc((%A + %B) / 400)
n68= var %range = $calc(%C / 400)
n69= var %mage = $calc(%D / 400)
n70= return $order(%melee %range %mage)
n71=}
n72=combat.final {
n73= var %base = $combat.base($iif(!$2,1,$2),$iif(!$4,10,$4),$iif(!$5,1,$5))
n74= var %class = $combat.class($iif(!$1,1,$1),$iif(!$3,1,$3),$iif(!$6,1,$6),$iif(!$7,1,$7))
n75= var %combat = $calc(%base + $gettok(%class,1,32))
n76= return %combat
n77=}
n78=f2u {
n79= if ($regex($1,$+(/^,$chr(40),$se(regEx,pc),$chr(41),$,/Si))) { return PestControl }
n80= if ($regex($1,$+(/^,$chr(40),$se(regEx,cmb),$chr(41),$,/Si))) { return Combat }
n81= if ($regex($1,$+(/^,$chr(40),$se(regEx,stats),$chr(41),$,/Si))) { return Stats }
n82= if ($regex($1,$+(/^,$chr(40),$se(regEx,overall),$chr(41),$,/Si))) { return Overall }
n83= if ($regex($1,$+(/^,$chr(40),$se(regEx,att),$chr(41),$,/Si))) { return Attack }
n84= if ($regex($1,$+(/^,$chr(40),$se(regEx,def),$chr(41),$,/Si))) { return Defence }
n85= if ($regex($1,$+(/^,$chr(40),$se(regEx,str),$chr(41),$,/Si))) { return Strength }
n86= if ($regex($1,$+(/^,$chr(40),$se(regEx,hp),$chr(41),$,/Si))) { return HitPoints }
n87= if ($regex($1,$+(/^,$chr(40),$se(regEx,range),$chr(41),$,/Si))) { return Ranged }
n88= if ($regex($1,$+(/^,$chr(40),$se(regEx,pray),$chr(41),$,/Si))) { return Prayer }
n89= if ($regex($1,$+(/^,$chr(40),$se(regEx,magic),$chr(41),$,/Si))) { return Magic }
n90= if ($regex($1,$+(/^,$chr(40),$se(regEx,cook),$chr(41),$,/Si))) { return Cooking }
n91= if ($regex($1,$+(/^,$chr(40),$se(regEx,wc),$chr(41),$,/Si))) { return WoodCutting }
n92= if ($regex($1,$+(/^,$chr(40),$se(regEx,fletch),$chr(41),$,/Si))) { return Fletching }
n93= if ($regex($1,$+(/^,$chr(40),$se(regEx,fish),$chr(41),$,/Si))) { return Fishing }
n94= if ($regex($1,$+(/^,$chr(40),$se(regEx,fm),$chr(41),$,/Si))) { return FireMaking }
n95= if ($regex($1,$+(/^,$chr(40),$se(regEx,craft),$chr(41),$,/Si))) { return Crafting }
n96= if ($regex($1,$+(/^,$chr(40),$se(regEx,smith),$chr(41),$,/Si))) { return Smithing }
n97= if ($regex($1,$+(/^,$chr(40),$se(regEx,mine),$chr(41),$,/Si))) { return Mining }
n98= if ($regex($1,$+(/^,$chr(40),$se(regEx,herb),$chr(41),$,/Si))) { return Herblore }
n99= if ($regex($1,$+(/^,$chr(40),$se(regEx,agil),$chr(41),$,/Si))) { return Agility }
n100= if ($regex($1,$+(/^,$chr(40),$se(regEx,thief),$chr(41),$,/Si))) { return Thieving }
n101= if ($regex($1,$+(/^,$chr(40),$se(regEx,slay),$chr(41),$,/Si))) { return Slayer }
n102= if ($regex($1,$+(/^,$chr(40),$se(regEx,farm),$chr(41),$,/Si))) { return Farming }
n103= if ($regex($1,$+(/^,$chr(40),$se(regEx,rc),$chr(41),$,/Si))) { return RuneCraft }
n104= if ($regex($1,$+(/^,$chr(40),$se(regEx,hunt),$chr(41),$,/Si))) { return Hunter }
n105= if ($regex($1,$+(/^,$chr(40),$se(regEx,const),$chr(41),$,/Si))) { return Construction }
n106= else { return $false }
n107=}
n108=cntn {
n109= return $readini(clist.ini,colors,$1)
n110=}
[cpopup]
n0=Channel Modes:/channel
[bpopup]
n0= Commands
n1=Join channel:/join #$$?="Enter channel name:"
n2=Part channel:/part #$$?="Enter channel name:"
n3=Query user:/query $$?="Enter nickname and message:"
n4=Send notice:/notice $$?="Enter nickname and message:"
n5=Whois user:/whois $$?="Enter nickname:"
n6=Send CTCP
n7=.Ping:/ctcp $$?="Enter nickname:" ping
n8=.Time:/ctcp $$?="Enter nickname:" time
n9=.Version:/ctcp $$?="Enter nickname:" version
n11=Set Away
n12=.On:/away $$?="Enter away message:"
n13=.Off:/away
n14=Invite user:/invite $$?="Enter nickname and channel:"
n15=Ban user:/ban $$?="Enter channel and nickname:"
n16=Kick user:/kick $$?="Enter channel and nickname:"
n17=Ignore user:/ignore $$?="Enter nickname:"
n18=Unignore user:/ignore -r $$?="Enter nickname:"
n19=Change nick:/nick $$?="Enter new nickname:"
n20=Quit IRC:/quit
[mpopup]
n0=Server
n1=.Lusers:/lusers
n2=.Motd:/motd
n3=.Time:/time
n4=Names
n5=.#mIRC:/names #mirc
n6=.#irchelp: /names #irchelp
n7=.names ?:/names #$$?="Enter a channel name:"
n8=Join
n9=.#mIRC:/join #mirc
n10=.#irchelp:/join #irchelp
n11=.join ?:/join #$$?="Enter a channel to join:"
n12=Channel
n13=.Try double-clicking in a channel window!:
n14=Other
n15=.Whois ?:/whois $$?="Enter a nickname:"
n16=.Query:/query $$?="Enter a nickname:"
n17=.Nickname:/nick $$?="Enter your new nickname:"
n18=.Away
n19=..Set Away...:/away $$?="Enter your away message:"
n20=..Set Back:/away
n21=.List Channels:/list
n22=-
n23=Edit Notes:/run notepad.exe notes.txt
n24=Quit IRC:/quit Leaving
[qpopup]
n0=Info:/uwho $$1
n1=Whois:/whois $$1
n2=Query:/query $$1
n3=-
n4=Ignore:/ignore $$1 1 | /closemsg $$1
n5=-
n6=CTCP
n7=.Ping:/ctcp $$1 ping
n8=.Time:/ctcp $$1 time
n9=.Version:/ctcp $$1 version
n10=DCC
n11=.Send:/dcc send $$1
n12=.Chat:/dcc chat $$1
[lpopup]
n2=Info:/uwho $1
n0=Whois:/whois $$1
n1=Query:/query $$1
n3=-
n4=Control
n5=.Ignore:/ignore $$1 1
n6=.Unignore:/ignore -r $$1 1
n6=.Op:/mode # +ooo $$1 $2 $3
n7=.Deop:/mode # -ooo $$1 $2 $3
n6=.Voice:/mode # +vvv $$1 $2 $3
n7=.Devoice:/mode # -vvv $$1 $2 $3
n8=.Kick:/kick # $$1
n9=.Kick (why):/kick # $$1 $$?="Reason:"
n10=.Ban:/ban $$1 2
n11=.Ban, Kick:/ban $$1 2 | /timer 1 3 /kick # $$1
n11=.Ban, Kick (why):/ban $$1 2 | /timer 1 3 /kick # $$1 $$?="Reason:"
n12=CTCP
n13=.Ping:/ctcp $$1 ping
n16=.Time:/ctcp $$1 time
n15=.Version:/ctcp $$1 version
n17=DCC
n18=.Send:/dcc send $$1
n19=.Chat:/dcc chat $$1
n20=-
n21=Slap!:/me slaps $$1 around a bit with a large trout
on *:INVITE:#: {
join #
.timer 1 2 CheckChan $chan $nick
}
alias -l CheckChan {
if ($2 !isop $1) && ($2 !ishop $1) {
part $1 Sorry, you need to be atleast halfop to invite $me $+ .
}
else {
msg $1 Hello $1 $+ , I was invited here by $2 $+ . Please type !Commands for a list of available commands.
}
}