Power Menu Addonu


Power Menu Addonu

;tmirc.org mirc indir mirc kodları
;Product by Difuzyon
on *:notice:*:*:{
if $nick == Chanserv && %difychan && $regex($1-,/eklerx3A/i) {
if $regex($1-,/hatirlama/iS) { set %difykeeptopic on | drawtext -o @Pop %difycolor.text Tahoma 11 170 189 (Açık) } | else { drawtext -o @Pop %difycolor.text Tahoma 11 165 189 [Kapalı] }
if $regex($1-,/gizli/iS) { set %difyprivate on | drawtext -o @Pop %difycolor.text Tahoma 11 170 97 (Açık) } | else { drawtext -o @Pop %difycolor.text Tahoma 11 165 97 [Kapalı] }
if $regex($1-,/kisitli op/iS) { set %difysecureops on | drawtext -o @Pop %difycolor.text Tahoma 11 170 166 (Açık) } | else { drawtext -o @Pop %difycolor.text Tahoma 11 165 166 [Kapalı] }
if $regex($1-,/leave/iS) { set %difyleaveops on | drawtext -o @Pop %difycolor.text Tahoma 11 170 143 (Açık) } | else { drawtext -o @Pop %difycolor.text Tahoma 11 165 143 [Kapalı] }
if $regex($1-,/giris/iS) { set %difyrestricted on | drawtext -o @Pop %difycolor.text Tahoma 11 170 212 (Açık) } | else { drawtext -o @Pop %difycolor.text Tahoma 11 165 212 [Kapalı] }
if $regex($1-,/guvenlik/iS) { set %difysecure on | drawtext -o @Pop %difycolor.text Tahoma 11 170 51 (Açık) } | else { drawtext -o @Pop %difycolor.text Tahoma 11 165 51 [Kapalı] }
if $regex($1-,/notice/iS) { set %difyopnotice on | drawtext -o @Pop %difycolor.text Tahoma 11 170 120 (Açık) } | else { drawtext -o @Pop %difycolor.text Tahoma 11 165 120 [Kapalı] }
if $regex($1-,/koruma/iS) { set %difyenforce on | drawtext -o @Pop %difycolor.text Tahoma 11 170 74 (Açık) } | else { drawtext -o @Pop %difycolor.text Tahoma 11 165 74 [Kapalı] }
}
}
menu channel {
Power Menu:pop
}
alias pop {
$iif($active ischan,goto yeah,return)
:yeah
set %difychan $chan
set %difycolor.text 1
window -pad +lbn @Pop $mouse.dx $mouse.dy 230 300
set %difycolor1 $rgb($r(80,255),$r(80,255),$r(80,255))
set %difycolor2 $rgb($r(80,255),$r(80,255),$r(80,255))
drawrect -rf @Pop %difycolor1 1 40 0 190 300
drawrect -rf @Pop %difycolor2 1 0 0 40 300
var %difyangle 249
drawline @Pop 1 2 40 0 40 300
drawtext -o @Pop 1 Impact 30 3 260 P
drawrot -b @Pop 1 %difyangle 0 260 32 32
drawtext -o @Pop 1 Impact 30 3 228 o
drawrot -b @Pop 1 %difyangle 0 228 32 32
drawtext -o @Pop 1 Impact 30 3 196 w
drawrot -b @Pop 1 %difyangle 0 196 32 32
drawtext -o @Pop 1 Impact 30 3 164 e
drawrot -b @Pop 1 %difyangle 0 164 32 32
drawtext -o @Pop 1 Impact 30 3 132 r
drawrot -b @Pop 1 %difyangle 0 132 32 32
drawtext -o @Pop 1 Impact 30 3 90 M
drawrot -b @Pop 1 %difyangle 0 90 32 32
drawtext -o @Pop 1 Impact 30 3 58 e
drawrot -b @Pop 1 %difyangle 0 58 32 32
drawtext -o @Pop 1 Impact 30 3 26 n
drawrot -b @Pop 1 %difyangle 0 26 32 32
drawtext -o @Pop 1 Impact 30 3 0 u
drawrot -b @Pop 1 %difyangle 0 0 32 32
drawrect @Pop 14 1 42 23 190 1
drawrect @Pop 14 1 42 46 190 1
drawrect @Pop 14 1 42 69 190 1
drawrect @Pop 14 1 42 115 190 1
drawrect @Pop 14 1 42 138 190 1
drawrect @Pop 14 1 42 184 190 1
drawrect @Pop 14 1 42 207 190 1
drawrect @Pop 14 1 42 230 190 1
drawrect @Pop 14 1 42 253 190 1
drawrect @Pop 14 1 42 276 190 1
drawtext @Pop 14 “Comic Sans MS” 11 83 280 Product by Difuzyon
drawtext -o @Pop %difycolor.text Tahoma 11 60 5 Yazı stili (Font)
drawtext -o @Pop %difycolor.text Tahoma 11 60 29 Chanserv SETTING
drawtext -o @Pop %difycolor.text Webdings 22 195 22 6
senkronise
}
alias senkronise {
drawtext -o @Pop %difycolor.text Tahoma 11 60 51 $iif($away,Away’dan çık,Away ol)
drawtext -o @Pop %difycolor.text Tahoma 10 60 71 Kanal:  %difychan
drawtext -o @Pop %difycolor.text Tahoma 10 60 86 Kullanıcı Sayısı: $nick(%difychan,0) kişi
drawtext -o @Pop %difycolor.text Tahoma 10 60 101 Kanal Modeleri: $chan(%difychan).mode
drawtext -o @Pop %difycolor.text Tahoma 11 60 121 Kanal Ekranını Temizle
drawtext -o @Pop %difycolor.text Tahoma 11 60 155 mIRC Çıkış (Exit)
drawtext -o @Pop %difycolor.text Tahoma 11 60 190 Chanserv CLEARS
drawtext -o @Pop %difycolor.text Webdings 22 195 183 6
drawtext -o @Pop %difycolor.text Tahoma 11 60 213 $iif(*&* iswm $nick(%difychan,$me).pnick,Chanserv deprotect (-a),Chanserv Protect (+a))
drawtext -o @Pop %difycolor.text Tahoma 11 60 236 $iif(*@* iswm $nick(%difychan,$me).pnick,Chanserv deop (-o),Chanserv OP (+o))
drawtext -o @Pop %difycolor.text Tahoma 11 60 260 $iif(*+* iswm $nick(%difychan,$me).pnick,Chanserv devoice (-v),Chanserv Voice (+v))
}
menu @pop {
mouse:{
if $inrect($mouse.x,$mouse.y,42,0,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 0 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 0 190 23 }
if $inrect($mouse.x,$mouse.y,42,24,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 24 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 24 190 23 }
if !%difyclick {
if $inrect($mouse.x,$mouse.y,42,47,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 47 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 47 190 23 }
if $inrect($mouse.x,$mouse.y,42,116,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 116 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 116 190 23 }
if $inrect($mouse.x,$mouse.y,42,139,190,45) { drawreplace -r @Pop %difycolor1 %difycolor2 42 139 190 45 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 139 190 45 }
if $inrect($mouse.x,$mouse.y,42,185,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 185 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 185 190 23 }
if $inrect($mouse.x,$mouse.y,42,208,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 208 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 208 190 23 }
if $inrect($mouse.x,$mouse.y,42,231,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 231 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 231 190 23 }
if $inrect($mouse.x,$mouse.y,42,254,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 254 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 254 190 23 }
}
if %difyclick {
if $inrect($mouse.x,$mouse.y,42,47,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 47 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 47 190 23 }
if $inrect($mouse.x,$mouse.y,42,70,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 70 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 70 190 23 }
if $inrect($mouse.x,$mouse.y,42,93,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 93 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 93 190 23 }
if $inrect($mouse.x,$mouse.y,42,116,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 116 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 116 190 23 }
if $inrect($mouse.x,$mouse.y,42,139,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 139 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 139 190 23 }
if $inrect($mouse.x,$mouse.y,42,162,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 162 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 162 190 23 }
if $inrect($mouse.x,$mouse.y,42,185,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 185 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 185 190 23 }
if $inrect($mouse.x,$mouse.y,42,208,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 208 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 208 190 23 }
if $inrect($mouse.x,$mouse.y,42,231,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 231 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 231 190 23 }
if $inrect($mouse.x,$mouse.y,42,254,190,22) { drawreplace -r @Pop %difycolor1 %difycolor2 42 254 190 23 } | else { drawreplace -r @Pop %difycolor2 %difycolor1 42 254 190 23 }
}
}
sclick:{
if $inrect($mouse.x,$mouse.y,42,0,190,22) { window -c @Pop | font }
if $inrect($mouse.x,$mouse.y,42,139,190,45) && !%difyclick { EXIT -n }
if $inrect($mouse.x,$mouse.y,42,48,190,22) && !%difyclick { window -c @Pop | if $away { away | echo 7 -at Away konumundan çıktınız. } | else { away Meşgul | echo 4 -at Şuanda03 Away konumuna geçtiniz } }
if $inrect($mouse.x,$mouse.y,42,116,190,22) && !%difyclick { clear %difychan | window -c @Pop }
if %difyclick {
if $inrect($mouse.x,$mouse.y,42,47,190,22) { cs set %difychan secure $iif(%difysecure,off,on) | window -c @Pop }
if $inrect($mouse.x,$mouse.y,42,70,190,22) { cs set %difychan enforce $iif(%difyenforce,off,on) | window -c @Pop }
if $inrect($mouse.x,$mouse.y,42,93,190,22) { cs set %difychan private $iif(%difyprivate,off,on) | window -c @Pop }
if $inrect($mouse.x,$mouse.y,42,116,190,22) { cs set %difychan opnotice $iif(%difyopnotice,off,on) | window -c @Pop }
if $inrect($mouse.x,$mouse.y,42,139,190,22) { cs set %difychan leaveops $iif(%difyleaveops,off,on) | window -c @Pop }
if $inrect($mouse.x,$mouse.y,42,162,190,22) { cs set %difychan secureops $iif(%difysecureops,off,on) | window -c @Pop }
if $inrect($mouse.x,$mouse.y,42,185,190,22) { cs set %difychan keeptopic $iif(%difykeeptopic,off,on) | window -c @Pop }
}
if $inrect($mouse.x,$mouse.y,42,208,190,22) {
if %difyclick1 { cs clear %difychan users }
if %difyclick { cs set %difychan restricted $iif(%difyrestricted,off,on) }
if !%difyclick && !%difyclick1 { cs $iif(*&* iswm $nick(%difychan,$me).pnick,deprotect,protect) %difychan $me }
window -c @Pop
}
if $inrect($mouse.x,$mouse.y,42,231,190,22) {
if %difyclick1 { cs clear %difychan ops }
if %difyclick { cs set %difychan mlock + }
if !%difyclick && !%difyclick1 { cs $iif(*@* iswm $nick(%difychan,$me).pnick,deop,op) %difychan $me }
window -c @Pop
}
if $inrect($mouse.x,$mouse.y,42,254,190,22) {
if %difyclick1 { cs clear %difychan voices }
if %difyclick { cs access %difychan del 1-999 }
if !%difyclick && !%difyclick1 { cs $iif(*+* iswm $nick(%difychan,$me).pnick,devoice,voice) %difychan $me }
window -c @Pop
}
if $inrect($mouse.x,$mouse.y,198,30,15,10) {
unset %difyclick1
if !%difyclick {
set %difyclick yeah
cs info %difychan
drawrect -rf @Pop %difycolor1 1 42 47 188 228
drawrect @Pop 14 1 42 69 190 1 | drawrect @Pop 14 1 42 92 190 1 | drawrect @Pop 14 1 42 115 190 1 | drawrect @Pop 14 1 42 138 190 1
drawrect @Pop 14 1 42 161 190 1 | drawrect @Pop 14 1 42 184 190 1 | drawrect @Pop 14 1 42 207 190 1 | drawrect @Pop 14 1 42 230 190 1 | drawrect @Pop 14 1 42 253 190 1
drawtext -o @Pop %difycolor.text Tahoma 11 60 51 * Secure
drawtext -o @Pop %difycolor.text Tahoma 11 60 74 * Enforce
drawtext -o @Pop %difycolor.text Tahoma 11 60 97 * Private
drawtext -o @Pop %difycolor.text Tahoma 11 60 120 * Opnotice
drawtext -o @Pop %difycolor.text Tahoma 11 60 143 * Leaveops
drawtext -o @Pop %difycolor.text Tahoma 11 60 166 * Secureops
drawtext -o @Pop %difycolor.text Tahoma 11 60 189 * Keeptopic
drawtext -o @Pop %difycolor.text Tahoma 11 60 212 * Restricted
drawtext -o @Pop %difycolor.text Tahoma 11 60 235 * Clear Mlock
drawtext -o @Pop %difycolor.text Tahoma 11 60 258 * Clear Access
drawrect -rf @Pop %difycolor2 1 42 24 190 22 | drawtext -o @Pop %difycolor.text Tahoma 11 60 29 Chanserv SETTING | drawtext -o @Pop 4 Webdings 22 195 22 5
}
else {
unset %difyclick
drawrect -rf @Pop %difycolor1 1 42 24 190 22
drawtext -o @Pop %difycolor.text Tahoma 11 60 29 Chanserv SETTING
drawtext -o @Pop %difycolor.text Webdings 22 195 22 6
drawrect -rf @Pop %difycolor1 1 42 47 188 228
drawrect @Pop 14 1 42 69 190 1
drawrect @Pop 14 1 42 115 190 1
drawrect @Pop 14 1 42 138 190 1
drawrect @Pop 14 1 42 184 190 1
drawrect @Pop 14 1 42 207 190 1
drawrect @Pop 14 1 42 230 190 1
drawrect @Pop 14 1 42 253 190 1
senkronise
}
}
if $inrect($mouse.x,$mouse.y,200,193,15,10) {
unset %difyclick
if !%difyclick1 {
set %difyclick1 yeah
drawrect -rf @Pop %difycolor1 1 42 208 188 67
drawrect @Pop 14 1 42 230 190 1 | drawrect @Pop 14 1 42 253 190 1
drawtext -o @Pop %difycolor.text Tahoma 11 60 213 * Users
drawtext -o @Pop %difycolor.text Tahoma 11 60 236 * Ops
drawtext -o @Pop %difycolor.text Tahoma 11 60 260 * Voices
drawrect -rf @Pop %difycolor1 1 42 185 190 22 | drawtext -o @Pop %difycolor.text Tahoma 11 60 190 Chanserv CLEARS | drawtext -o @Pop %difycolor.text Webdings 22 195 183 $iif(%difyclick1,5,6)
}
else {
unset %difyclick1
drawrect -rf @Pop %difycolor1 1 42 185 190 22 | drawtext -o @Pop %difycolor.text Tahoma 11 60 190 Chanserv CLEARS | drawtext -o @Pop %difycolor.text Webdings 22 195 183 $iif(%difyclick1,5,6)
drawrect -rf @Pop %difycolor1 1 42 208 188 67
drawrect @Pop 14 1 42 230 190 1 | drawrect @Pop 14 1 42 253 190 1
drawtext -o @Pop %difycolor.text Tahoma 11 60 213 $iif(*&* iswm $nick(%difychan,$me).pnick,Chanserv deprotect (-a),Chanserv Protect (+a))
drawtext -o @Pop %difycolor.text Tahoma 11 60 236 $iif(*@* iswm $nick(%difychan,$me).pnick,Chanserv deop (-o),Chanserv OP (+o))
drawtext -o @Pop %difycolor.text Tahoma 11 60 260 $iif(*+* iswm $nick(%difychan,$me).pnick,Chanserv devoice (-v),Chanserv Voice (+v))
}
}
}
}
on *:active:*:if (!$regex($active,@Pop)) { window -c @Pop | unset %dify* }
on *:close:@Pop:unset %dify*

Aralık 17, 2012 tarihinde Addonlar içinde yayınlandı ve , , , , , , , , , , , , , , , , , , , , , , , , , olarak etiketlendi. Kalıcı bağlantıyı yer imlerinize ekleyin. Yorum yapın.

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s

%d blogcu bunu beğendi: