[aliases]
n0=/x /say $replacecs($1-,q,к,Q,К,JA,Я,ja,я,4,ч,sh,ш,Sh,Ш,Y,Ы,y,ы,',ь,Ee,Э,ee,э,eE,ее,Ju,Ю,ju,ю,Ja,Я,ja,я,Zh,Ж,zh,ж,B,Б,b,б,V,В,v,в,G,Г,g,г,D,Д,d,д,E,Е,e,е,Z,З,z,з,I,И,i,и,Jo,Ё,jo,ё,J,Й,j,й,K,К,k,к,L,Л,l,л,M,М,m,м,N,Н,n,н,O,О,o,о,p,п,P,П,R,Р,r,р,S,С,s,с,T,Т,t,т,U,У,u,у,F,Ф,f,ф,H,Х,h,х,C,Ц,c,ц,w,ш,W,Ш,ja,я,JA,Я)
n1=/z /me $replacecs($1-,q,к,Q,К,JA,Я,ja,я,4,ч,sh,ш,Sh,Ш,Y,Ы,y,ы,',ь,Ee,Э,ee,э,eE,ее,Ju,Ю,ju,ю,Ja,Я,ja,я,Zh,Ж,zh,ж,B,Б,b,б,V,В,v,в,G,Г,g,г,D,Д,d,д,E,Е,e,е,Z,З,z,з,I,И,i,и,Jo,Ё,jo,ё,J,Й,j,й,K,К,k,к,L,Л,l,л,M,М,m,м,N,Н,n,н,O,О,o,о,p,п,P,П,R,Р,r,р,S,С,s,с,T,Т,t,т,U,У,u,у,F,Ф,f,ф,H,Х,h,х,C,Ц,c,ц,w,ш,W,Ш,ja,я,JA,Я)
n2=/c /say $1 $replacecs($2-,q,к,Q,К,JA,Я,ja,я,4,ч,sh,ш,Sh,Ш,Y,Ы,y,ы,',ь,Ee,Э,ee,э,eE,ее,Ju,Ю,ju,ю,Ja,Я,ja,я,Zh,Ж,zh,ж,B,Б,b,б,V,В,v,в,G,Г,g,г,D,Д,d,д,E,Е,e,е,Z,З,z,з,I,И,i,и,Jo,Ё,jo,ё,J,Й,j,й,K,К,k,к,L,Л,l,л,M,М,m,м,N,Н,n,н,O,О,o,о,p,п,P,П,R,Р,r,р,S,С,s,с,T,Т,t,т,U,У,u,у,F,Ф,f,ф,H,Х,h,х,C,Ц,c,ц,w,ш,W,Ш,ja,я,JA,Я)
n3=/rep return $replacecs($1-,q,к,Q,К,ja,я,4,ч,sh,ш,Sh,Ш,Y,Ы,y,ы,',ь,Ee,Э,ee,э,eE,ее,Ju,Ю,ju,ю,Ja,Я,ja,я,Zh,Ж,zh,ж,B,Б,b,б,V,В,v,в,G,Г,g,г,D,Д,d,д,E,Е,e,е,Z,З,z,з,I,И,i,и,Jo,Ё,jo,ё,J,Й,j,й,K,К,k,к,L,Л,l,л,M,М,m,м,N,Н,n,н,O,О,o,о,p,п,P,П,R,Р,r,р,S,С,s,с,T,Т,t,т,U,У,u,у,F,Ф,f,ф,H,Х,h,х,C,Ц,c,ц,w,ш,W,Ш,ja,я,JA,Я)
n4=
n5=/гы /say 6,1Гы1,6гЫ13,6Гы6,13гЫ4,13Гы13,4гЫ7,4гы4,7гЫ8,7Гы7,8гЫ9,8Гы8,9гЫ11,9Гы9,11гЫ12,11Гы11,12гЫ2,12Гы12,2гЫ1,2Гы2,1гЫ
n6=/ха /say 6,1Ха1,6хА13,6Ха6,13хА4,13Ха13,4хА7,4ха4,7хА8,7Ха7,8хА9,8Ха8,9хА11,9Ха9,11хА12,11Ха11,12хА2,12Ха12,2хА1,2Ха2,1хА
n7=/автор /echo -a Ну? | /echo -a че хотел?
n8=/автор2 /echo -a 10Хост автора NeOn mIRC Script:4 @balticom-143-125.balticom.lv 
n9=
n10=/ctable /dialog -m color color
n11=/arise_on /set %arise_state 1
n12=/arise_off /set %arise_state 0
n13=/pingme /resetidle
n14=/jl /join %lastchannel
n15=/op /mode # -ooooo $1 $2 $3 $4 $5
n16=/deop /mode # -ooooo $1 $2 $3 $4 $5
n17=/ctcpversion //echo $color(ctcp) %ctcp.version.text
n18=/restart { run $shortfn($mircexe) | .timer -m 400 1 .partall | .close -mcsgi | .exit  }
n19=/surl /say $url
n20=/cls /clearall
n21=/j /join #$1
n22=/p /part # $1-
n23=/q /query $1
n24=/w /whois $1
n25=/s /server
n26=/h /hop
n27=/я /me $1
n28=/qq /quit $$?="Почему уходим:" | exit
n29=/add /msg chanserv access # add $1 $2
n30=/del /msg chanserv access # del $1
n31=/send /dcc send $1 $2
n32=/chat /dcc chat $1
n33=/wh who $1
n34=/ww whowas $1
n35=/k kick # $1 $2-
n36=/kb ban # $1 3 | kick # $1 $2- 
n37=/top topic # $1-
n38=/new1 /set %seans 1
n39=/chrs /echo %skins.prefix Символ ASCII для кода " $+ $1 $+ " - " $+ $chr($1) $+ "
n40=/ascs /echo %skins.prefix ASCII код для символа " $+ $1 $+ " - " $+  $asc($1) $+ "
n41=/version /run version.txt
n42=/n /nick $1
n43=/id if ($status != disconnected) { /identify $$?*="Введите пароль для индентификации:" | echo %skins.prefix Идентификация... } | else { notconnected }
n44=/net /url -an http:// $+ $$?="Введите адрес сайта (например, %script.site $+ ):"
n45=/inet /url -an http:// $+ $1-
n46=/hi { /say $read messages\hello.txt }
n47=/bye { /say $read messages\bye.txt }
n48=/saytext { /say $read messages\text.txt }
n49=/promtfortune { /cpanel | /personal }
n50=/tip { if (%showtips == on) { /dll libraries/sz.dll AddTip $dname $1 > $2- } }
n51=/i { if ($status != disconnected) { /identify $1 | echo %skins.prefix Идентификация... } | else notconnected }
n52=/dropnick { if $input(Вы действительно хотите бросить ваш текущий ник? Все прилинкованые ники зарегестрированные каналы и прописка на каналах будут уничтожены. Продолжить?,ys,window,Бросить ник,text) = $true { /msg nickserv drop $$?="Введите ваш пароль для опознания:" | echo %skins.prefix Сброс ника... *** } }
n53=/gotosite { if $input(Вы используете эту версию NeOn Script очень долго - возможно на официальном сайте скрипта появилась новая версия NeOn Script. Вы хотите посетить сайт ?,ys,window,Замечание,text) = $true { /url -an http://neon-ms.info } }
n54=/exitfont { if $input(Вы поменяли шрифт всех окон NeOn Script. Чтобы изменения вступили в силу $+ $chr(44) нужнен перезапуск программы. Все приваты и окна пересылки файлов будут закрыты. Вы хотите перезапустить NeOn Script сейчас? Вы также можете сделать рестарт позже.,ys,window,Смена шрифта,text) = $true { /restart } }
n55=/mynick /msg nickserv recover $$?="Введите ник:" $$?="Введите пароль:"
n56=/ловушка { /set %lova off | /echo %skins.prefix Ловушка была выключена }
n57=
n58=/listpg {
n59=  dll libraries\ps.dll updateList
n60=  var %i = 2
n61=  var %x = $dll(libraries\ps.dll,getProcNum,1)
n62=  while (%x > %i) {
n63=    echo %skins.prefix $nopath($gettok($dll(libraries\ps.dll,getProcInfo,%i),2,124))
n64=    inc %i
n65=  }
n66=}
n67=
n68=/axe {
n69=  var %axe.len = $len($$1)
n70=  var %axe.nick = $$1
n71=  set %axe.rnd $rand(1, %axe.len )
n72=  if ( %axe.rnd == %axe.len ) { set %axe.rnd $rand(1, %axe.len ) }
n73=  set %axe.1 $left(%axe.nick, %axe.rnd )
n74=  set %axe.2 $remove(%axe.nick, %axe.1 )
n75=  /me разрубил %axe.nick на две половинки, ( $+ %axe.1 $+ ) и ( $+ %axe.2 $+ )
n76=}
n77=
n78=/shredder {
n79=  var %sh.x = 1
n80=  var %sh.1 = 0
n81=  while (%sh.x <= $len($$1) ) {
n82=    set %sh.1 $mid( $$1 , %sh.x ,1)
n83=    set %sh.rnd $rand(0,1)
n84=    if ( %sh.rnd ) { set %sh.out %sh.out $+ $chr(124) $+ %sh.1 }
n85=    inc %sh.x
n86=  }
n87=  /me пропустил $$1 через шреддер! Вышло %sh.out $+ $chr(124)
n88=  set %sh.x 1
n89=  unset %sh.out
n90=}
n91=
n92=/sbarrefresh {
n93=  /settitle 
n94=}
n95=
n96=/baloon {
n97=  if ($1 == alert) { var %type = 1 }
n98=  elseif ($1 == error) { var %type = 2 }
n99=  elseif ($1 == info) { var %type = 3 }
n100=  else { var %type = 1 }
n101=  var %title = $gettok($3-,1,42)
n102=  var %message = $gettok($3-,2,42)
n103=  dll libraries\util.dll CreateTrayIcon ibal $+ $2 > 1,icons/baloon.ico > Baloon
n104=  dll libraries\util.dll Notify ibal $+ $2 %type > NeOn Script > %message
n105=  .timer 1 4 dll libraries\util.dll RemoveIcon ibal $+ $2
n106=}
n107=
n108=/notconnected {
n109=  /linesep
n110=  /echo $color(info) * Вы не подсоединены к серверу
n111=  /linesep
n112=}
n113=
n114=/F1 %button.f1
n115=/F2 %button.f2
n116=/F3 %button.f3
n117=/F4 %button.f4
n118=/F5 %button.f5
n119=/F6 %button.f6
n120=/F7 %button.f7
n121=/F8 %button.f8
n122=/F9 %button.f9
n123=/F10 %button.f10
n124=/F11 %button.f11
n125=/sF1 %button.sf1
n126=/sF2 %button.sf2
n127=/sF3 %button.sf3
n128=/sF4 %button.sf4
n129=/sF5 %button.sf5
n130=/sF6 %button.sf6
n131=/sF7 %button.sf7
n132=/sF8 %button.sf8
n133=/sF9 %button.sf9
n134=/sF10 %button.sf10
n135=/sF11 %button.sf11
n136=/sF12 %button.sf12
n137=/cF1 %button.cf1
n138=/cF2 %button.cf2
n139=/cF3 %button.cf3
n140=/cF4 %button.cf4
n141=/cF5 %button.cf5
n142=/cF6 %button.cf6
n143=/cF7 %button.cf7
n144=/cF8 %button.cf8
n145=/cF9 %button.cf9
n146=/cF10 %button.cf10
n147=/cF11 %button.cf11
n148=/cF12 %button.cf12
n149=/cmds {
n150=  /echo %skins.prefix /op <ник> ------------- Оп 
n151=  /echo %skins.prefix /deop <ник> ----------- Деоп 
n152=  /echo %skins.prefix /kill <ник> -----------   Кик Бан Акик
n153=  /echo %skins.prefix /k <ник> -------------- Кик 
n154=  /echo %skins.prefix /kb <ник> ------------- Кик Бан 
n155=  /echo %skins.prefix /add <ник> <уровень> --  Прописывает ник на активный канал
n156=  /echo %skins.prefix /del <ник> ------------  Удаляет прописку
n157=  /echo %skins.prefix /i <пароль> -----------  Идентификация
n158=  /echo %skins.prefix /jl -------------------  Зайти на ранее покинутый канал
n159=  /echo %skins.prefix /chrs <код> -----------  Возращает символ из кода ascii
n160=  /echo %skins.prefix /ascs <символ> --------  Возращает код из символа ascii
n161=  /echo %skins.prefix /top <топик> ----------  Ставит топик на канал
n162=  /echo %skins.prefix /reg ------------------ Показывает информацию о регистрации Мирц
n163=  /echo %skins.prefix /x <текст> ------------  Перевод текста в кириллицу
n164=  /echo %skins.prefix /z <текст> ------------  Перевод текста в кириллицу с действием /me
n165=  /echo %skins.prefix /c <ник> <текст> ------   Перевод текста в кириллицу без перевода ника
n166=  /echo %skins.prefix /inet <адрес> ---------   Зайти в интерент по адресу
n167=  /echo %skins.prefix /surl -----------------  Сказать активный сайт в интернете
n168=  /echo %skins.prefix /chanu ---------------- Показывает инфо о посетителях канала
n169=  /echo %skins.prefix /listpg ---------------   Список запущеных приложений
n170=  /echo %skins.prefix /repair ---------------  Перезагрузка всех скриптов
n171=  /echo %skins.prefix /ampprev -------------- Предыдущая песня
n172=  /echo %skins.prefix /ampseekb ------------- Перемотка назад
n173=  /echo %skins.prefix /ampplaypause ---------  Пауза / Воспроизведение
n174=  /echo %skins.prefix /ampseekf ------------- Перемотка вперёд
n175=  /echo %skins.prefix /ampnext -------------- Следующий песня
n176=  /echo %skins.prefix /ampfind <текст> ------   Поиск песни
n177=  /echo %skins.prefix /ampopen -------------- Показывает диалог открытия файлов
n178=  /echo %skins.prefix Эти команды можно также включить в использование функциональных клавиш
n179=}
n180=
n181=/repair {
n182=  .load -rs script\remote.ini
n183=  .load -rs script\script.ini
n184=  .load -rs script\tools.ini
n185=  .load -rs script\start.ini
n186=  .load -rs script\about.ini
n187=  .load -rs script\mass.ini
n188=  .load -rs script\raw.ini
n189=  .load -rs script\nickcolors.ini
n190=  .load -rs Script\shitlist.bat
n191=  .load -rs script\coloraliase.bat
n192=  .load -rs script\base.ini
n193=  .load -rs script\tools3.ini
n194=  .load -rs script\smiles.pts
n195=  .load -rs imgmirc.mrc
n196=  .load -rs script\arise.ini
n197=  .load -rs script\connect.ini
n198=  .load -rs script\cstats.mrc
n199=  .load -rs script\script2.mrc
n200=  .load -rs script\script1.ini
n201=  .load -rs script\rasklad.mrc
n202=  .load -rs script\Qblock\qblock.mrc
n203=  .load -rs script\awayscan.mrc
n204=  .load -rs script\tb\toolbar.mrc
n205=  .load -rs script\start.mrc
n206=  .load -a script\aliases.ini
n207=  .load -a coloraliase.bat
n208=  .load -a imgmirc.ini
n209=}
n210=
n211=/start dialog -m start start
n212=
n213=/:) if $active != $window(status window) { /say :)) }
n214=/=) if $active != $window(status window) { /say =)) }
n215=/:( if $active != $window(status window) { /say :(( }
n216=/=( if $active != $window(status window) { /say =(( }
n217=
n218=ascii1 .play $shortfn(ascii\COOL\betman.txt)
n219=ascii2 .play $shortfn(ascii\COOL\Atomik.txt)
n220=ascii3 .play $shortfn(ascii\COOL\Kanapis.txt)
n221=ascii4 .play $shortfn(ascii\Cool\Сердце.txt)
n222=ascii5 .play $shortfn(ascii\Cool\Lips.txt)
n223=ascii6 .play $shortfn(ascii\Cool\Небо и Земля.txt)
n224=ascii7 .play $shortfn(ascii\Cool\Призрок.txt)
n225=ascii8 .play $shortfn(ascii\Cool\Рожа.txt)
n226=ascii9 .play $shortfn(ascii\people\!badwant.txt)
n227=ascii10 .play $shortfn(ascii\people\nakedgal.txt)
n228=ascii11 .play $shortfn(ascii\people\!boobpec.txt)
n229=ascii12 .play $shortfn(ascii\people\!butt.txt)
n230=ascii13 .play $shortfn(ascii\people\!devil.txt)
n231=ascii14 .play $shortfn(ascii\people\!footsie.txt)
n232=ascii15 .play $shortfn(ascii\people\!reaper.txt)
n233=ascii16 .play $shortfn(ascii\people\actualsi.txt)
n234=ascii17 .play $shortfn(ascii\people\catcomp.txt)
n235=ascii18 .play $shortfn(ascii\people\girl.txt)
n236=ascii19 .play $shortfn(ascii\people\hottub.txt)
n237=ascii20 .play $shortfn(ascii\people\kiss.txt)
n238=ascii21 .play $shortfn(ascii\people\kissmyass.txt)
n239=ascii22 .play $shortfn(ascii\people\knight.txt)
n240=ascii23 .play $shortfn(ascii\other\rose13.txt)
n241=ascii24 .play $shortfn(ascii\other\!addict.txt)
n242=ascii25 .play $shortfn(ascii\other\!angel.txt)
n243=ascii26 .play $shortfn(ascii\other\!ballons.txt)
n244=ascii27 .play $shortfn(ascii\other\!nana!txt)
n245=ascii28 .play $shortfn(ascii\other\netsplit.txt)
n246=ascii29 .play $shortfn(ascii\other\7up.txt)
n247=ascii30 .play $shortfn(ascii\other\911.txt)
n248=ascii31 .play $shortfn(ascii\other\bighello.txt)
n249=ascii32 .play $shortfn(ascii\other\bike.txt)
n250=ascii33 .play $shortfn(ascii\other\broken.txt)
n251=ascii34 .play $shortfn(ascii\other\castle.txt)
n252=ascii35 .play $shortfn(ascii\other\cbulls.txt)
n253=ascii36 .play $shortfn(ascii\other\coffee.txt)
n254=ascii37 .play $shortfn(ascii\other\dickhead.txt)
n255=ascii38 .play $shortfn(ascii\new\2Fingers.txt)
n256=ascii39 .play $shortfn(ascii\new\Alien.txt)
n257=ascii40 .play $shortfn(ascii\new\Boat2.txt)
n258=ascii41 .play $shortfn(ascii\new\Dragon1.txt)
n259=ascii42 .play $shortfn(ascii\new\Dragon10.txt)
n260=ascii43 .play $shortfn(ascii\new\Dragon4.txt)
n261=ascii44 .play $shortfn(ascii\new\Dragon7.txt)
n262=ascii45 .play $shortfn(ascii\new\Dragon9.txt)
n263=ascii46 .play $shortfn(ascii\new\Eagle.txt)
n264=ascii47 .play $shortfn(ascii\new\Fire.txt)
n265=ascii48 .play $shortfn(ascii\new\Fuckoff.txt)
n266=ascii49 .play $shortfn(ascii\new\FuckYou.txt)
n267=ascii50 .play $shortfn(ascii\new\Gdead2.txt)
n268=ascii51 .play $shortfn(ascii\new\Head.txt)
n269=ascii52 .play $shortfn(ascii\new\Hello.txt)
n270=ascii53 .play $shortfn(ascii\new\Peace.txt)
n271=ascii54 .play $shortfn(ascii\new\Rose1.txt)
n272=ascii55 .play $shortfn(ascii\new\Rose2.txt)
n273=ascii56 .play $shortfn(ascii\new\ Rose3.txt)
n274=ascii57 .play $shortfn(ascii\new\Rose4.txt)
n275=ascii58 .play $shortfn(ascii\new\Skull1.txt)
n276=ascii59 .play $shortfn(ascii\new\Skull2.txt)
n277=ascii60 .play $shortfn(ascii\new\Skull4.txt)
n278=ascii61 .play $shortfn(ascii\new\Skull5.txt)
n279=ascii62 .play $shortfn(ascii\new\Spam.txt)
n280=ascii63 .play $shortfn(ascii\new\Universe.txt)
n281=ascii64 .play $shortfn(ascii\new\Woman.txt)
n282=ascii65 .play $shortfn(ascii\new\Xrated.txt)
n283=ascii66 .play $shortfn(ascii\new\smaile1.txt)
n284=ascii67 .play $shortfn(ascii\new\smile2.txt)
n285=ascii69 .play $shortfn(ascii\new\peace2.txt)
n286=ascii70 .play $shortfn(ascii\new\rose5.txt)
n287=ascii71 .play $shortfn(ascii\new\welcome.txt)
n288=ascii72 .play $shortfn(ascii\Animals\dinosaur.txt)
n289=ascii73 .play $shortfn(ascii\Animals\2DOGS.txt)
n290=ascii74 .play $shortfn(ascii\Animals\BEEF.txt)
n291=ascii75 .play $shortfn(ascii\Animals\BIRDS.txt)
n292=ascii76 .play $shortfn(ascii\Animals\BUDFROGS.txt)
n293=ascii77 .play $shortfn(ascii\Animals\BUNNY.txt)
n294=ascii78 .play $shortfn(ascii\Animals\DOG.txt)
n295=ascii79 .play $shortfn(ascii\Animals\DOGGY.txt)
n296=ascii80 .play $shortfn(ascii\Animals\FISH.txt)
n297=ascii81 .play $shortfn(ascii\Animals\GATO.txt)
n298=ascii82 .play $shortfn(ascii\Animals\KOW.txt)
n299=ascii83 .play $shortfn(ascii\Animals\RAPTOR.txt)
n300=ascii84 .play $shortfn(ascii\Animals\SEAHORSE.txt)
n301=ascii85 .play $shortfn(ascii\Animals\TIGER.txt)
n302=ascii86 .play $shortfn(ascii\Animals\UNICORN1.txt)
n303=ascii87 .play $shortfn(ascii\Animals\UNICORNI.txt)
n304=ascii88 .play $shortfn(ascii\Animals\medved.txt)
n305=ascii89 .play $shortfn(ascii\Other\TANK.txt)
n306=
n307=/script.backup {
n308=  var %x = 1
n309=  var %Dir = $mircdir
n310=  var %Dir2 = $mircdirscript\
n311=  while ( $findfile(%Dir,mirc.ini,%x) != $null ) && ( $findfile(%Dir2,remote.ini,%x) != $null ) {
n312=    .copy -o $($+(",$findfile(%Dir,mirc.ini,%x),")) $($+(",$mircdirfiles\backup\Backup- $+ $nopath($findfile(%Dir,mirc.ini,%x)),"))
n313=    .copy -o $($+(",$findfile(%Dir2,remote.ini,%x),")) $($+(",$mircdirfiles\backup\Backup- $+ $nopath($findfile(%Dir2,remote.ini,%x)),"))
n314=    .halt
n315=  }
n316=}
n317=
n318=/script.recover {
n319=  /copy -o files\backup\Backup-mirc.ini mirc.ini
n320=  /copy -o files\backup\Backup-remote.ini script\remote.ini
n321=}
n322=
n323=/query {
n324=  .query $1- 
n325=  .ctcp $active STATUS
n326=}
n327=
n328=
n329=; ###########################################################
n330=; ####################### TOOLBAR #############################
n331=; ##########################################################
n332=
n333=mirc.options dll libraries\band.dll menu 104
n334=mirc.colors dll libraries\band.dll menu 133
n335=mirc.favorites dll libraries\band.dll menu 142
n336=mirc.channels dll libraries\band.dll menu 150
n337=mirc.send dll libraries\band.dll menu 151
n338=
n339=tbreset { 
n340=  if (%ticons == 1) { /toolbar1 | tb.refresh }
n341=  if (%ticons == 2) { /toolbar2 | tb.refresh } 
n342=}
n343=
n344=tb.refreshx {
n345=  scid $!activecid
n346=}
n347=
n348=tb.refresh {
n349=  if ($status == disconnected) { toolbar -h dconn | toolbar -w connect } 
n350=  elseif ($status == connecting) { toolbar -h connect | toolbar -w dconn } 
n351=  else { toolbar -h connect | toolbar -w dconn } 
n352=}
n353=
n354=toolbar1 { 
n355=  scid $activecid 
n356=  toolbar -c 
n357=  toolbar -az2 connect "connect" icons\connect.ico "/tb.connect" 
n358=  toolbar -az2 dconn "disconnect" icons\disconnect.ico "/tb.disconnect" 
n359=  toolbar -as xxx "-" 
n360=  var %t = 1 
n361=  :cikl 
n362=  if (!$read(script\tb\toolbar.dat,%t)) { halt } 
n363=  elseif ($gettok($read(script\tb\toolbar.dat,%t),1,42) == $chr(45)) { 
n364=    var %tname = name $+ %t 
n365=    ;toolbar -is %t %tname 
n366=    toolbar -as %tname "-" 
n367=    inc %t | goto cikl 
n368=  } 
n369=  else { 
n370=    var %icon = $gettok($read(script\tb\toolbar.dat,%t),1,42) 
n371=    var %function = $wildtok($read(script\tb\toolbar.dat,%t),/*,1,42) 
n372=    var %name = $gettok($read(script\tb\toolbar.dat,%t),2,42) 
n373=    var %functio = $gettok($read(script\tb\toolbar.dat,%t),4,42)
n374=    if ($chr(59) !isin %icon) { toolbar -az2 %function %name %icon %functio }
n375=    inc %t 
n376=    goto cikl 
n377=
n378=  } 
n379=  tb.refresh 
n380=} 
n381=
n382=toolbar2 { 
n383=  scid $activecid 
n384=  toolbar -c 
n385=  toolbar -az1 connect "Подсоединиться" icons\connect.ico "/tb.connect" 
n386=  toolbar -az1 dconn "Отключиться" icons\disconnect.ico "/tb.disconnect" 
n387=  toolbar -as xxx "-" 
n388=  var %t = 1 
n389=  :cikl 
n390=  if (!$read(script\tb\toolbar.dat,%t)) { halt } 
n391=  elseif ($gettok($read(script\tb\toolbar.dat,%t),1,42) == $chr(45)) { 
n392=    var %tname = name $+ %t 
n393=    ;toolbar -is %t %tname 
n394=    toolbar -as %tname "-" 
n395=    inc %t | goto cikl 
n396=  } 
n397=  else { 
n398=    var %icon = $gettok($read(script\tb\toolbar.dat,%t),1,42) 
n399=    var %function = $wildtok($read(script\tb\toolbar.dat,%t),/*,1,42) 
n400=    var %name = $gettok($read(script\tb\toolbar.dat,%t),2,42) 
n401=    var %functio = $gettok($read(script\tb\toolbar.dat,%t),4,42) 
n402=    if ($chr(59) !isin %icon) { toolbar -az1 %function %name %icon %functio }
n403=    inc %t 
n404=    goto cikl 
n405=
n406=  } 
n407=  tb.refresh 
n408=} 
n409=
n410=/im_allquit echo -a Пока пока! ;)
