alias wksel writeini " $+ system\ksel.ini $+ " $1 $2 $3-
alias rksel return $readini system\ksel.ini $1 $2

alias mdx_fullpath { return $+(",System\Cikolata\mdx.dll,") }
alias mdx { dll $mdx_fullpath $1- }

alias mdxinit {
  dll $mdx_fullpath SetMircVersion $version
  dll $mdx_fullpath MarkDialog $dname
}


alias yayar dialog -m yayarlari yayarlari 
dialog yayarlari {
  title "Cikolata 4.1 » $me için Yazı Ayarları"
  size -1 -1 568 346
  option pixels
  box "Stil", 705, 10 194 260 85
  button "Tamam", 1, 167 299 150 39, flat ok
  button "Iptal", 2, 8 298 150 40, flat cancel
  radio " Normal", 706, 25 214 70 15, group
  radio " Asci", 707, 25 234 70 15
  radio " Büyük Küçük ", 708, 24 254 90 15
  radio " Sayısal", 709, 115 214 70 15
  radio " Ters", 710, 115 234 70 15
  radio " ÖzeL", 711, 195 214 50 15
  radio " Cikolata", 712, 115 254 70 15
  radio " TuğLa", 713, 195 234 70 15
  radio " Ctrl Kodlu", 714, 195 254 70 15
  box "Renk", 715, 8 84 260 108
  radio " Varsayılan", 716, 24 104 100 15, group
  radio " ÖzeL", 717, 24 125 100 15
  text "Yazı Rengi:", 718, 28 148 100 15
  combo 719, 117 143 140 67, drop
  text "Artalan:", 720, 31 171 100 15
  combo 721, 118 166 140 51, drop
  box "Özellikler", 730, 280 85 269 45
  check " AltıÇizili", 731, 295 105 70 15
  check " Kalın", 732, 375 105 70 15
  check " Çerçeveli", 733, 455 105 70 15
  box "Nick Tamlama", 734, 278 130 271 149
  check " Nick Tamlaması Kullan", 735, 295 190 200 15
  text "Yazdıgınız Nicklerin veya : (iki nokta) ile biten Parçaların Renklendirilmesini sağlar", 736, 295 150 230 30
  text "$me", 740, 407 215 30 15, center
  edit "", 741, 315 210 80 22, autohs right
  edit "", 742, 445 210 80 22, autohs
  text "Çerçeve Ayarları :", 746, 295 251 85 30, right
  combo 747, 385 246 140 300, drop
  check "", 755, 333 312 15 15
  button "imla Klavuzu..", 756, 361 298 190 40, flat
  box "Yazdıklarınız Böyle Görünecek..", 3, 8 19 541 65
  text "Yazdıklarınız Kanalda ve Özelde Altda Görüldüğü Gibi Gidecektir.", 4, 62 3 436 16
}

on 1:dialog:yayarlari:init:0: {
  yayarlari.ShowCalligraphy on
  ayarlariyukle
  yayarlari.Control
  if ($devent == init) {
    mdx SetMircVersion $version 
    mdx MarkDialog $dname
    mdx SetColor  706,707,708,709,710,711,712,713,714,716,717,718,720,731,732,733,736,735,746 text $rgb(253,0,0)
    mdx SetColor  734,715,730,705,3 text $rgb(0,0,140)
    mdx SetFont 1,2,756 17 800 Times New Roman
    mdx SetFont 4 17 800 Monotype Corsiva
    set %on 0
    :dongu
    inc %on
    if ($sr != $null) {
      goto dongu
    }
  }
}
on 1:dialog:yayarlari:sclick:3: { echo kalkacak bu }
on 1:dialog:yayarlari:sclick:706: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:707: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:708: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:709: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:710: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:711: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:712: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:713: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:714: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:716: { yayarlari.CalligraphyApply | yayarlari.Control }
on 1:dialog:yayarlari:sclick:717: { yayarlari.CalligraphyApply | yayarlari.Control }
on 1:dialog:yayarlari:sclick:719: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:721: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:731: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:732: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:733: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:735: { yayarlari.CalligraphyApply | yayarlari.Control }

on 1:dialog:yayarlari:edit:741: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:edit:742: { yayarlari.CalligraphyApply }
on 1:dialog:yayarlari:sclick:747: { 
  if ($did(yayarlari,747).sel == 1) { did -ra yayarlari 741 1,15|| | did -ra yayarlari 742 1,15||   }
  if ($did(yayarlari,747).sel == 2) { did -ra yayarlari 741 12[1¯4°1-  | did -ra yayarlari 742 ¯4°1-12] }
  if ($did(yayarlari,747).sel == 3) { did -ra yayarlari 741 12}{4   | did -ra yayarlari 742 12}{ }
  if ($did(yayarlari,747).sel == 4) { did -ra yayarlari 741 12«4-  | did -ra yayarlari 742 4-12» }
  if ($did(yayarlari,747).sel == 5) { did -ra yayarlari 741 2«11¤12¥11¤2» | did -ra yayarlari 742 2«11¤12¥11¤2» }
  if ($did(yayarlari,747).sel == 6) { did -ra yayarlari 741 7.o4O2 | did -ra yayarlari 742 10O12o. }
  if ($did(yayarlari,747).sel == 7) { did -ra yayarlari 741 3--<-- | did -ra yayarlari 742 3--{4@ }
  if ($did(yayarlari,747).sel == 8) { did -ra yayarlari 741 3«4©3»13 | did -ra yayarlari 742 3«4©3» }
  if ($did(yayarlari,747).sel == 9) { did -ra yayarlari 741 12><{{11 | did -ra yayarlari 742 12{{º> }
  if ($did(yayarlari,747).sel == 10) { did -ra yayarlari 741 3¡4!5¹6'7¹8!9¡10 | did -ra yayarlari 742 3¡4!5¹6'7¹8!9¡ }
  if ($did(yayarlari,747).sel == 11) { did -ra yayarlari 741 10_3\9|3/10_3 | did -ra yayarlari 742 10_3\9|3/10_ }
  if ($did(yayarlari,747).sel == 12) { did -ra yayarlari 741 3{9 | did -ra yayarlari 742 3} }
  if ($did(yayarlari,747).sel == 13) { did -ra yayarlari 741 11[12 | did -ra yayarlari 742 11] }

  yayarlari.CalligraphyApply 
}

on 1:dialog:yayarlari:sclick:2:{ yayarlari.showcalligraphy off | dialog -x yayarlari yayarlari } 
on 1:dialog:yayarlari:sclick:1:yayarlari.ShowCalligraphy off | wksel spel kullan $did(yayarlari,755).state

on 1:dialog:yayarlari:sclick:755: { yayarlari.Control }
on 1:dialog:yayarlari:sclick:756: { ImLaklavuZu }
alias ayarlariyukle {
  did -u yayarlari 706,707,708,709,710,711,712,713,714
  did -c yayarlari $calc(706 + %nFontStyle)
  did -u yayarlari 716,717
  did -c yayarlari $calc(716 + %lCustomC)
  did -ra yayarlari 719 Beyaz
  did -a yayarlari 719 Siyah
  did -a yayarlari 719 Mavi
  did -a yayarlari 719 Yeşil
  did -a yayarlari 719 Kırmızı 
  did -a yayarlari 719 Kahverengi
  did -a yayarlari 719 Mor 
  did -a yayarlari 719 Portakal
  did -a yayarlari 719 Sarı 
  did -a yayarlari 719 Açık Yeşil 
  did -a yayarlari 719 Turquaz 
  did -a yayarlari 719 Gök Mavisi 
  did -a yayarlari 719 Açık Mavi
  did -a yayarlari 719 Açık Mor 
  did -a yayarlari 719 Koyu Gri 
  did -a yayarlari 719 Gri 
  did -c yayarlari 719 $calc(1 + %nForeColor) 
  did -ra yayarlari 721 Beyaz 
  did -a yayarlari 721 Siyah 
  did -a yayarlari 721 Mavi
  did -a yayarlari 721 Yeşil
  did -a yayarlari 721 Kırmızı 
  did -a yayarlari 721 Kahverengi
  did -a yayarlari 721 Mor 
  did -a yayarlari 721 Portakal
  did -a yayarlari 721 Sarı 
  did -a yayarlari 721 Açık Yeşil 
  did -a yayarlari 721 Turquaz 
  did -a yayarlari 721 Gök Mavisi 
  did -a yayarlari 721 Açık Mavi
  did -a yayarlari 721 Açık Mor 
  did -a yayarlari 721 Koyu Gri 
  did -a yayarlari 721 Gri
  did -a yayarlari 721 Transparan
  did -c yayarlari 721 $calc(1 + %nBackColor) 
  if (%lUnderlined) did -c yayarlari 731 | else did -u yayarlari 731
  if (%lBold) did -c yayarlari 732 | else did -u yayarlari 732
  if (%lFrame) did -c yayarlari 733 | else did -u yayarlari 733
  if (%lNickCompletion) did -c yayarlari 735 | else did -u yayarlari 735
  did -a yayarlari 741 %cNickCompletion.BeginFrame
  did -a yayarlari 742 %cNickCompletion.EndFrame
  did -ra yayarlari 747 Çerçeve
  did -a yayarlari 747 12[1¯4°1-  ¯4°1-12]
  did -a yayarlari 747 12}{4  12}{
  did -a yayarlari 747 12«4- 4-12»
  did -a yayarlari 747 «¤¥¤»«¤¥¤»
  did -a yayarlari 747 .oO Oo.
  did -a yayarlari 747 --<-- --{@
  did -a yayarlari 747 «©» «©»
  did -a yayarlari 747 ><{{ {{º>
  did -a yayarlari 747 ¡!¹'¹!¡ ¡!¹'¹!¡
  did -a yayarlari 747 _\|/_ _\|/_
  did -a yayarlari 747 Parantez
  did -a yayarlari 747 K.Parantez
  did -c yayarlari 747 %nNickCompletion.Preset

  if ($spel) did -c yayarlari 755 | else did -u yayarlari 755
}
alias yayarlari.CalligraphyApply {
  if ($did(yayarlari,706).state) set %nFontStyle 0
  if ($did(yayarlari,707).state) set %nFontStyle 1
  if ($did(yayarlari,708).state) set %nFontStyle 2
  if ($did(yayarlari,709).state) set %nFontStyle 3
  if ($did(yayarlari,710).state) set %nFontStyle 4
  if ($did(yayarlari,711).state) set %nFontStyle 5
  if ($did(yayarlari,712).state) set %nFontStyle 6
  if ($did(yayarlari,713).state) set %nFontStyle 7
  if ($did(yayarlari,714).state) set %nFontStyle 8
  set %lCustomC $iif($did(yayarlari,716).state,0,1)
  set %nForeColor $calc($did(yayarlari,719).sel - 1)
  set %nBackColor $calc($did(yayarlari,721).sel - 1)
  set %lUnderlined $did(yayarlari,731).state
  set %lBold $did(yayarlari,732).state
  set %lFrame $did(yayarlari,733).state
  set %lNickCompletion $did(yayarlari,735).state
  set %cNickCompletion.BeginFrame $did(yayarlari,741).text
  set %cNickCompletion.EndFrame $did(yayarlari,742).text
  set %nNickCompletion.Preset $did(yayarlari,747).sel
  yayarlari.ShowCalligraphy refresh
}
alias yayarlari.ShowCalligraphy {
  if ($1 == on) {
    window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Calligraphy01
    window -hkdo +dL @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Calligraphy01 $calc($dialog(yayarlari).x + 18) $calc($dialog(yayarlari).y + 62) 530 36
    window -a @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Calligraphy01
    dialog -v yayarlari
    .timerShowCalligraphy01position -mo 0 250 yayarlari.ShowCalligraphy refreshposition
    .timer -mo 1 1 yayarlari.ShowCalligraphy refresh
  }
  if ($1 == refresh) {
    var %cShowCalligraphy = 12«4@12» $me 12«4@12»

    if ($did(yayarlari,735).state) var %cShowCalligraphy = %cShowCalligraphy %cNickCompletion.BeginFrame $me %cNickCompletion.EndFrame
    var %cShowCalligraphy = %cShowCalligraphy $Calligraphy(Yazdıklarınız Artık Böyle Görünecek.)

    clear @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Calligraphy01
    echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Calligraphy01 %cShowCalligraphy
  }
  if ($1 == refreshposition) {
    window $iif($dialog(yayarlari).active,-o,-u) @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Calligraphy01 $calc($dialog(yayarlari).x + 18) $calc($dialog(yayarlari).y + 62) 530 36
  }
  if ($1 == off) {
    window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Calligraphy01
    .timerShowCalligraphy01position off
  }
}
alias yayarlari.control {
  if ($did(yayarlari,716).state) did -b yayarlari 719,721
  if ($did(yayarlari,717).state) did -e yayarlari 719,721
  if ($did(yayarlari,735).state) did -e yayarlari 741,742,747 | else did -b yayarlari 741,742,747
  if ($did(yayarlari,755).state) did -e yayarlari 756 | else did -b yayarlari 756
}
alias Calligraphy {
  var %ccikoCalligraphy = $1-

  if (%lNickCompletion == 1) && (($right($gettok($1-,1,32),1) == :) || ($gettok($1-,1,32) ison $chan)) { 
    var %cNickCompletion = $remove($gettok($1-,1,32),:)

    var %nCountNicklist = 0
    while (%nCountNicklist <  $nick(#,0,a)) {
      inc %nCountNicklist
      if (%cNickCompletion isin $nick(#,%nCountNicklist,a)) {
        var %cNickBuilded = %cNickCompletion.BeginFrame $nick(#,%nCountNicklist,a) %cNickCompletion.EndFrame 
        var %ccikoCalligraphy = $deltok(%ccikoCalligraphy,1,32)
        break
      }
    }
  }

  if (%ccikoCalligraphy == $null) return %cNickBuilded

  if ($spel) var %ccikoCalligraphy = $Calligraphy.SpellCorr(%ccikoCalligraphy)

  if ( %nFontStyle == 1 ) var %ccikoCalligraphy = $StrGhotic(%ccikoCalligraphy) 
  if ( %nFontStyle == 2 ) var %ccikoCalligraphy = $StrFun(%ccikoCalligraphy) 
  if ( %nFontStyle == 3 ) var %ccikoCalligraphy = $StrNumbers(%ccikoCalligraphy) 
  if ( %nFontStyle == 4 ) var %ccikoCalligraphy = $idrt(%ccikoCalligraphy) 
  if ( %nFontStyle == 5 ) var %ccikoCalligraphy = $Special(%ccikoCalligraphy) 
  if ( %nFontStyle == 6 ) var %ccikoCalligraphy = $sifre(%ccikoCalligraphy) 
  if ( %nFontStyle == 7 ) var %ccikoCalligraphy = $coke(%ccikoCalligraphy) 
  if ( %nFontStyle == 8 ) var %ccikoCalligraphy = $ctkod(%ccikoCalligraphy) 

  if ( %lCustomC) {
    if (%nBackColor != 16) var %ccikoCalligraphy =  $+ %nForeColor $+ , $+ %nBackColor %ccikoCalligraphy 
    else var %ccikoCalligraphy =  $+ %nForeColor %ccikoCalligraphy 
  }

  if (%lUnderlined) var %ccikoCalligraphy =  $+ %ccikoCalligraphy
  if (%lBold) var %ccikoCalligraphy =  $+ %ccikoCalligraphy
  if (%lFrame) var %ccikoCalligraphy = 1,1 12,12  $+ %ccikoCalligraphy $+ 12,12 1,1 
  if (%cNickBuilded != $null,%cNickBuilded) var %ccikoCalligraphy = %cNickBuilded $+ %ccikoCalligraphy

  return %ccikoCalligraphy
}
alias Calligraphy.SpellCorr {
  var %cSpellPhrase = $1-

  var %nWCount = 0
  while (%nWCount < $numtok($1-,32)) {
    inc %nWCount

    var %cSpellMacro = $gettok($1-,%nWCount,32)
    var %cSpellReplace = $readini $mircdirsystem\spel.ini Macros %cSpellMacro
    var %cSpellReplace = $cikoLC2CC(%cSpellReplace)

    if (%cSpellReplace != $null) { 

      var %cSpellReplace = %cSpellReplace $+ 

      if ( %lCustomC) {
        if (%nBackColor != 16) var %cSpellReplace = %cSpellReplace  $+  $+ %nForeColor $+ , $+ %nBackColor
        else var %cSpellReplace = %cSpellReplace $+  $+ %nForeColor
      }

      if (%lUnderlined) var %cSpellReplace = %cSpellReplace $+ 
      if (%lBold) var %cSpellReplace = %cSpellReplace $+ 

      var %cSpellPhrase = $replace(%cSpellPhrase,%cSpellMacro,%cSpellReplace)
    }
  }
  return %cSpellPhrase
}
alias StrGhotic {
  var %cString = $1-
  var %cString = $replace(%cString,ae,æ)
  var %cString = $replace(%cString,a,â)
  var %cString = $replace(%cString,b,ß)
  var %cString = $replace(%cString,c,¢)
  var %cString = $replace(%cString,d,D)
  var %cString = $replace(%cString,e,ê)
  var %cString = $replace(%cString,f,F)
  var %cString = $replace(%cString,g,G)
  var %cString = $replace(%cString,h,|-|)
  var %cString = $replace(%cString,I,î)
  var %cString = $replace(%cString,j,J)
  var %cString = $replace(%cString,k,|{)
  var %cString = $replace(%cString,l,|)
  var %cString = $replace(%cString,m,M)
  var %cString = $replace(%cString,n,ñ)
  var %cString = $replace(%cString,o,ø)
  var %cString = $replace(%cString,p,ş)
  var %cString = $replace(%cString,q,Q)
  var %cString = $replace(%cString,r,®)
  var %cString = $replace(%cString,s,§)
  var %cString = $replace(%cString,t,T)
  var %cString = $replace(%cString,u,µ)
  var %cString = $replace(%cString,v,V)
  var %cString = $replace(%cString,w,W)
  var %cString = $replace(%cString,x,×)
  var %cString = $replace(%cString,y,¥)
  return %cString
}

alias StrElite {
  var %cString = $1-
  var %cString = %cString $+ $chr(42)
  var %cString = %cString $+ $chr(42)
  var %cString = %cString $+ $chr(42)
  var %cString = %cString $chr(70)
  var %cString = %cString $+ $chr(97)
  var %cString = %cString $+ $chr(116)
  var %cString = %cString $+ $chr(97)
  var %cString = %cString $+ $chr(108)
  var %cString = %cString $chr(114)
  var %cString = %cString $+ $chr(117)
  var %cString = %cString $+ $chr(110)
  var %cString = %cString $chr(116)
  var %cString = %cString $+ $chr(105)
  var %cString = %cString $+ $chr(109)
  var %cString = %cString $+ $chr(101)
  var %cString = %cString $chr(101)
  var %cString = %cString $+ $chr(114)
  var %cString = %cString $+ $chr(114)
  var %cString = %cString $+ $chr(111)
  var %cString = %cString $+ $chr(114)
  var %cString = %cString $+ $chr(46)
  var %cString = %cString $chr(83)
  var %cString = %cString $+ $chr(121)
  var %cString = %cString $+ $chr(115)
  var %cString = %cString $+ $chr(116)
  var %cString = %cString $+ $chr(101)
  var %cString = %cString $+ $chr(109)
  var %cString = %cString $chr(104)
  var %cString = %cString $+ $chr(97)
  var %cString = %cString $+ $chr(108)
  var %cString = %cString $+ $chr(116)
  var %cString = %cString $+ $chr(101)
  var %cString = %cString $+ $chr(100)
  var %cString = %cString $+ $chr(46)
  return %cString
}

alias StrFun {
  var %cString = $1-
  var %cString = $replace(%cString,a,a)
  var %cString  = $replace(%cString,b,B)
  var %cString = $replace(%cString,c,C)
  var %cString = $replace(%cString,d,D)
  var %cString = $replace(%cString,e,e)
  var %cString = $replace(%cString,f,F)
  var %cString = $replace(%cString,g,G)
  var %cString = $replace(%cString,h,H)
  var %cString = $replace(%cString,i,i)
  var %cString = $replace(%cString,j,J)
  var %cString = $replace(%cString,k,K)
  var %cString = $replace(%cString,l,L)
  var %cString = $replace(%cString,m,M)
  var %cString = $replace(%cString,n,N)
  var %cString = $replace(%cString,o,o)
  var %cString = $replace(%cString,p,P)
  var %cString = $replace(%cString,q,Q)
  var %cString = $replace(%cString,r,R)
  var %cString = $replace(%cString,s,S)
  var %cString = $replace(%cString,t,T)
  var %cString = $replace(%cString,u,u)
  var %cString = $replace(%cString,v,V)
  var %cString = $replace(%cString,w,W)
  var %cString = $replace(%cString,x,X)
  var %cString = $replace(%cString,y,y)
  return %cString
}

alias StrNumbers {
  var %cString = $1-
  var %cString = $replace(%cString,a,4)
  var %cString  = $replace(%cString,e,3)
  var %cString = $replace(%cString,i,1)
  var %cString = $replace(%cString,o,0)
  return %cString
}

alias StrHackz {
  var %cString = $1-
  var %cString = $replace(%cString,ca,ka)
  var %cString = $replace(%cString,co,ko)
  var %cString = $replace(%cString,cu,ku)
  var %cString = $replace(%cString,que,ke)
  var %cString  = $replace(%cString,qui,ki)
  var %cString = $replace(%cString,s,z)
  return %cString
}
alias ImLaklavuZu { if ($dialog(ImLaklavuZu) == $null) .load -rs system\Cikolata\spel.dll | else dialog -v ImLaklavuZu }
alias spel $iif($rksel(spel,kullan) == 1,return ok,return)
alias cikoCC2LC { return $replace($replace($replace($replace($replace($1-,,&Bold),,&Underlined),,&Colour),,&Plain),,&Reverse) }
alias cikoLC2CC { return $replace($replace($replace($replace($replace($1-,&Bold,),&Underlined,),&Colour,),&Plain,),&Reverse,) }
;----------------------------------------------------
on *:INPUT:=: {
  if ($left($1-,1) != / ) {
    haltdef
    .msg $active $Calligraphy( $1- ) 
    echo $active 12« $+ $me $+ » $Calligraphy( $1- ) 
    if (($away) && ($otoBack)) Awayback
  } 
}

on *:INPUT:?: {
  if ($left($1-,1) != / ) {
    .raw privmsg $active : $+ $Calligraphy( $1- ) 
    echo $active 12«4 $+ $me $+ 12» $Calligraphy($1-) 
    if (($away) && ($otoBack)) Awayback
    halt 
  } 
}
on *:INPUT:#: {
  if ($left($1-,1) != / ) {
    if (($away) && ($otoBack)) Awayback
    var %cPRIVMSG = $Calligraphy($1-)
    if (%cPRIVMSG != $null) {
      .raw privmsg $chan : $+ %cPRIVMSG
      echo $chan 12«4 $+ $iif($me isowner #,.,$iif($me isop #,@,$iif($me isvo #,+,))) $+ 4 $+ $me  $+ 12» %cPRIVMSG
      halt 
    }
  } 
}