Link Menu Add-on

By mirc indir on Aug 20, 2011

Turkey is the best mIRC script script mIRCCLub internal connection menu. This is written with the colorization of mdx.dll mIRC Connect menu feature. Simple and nice-looking menu. by technology that is absolute in the marquee. Mırc'ınıza be installed as you can see in the picture.

Menu link to download from ==>> http://www.mircclub.org/addon/mcscriptbag.zip
Source : http://www.mircclub.org

To install a zipped folder, dispose of all files in mIRC main folder. So when mirc / / run $mircdir. After casting the installation files with the following command in the directory.

• / load-rs mcscriptbag.txt

Addonu to open: / absolut53 type.
Author: absolut

;;;;;;;;Link Menu;;;;;;;;;;;;;;
;;;;;;;;Author absolut;;;;;;;;;;;;;;;;
;;;;;;;;Date 13 eylül 2009;;;;;;;;;;
dialog absolut53 {
  title "¶   M¢Lµbº§¢ript  ¶  - Chat Program - absolut"
  size -1 -1 345 225
  option pixels
  edit "", 3, 97 94 130 20, autohs
  text "Server", 13, 18 140 60 20
  combo 14, 97 139 130 97, sort size edit hsbar drop
  text "Port", 16, 237 143 30 20, center
  edit "", 17, 280 139 48 20, autohs
  button "CONNECT CHAT", 19, 40 173 265 20, flat ok
  text " absolut technology.", 1, 39 209 262 23, center
  text "NickName", 4, 18 97 75 16, left
  edit "¶   M¢Lµbº§¢ript  ¶ ", 2, 7 3 329 54, read center
  button "CLOSE", 5, 233 94 99 20, default flat multi
}

alias mdx { 
  return $dll(mdx.dll,$1,$2-) 
}
alias -l mdxdll return $dll(mdx.dll,$1,$2-)
alias -l absokay {
  if ($dialog(absolut53)) {
    set %text.x $gettok($mdxdll(MoveControl,absolut53 1),2,32)
    if (%text.x == $+(-,%text.w)) set %text.x $dialog(absolut53).w
    dec %text.x
    mdx MoveControl absolut53 1 %text.x *
  }
  else {
    unset %text.x %text.w
    .timersabsokay off
  }
}

alias absolut53 {  dialog -m absolut53 absolut53    }
on *:dialog:absolut53:*:*:{
  if ($devent == init) {
    mdx SetMircVersion $version
    mdx MarkDialog $dname $dialog($dname).hwnd
    mdx SetDialog $dname style title tool button sysmenu
    set %text.w $gettok($mdxdll(MoveControl,$dname 1),4,32)
    mdx MoveControl $dname 16 $dialog($dname).w *
    .timersky 0 0 absokay
    mdx SetBorderStyle 1,19,2,3,17
    mdx SetFont $dname 19,5 Turkish 19 5000 Arial
    mdx SetFont $dname 13,4,16 Turkish 15 700 Tahoma
    mdx SetFont $dname 2 Turkish 34 700 Arial
    mdx SetFont $dname 1 Turkish 20 700 Arial
    mdx SetFont $dname 3,14 Turkish 15 700 MS Sans Serif
    mdx SetColor $dname 4,16,13,2,1,19,2 background $rgb(44,85,177)
    mdx SetColor $dname 3,17,14,5 background $rgb(0,0,0)
    mdx SetColor $dname 3,17,14 textbg $rgb(0,0,0)
    mdx SetColor $dname 3,17,14,4,13 text $rgb(255,255,255)
    mdx SetColor $dname 4,16,13,2,1 textbg $rgb(44,85,177)
    mdx SetColor $dname 2 text $rgb(255,255,255)
    mdx SetColor $dname 1 text $rgb(210,210,210)
    mdx SetColor $dname 3,16 text $rgb(0,255,255)
    mdx SetDialog $dname bgcolor $rgb(44,85,177)

    did -a absolut53 14 irc.sohbetc.org
    did -a absolut53 14 irc.mircclub.org
    did -a absolut53 14 irc.mircdb.net
    did -a absolut53 14 irc.rizeliyiz.net

    did -c absolut53 14 1
    did -a absolut53 17 6667
    did -a absolut53 3 $me
    did -c absolut53 17 1
    did -c absolut53 3 1
  }
  if ($devent == sclick) && ($did == 19) { /Splay $mircdirMenu.wav | .nick $did(3) | server $did(14) $+ : $+ $did(17)   }
  if ($devent == sclick) && ($did == 5) {  /Splay $mircdirMenu.wav | dialog -x absolut53 absolut53  }

}

Comments

Sign in to comment.
Frenetic   -  Aug 20, 2011

Did you make this or modify at least 50-60% of it? If not you're not allowed to post..

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.