FoRuM KaNaLa #chanel
Would you like to react to this message? Create an account in a few clicks or log in to continue.
FoRuM KaNaLa #chanel

FoRuM KaNaLa #chanel
 
PrijemPrijem  PortalliPortalli  TražiTraži  Latest imagesLatest images  Registruj seRegistruj se  Pristupi  

 

 Quick Menu

Ići dole 
AutorPoruka
^^^^Car^^^^
Member
Member



Broj poruka : 92
Location : Sombor
Datum upisa : 16.08.2007

Quick Menu Empty
PočaljiNaslov: Re: Quick Menu   Quick Menu Icon_minitimeNed Avg 19, 2007 7:09 pm

Kod:
;Quick menu created by NeTwORk
;Visit => www.yumirc.org <= visit !
;Cee Ya,and have a nice day ... :PPPP
menu channel,MenuBar,status {
  QuickMenu
  .QuickMenu:/quickm
  .About:/dialog -m abot abot
}
;;;;;;=-Dialogs-=;;;;;;;;;;
alias quickm { dialog -m quickm quickm }
dialog quickm {
  title "Quick Menu"
  size -1 -1 64 108
  option dbu
  button "Whois", 1, 1 3 28 12
  button "Quit IRC", 2, 33 3 28 12
  button "Partall", 3, 1 20 28 13
  button "Join", 4, 33 20 28 13
  button "INFO", 5, 1 39 28 13
  button "Rejoin act", 6, 33 39 28 13
  button "exit mIRC", 7, 1 58 30 13
  button "Clear", 8, 35 58 32 13
  button "PING", 9, 1 77 32 13
  button "TIME", 10, 36 78 27 12
  button "VERSION", 11, 13 92 40 15
}
on 1:dialog:quickm:sclick:*: {
  if ( $did == 1 ) { /whois $$?="Upisi nadimak" }
  if ( $did == 2 ) { /quit Leave the IRC. }
  if ( $did == 3 ) { /partall }
  if ( $did == 4 ) { /join $$?="Upisi ime kanala" }
  if ( $did == 5 ) { /info }
  if ( $did == 6 ) { /hop $active }
  if ( $did == 7 ) { /exit }
  if ( $did == 8 ) { /clear }
  if ( $did == 9 ) { /ctcp $$?="Upisi nadimak" PING }
  if ( $did == 10 ) { /ctcp $$?="Upisi nadimak" TIME }
  if ( $did == 11 ) { /ctcp $$?="Upisi nadimak" VERSION }
}
------=-> About <-=---------------
dialog abot {
  title "About"
  size -1 -1 136 53
  option dbu
  text "Mislim sta reci...Addon je napravio Network.Visit => www.yumirc.org <=.                                        ----------------> Vidimo se <-------------------", 1, 6 4 120 27
  link "www.yumirc.org", 2, 41 36 41 9
}
---------=-Load and Unload-=-----------
on 1:load:{
  echo -a 0,14Quick Menu Loaded.
  echo -a 0,14Created by NeTwOrK.
  echo -a 0,14Cee Ya.
}
on 1:unload:{
  echo -a 0,14Quick Menu unloaded.
  echo -a 0,14Thanks for using.
  echo -a 0,14Cee Ya !!!
}
----------=-=-=------------
;Nickname: Network/ShaMaN
;Server: irc.krstarica.com #89

;Visit => www.yumirc.org <= !!
;Thanks for using ... <-------
----------=-End-=-------------
Nazad na vrh Ići dole
^^^^Car^^^^
Member
Member



Broj poruka : 92
Location : Sombor
Datum upisa : 16.08.2007

Quick Menu Empty
PočaljiNaslov: Re: Quick Menu   Quick Menu Icon_minitimeNed Avg 19, 2007 7:10 pm

Kod:
; [Druga Verzija] od Quick Menu
; I am back,created by Network(ShaMaN)
;Uzivajte ljudi,have a nice chat :PpP
dialog qm {
  title "QuickMenu [Druga verzija]"
  size -1 -1 219 36
  option dbu
  button "Udji na kanal", 1, 0 1 37 12, flat
  button "Uradi whois", 2, 42 1 37 12, flat
  button "Izadji sa IRCa", 3, 82 1 37 12, flat
  button "Izadji sa svih kanala", 4, 123 1 52 12, flat
  button "Izadji iz mIRC", 5, 180 1 37 12, flat
  button "Izbrisi poruke", 6, 0 17 38 13, flat
  button "CTCP", 7, 42 17 38 13, flat
  button "INFO server", 8, 83 17 37 12, flat
  button "Admin Lista", 9, 125 17 37 12, flat
  button "Uradi rejoin", 10, 169 17 49 12, flat
}
on 1:dialog:qm:sclick:*: {
  if ( $did == 1 ) { join $$?="Upisi ime kanala:"  }
  if ( $did == 2 ) { whois $$?="Upisi nadimak:" }
  if ( $did == 3 ) { quit cee ya ;) }
  if ( $did == 4 ) { partall }
  if ( $did == 5 ) { exit }
  if ( $did == 6 ) { clear | echo -a all is nice and clean :) }
  if ( $did == 7 ) { ctcpz }
  if ( $did == 8 ) { info }
  if ( $did == 9 ) { admin  }
  if ( $did == 10 ) { hop }
}
alias ctcpz { dialog -m ctcpz ctcpz }
dialog ctcpz {
  title "CTCP komande"
  size -1 -1 91 30
  option dbu
  button "Version", 1, 2 2 37 12
  button "PING", 2, 2 16 37 12
  button "TIME", 3, 44 2 37 12
  link "www.yumirc.org", 4, 45 17 41 7
}
on 1:dialog:ctcpz:sclick:*: {
  if ( $did == 1 ) { ctcp $$?="Upisi nadimak:" version }
  if ( $did == 2 ) { ctcp $$?="Upisi nadimak:" ping }
  if ( $did == 3 ) { ctcp $$?="Upisi nadimak:" time }
}
dialog about {
  title "About Addon "
  size -1 -1 77 36
  option dbu
  text "Druga verzija Addona Quick Menu :) Addon je napravio Network uzivajte.", 1, 1 1 68 20
  link "www.yumirc.org", 2, 13 23 43 8
}
menu channel,query,status, {
  QuickMenu
  .Quick Menu:/dialog -m qm qm
  .About:/dialog -m about about
}
on 1:load:{
  echo -a 0,115Hvala sto koristite Quick Menu by Network
}
on 1:unload:{
  echo -a 0,115Hvala sto ste koristili Quick Menu by Network.Uzivajte ;)
}
;Created by Network
;Visit -> www.yumirc.org <-
;Uzivajte i lep chat ti zeli Network
Nazad na vrh Ići dole
 
Quick Menu
Nazad na vrh 
Strana 1 od 1

Dozvole ovog foruma:Ne možete odgovarati na teme u ovom forumu
FoRuM KaNaLa #chanel :: Scripting :: Addons-
Skoči na: