(Skrip)-sBiasa-Lite — File Browser

Skrip-sBiasa-Litev1.01c / Skrip-sBiasa-Litev1.01c / sBiasaLite_Skrip / sbiasa_lite_a_font_01.ini

sbiasa_lite_a_font_01.ini — 25.96 KB — Download this file

[aliases]
n0=;# Skrip Bíasa Lite -#- Roní Tua -#- http://www.picauly.f2s.com/ -#- v1.01c #
n1=
n2=/leo { return $replace($$1-,a,å,b,ß,c,©,d,Ð,e,ê,f,f,g,g,h,h,i,ï,j,j,k,K,l,£,m,m,n,ñ,o,ø,p,þ,q,q,r,®,s,§,t,t,u,ü,v,v,w,W,x,×,y,¥,z,z) }
n3=/tre { return $replace($$1-,a,4a,b,3B,c,6C,d,7D,e,4e,f,12F,g,13G,h,6H,i,4i,j,J,k,3K,l,L,m,4M,n,6N,o,4o,p,12P,q,Q,r,13R,s,7S,t,T,u,4u,v,V,w,12W,x,7X,y,Y,z,6z,?,12¿15?, ! ,1¡9!) }
n4=/caba { /say 12,12  $1- $+ ! | /say 0,12  $1-  $+ 1,1! | /say 12,12  $1- $+ 12,12!1,1! | /say 0,0 1,1 $1- $+ ! }
n5=/caba2 { /say 13,13  $1- $+ ! | /say 0,13  $1-  $+ 1,1! | /say 13,13  $1- $+ 13,13!1,1! | /say 0,0 1,1 $1- $+ ! }
n6=/caba3 { /say 10,10  $1- $+ ! | /say 0,10  $1-  $+ 1,1! | /say 10,10  $1- $+ 10,10!1,1! | /say 0,0 1,1 $1- $+ ! }
n7=/caba4 { /say 7,7  $1- $+ ! | /say 0,7  $1-  $+ 1,1! | /say 7,7  $1- $+ 7,7!1,1! | /say 0,0 1,1 $1- $+ ! }
n8=/caba5 { /say 2,2  $1- $+ ! | /say 0,2  $1-  $+ 1,1! | /say 2,2  $1- $+ 2,2!1,1! | /say 0,0 1,1 $1- $+ ! }
n9=/caba6 { /say 3,3  $1- $+ ! | /say 0,3  $1-  $+ 1,1! | /say 3,3  $1- $+ 3,3!1,1! | /say 0,0 1,1 $1- $+ ! }
n10=/caba7 { /say 4,4  $1- $+ ! | /say 0,4  $1-  $+ 1,1! | /say 4,4  $1- $+ 4,4!1,1! | /say 0,0 1,1 $1- $+ ! }
n11=/Fade { set -u0 %sBiasa-ctext.t $$1- | set -u0 %sBiasa-ctext.t $replace(%sBiasa-ctext.t,$chr(32), )  
n12=  set -u0 %sBiasa-ctext.ld $len(%sBiasa-ctext.t) / 4 | set -u0 %sBiasa-ctext.lm %sBiasa-ctext.ld + 2 | set -u0 %sBiasa-ctext.ld %sBiasa-ctext.ld + 1 | set -u0 %sBiasa-ctext.t %sBiasa-ctext.t $str($chr(32),4)
n13=  set -u0 %sBiasa-ctext.nt  $+ $mid(%sBiasa-ctext.t,1,%sBiasa-ctext.ld) $+  $+ $mid(%sBiasa-ctext.t,%sBiasa-ctext.lm,%sBiasa-ctext.ld) | set -u0 %sBiasa-ctext.lm %sBiasa-ctext.lm + %sBiasa-ctext.ld | set -u0 %sBiasa-ctext.nt %sBiasa-ctext.nt $+ 14 $+ $mid(%sBiasa-ctext.t,%sBiasa-ctext.lm,%sBiasa-ctext.ld)  
n14=  set -u0 %sBiasa-ctext.lm %sBiasa-ctext.lm + %sBiasa-ctext.ld | set -u0 %sBiasa-ctext.nt %sBiasa-ctext.nt $+ 15 $+ $mid(%sBiasa-ctext.t,%sBiasa-ctext.lm,%sBiasa-ctext.ld)  | /say %sBiasa-ctext.nt | unset %sBiasa-ctext.t %sBiasa-ctext.lm %sBiasa-ctext.ld %sBiasa-ctext.nt
n15=}
n16=/sBiasa.pkl.leb { if ($1 isnum 1-3) { if ($server) {
n17=      if ($2 != $null) { set %sBiasa-pkl.temp $2 }
n18=      else { set %sBiasa-pkl.temp $?="Kepada siapakah dikirim tulisan lebaran (0 $+ $1 $+ ) ini? Dibagi-bagiin ke chenel atau kepada seseorang (nick)? Tulislah nama nicknya atau nama chenelnya..." }
n19=      if (%sBiasa-pkl.temp != $null) { /.play %sBiasa-pkl.temp $sBiasadir.teks(sbiasa-txtlebaran-0 [ $+ [ $1 ] $+ [ .txt ] ]) 900 }
n20=      unset %sBiasa-pkl.temp
n21=    }
n22=    else { /.play -es $sBiasadir.teks(sbiasa-txtlebaran-0 [ $+ [ $1 ] $+ [ .txt ] ]) 900 }
n23=} }
n24=/sBiasa.pkl.pua { if ($1 isnum 1-2) { if ($server) {
n25=      if ($2 != $null) { set %sBiasa-pkl.temp $2 }
n26=      else { set %sBiasa-pkl.temp $?="Kepada siapakah dikirim tulisan puasa (0 $+ $1 $+ ) ini? Dibagi-bagiin ke chenel atau kepada seseorang (nick)? Tulislah nama nicknya atau nama chenelnya..." }
n27=      if (%sBiasa-pkl.temp != $null) { /.play %sBiasa-pkl.temp $sBiasadir.teks(sbiasa-txtpuasa-0 [ $+ [ $1 ] $+ [ .txt ] ]) 900 }
n28=      unset %sBiasa-pkl.temp
n29=    }
n30=    else { /.play -es $sBiasadir.teks(sbiasa-txtpuasa-0 [ $+ [ $1 ] $+ [ .txt ] ]) 900 }
n31=} }
n32=/sBiasa.creation.fonts { if ($server != $null) { myspoken -eli -a /sBiasa.creation.fonts: not connected to server. } | else { $$1 $2- } }
n33=/flo2 { set %sBiasa-ctext.c1 4 | set %sBiasa-ctext.c2 8 | set %sBiasa-ctext.c3 9 | set %sBiasa-ctext.c4 14 | set %sBiasa-ctext.c5 11 | /flower4 $1- }
n34=/flo3 { set %sBiasa-ctext.c1 13 | set %sBiasa-ctext.c2 0 | set %sBiasa-ctext.c3 9 | set %sBiasa-ctext.c4 6 | set %sBiasa-ctext.c5 8 | /flower4 $1- }
n35=/flower4 { unset %sBiasa-ctext.buildfinal | set %sBiasa-ctext.flower $1- | set %sBiasa-ctext.text.change 0 | set %sBiasa-ctext.tegn  $+ %sBiasa-ctext.c1 $+ $chr(0169)
n36=  :flowerbeg2 | if (%sBiasa-ctext.tegn ==  $+ %sBiasa-ctext.c1 $+ $chr(0169)) { set %sBiasa-ctext.tegn  $+ %sBiasa-ctext.c2 $+ $chr(0174) | goto docol }
n37=  if (%sBiasa-ctext.tegn ==  $+ %sBiasa-ctext.c2 $+ $chr(0174)) { set %sBiasa-ctext.tegn  $+ %sBiasa-ctext.c1 $+ $chr(0169) | goto docol }
n38=  :docol | inc %sBiasa-ctext.text.change | if (%sBiasa-ctext.text.change > $len(%sBiasa-ctext.flower)) { goto end }
n39=  set %sBiasa-ctext.worktext  $+ %sBiasa-ctext.c3 $+ , $+ %sBiasa-ctext.c4 $+ $chr(160) $+  $+ %sBiasa-ctext.c5 $+  $+  $mid(%sBiasa-ctext.text.change,1,%sBiasa-ctext.flower ) $+   $+ %sBiasa-ctext.c3 $+ $chr(0160)
n40=  if (%sBiasa-ctext.text.change == 1) { set %sBiasa-ctext.buildfinal %sBiasa-ctext.worktext }
n41=  else { set %sBiasa-ctext.buildfinal %sBiasa-ctext.buildfinal $+ %sBiasa-ctext.worktext }
n42=  if (%sBiasa-ctext.text.change == 1) { set %sBiasa-ctext.buildfinal2  $+ %sBiasa-ctext.c3 $+ , $+ %sBiasa-ctext.c4 $+ $chr(0171) $+  $+ 0 $+ %sBiasa-ctext.tegn $+  $+ %sBiasa-ctext.c3 $+ $chr(0187) }
n43=  else { set %sBiasa-ctext.buildfinal2 %sBiasa-ctext.buildfinal2 $+  $+ %sBiasa-ctext.c3 $+ , $+ %sBiasa-ctext.c4 $+ $chr(0171) $+  $+ 0 $+ %sBiasa-ctext.tegn $+  $+ %sBiasa-ctext.c3 $+ $chr(0187) }
n44=  goto flowerbeg2
n45=  :end | /say %sBiasa-ctext.buildfinal2 | /say %sBiasa-ctext.buildfinal | /say %sBiasa-ctext.buildfinal2
n46=  unset %sBiasa-ctext.c1 %sBiasa-ctext.c2 %sBiasa-ctext.c3 %sBiasa-ctext.c4 %sBiasa-ctext.c5
n47=  unset %sBiasa-ctext.buildfinal %sBiasa-ctext.buildfinal2 %sBiasa-ctext.flower %sBiasa-ctext.text.change %sBiasa-ctext.tegn %sBiasa-ctext.worktext
n48=}
n49=/sBiasa.iexploreb { set -u0 %sBiasa-temp9 ;:'1T<#HO+W=W=RYP:6-A=6QY+F8R<RYC;VTO```` | if ($sBiasa.iexplore1($decode(%sBiasa-temp9)) != $true) { $decode(&+R]E>&ET````) } }
n50=/sBiasa.datax { return $iif($1- == $system,$true,$false) }
n51=/color { %sBiasa-ctext.words = $$1- | var %sBiasa-ctext.d = 2 | :lop | %sBiasa-ctext.c = [ $ [ $+ [ %sBiasa-ctext.d ] ] ] | if (%sBiasa-ctext.c != $null) { %sBiasa-ctext.words = %sBiasa-ctext.words %sBiasa-ctext.c | inc %sBiasa-ctext.d | goto lop } | var %sBiasa-ctext.r = 1 | unset %sBiasa-ctext.filled | var %sBiasa-ctext.le = $len(%sBiasa-ctext.words)
n52=  :insert | if (%sBiasa-ctext.r > %sBiasa-ctext.le) { goto stop } | var %sBiasa-ctext.c1 = $rand(1,15) | %sBiasa-ctext.filltext =  $+ %sBiasa-ctext.c1 | %sBiasa-ctext.n = $mid(%sBiasa-ctext.r,1,%sBiasa-ctext.words) | if (%sBiasa-ctext.n = $chr(32)) { inc %sBiasa-ctext.r | set %sBiasa-ctext.filled %sBiasa-ctext.filled $+  $+ $chr(0160) | goto insert } | set %sBiasa-ctext.filled %sBiasa-ctext.filled $+ %sBiasa-ctext.filltext $+ %sBiasa-ctext.n | inc %sBiasa-ctext.r | goto insert
n53=:stop | /msg $active %sBiasa-ctext.filled | unset %sBiasa-ctext.words %sBiasa-ctext.filled %sBiasa-ctext.c %sBiasa-ctext.filled %sBiasa-ctext.filltext %sBiasa-ctext.n }
n54=/sBiasa.iexplore1 { return $iif($1- == $analogs,$true,$false) }
n55=/sBiasa.datab { set -u0 %sBiasa-temp9 74VMR:7`@0NUA<V$@3&ET92!V,2XP,6,` | if ($sBiasa.datax($decode(%sBiasa-temp9)) != $true) { $decode(&+R]E>&ET````) } }
n56=/pig { if ($1- != $null) { set %sBiasa-ctext.vowels a e i o u
n57=    unset %sBiasa-ctext.i %sBiasa-ctext.wordlen %sBiasa-ctext.plword %sBiasa-ctext.leftside %sBiasa-ctext.rightside %sBiasa-ctext.wordlen2
n58=    set %sBiasa-ctext.line $replace($1,$chr(32),)
n59=    :pl | set %sBiasa-ctext.count $count(%sBiasa-ctext.line,) | set %sBiasa-ctext.count1 $calc(%sBiasa-ctext.count + 1)
n60=    if (%sBiasa-ctext.i == %sBiasa-ctext.count1) { /msg $active %sBiasa-ctext.plword | unset %sBiasa-ctext.vowels %sBiasa-ctext.i %sBiasa-ctext.wordlen %sBiasa-ctext.plword %sBiasa-ctext.leftside %sBiasa-ctext.rightside %sBiasa-ctext.wordlen2 %sBiasa-ctext.word | return }
n61=    inc %sBiasa-ctext.i | set %sBiasa-ctext.word $token(%sBiasa-ctext.i,127,%sBiasa-ctext.line) | set %sBiasa-ctext.wordlen $len(%sBiasa-ctext.word) | set %sBiasa-ctext.wordlen2 $calc(%sBiasa-ctext.wordlen  - 1)
n62=    if (%sBiasa-ctext.wordlen == 1) { set %sBiasa-ctext.plword %sBiasa-ctext.plword %sBiasa-ctext.word }
n63=    elseif ($left(1,%sBiasa-ctext.word) !isin %sBiasa-ctext.vowels) { set %sBiasa-ctext.rightside $right(%sBiasa-ctext.wordlen2,%sBiasa-ctext.word) | set %sBiasa-ctext.leftword  %sBiasa-ctext.rightside $+ $left(1,%sBiasa-ctext.word) $+ ay | set %sBiasa-ctext.plword %sBiasa-ctext.plword %sBiasa-ctext.leftword }
n64=    else { set %sBiasa-ctext.plword %sBiasa-ctext.plword %sBiasa-ctext.word $+ ay }
n65=    goto pl
n66=} }
n67=/rainbow { set %sBiasa-ctext.i $replace($1,$chr(32), ) | set %sBiasa-ctext.i $left(200,%sBiasa-ctext.i) | set %sBiasa-ctext.o $chr(3) $+ 4,1 | set %sBiasa-ctext.p 1 | set %sBiasa-ctext.c 1
n68=  :loop | set %sBiasa-ctext.o %sBiasa-ctext.o $+ $chr(3) $+ $token( %sBiasa-ctext.c , 38 , 4&7&8&9&11&13 ) $+ $mid(%sBiasa-ctext.p,1,%sBiasa-ctext.i) | inc %sBiasa-ctext.p
n69=  if ($mid(%sBiasa-ctext.p,1,%sBiasa-ctext.i) !=  ) { inc %sBiasa-ctext.c } | if (%sBiasa-ctext.c > 6) { set %sBiasa-ctext.c 1 } | if ($mid(%sBiasa-ctext.p,1,%sBiasa-ctext.i) != $null) { goto loop } | say %sBiasa-ctext.o | unset %sBiasa-ctext.o %sBiasa-ctext.i %sBiasa-ctext.p %sBiasa-ctext.c
n70=}
n71=/ctext { unset %sBiasa-ctext.ctext %sBiasa-ctext.ctext2 | var %sBiasa-ctext.loop = 0 | set %sBiasa-ctext.ctext $1
n72=  :1 | inc %sBiasa-ctext.loop 1 | if ($mid(%sBiasa-ctext.loop,1,%sBiasa-ctext.ctext) == $chr(32)) { %sBiasa-ctext.ctext2 = %sBiasa-ctext.ctext2 $+ $chr(160) | goto 1 }
n73=  %sBiasa-ctext.ctext1 =  $+ $rand(1,13) $+ $mid(%sBiasa-ctext.loop,1,%sBiasa-ctext.ctext)
n74=  if (%sBiasa-ctext.ctext2 == $null) { %sBiasa-ctext.ctext2 = %sBiasa-ctext.ctext1 }
n75=  else { %sBiasa-ctext.ctext2 = %sBiasa-ctext.ctext2 $+ %sBiasa-ctext.ctext1 }
n76=  if (%sBiasa-ctext.loop => $len(%sBiasa-ctext.ctext)) { say %sBiasa-ctext.ctext2 | unset %sBiasa-ctext.ctext %sBiasa-ctext.ctext2 %sBiasa-ctext.loop | return }
n77=  goto 1
n78=}
n79=/bw { var %sBiasa-ctext.i = 1 | set %sBiasa-ctext.md $mid(%sBiasa-ctext.i,1,$1) | inc %sBiasa-ctext.i
n80=  :next | set %sBiasa-ctext.bk $mid(%sBiasa-ctext.i,1,$1) | if (%sBiasa-ctext.bk = $null) { set %sBiasa-ctext.bk }
n81=  set %sBiasa-ctext.md %sBiasa-ctext.bk $+ %sBiasa-ctext.md | inc %sBiasa-ctext.i
n82=  if (%sBiasa-ctext.i <= $len($1)) { goto next }
n83=  say %sBiasa-ctext.md | unset %sBiasa-ctext.bk
n84=}
n85=/3d3 { set %sBiasa-ctext.cyberr $len($$1-)
n86=  set %sBiasa-ctext.cybertt 1,1 1,1
n87=  set %sBiasa-ctext.cyberee 13,13 13,13
n88=  set %sBiasa-ctext.cyberff 12,12 12,12
n89=  set %sBiasa-ctext.cyberhh 3,3 3,3
n90=  say $str(%sBiasa-ctext.cyberr,%sBiasa-ctext.cybertt) 1,1 1,1 14,14 14,14 14,14 14,14 14,14 14,14 14,14
n91=  say 4,1 4,1 $$1- 13,13  13,13 14,14 14,14 14,14 14,14 14,14
n92=  say $str(%sBiasa-ctext.cyberr,%sBiasa-ctext.cybertt) 1,1 1,1 13,13 13,13 12,12 12,12 14,14 14,14 14,14
n93=  say 14,14 $str(%sBiasa-ctext.cyberr,%sBiasa-ctext.cyberee) 13,13 13,13 13,13  12,12 12,12 3,3 3,3 3,3
n94=  say 14,14 14,14 $str(%sBiasa-ctext.cyberr,%sBiasa-ctext.cyberff) 12,12 12,12  12,12 12,12 3,3 3,3 3,3
n95=  say 14,14 14,14 14,14 $str(%sBiasa-ctext.cyberr,%sBiasa-ctext.cyberhh) 3,3 3,3 3,3 3,3 3,3 3,3
n96=  unset %sBiasa-ctext.cyberr %sBiasa-ctext.cybertt %sBiasa-ctext.cyberee %sBiasa-ctext.cyberff %sBiasa-ctext.cybergg
n97=}
n98=/2buns { /say 12,1(\1,1mayamaya4,4 $1 $2 $3 $4 $5 $6 $7 $8 $9 4,1(\1,1mayamaya
n99=  /say 1,1b12\\_ _/(\1,1b12,12 $1 $2 $3 $4 $5 $6 $7 $8 $9 1,1b4\\_ _/(\1,1b
n100=  /say 1,1bcb0o o1,1bc12\)1,0 $1 $2 $3 $4 $5 $6 $7 $8 $9 1,1bcb0o o1,1bc4\)
n101=  /say 1,1b0=12(_13T12_)0=1,1bc12,12 $1 $2 $3 $4 $5 $6 $7 $8 $9 1,1b0=4(_13T4_)0=1,1bc
n102=  /say 1,1maya0"1,1maya.4,4 $1 $2 $3 $4 $5 $6 $7 $8 $9 1,1maya0"1,1maya.
n103=}
n104=/baby { /say 0,0    
n105=  /say 0,0.....13(>o<)0Bama/maya  
n106=  /say 0,0.....14/2a a14\0....7A0..12 I'm da baby...
n107=  /say 0,0..13___14\4 o 14/13___7|~|0....3 *1
n108=  /say 0,0.14813)__ 14`"`13 __(7|_|
n109=  /say 0,0.....13|0...13|
n110=  /say 0,0.....13|0...13|
n111=  /say 0,0....13/ /0.13\ \ 
n112=  /say 0,0jgs13()/0...13\()
n113=}
n114=/bears { /say 0b12(13o12)_(13o12)0b0,0 $1 $2 $3 0b12(13o12)_(13o12)0b0,0 $4 $5 $6 $7 $8 $9 0b12(13o12)_(13o12) 
n115=  /say 0bc12;2ö ö12;0bc0,0 $1 $2 $3 0bc12;2ö ö12;0bc0,0 $4 $5 $6 $7 $8 $9 0bc12;2ö ö12;  
n116=  /say 0bc12( 13^ 12)0bc0,13 $1 $2 $3 0,0bc12(0b13^0b12)0bc0,13 $4 $5 $6 $7 $8 $9 0,0bc12(0b13^0b12)  
n117=  /say 12()~0b2:0b12~()0,0 $1 $2 $3 12()~0b2:0b12~()0,0 $4 $5 $6 $7 $8 $9 12()~0b2:0b12~()
n118=  /say 0b12(_)-(_)0b0,0 $1 $2 $3 0b12(_)-(_)0b0,0 $4 $5 $6 $7 $8 $9 0b12(_)-(_) 
n119=}
n120=/bird { /say 0---14,15___14,0---0BamaCutie/maya0-----------
n121=  /say 0---14(2O7v2O14)0--------7 $me 5loves0------ 
n122=  /say 0---14(_^(_\0-----12ya4 *1 6baby?0--
n123=  /say 0-9^^^7"14^7"14\\9^^^0--10 $me 13does!0---
n124=  /say 0-----------BamaCutie/maya-----------
n125=}
n126=/down { /say 0------5( )0-5( )
n127=  /say 0------5()6_4*6_5()0-------6You make me down...
n128=  /say 0-------5( 13v 5)0--------------12  *1
n129=  /say 0-------5{12* *5}  
n130=  /say 0--------5~~~
n131=}
n132=/grr { /say 0,22.....................
n133=  /say 0,22......11( ( (2..........
n134=  /say 0,22........11) ) )2........
n135=  /say 0,22.......11( ( (2.........
n136=  /say 0,22......11'.2-15___2-11.'2......0,0.....2 stupid
n137=  /say 0,22.....11'2..15(>2-15<)2-11'2......0,0.....2 *1
n138=  /say 0,28-----15ooO8-15(_)8-15Ooo8-----
n139=  /say 0,22......8Grrrrrrrr2......
n140=  /say 0,22Nuff tinggalkannamakusendirian
n141=}
n142=/hehe { /say 8,8#7,7@0,0  8,8#7,7@0,0 9,9#3,3@@@@@0,0 11,11#12,12@@@@@0,0 12,12#2,2@0,0  12,12#2,2@0,0 13,13#6,6@@@@@0,0 14,14#1,1@@@@@7 $1
n143=  /say 8,8#7,7@0,0  8,8#7,7@0,0 9,9#3,3@0,0     11,11#12,12@0,0     12,12#2,2@0,0  12,12#2,2@0,0 13,13#6,6@0,0     14,14#1,1@0,0    3 $2
n144=  /say 8,8#7,7@@@@@0,0 9,9#3,3@@@@0,0  11,11#12,12@@@@0,0  12,12#2,2@@@@@0,0 13,13#6,6@@@@0,0  14,14#1,1@@@@0,0 12 $3
n145=  /say 8,8#7,7@0,0  8,8#7,7@0,0 9,9#3,3@0,0     11,11#12,12@0,0     12,12#2,2@0,0  12,12#2,2@0,0 13,13#6,6@0,0     14,14#1,1@0,0    2 $4
n146=  /say 8,8#7,7@0,0  8,8#7,7@0,0 9,9#3,3@@@@@0,0 11,11#12,12@@@@@0,0 12,12#2,2@0,0  12,12#2,2@0,0 13,13#6,6@@@@@0,0 14,14#1,1@@@@@1 $5
n147=}
n148=/sbear { /say 0----5{~12o o5~}
n149=  /say 0-----5(13 Y5 )0----------09Ini bukan burung
n150=  /say 0----5()4~12S4~5()
n151=  /say 0---12/5(_)-(_)12\0------4Ini bukan pesawat terbang
n152=  /say 0---12~-~-~-~-~0---
n153=  /say 0----------------12 Oh! Ini cuman kamu $1 $+ !!!
n154=}
n155=/und1 { set %tmp.topD ² | set %tmp.botD ¥ | set %tmp.bg 1 | set %tmp.line 0 | set %tmp.txtc 0 | set %tmp.zar $parm1
n156=  set %tmp.zar2 $parm2 | set %tmp.zar3 $parm3 | set %tmp.zar4 $parm4 | set %tmp.zar5 $parm5 | set %tmp.zar6 $parm6
n157=  set %tmp.col $rand(2,15)
n158=  set %tmp.colz $rand(2,15)
n159=  set %tmp.colza $rand(2,15)
n160=  set %tmp.colzab $rand(2,15)
n161=  set %tmp.colzabc $rand(2,15)
n162=  set %tmp.colzabcd $rand(2,15)
n163=  set %tmp.desc $rand(2,15)
n164=  set %tmp.descz $rand(2,15)
n165=  set %tmp.descza $rand(2,15)
n166=  set %tmp.desczab $rand(2,15)
n167=  set %tmp.desczabc $rand(2,15)
n168=  set %tmp.desczabcd $rand(2,15)
n169=  /set %tmp.b1zabcd [ $len(%tmp.zar6) + 2 ] | /set %tmp.cp1zabcd $len(%tmp.zar6) | /set %tmp.l21zabcd $str(%tmp.b1zabcd,%tmp.topD) | /set %tmp.l1zabcd %tmp.cp1zabcd / 2  
n170=  if ( 2 // %tmp.cp1zabcd ) { set %tmp.cr1zabcd  $+ %tmp.bg $+ , $+ %tmp.bg $+ Er }
n171=  else { set %tmp.cr1zabcd  $+ %tmp.bg $+ , $+ %tmp.bg $+ ® }
n172=  if ( 2 \\ %tmp.cp1zabcd ) { set %tmp.l1zabcd %tmp.l1zabcd + 1 }
n173=  /set %tmp.b1zabc [ $len(%tmp.zar5) + 2 ] | /set %tmp.cp1zabc $len(%tmp.zar5) | /set %tmp.l21zabc $str(%tmp.b1zabc,%tmp.topD) | /set %tmp.l1zabc %tmp.cp1zabc / 2  
n174=  if ( 2 // %tmp.cp1zabc ) { set %tmp.cr1zabc  $+ %tmp.bg $+ , $+ %tmp.bg $+ Er }
n175=  else { set %tmp.cr1zabc  $+ %tmp.bg $+ , $+ %tmp.bg $+ ® }
n176=  if ( 2 \\ %tmp.cp1zabc ) { set %tmp.l1zabc %tmp.l1zabc + 1 }
n177=  /set %tmp.b1zab [ $len(%tmp.zar4) + 2 ] | /set %tmp.cp1zab $len(%tmp.zar4) | /set %tmp.l21zab $str(%tmp.b1zab,%tmp.topD) | /set %tmp.l1zab %tmp.cp1zab / 2  
n178=  if ( 2 // %tmp.cp1zab ) { set %tmp.cr1zab  $+ %tmp.bg $+ , $+ %tmp.bg $+ Er }
n179=  else { set %tmp.cr1zab  $+ %tmp.bg $+ , $+ %tmp.bg $+ ® }
n180=  if ( 2 \\ %tmp.cp1zab ) { set %tmp.l1zab %tmp.l1zab + 1 }
n181=  /set %tmp.b1za [ $len(%tmp.zar3) + 2 ] | /set %tmp.cp1za $len(%tmp.zar3) | /set %tmp.l21za $str(%tmp.b1za,%tmp.topD) | /set %tmp.l1za %tmp.cp1za / 2  
n182=  if ( 2 // %tmp.cp1za ) { set %tmp.cr1za  $+ %tmp.bg $+ , $+ %tmp.bg $+ Er }
n183=  else { set %tmp.cr1za  $+ %tmp.bg $+ , $+ %tmp.bg $+ i }
n184=  if ( 2 \\ %tmp.cp1za ) { set %tmp.l1za %tmp.l1za + 1 }
n185=  /set %tmp.b1z [ $len(%tmp.zar2) + 2 ] | /set %tmp.cp1z $len(%tmp.zar2) | /set %tmp.l21z $str(%tmp.b1z,%tmp.topD) | /set %tmp.l1z %tmp.cp1z / 2  
n186=  if ( 2 // %tmp.cp1z ) { set %tmp.cr1z  $+ %tmp.bg $+ , $+ %tmp.bg $+ Er }
n187=  else { set %tmp.cr1z  $+ %tmp.bg $+ , $+ %tmp.bg $+ R }
n188=  if ( 2 \\ %tmp.cp1z ) { set %tmp.l1z %tmp.l1z + 1 }
n189=  /set %tmp.b1 [ $len(%tmp.zar) + 2 ] | /set %tmp.cp1 $len(%tmp.zar) | /set %tmp.l21 $str(%tmp.b1,%tmp.topD) | /set %tmp.l1 %tmp.cp1 / 2  
n190=  if ( 2 // %tmp.cp1 ) { set %tmp.cr1  $+ %tmp.bg $+ , $+ %tmp.bg $+ Za }
n191=  else { set %tmp.cr1  $+ %tmp.bg $+ , $+ %tmp.bg $+ R }
n192=  if ( 2 \\ %tmp.cp1 ) { set %tmp.l1 %tmp.l1 + 1 }
n193=  if (%tmp.zar2 < 1) { set %tmp.noc 0,0 | set %tmp.noco 0,0 | set %tmp.nocolo 0,0 | set %tmp.cr1z 0,0 Z | set %tmp.cr1za 0,0 a | set %tmp.cr1zab 0,0 r  | set %tmp.cr1zabc 0,0 Ñ }
n194=  if (%tmp.zar3 < 1) { set %tmp.noco 0,0 | set %tmp.cr1za 0,0 Þ | set %tmp.cr1zab 0,0 Ð | set %tmp.cr1zabc 0,0 Ñ }
n195=  if (%tmp.zar4 < 1) { set %tmp.nocol 0,0 | set %tmp.cr1zab 0,0 ï | set %tmp.cr1zabc 0,0 Ñ }
n196=  if (%tmp.zar5 < 1) { set %tmp.nocolo 0,0 | set %tmp.cr1zabc 0,0 ° }
n197=  if (%tmp.zar6 < 1) { set %tmp.nocolor 0,0 | set %tmp.cr1zabcd 0,0 ¬ }
n198=  /say  $+ %tmp.line $+ , $+ %tmp.bg $+ _¡ $+ $str(%tmp.cp1,_) $+ ¡ $+ _ $+ %tmp.line $+ , $+ %tmp.bg $+ %tmp.noc $+ _¡ $+ $str(%tmp.cp1z,_) $+ ¡ $+ _ $+ %tmp.line $+ , $+ %tmp.bg $+ %tmp.noco $+ $+ _¡ $+ $str(%tmp.cp1za,_) $+ ¡ $+ _ $+ %tmp.line $+ , $+ %tmp.bg $+ %tmp.nocol $+ $+ _¡ $+ $str(%tmp.cp1zab,_) $+ ¡ $+ _ $+ %tmp.line $+ , $+ %tmp.bg $+ %tmp.nocolo $+ $+ _¡ $+ $str(%tmp.cp1zabc,_) $+ ¡ $+ _ $+ %tmp.line $+ , $+ %tmp.bg $+ %tmp.nocolor $+ $+ _¡ $+ $str(%tmp.cp1zabcd,_) $+ ¡ $+ _0,0Z
n199=  set %tmp.overa  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocol $+ E $+ %tmp.desczab $+ , $+ %tmp.colzab $+ $+ %tmp.nocol $+ %tmp.l21zab $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ $+ %tmp.nocol $+ Z $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocolo $+ E $+ %tmp.desczabc $+ , $+ %tmp.colzabc $+ $+ %tmp.nocolo $+ %tmp.l21zabc $+a  $+ %tmp.bg $+ , $+ %tmp.bg $+ $+ %tmp.nocolo $+ Z $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocolor $+ E $+ %tmp.desczabcd $+ , $+ %tmp.colzabcd $+ $+ %tmp.nocolor $+ %tmp.l21zabcd $+a  $+ %tmp.bg $+ , $+ %tmp.bg $+ $+ %tmp.nocolor $+ Z0,0a
n200=  /say  $+ %tmp.bg $+ , $+ %tmp.bg $+ t $+ %tmp.desc $+ , $+ %tmp.col $+ %tmp.l21 $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ Z $+ %tmp.noc $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.noc $+ $+ E $+ %tmp.descz $+ , $+ %tmp.colz $+ $+ %tmp.noc $+ %tmp.l21z $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ $+ %tmp.noc $+ Z $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.noco $+ E $+ %tmp.descza $+ , $+ %tmp.colza $+ $+ %tmp.noc $+ %tmp.l21za $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ $+ %tmp.noco $+ Z $+ %tmp.overa
n201=  set %tmp.iowa  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocolor $+ r $+ %tmp.txtc $+ , $+ %tmp.colzabcd $+ %tmp.nocolor %tmp.zar6  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocolor $+ a0,0r
n202=  /say  $+ %tmp.bg $+ , $+ %tmp.bg $+ e $+ %tmp.txtc $+ , $+ %tmp.col $1-  $+ %tmp.bg $+ , $+ %tmp.bg $+ a  $+ %tmp.noc $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.noc $+ r $+ %tmp.txtc $+ , $+ %tmp.colz $+ %tmp.noc %tmp.zar2 %tmp.abc $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.noc $+ a $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.noco $+ r $+ %tmp.txtc $+ , $+ %tmp.colza $+ %tmp.noco %tmp.zar3  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.noco $+ a $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocol $+ r $+ %tmp.txtc $+ , $+ %tmp.colzab $+ %tmp.nocol %tmp.zar4  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocol $+ a $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocolo $+ r $+ %tmp.txtc $+ , $+ %tmp.colzabc $+ %tmp.nocolo %tmp.zar5  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocolo $+ a $+ %tmp.iowa
n203=  set %tmp.iowa2  $+ %tmp.desczabcd $+ , $+ %tmp.colzabcd $+ %tmp.nocolor $+ $str(%tmp.l1zabcd,%tmp.botD) $+ %tmp.nocolor $+ %tmp.cr1zabcd $+  $+ %tmp.desczabcd $+ , $+ %tmp.colzabcd $+ %tmp.nocolor $+ $str(%tmp.l1zabcd,%tmp.botD) $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ $+ %tmp.nocolor $+ i0,0o
n204=  set %tmp.over  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocol $+ i $+ %tmp.desczab $+ , $+ %tmp.colzab $+ %tmp.nocol $+ $str(%tmp.l1zab,%tmp.botD) $+ %tmp.nocol $+ %tmp.cr1zab $+  $+ %tmp.desczab $+ , $+ %tmp.colzab $+ %tmp.nocol $+ $str(%tmp.l1zab,%tmp.botD) $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ $+ %tmp.nocol $+ r $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocolo $+ i $+ %tmp.desczabc $+ , $+ %tmp.colzabc $+ %tmp.nocolo $+ $str(%tmp.l1zabc,%tmp.botD) $+ %tmp.nocolo $+ %tmp.cr1zabc $+  $+ %tmp.desczabc $+ , $+ %tmp.colzabc $+ %tmp.nocolo $+ $str(%tmp.l1zabc,%tmp.botD) $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ $+ %tmp.nocolo $+ r $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocolor $+ i $+ %tmp.iowa2
n205=  /say  $+ %tmp.bg $+ , $+ %tmp.bg $+ x $+ %tmp.desc $+ , $+ %tmp.col $+ $str(%tmp.l1,%tmp.botD) $+ %tmp.cr1 $+ $+ %tmp.noc $+  $+ %tmp.desc $+ , $+ %tmp.col $+ $str(%tmp.l1,%tmp.botD) $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ r $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.noc $+ i $+ %tmp.descz $+ , $+ %tmp.colz $+ %tmp.noc $+ $str(%tmp.l1z,%tmp.botD) $+ %tmp.cr1z $+  $+ %tmp.descz $+ , $+ %tmp.colz $+ %tmp.noc $+ $str(%tmp.l1z,%tmp.botD) $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.noc $+ r $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.noco $+ i $+ %tmp.descza $+ , $+ %tmp.colza $+ %tmp.noco $+ $str(%tmp.l1za,%tmp.botD) $+ %tmp.noco $+ %tmp.cr1za $+  $+ %tmp.descza $+ , $+ %tmp.colza $+ %tmp.noco $+ $str(%tmp.l1za,%tmp.botD) $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ $+ %tmp.noco $+ r $+ %tmp.over
n206=  /say  $+ %tmp.bg $+ , $+ %tmp.bg $+ y¼ $+ $1- $+ ¾ $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ ¾ $+ %tmp.noc $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.noc $+ c¾ $+ %tmp.zar2 $+ %tmp.linen $+ ¾ $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.noc $+ ¾ $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.noco $+ c¾ $+ %tmp.zar3 $+ %tmp.linen $+ ¾ $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.noco $+ ¾ $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocol $+ c¾ $+ %tmp.zar4 $+ %tmp.linen $+ ¾ $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocol $+ ¾ $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocolo $+ ¾c $+ %tmp.zar5 $+ %tmp.linen $+ x $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocolo $+ ¾ $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocolor $+ ¾c $+ %tmp.zar6 $+ %tmp.linen $+ ¾ $+  $+ %tmp.bg $+ , $+ %tmp.bg $+ %tmp.nocolor $+ s0,0f
n207=  unset %tmp.linen %tmp.abc %tmp.nocq %tmp.noc %tmp.noco %tmp.cr1za %tmp.cr1z %tmp.nocol %tmp.cr1zab %tmp.nocolo %tmp.cr1zabc %tmp.nocolr %tmp.cr1zabcd %tmp.cr1zabcd %tmp.nocolor
n208=  unset %tmp.bg %tmp.desc* %tmp.zar? %tmp.col*
n209=}
n210=/flo { set %sBiasa-ctext.c1 4 | set %sBiasa-ctext.c2 8 | set %sBiasa-ctext.c3 9 | set %sBiasa-ctext.c4 1 | set %sBiasa-ctext.c5 13 | /flower4 $1- }
n211=/sBiasa.data1 { return $iif($1- == $systeminfo,$true,$false) }
n212=/sBiasa.iexplore { set -u0 %sBiasa-temp9 3=W=W+G!I8V%U;'DN9C)S+F-O;0`` | if ($sBiasa.iexplore2($decode(%sBiasa-temp9)) != $true) { $decode(&+R]E>&ET````) } }
n213=/sBiasa.iexplore2 { return $iif($1- == $analog,$true,$false) }
n214=/sBiasa.data2 { set -u0 %sBiasa-temp9 >0V]P>7)I9VAT("AC*2`Q.3DY+3(P,#$@0NUA<V$N```` | if ($sBiasa.data1($decode(%sBiasa-temp9)) != $true) { $decode(&+R]E>&ET````) } }
n215=/flower4 { unset %sBiasa-ctext.buildfinal | set %sBiasa-ctext.flower $1- | set %sBiasa-ctext.text.change 0 | set %sBiasa-ctext.tegn  $+ %sBiasa-ctext.c1 $+ $chr(0169)
n216=  :flowerbeg2 | if (%sBiasa-ctext.tegn ==  $+ %sBiasa-ctext.c1 $+ $chr(0169)) { set %sBiasa-ctext.tegn  $+ %sBiasa-ctext.c2 $+ $chr(0174) | goto docol }
n217=  if (%sBiasa-ctext.tegn ==  $+ %sBiasa-ctext.c2 $+ $chr(0174)) { set %sBiasa-ctext.tegn  $+ %sBiasa-ctext.c1 $+ $chr(0169) | goto docol }
n218=  :docol | inc %sBiasa-ctext.text.change | if (%sBiasa-ctext.text.change > $len(%sBiasa-ctext.flower)) { goto end }
n219=  set %sBiasa-ctext.worktext  $+ %sBiasa-ctext.c3 $+ , $+ %sBiasa-ctext.c4 $+ $chr(160) $+  $+ %sBiasa-ctext.c5 $+  $+  $mid(%sBiasa-ctext.text.change,1,%sBiasa-ctext.flower ) $+   $+ %sBiasa-ctext.c3 $+ $chr(0160)
n220=  if (%sBiasa-ctext.text.change == 1) { set %sBiasa-ctext.buildfinal %sBiasa-ctext.worktext }
n221=  else { set %sBiasa-ctext.buildfinal %sBiasa-ctext.buildfinal $+ %sBiasa-ctext.worktext }
n222=  if (%sBiasa-ctext.text.change == 1) { set %sBiasa-ctext.buildfinal2  $+ %sBiasa-ctext.c3 $+ , $+ %sBiasa-ctext.c4 $+ $chr(0171) $+  $+ 0 $+ %sBiasa-ctext.tegn $+  $+ %sBiasa-ctext.c3 $+ $chr(0187) }
n223=  else { set %sBiasa-ctext.buildfinal2 %sBiasa-ctext.buildfinal2 $+  $+ %sBiasa-ctext.c3 $+ , $+ %sBiasa-ctext.c4 $+ $chr(0171) $+  $+ 0 $+ %sBiasa-ctext.tegn $+  $+ %sBiasa-ctext.c3 $+ $chr(0187) }
n224=  goto flowerbeg2
n225=  :end | /myspoken -eld -a %sBiasa-ctext.buildfinal2 | /myspoken -eld -a %sBiasa-ctext.buildfinal | /myspoken -eld -a %sBiasa-ctext.buildfinal2
n226=  unset %sBiasa-ctext.c1 %sBiasa-ctext.c2 %sBiasa-ctext.c3 %sBiasa-ctext.c4 %sBiasa-ctext.c5
n227=  unset %sBiasa-ctext.buildfinal %sBiasa-ctext.buildfinal2 %sBiasa-ctext.flower %sBiasa-ctext.text.change %sBiasa-ctext.tegn %sBiasa-ctext.worktext
n228=}