(Skrip)-sBiasa-Lite — File Browser
Skrip-sBiasa-Litev1.01c / Skrip-sBiasa-Litev1.01c / sBiasaLite_Skrip / sbiasa_lite_s_nick.ini
sbiasa_lite_s_nick.ini — 20.93 KB — Download this file
[script]
n0=;# Skrip BĂasa Lite -#- RonĂ Tua -#- http://www.picauly.f2s.com/ -#- v1.01c #
n1=
n2=dialog sBiasa.extnicklist.options {
n3= title "BĂasa Extended Nicklist Options"
n4= size -1 -1 237 184
n5= check "&Ops", 3, 12 14 76 15
n6= check "&Voice", 4, 12 41 76 15
n7= check "&Regular", 5, 12 68 76 15
n8= check "&Your self", 6, 12 96 76 15
n9= combo 7, 96 10 102 100, drop
n10= combo 8, 96 37 102 100, drop
n11= combo 9, 96 64 102 100, drop
n12= combo 10, 96 91 102 100, drop
n13= text "&Background", 12, 29 123 70 20
n14= combo 11, 96 119 102 100, drop
n15= button "OK", 99, 23 153 60 25, ok default
n16= button "Cancel", 98, 89 153 60 25, Cancel
n17= button "&Apply", 97, 155 153 60 25
n18= icon 27, 207 12 19 16, $sBiasadir.arts(null.bmp), noborder
n19= icon 28, 207 39 19 16, $sBiasadir.arts(null.bmp), noborder
n20= icon 29, 207 66 19 16, $sBiasadir.arts(null.bmp), noborder
n21= icon 30, 207 93 19 16, $sBiasadir.arts(null.bmp), noborder
n22= icon 31, 207 121 19 16, $sBiasadir.arts.col($colour(Listbox)), noborder
n23=}
n24=on *:DIALOG:sBiasa.extnicklist.options:init:0:{ did -b sBiasa.extnicklist.options 97
n25= if (%sBiasa-extnicklist_data == $null) || ($gettok(%sBiasa-extnicklist_data,0,58) < 5) { set %sBiasa-extnicklist_data 1111:9:0:1:13 }
n26= var %sBiasa-extnicklist.ops = $gettok(%sBiasa-extnicklist_data,2,58)
n27= var %sBiasa-extnicklist.voice = $gettok(%sBiasa-extnicklist_data,3,58)
n28= var %sBiasa-extnicklist.reg = $gettok(%sBiasa-extnicklist_data,4,58)
n29= var %sBiasa-extnicklist.me = $gettok(%sBiasa-extnicklist_data,5,58)
n30= if (%sBiasa-extnicklist.ops isnum 0-15) { did -g sBiasa.extnicklist.options 27 $sBiasadir.arts.col(%sBiasa-extnicklist.ops) }
n31= if (%sBiasa-extnicklist.reg isnum 0-15) { did -g sBiasa.extnicklist.options 29 $sBiasadir.arts.col(%sBiasa-extnicklist.reg) }
n32= if (%sBiasa-extnicklist.me isnum 0-15) { did -g sBiasa.extnicklist.options 30 $sBiasadir.arts.col(%sBiasa-extnicklist.me) }
n33= if (%sBiasa-extnicklist.voice isnum 0-15) { did -g sBiasa.extnicklist.options 28 $sBiasadir.arts.col(%sBiasa-extnicklist.voice) }
n34= var %sBiasa-extnicklist.options.i = 3, %sBiasa-extnicklist.options.j = 1
n35= while (%sBiasa-extnicklist.options.i <= 6) {
n36= var %sBiasa-extnicklist.options.temp = $mid($gettok(%sBiasa-extnicklist_data,1,58),%sBiasa-extnicklist.options.j,1)
n37= did - $+ $iif(%sBiasa-extnicklist.options.temp,c,u) sBiasa.extnicklist.options %sBiasa-extnicklist.options.i
n38= did - $+ $iif(%sBiasa-extnicklist.options.temp,e,b) sBiasa.extnicklist.options $calc(%sBiasa-extnicklist.options.i + 4)
n39= did - $+ $iif(%sBiasa-extnicklist.options.temp,v,h) sBiasa.extnicklist.options $calc(%sBiasa-extnicklist.options.i + 24)
n40= inc %sBiasa-extnicklist.options.i 1 | inc %sBiasa-extnicklist.options.j 1
n41= }
n42= var %sBiasa-extnicklist.options.i = 7
n43= while (%sBiasa-extnicklist.options.i <= 11) {
n44= didtok sBiasa.extnicklist.options %sBiasa-extnicklist.options.i 44 0 - White,1 - Black,2 - Blue,3 - Green,4 - Light red,5 - Brown,6 - Purple,7 - Orange,8 - Yellow,9 - Light green,10 - Cyan,11 - Light cyan,12 - Light blue,13 - Pink,14 - Gray,15 - Light black
n45= did -c sBiasa.extnicklist.options %sBiasa-extnicklist.options.i $calc($gettok(%sBiasa-extnicklist_data,$calc(%sBiasa-extnicklist.options.i - 5),58) + 1)
n46= inc %sBiasa-extnicklist.options.i 1
n47= }
n48= did -c sBiasa.extnicklist.options %sBiasa-extnicklist.options.i $calc($colour(listbox) + 1)
n49=}
n50=on *:DIALOG:sBiasa.extnicklist.options:sclick:3,4,5,6:{ did - $+ $iif($did(sBiasa.extnicklist.options,$did).state,e,b) sBiasa.extnicklist.options $calc($did + 4) | did - $+ $iif($did(sBiasa.extnicklist.options,$did).state,v,h) sBiasa.extnicklist.options $calc($did + 24) | did -e sBiasa.extnicklist.options 97 }
n51=on *:DIALOG:sBiasa.extnicklist.options:sclick:7,8,9,10,11:{ .did -g sBiasa.extnicklist.options $calc($did + 20) $sBiasadir.arts.col($gettok($did(sBiasa.extnicklist.options,$did),1,32)) | did -e sBiasa.extnicklist.options 97 }
n52=on *:DIALOG:sBiasa.extnicklist.options:sclick:99,97:{
n53= set %sBiasa-extnicklist_data $did(sBiasa.extnicklist.options,3).state $+ $did(sBiasa.extnicklist.options,4).state $+ $did(sBiasa.extnicklist.options,5).state $+ $did(sBiasa.extnicklist.options,6).state $+ : $+ $calc($did(sBiasa.extnicklist.options,7).sel - 1) $+ : $+ $calc($did(sBiasa.extnicklist.options,8).sel - 1) $+ : $+ $calc($did(sBiasa.extnicklist.options,9).sel - 1) $+ : $+ $calc($did(sBiasa.extnicklist.options,10).sel - 1) $+ : $+ $calc($did(sBiasa.extnicklist.options,11).sel - 1)
n54= if ($did(sBiasa.extnicklist.options,6).state) { .colour listbox $calc($did(sBiasa.extnicklist.options,11).sel - 1) }
n55= sBiasa.extnicklist.chans
n56= if ($did == 97) { did -b sBiasa.extnicklist.options 97 }
n57=}
n58=on 1:OP:#:{ if ($sBiasa.main(6)) { updatenl | sBiasa.extnicklist.nick $chan $opnick } }
n59=on 1:SERVEROP:#:{ if ($sBiasa.main(6)) { updatenl | sBiasa.extnicklist.nick $chan $opnick } }
n60=on 1:SERVERDEOP:#:{ if ($sBiasa.main(6)) { updatenl | sBiasa.extnicklist.nick $chan $opnick } }
n61=on 1:VOICE:#:{ if ($sBiasa.main(6)) { updatenl | sBiasa.extnicklist.nick $chan $vnick } }
n62=on 1:DEVOICE:#:{ if ($sBiasa.main(6)) { updatenl | sBiasa.extnicklist.nick $chan $vnick } }
n63=on 1:SERVERVOICE:#:{ if ($sBiasa.main(6)) { updatenl | sBiasa.extnicklist.nick $chan $vnick } }
n64=on 1:SERVERDEVOICE:#:{ if ($sBiasa.main(6)) { updatenl | sBiasa.extnicklist.nick $chan $vnick } }
n65=raw 366:*:{ if ($sBiasa.main(6)) { updatenl | if ($me ison $2) { sBiasa.extnicklist.chan $2 } } }
n66=alias sBiasa.extnicklist.chan { if ($1) { var %sBiasa-extnicklist.chan.max = $nick($1,0), %sBiasa-extnicklist.chan.loop = 0
n67= while (%sBiasa-extnicklist.chan.loop < %sBiasa-extnicklist.chan.max) {
n68= inc %sBiasa-extnicklist.chan.loop 1 | sBiasa.extnicklist.nick $1 $nick($1,%sBiasa-extnicklist.chan.loop)
n69=} } }
n70=alias sBiasa.extnicklist.chans { var %sBiasa-extnicklist.chans.max = $chan(0), %sBiasa-extnicklist.chans.loop = 0
n71= while (%sBiasa-extnicklist.chans.loop < %sBiasa-extnicklist.chans.max) {
n72= inc %sBiasa-extnicklist.chans.loop 1 | sBiasa.extnicklist.chan $chan(%sBiasa-extnicklist.chans.loop)
n73=} }
n74=alias sBiasa.extnicklist.nick { if ($2) && ($sBiasa.main(6)) {
n75= if ($2 == $me) && ($sBiasa.extnicklist(4)) { cline $gettok(%sBiasa-extnicklist_data,5,58) $1 $nick($1,$2) }
n76= elseif ($2 isop $1) && ($sBiasa.extnicklist(1)) { cline $gettok(%sBiasa-extnicklist_data,2,58) $1 $nick($1,$2) }
n77= elseif ($2 isvo $1) && ($sBiasa.extnicklist(2)) { cline $gettok(%sBiasa-extnicklist_data,3,58) $1 $nick($1,$2) }
n78= elseif ($sBiasa.extnicklist(3)) { cline $gettok(%sBiasa-extnicklist_data,4,58) $1 $nick($1,$2) }
n79= else { cline $colour(listbox text) $1 $nick($1,$2) }
n80=} }
n81=alias sBiasa.nickcomp.format { var %sBiasa-nickcomp.len = $len($1), %sBiasa-nickcomp.f = %sBiasa-nickcomp_data
n82= if (%sBiasa-nickcomp.f = 1) { return $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $+ $right($1,1) $+ }
n83= elseif (%sBiasa-nickcomp.f = 2) { return $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $+ $right($1,1) $+ }
n84= elseif (%sBiasa-nickcomp.f = 3) { return $+ $left($1,1) $+ $+ $mid($1,2,$calc(%sBiasa-nickcomp.len - 2)) $+ $+ $right($1,1) $+ }
n85= elseif (%sBiasa-nickcomp.f = 4) { return $+ $left($1,1) $+ $+ $mid($1,2,$calc(%sBiasa-nickcomp.len - 2)) $+ $+ $right($1,1) $+ }
n86= elseif (%sBiasa-nickcomp.f = 5) { return .. $+ $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $+ $right($1,1) $+ }
n87= elseif (%sBiasa-nickcomp.f = 6) { return .. $+ $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $+ $right($1,1) $+ }
n88= elseif (%sBiasa-nickcomp.f = 7) { return $+ $1 $+ }
n89= elseif (%sBiasa-nickcomp.f = 8) { return $chr(91) $+ $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $chr(93) $+ $+ $right($1,1) $+ }
n90= elseif (%sBiasa-nickcomp.f = 9) { return ( $+ $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ ) $+ $right($1,1) $+ }
n91= elseif (%sBiasa-nickcomp.f = 10) { return < $+ $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ > $+ $right($1,1) $+ }
n92= elseif (%sBiasa-nickcomp.f = 11) { return $+ $left($1,1) $+ $+ $mid($1,2,$calc(%sBiasa-nickcomp.len - 2)) $+ $+ $right($1,1) $+ }
n93= elseif (%sBiasa-nickcomp.f = 11) { return $+ $left($1,1) $+ $+ $mid($1,2,$calc(%sBiasa-nickcomp.len - 2)) $+ $+ $right($1,1) $+ }
n94= elseif (%sBiasa-nickcomp.f = 12) { return ( $+ $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ ) $+ $right($1,1) }
n95= elseif (%sBiasa-nickcomp.f = 13) { return 12(13 $+ $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ 12) $+ $right($1,1) }
n96= elseif (%sBiasa-nickcomp.f = 14) { return hey $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ ! }
n97= elseif (%sBiasa-nickcomp.f = 15) { return Yth $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $right($1,1) }
n98= elseif (%sBiasa-nickcomp.f = 16) { return To $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $right($1,1) }
n99= elseif (%sBiasa-nickcomp.f = 17) { return Wak $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $right($1,1) }
n100= elseif (%sBiasa-nickcomp.f = 18) { return Dek $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $right($1,1) }
n101= elseif (%sBiasa-nickcomp.f = 19) { return Bang $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $right($1,1) }
n102= elseif (%sBiasa-nickcomp.f = 20) { return Paman $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $right($1,1) }
n103= elseif (%sBiasa-nickcomp.f = 21) { return Papa $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $right($1,1) }
n104= elseif (%sBiasa-nickcomp.f = 22) { return Mama $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $right($1,1) }
n105= elseif (%sBiasa-nickcomp.f = 23) { return Kak $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $right($1,1) }
n106= elseif (%sBiasa-nickcomp.f = 24) { return Nak $left($1,$calc(%sBiasa-nickcomp.len - 1)) $+ $right($1,1) }
n107=}
n108=alias sBiasa.nickcomp.pxtheme.check { if ($left($2-,1) != /) && ($1 ischan) && ($sBiasa.data(nc,status) == on) { return $true } | return $false }
n109=dialog sBiasa.nickcomp.help {
n110= title "BĂasa Nick Completer Help"
n111= size -1 -1 384 192
n112= button "OK", 3, 155 158 74 25, default Ok
n113= text "To use this script, join a channel, and type part of a someone's nickname (who is on the channel), then a : or a ; like this:", 11, 16 13 352 30
n114= text "Ron: hi honey...", 12, 16 47 352 15
n115= text "Bad: don't call me like that...", 13, 16 66 352 15
n116= text "If the script finds a match, to the beginning of the nickname, like Roni, hueiheuihuei, it will complete the nickname in the specified format and include the message you typed after the : or ;, and BadGirl for the second example.", 14, 16 87 352 60
n117= ; link $analog, 100, 5 115 165 17
n118= ; icon 99, 192 118 79 20, $logobiasa
n119=}
n120=alias sBiasa.nickcomp.help { openclosedialog sBiasa.nickcomp.help sBiasa.nickcomp.help -ma }
n121=alias sBiasa.nickcomp.setup { if ($1 == -r) { goto refresh }
n122= if ($window(@NickCompleter) == $null) { .window -lk0 @NickCompleter terminal 18 }
n123= else { .window -a @NickCompleter terminal 18 }
n124= .titlebar @NickCompleter - Setup (Double click to changing)
n125= :refresh | if ($window(@NickCompleter) == $null) { return } | clear @NickCompleter
n126= aline @NickCompleter Nick completer status: 10,0 $+ $iif($sBiasa.main(8), on, off)
n127= aline 10 @NickCompleter
n128= aline @NickCompleter Select a nick type by double-click:
n129= var %sBiasa-nickcomp.f = %sBiasa-nickcomp_data
n130= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 1,8x 0- nick:, - nick:)
n131= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 2,8x 0- nick : , - nick : )
n132= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 3,8x 0- nick:, - nick:)
n133= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 4,8x 0- n ick : , - n ick : )
n134= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 5,8x 0- ..nick:, - ..nick:)
n135= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 6,8x 0- ..nick : , - ..nick : )
n136= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 7,8x 0- nick: , - nick: )
n137= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 8,8x 0- [nick]:, - [nick]:)
n138= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 9,8x 0- (nick):, - (nick):)
n139= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 10,8x 0- <nick>:, - <nick>:)
n140= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 11,8x 0- nic k :, - nic k :)
n141= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 12,8x 0- (nick):, - (nick):)
n142= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 13,8x 0- 12(13nick12):, - 12(13nick12):)
n143= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 14,8x 0- hey nick!, - hey nick!)
n144= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 15,8x 0- Yth nick:, - Yth nick:)
n145= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 16,8x 0- To nick:, - To nick:)
n146= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 17,8x 0- Wak nick:, - Wak nick:)
n147= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 18,8x 0- Dek nick:, - Dek nick:)
n148= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 19,8x 0- Bang nick:, - Bang nick:)
n149= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 20,8x 0- Paman nick:, - Paman nick:)
n150= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 21,8x 0- Papa nick:, - Papa nick:)
n151= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 22,8x 0- Mama nick:, - Mama nick:)
n152= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 23,8x 0- Kak nick:, - Kak nick:)
n153= aline @NickCompleter $iif(%sBiasa-nickcomp.f = 24,8x 0- Nak nick:, - Nak nick:)
n154= aline 10 @NickCompleter | aline @NickCompleter 10,0Help... | unset %sBiasa-nickcomp.*
n155=}
n156=menu @NickCompleter {
n157= dclick { unset %L %sBiasa-nickcomp.*
n158= if ($sline(@NickCompleter,1).ln <= 29) { goto $sline(@NickCompleter,1).ln } | return
n159= :1 | set %sBiasa-main_data $left(%sBiasa-main_data,7) $+ $iif($sBiasa.main(8),0,1) $+ $mid(%sBiasa-main_data,9,6)
n160= sBiasa.nickcomp.setup -r | cdid - $+ $iif($sBiasa.main(8),c,u) sBiasa.options 204 | cdid - $+ $iif($sBiasa.main(8),e,b) sBiasa.options 205 | return
n161= :2 | return | :3 | return
n162= :4 | set %sBiasa-nickcomp_data 1 | sBiasa.nickcomp.setup -r | return
n163= :5 | set %sBiasa-nickcomp_data 2 | sBiasa.nickcomp.setup -r | return
n164= :6 | set %sBiasa-nickcomp_data 3 | sBiasa.nickcomp.setup -r | return
n165= :7 | set %sBiasa-nickcomp_data 4 | sBiasa.nickcomp.setup -r | return
n166= :8 | set %sBiasa-nickcomp_data 5 | sBiasa.nickcomp.setup -r | return
n167= :9 | set %sBiasa-nickcomp_data 6 | sBiasa.nickcomp.setup -r | return
n168= :10 | set %sBiasa-nickcomp_data 7 | sBiasa.nickcomp.setup -r | return
n169= :11 | set %sBiasa-nickcomp_data 8 | sBiasa.nickcomp.setup -r | return
n170= :12 | set %sBiasa-nickcomp_data 9 | sBiasa.nickcomp.setup -r | return
n171= :13 | set %sBiasa-nickcomp_data 10 | sBiasa.nickcomp.setup -r | return
n172= :14 | set %sBiasa-nickcomp_data 11 | sBiasa.nickcomp.setup -r | return
n173= :15 | set %sBiasa-nickcomp_data 12 | sBiasa.nickcomp.setup -r | return
n174= :16 | set %sBiasa-nickcomp_data 13 | sBiasa.nickcomp.setup -r | return
n175= :17 | set %sBiasa-nickcomp_data 14 | sBiasa.nickcomp.setup -r | return
n176= :18 | set %sBiasa-nickcomp_data 15 | sBiasa.nickcomp.setup -r | return
n177= :19 | set %sBiasa-nickcomp_data 16 | sBiasa.nickcomp.setup -r | return
n178= :20 | set %sBiasa-nickcomp_data 17 | sBiasa.nickcomp.setup -r | return
n179= :21 | set %sBiasa-nickcomp_data 18 | sBiasa.nickcomp.setup -r | return
n180= :22 | set %sBiasa-nickcomp_data 19 | sBiasa.nickcomp.setup -r | return
n181= :23 | set %sBiasa-nickcomp_data 20 | sBiasa.nickcomp.setup -r | return
n182= :24 | set %sBiasa-nickcomp_data 21 | sBiasa.nickcomp.setup -r | return
n183= :25 | set %sBiasa-nickcomp_data 22 | sBiasa.nickcomp.setup -r | return
n184= :26 | set %sBiasa-nickcomp_data 23 | sBiasa.nickcomp.setup -r | return
n185= :27 | set %sBiasa-nickcomp_data 24 | sBiasa.nickcomp.setup -r | return
n186= :28 | return | :29 | sBiasa.nickcomp.help | return
n187= }
n188= Help...:sBiasa.nickcomp.help
n189= -
n190= Close:{ .window -c @NickCompleter }
n191=}
n192=on 1:INPUT:*:{
n193= if ($server) && (($left($1,1) != /) || ($1 = /me) || ($1 = /msg) || ($1 = /amsg) || ($1 = /ame) || ($1 = /notice) || ($1 = /onotice) || ($1 = /describe) || ($1 = /ctcp) || ($1 = /action) || ($1 = /ctcpreply) || ($1 = /dcc) || ($1 = /chat) || ($1 = /send)) {
n194= if ($server) && ($away) { sBiasa.away.autoaway.timer.off | unset %sBiasa-away.autoaway.count
n195= if ($sBiasa.away(2)) { sBiasa.away.autoback.count
n196= if ($sBiasa.away(6)) { sBiasa.away.autoback.timer } | else { sBiasa.away.autoback.timer.off }
n197= }
n198= else { sBiasa.away.autoback.timer.off | unset %sBiasa-away.autoback.count }
n199= }
n200= elseif ($server) { sBiasa.away.autoback.timer.off | unset %sBiasa-away.autoback.count
n201= if ($sBiasa.away(1)) { sBiasa.away.autoaway.timer } | else { sBiasa.away.autoaway.timer.off | unset %sBiasa-away.autoaway.count }
n202= } }
n203= else { sBiasa.away.autoback.timer.off | sBiasa.away.autoaway.timer.off | unset %sBiasa-away.autoback.count %sBiasa-away.autoaway.count }
n204= resetidle | unset %sBiasa-nickcomp.* %sBiasa-rtext.* %sBiasa-input.*
n205= if ($server) && ($left($1,1) != /) && (($sBiasa.main(8)) || (1 isin $mid(%sBiasa-rtext_data,2,5))) {
n206= set -u0 %sBiasa-input.say $$1-
n207= if ($sBiasa.main(8)) && (($active ischan) || ($chan ischan) || (# ischan) || ($me ison $gettok($active,1,32))) { set -u0 %sBiasa-nickcomp.phrase $1-
n208= if ($2 != $null) && (($right($1,1) == $chr(58)) || ($right($1,1) == $chr(59))) {
n209= set -u0 %sBiasa-nickcomp.token $right($1,1) | var %sBiasa-nickcomp.curnick = 0, %sBiasa-nickcomp.length = $calc($len($1) - 1)
n210= :sncinploop | inc %sBiasa-nickcomp.curnick 1 | if (%sBiasa-nickcomp.curnick > $nick($active,0)) { goto sncinpend }
n211= set -u0 %sBiasa-nickcomp.curreal $nick($active,%sBiasa-nickcomp.curnick)
n212= if ($left($1,%sBiasa-nickcomp.length) isin $left(%sBiasa-nickcomp.curreal,%sBiasa-nickcomp.length)) {
n213= set -u0 %sBiasa-nickcomp.nick %sBiasa-nickcomp.curreal $+ %sBiasa-nickcomp.token
n214= set -u0 %sBiasa-nickcomp.phrase $2- | goto sncinpend
n215= }
n216= goto sncinploop
n217= }
n218= :sncinpend
n219= if (%sBiasa-nickcomp.nick != $null) { set -u0 %sBiasa-input.rtext.match $true | set -u0 %sBiasa-nickcomp.nick.nc $sBiasa.nickcomp.format(%sBiasa-nickcomp.nick) }
n220= else { set -u0 %sBiasa-input.rtext.match $false }
n221= if (%sBiasa-nickcomp.phrase != $null) { set -u0 %sBiasa-input.bisa.di.ctext %sBiasa-nickcomp.phrase }
n222= }
n223= if (1 isin $mid(%sBiasa-rtext_data,2,5)) {
n224= sBiasa.rtext.chk.data
n225= if ($sBiasa.main(8)) && (%sBiasa-nickcomp.nick) { set -u0 %sBiasa-input.awal %sBiasa-nickcomp.phrase
n226= if (%sBiasa-nickcomp.phrase != $null) { set -u0 %sBiasa-input.isi %sBiasa-nickcomp.phrase }
n227= else { set -u0 %sBiasa-input.isi $2- }
n228= }
n229= else { set -u0 %sBiasa-input.isi $2- }
n230= if (%sBiasa-input.rtext.match) { set -u0 %sBiasa-rtext.temp $2- }
n231= else { set -u0 %sBiasa-rtext.temp $1- }
n232= if ($sBiasa.rtext(4)) { set -u0 %sBiasa-rtext.temp $left($sBiasa.rtext.nt(%sBiasa-rtext.temp),500) }
n233= if ($sBiasa.rtext(5)) { set -u0 %sBiasa-rtext.temp $left($sBiasa.rtext.asc(%sBiasa-rtext.temp),500) }
n234= if ($sBiasa.rtext(2)) { set -u0 %sBiasa-rtext.temp $left($sBiasa.rtext.rbu(%sBiasa-rtext.temp),500) }
n235= if ($sBiasa.rtext(3)) { set -u0 %sBiasa-rtext.temp $left($sBiasa.rtext.rt(%sBiasa-rtext.temp),500) }
n236= if ($sBiasa.rtext(6)) { set -u0 %sBiasa-rtext.temp $left($sBiasa.rtext.rb1(%sBiasa-rtext.temp),500) }
n237= if (*.undernet.org iswm $server) { set -u0 %sBiasa-rtext.temp $left(%sBiasa-rtext.temp,300) }
n238= if (%sBiasa-input.rtext.match) { set -u0 %sBiasa-input.say %sBiasa-nickcomp.nick.nc %sBiasa-rtext.temp }
n239= else { set -u0 %sBiasa-input.say %sBiasa-rtext.temp }
n240= if (*.undernet.org iswm $server) { set -u0 %sBiasa-input.say $left(%sBiasa-input.say,300) }
n241= if (%sBiasa-input.say != $null) { /say %sBiasa-input.say | halt }
n242= :rtextend
n243= }
n244= if ($sBiasa.main(8)) && (($active ischan) || ($chan ischan) || (# ischan) || ($me ison $gettok($active,1,32))) {
n245= else { set -u0 %sBiasa-input.say $1- }
n246= if (*.undernet.org iswm $server) { set -u0 %sBiasa-input.say $left(%sBiasa-input.say,300) }
n247= if (%sBiasa-input.say != $null) { /say %sBiasa-input.say | halt }
n248= } }
n249= unset %sBiasa-nickcomp.* %sBiasa-rtext.* %sBiasa-input.*
n250=}