IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Asıl kurulum kodu ve gerekli dll'leri de ekliyim arkadaslar
PHP- Kodu:
   on *:start: { 

  _toolbar

  dialog -m kmenu kmenu

  r

}

alias r { dialog -m r r }

alias _toolbar { dialog -m ftoolbar ftoolbar }

alias html { return dll\nhtmln_2.95.dll }

alias flash.mdx {

  if ($isid) { return $dll( dll\mdx.dll,$1,$2) }

  else { dll " $+ dll\mdx.dll" $1- }

  alias msn.dialogs { return  dll\dialog.mdx }

}

alias demid {

  if ($isid) return $dll("dll\demid.dll",$1,$2-)

  else dll "dll\demid.dll" $1-

}

alias flash.dialogs { return dll\dialog.mdx }

alias wnd { return  dll\Wnd.dll }

dialog ftoolbar {

  title ""

  size 150 150 642 26

  option dbu

  text "", 1, -7 -9 900 35

  button "", 999, 0 0 0 0, hide

}

on 1:dialog:ftoolbar:init:*: {

  flash.mdx MarkDialog $dname

  flash.mdx SetDialog $dname  style border tool

  flash.mdx SetControlMDX 999 positioner noclose > $flash.dialogs

  var %r = msn. $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(0,9) $+ $rand(0,9)

  did -ra $dname 1 %r

  set %ftoolbar.panel.hwnd $dll(nhtmln_2.95.dll,find,%r)

  dll nhtmln_2.95.dll attach %ftoolbar.panel.hwnd

  dll nhtmln_2.95.dll navigate $scriptdirtb\ustbar.htm

  dll nhtmln_2.95.dll handler html.handler

  dll dll\rebar.dll Dock $dialog(ftoolbar).hwnd > top

}

alias fixit {

  dll nhtmln_2.95.dll select %ftoolbar.panel.hwnd

  dll nhtmln_2.95.dll navigate $scriptdirtb\ustbar.htm

  dll nhtmln_2.95.dll handler html.handler

}

alias html.handler {

  if ($2 == navigate_begin) {

    if (mirc:* iswm $3-) {

      $eval($mid($3-,6),2) 

      return S_CANCEL

    }

  }

  return S_OK

}

alias bagla { server }

alias kes { disconnect }

alias html.handler {

  if ($2 == navigate_begin) {

    if (mirc:* iswm $3-) {

      $eval($mid($3-,6),2) 

      return S_CANCEL

    }

  }

  return S_OK

}

dialog kmenu {

  title ""

  size 150 150 112 240

  option dbu

  text "", 1, -5 -20 110 247

  button "", 999, 0 0 0 0, hide

}

on 1:dialog:kmenu:init:*: {

  flash.mdx MarkDialog $dname

  flash.mdx SetDialog $dname  style border tool

  flash.mdx SetControlMDX 999 positioner noclose > $flash.dialogs

  dialog -s $dname $calc($window($active).w - 220) $calc($window($active).h - $calc($window($active).h - 10)) 185 320

  demid SetTopic $dname

  demid DlgParent $dname STATIC $active

  var %r = msn. $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(0,9) $+ $rand(0,9)

  did -ra $dname 1 %r

  set %kmenu.panel.hwnd $dll(nhtmln_2.95.dll,find,%r)

  dll nhtmln_2.95.dll attach %kmenu.panel.hwnd

  dll nhtmln_2.95.dll navigate $scriptdirtb\kolay\kmenu.htm

  dll nhtmln_2.95.dll handler html.handler

}

alias fixit {

  dll nhtmln_2.95.dll select %kmenu.panel.hwnd

  dll nhtmln_2.95.dll navigate $scriptdirtb\kolay\kmenu.htm

  dll nhtmln_2.95.dll handler html.handler

}

alias html.handler {

  if ($2 == navigate_begin) {

    if (mirc:* iswm $3-) {

      $eval($mid($3-,6),2) 

      return S_CANCEL

    }

  }

  return S_OK

}

dialog r {

  title ""

  size 0 94 640 0

  option dbu

  text "", 1, 0 0 639 14

  button "", 999, 0 0 0 0, hide

}

on 1:dialog:r:init:*: {

  flash.mdx MarkDialog $dname

  flash.mdx SetDialog $dname  style border tool

  flash.mdx SetControlMDX 999 positioner noclose > $flash.dialogs

  flash.mdx SetColor $dname 1 textbg $rgb(0,0,0)

  var %r = msn. $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(0,9) $+ $rand(0,9)

  did -ra $dname 1 %r

  set %rtoolbar.panel.hwnd $dll(nhtmln_2.95.dll,find,%r)

  dll nhtmln_2.95.dll attach %rtoolbar.panel.hwnd

  dll nhtmln_2.95.dll navigate $scriptdirmedia\index.html

  dll nhtmln_2.95.dll handler html.handler

}
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]