mIRC Home    About    Download    Register    News    Help

Print Thread
#171968 03/03/07 11:50 AM
Joined: Mar 2007
Posts: 9
B
br0nx Offline OP
Nutrimatic drinks dispenser
OP Offline
Nutrimatic drinks dispenser
B
Joined: Mar 2007
Posts: 9
Code:
alias cp { dialog -m cp cp } 
dialog cp { 
  title "Channel Part" 
  size -1 -1 200 90 
  option dbu 
  edit "", 1, 76 51 50 10, autohs 
  edit "", 2, 11 24 180 10, autohs 
  text "Channel", 3, 90 39 21 9 
  text "Message", 4, 90 7 21 9 
  button "On", 5, 11 50 33 12 
  button "Off", 6, 156 50 33 12 
  button "Ok", 7, 85 70 33 12, ok 
} 
alias cpa { dialog -m cpa cpa } 
dialog cpa { 
  title "About" 
  size -1 -1 120 135 
  option dbu 
  box "About", 1, 5 4 109 39 
  text "Addon : Channel Part", 2, 11 15 97 8 
  text "Version : v3 Beta", 3, 11 28 97 8 
  box "About Author", 4, 5 44 109 84 
  text "Author : br0nx", 5, 11 54 97 8 
  text "Author Chan : #scr1pt1ng", 6, 11 70 97 8 
  text "Author Serv : irc.krstarica.com", 7, 11 85 97 8 
  text "Author Email : br0nx.20@inbox.com", 8, 11 100 97 8 
  text "Addon Address : br0nx.20.forumer.com", 9, 11 115 97 8 
} 
on *:dialog:cp:init:*: { 
  did -a cp 1 %chan.part 
  did -a cp 2 %part.msg 
} 
alias chan.part { 
  set %chan.part $did(1) 
  %chan.part 
} 
alias part.msg { 
  set %part.msg $did(2) 
  %part.msg 
} 
on *:dialog:cp:sclick:5: { 
  set %chan.part $did(1) 
  set %part.msg $did(2) 
} 
on *:dialog:cp:sclick:6: { 
  unset %chan.part $did(1) 
  unset %part.msg $did(2) 
} 
on *:dialog:cp:sclick:7: { 
} 
on *:connect: { 
  timer 1 2 join %chan.part 
} 
on *:part:%chan.part: { 
  if ($nick == $me) { 
    timer 1 2 join %chan.part 
    echo $me Send Message -= %part.msg =- Channel Part By br0nx 
  } 
} 
menu * { 
  - 
  .Channal Part:cp 
  .Channal Part About:cpa 
  - 
} 

Joined: Oct 2004
Posts: 8,330
Hoopy frood
Offline
Hoopy frood
Joined: Oct 2004
Posts: 8,330
This forum is not a script distribution forum. If there is a REASON why you posted 6 messages like that, then state it. Otherwise, please don't flood the forum with useless posts.


Invision Support
#Invision on irc.irchighway.net

Link Copied to Clipboard