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

>
+
Etiketlenen Kullanıcılar

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Arama Stil
Alt 22 Eylül 2009, 01:24   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: away addonu menu seklinde




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias awaymenu { dialog -m arkaway arkaway } dialog arkaway { title "Away / Meşgul Menüsü" size -1 -1 227 115 option dbu text "Away Sebebi : ", 1, 7 12 80 8 edit "", 2, 47 11 131 10 button "AWAY OL", 3, 141 27 55 9, flat check "Nickin Sonuna Ekle :", 4, 7 27 57 8 edit "", 5, 68 26 64 10 box "Away Menü Ayarları :", 6, 3 1 220 40 button "Dışarıdayım", 8, 7 61 41 12, flat button "TV İzliyorum", 15, 7 75 41 12, flat button "PC Başında Değilim", 16, 60 75 50 12, flat button "Hemen Döneceğim", 17, 113 75 50 12, flat button "Telefondayım", 18, 166 75 41 12, flat button "Yemekteyim", 9, 60 61 50 12, flat button "Oyundayım", 10, 113 61 50 12, flat button "Uyuyorum", 11, 166 61 41 12, flat box "Hazır Away Mesajları :", 12, 3 42 220 70 text "Seçtiğiniz Away Sebebinin Üstüne Tıkla***** Otomatik Olarak Away Olabilirsiniz.", 13, 12 50 196 8, disable button "AWAYDAN DÖN", 7, 17 92 87 12 button "PENCEREYİ KAPAT", 14, 111 92 87 12, ok } on *:dialog:arkaway:init:0: { .timer -m 1 10 /did -f arkaway 2 if (%addnick != $null) { did -c arkaway 4 | did -a arkaway 5 %addnick | did -e arkaway 5 } if (%awayres != $null) { did -a arkaway 2 %awayres } if (%addnick == $null) { did -u arkaway 4 | did -b arkaway 5 } } on *:dialog:arkaway:sclick:3: { set %addnick $did(5) set %awayres $did(2) if ($did(4).state == 1) { if ($away == $true) halt set %backnick $me /ame Şuanda Awayım. Sebep : ( $+ $did(2) $+ )  | echo -a %logo $+ 2 Şuan awaysınız.  /away %logo 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 $did(2)  /nick $me $+ $did(5) } if ($did(4).state == 0) { if ($away == $true) halt /ame Şuanda Awayım. Sebep : ( $did(2) )  [Away Meşgul Sistemi]  | echo -a %logo $+ 2 Şuan awaysınız.  /away %logo 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 $did(2)  } } on *:dialog:arkaway:sclick:4: { if ($did(4).state == 0) { did -r arkaway 5 | did -b arkaway 5 | unset %addnick } if ($did(4).state == 1) { if (%addnick == $null) { set %addnick _aWay did -r arkaway 5 did -a arkaway 5 %addnick did -e arkaway 5 } did -e arkaway 5 } } on *:dialog:arkaway:sclick:8: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Dışarıdayım!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:9: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Yemekteyim!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:10: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Oyundayım!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:11: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Uyuyorum!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:15: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 TV İzliyorum!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:16: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 PC Başında Değilim!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:17: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Hemen Döneceğim!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:18: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Telefondayım!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:7: { away | /amsg Awaydım Geri Döndüm! | echo %logo 2Away Modundan Çıktınız. }


Bu şekilde, denersen olacaktır.. iyi forumlar..

__________________
Lucifer dediler bana, kötülüğü anlatmak için. Halbuki, ışık ve güzelliği anlatırdı Lucifer. Ben kötüyüm bu düzen için; ama değilim asla kötülük.
 
Alıntı ile Cevapla

Alt 24 Eylül 2009, 17:26   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: away addonu menu seklinde




neverbackdown Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias awaymenu { dialog -m arkaway arkaway } dialog arkaway { title "Away / Meşgul Menüsü" size -1 -1 227 115 option dbu text "Away Sebebi : ", 1, 7 12 80 8 edit "", 2, 47 11 131 10 button "AWAY OL", 3, 141 27 55 9, flat check "Nickin Sonuna Ekle :", 4, 7 27 57 8 edit "", 5, 68 26 64 10 box "Away Menü Ayarları :", 6, 3 1 220 40 button "Dışarıdayım", 8, 7 61 41 12, flat button "TV İzliyorum", 15, 7 75 41 12, flat button "PC Başında Değilim", 16, 60 75 50 12, flat button "Hemen Döneceğim", 17, 113 75 50 12, flat button "Telefondayım", 18, 166 75 41 12, flat button "Yemekteyim", 9, 60 61 50 12, flat button "Oyundayım", 10, 113 61 50 12, flat button "Uyuyorum", 11, 166 61 41 12, flat box "Hazır Away Mesajları :", 12, 3 42 220 70 text "Seçtiğiniz Away Sebebinin Üstüne Tıkla***** Otomatik Olarak Away Olabilirsiniz.", 13, 12 50 196 8, disable button "AWAYDAN DÖN", 7, 17 92 87 12 button "PENCEREYİ KAPAT", 14, 111 92 87 12, ok } on *:dialog:arkaway:init:0: { .timer -m 1 10 /did -f arkaway 2 if (%addnick != $null) { did -c arkaway 4 | did -a arkaway 5 %addnick | did -e arkaway 5 } if (%awayres != $null) { did -a arkaway 2 %awayres } if (%addnick == $null) { did -u arkaway 4 | did -b arkaway 5 } } on *:dialog:arkaway:sclick:3: { set %addnick $did(5) set %awayres $did(2) if ($did(4).state == 1) { if ($away == $true) halt set %backnick $me /ame Şuanda Awayım. Sebep : ( $+ $did(2) $+ )  | echo -a %logo $+ 2 Şuan awaysınız.  /away %logo 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 $did(2)  /nick $me $+ $did(5) } if ($did(4).state == 0) { if ($away == $true) halt /ame Şuanda Awayım. Sebep : ( $did(2) )  [Away Meşgul Sistemi]  | echo -a %logo $+ 2 Şuan awaysınız.  /away %logo 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 $did(2)  } } on *:dialog:arkaway:sclick:4: { if ($did(4).state == 0) { did -r arkaway 5 | did -b arkaway 5 | unset %addnick } if ($did(4).state == 1) { if (%addnick == $null) { set %addnick _aWay did -r arkaway 5 did -a arkaway 5 %addnick did -e arkaway 5 } did -e arkaway 5 } } on *:dialog:arkaway:sclick:8: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Dışarıdayım!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:9: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Yemekteyim!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:10: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Oyundayım!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:11: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Uyuyorum!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:15: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 TV İzliyorum!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:16: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 PC Başında Değilim!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:17: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Hemen Döneceğim!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:18: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Telefondayım!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:7: { away | /amsg Awaydım Geri Döndüm! | echo %logo 2Away Modundan Çıktınız. }


Bu şekilde, denersen olacaktır.. iyi forumlar..


Peki Menu Seklinde Olmuyor Mu Bu acaba?

 
Alıntı ile Cevapla

Alt 24 Eylül 2009, 18:42   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: away addonu menu seklinde




menu menubar,channel,status {
«» Away Sistemi
.&Away ol / geri dön
..&Set Away/Geri dön:maway2
.&Genele (/ame)
..&Away ol/Geri dön:maway
..&Away Sebebi Sec
...&Yemek:if ($away == $false) set %away.reason Yemekteyim | predefaway
...&Uyku:if ($away == $false) set %away.reason Su an uyuyorum. Ses yapmayin. | predefaway
...&Web:if ($away == $false) set %away.reason Su an web sayfalarinda sorf yapiyorum | predefaway
...&Gezinti:if ($away == $false) set %away.reason Dışardayım, geziyorum.. | predefaway
...&Sigara:if ($away == $false) set %away.reason Sigara icmekteyim. | predefaway
...&Kahve:if ($away == $false) set %away.reason Kahve iciyorum, istermisin ? | predefaway
...&Customized
....1 ( $+ %predef.1 $+ )
.....Use this one:if (%predef.1 != empty) && ($away == $false) set %away.reason %predef.1 | predefaway
.....Change...:set %predef.1 $$?="Enter reason: "
....2 ( $+ %predef.2 $+ )
.....Use this one:if ( %predef.2 != empty ) && if ($away == $false) set %away.reason %predef.2 | predefaway
.....Change...:set %predef.2 $$?="Enter reason: "
....3 ( $+ %predef.3 $+ )
.....Use this one:if ( %predef.3 != empty ) && if ($away == $false) set %away.reason %predef.3 | predefaway
.....Change...:set %predef.3 $$?="Enter reason: "
....4 ( $+ %predef.4 $+ )
.....Use this one:if ( %predef.4 != empty ) && if ($away == $false) set %away.reason %predef.4 | predefaway
.....Change...:set %predef.4 $$?="Enter reason: "
....5 ( $+ %predef.5 $+ )
.....Use this one:if ( %predef.5 != empty ) && if ($away == $false) set %away.reason %predef.5 | predefaway
.....Change...:set %predef.5 $$?="Enter reason: "
.&Away Nick
..$iif(%away.nick == on,off,on):if (%away.nick == on) anoff | else anon
..&Set away nick: {
set %away.nick.1 $$?="Enter away nick - e.g. : -gone, -away, {A}"
if ( %away.nick.1 == $null ) { set %away.nick.1 -Gone }
else echo -a Away nickname set to %away.nick.1 $+ .
}
.&Pencere
..&On:set %away.pager on | echo -a CTCP penceresi acık..
..&Off:set %away.pager off | echo -a CTCP penceresi kapalı..
..&Mesajları Gör: {
window -ak @PagerLog -0 -0
if ( $exists(logs\pager.log)) { loadbuf @PagerLog logs\pager.log }
else {
write logs\pager.log $away.logo
loadbuf @PagerLog logs\pager.log
}
}

Menü ŞekLinde İstiyorsan Kod bu ŞekiLdedir.

 
Alıntı ile Cevapla

Alt 24 Eylül 2009, 18:48   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: away addonu menu seklinde




DiscO Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
menu menubar,channel,status {
«» Away Sistemi
.&Away ol / geri dön
..&Set Away/Geri dön:maway2
.&Genele (/ame)
..&Away ol/Geri dön:maway
..&Away Sebebi Sec
...&Yemek:if ($away == $false) set %away.reason Yemekteyim | predefaway
...&Uyku:if ($away == $false) set %away.reason Su an uyuyorum. Ses yapmayin. | predefaway
...&Web:if ($away == $false) set %away.reason Su an web sayfalarinda sorf yapiyorum | predefaway
...&Gezinti:if ($away == $false) set %away.reason Dışardayım, geziyorum.. | predefaway
...&Sigara:if ($away == $false) set %away.reason Sigara icmekteyim. | predefaway
...&Kahve:if ($away == $false) set %away.reason Kahve iciyorum, istermisin ? | predefaway
...&Customized
....1 ( $+ %predef.1 $+ )
.....Use this one:if (%predef.1 != empty) && ($away == $false) set %away.reason %predef.1 | predefaway
.....Change...:set %predef.1 $$?="Enter reason: "
....2 ( $+ %predef.2 $+ )
.....Use this one:if ( %predef.2 != empty ) && if ($away == $false) set %away.reason %predef.2 | predefaway
.....Change...:set %predef.2 $$?="Enter reason: "
....3 ( $+ %predef.3 $+ )
.....Use this one:if ( %predef.3 != empty ) && if ($away == $false) set %away.reason %predef.3 | predefaway
.....Change...:set %predef.3 $$?="Enter reason: "
....4 ( $+ %predef.4 $+ )
.....Use this one:if ( %predef.4 != empty ) && if ($away == $false) set %away.reason %predef.4 | predefaway
.....Change...:set %predef.4 $$?="Enter reason: "
....5 ( $+ %predef.5 $+ )
.....Use this one:if ( %predef.5 != empty ) && if ($away == $false) set %away.reason %predef.5 | predefaway
.....Change...:set %predef.5 $$?="Enter reason: "
.&Away Nick
..$iif(%away.nick == on,off,on):if (%away.nick == on) anoff | else anon
..&Set away nick: {
set %away.nick.1 $$?="Enter away nick - e.g. : -gone, -away, {A}"
if ( %away.nick.1 == $null ) { set %away.nick.1 -Gone }
else echo -a Away nickname set to %away.nick.1 $+ .
}
.&Pencere
..&On:set %away.pager on | echo -a CTCP penceresi acık..
..&Off:set %away.pager off | echo -a CTCP penceresi kapalı..
..&Mesajları Gör: {
window -ak @PagerLog -0 -0
if ( $exists(logs\pager.log)) { loadbuf @PagerLog logs\pager.log }
else {
write logs\pager.log $away.logo
loadbuf @PagerLog logs\pager.log
}
}

Menü ŞekLinde İstiyorsan Kod bu ŞekiLdedir.

Disco Pasam En Son VeriLen Addon Menu Seklınde Olmaz Mı ?;

 
Alıntı ile Cevapla

Alt 24 Eylül 2009, 18:51   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: away addonu menu seklinde




neverbackdown Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias awaymenu { dialog -m arkaway arkaway } dialog arkaway { title "Away / Meşgul Menüsü" size -1 -1 227 115 option dbu text "Away Sebebi : ", 1, 7 12 80 8 edit "", 2, 47 11 131 10 button "AWAY OL", 3, 141 27 55 9, flat check "Nickin Sonuna Ekle :", 4, 7 27 57 8 edit "", 5, 68 26 64 10 box "Away Menü Ayarları :", 6, 3 1 220 40 button "Dışarıdayım", 8, 7 61 41 12, flat button "TV İzliyorum", 15, 7 75 41 12, flat button "PC Başında Değilim", 16, 60 75 50 12, flat button "Hemen Döneceğim", 17, 113 75 50 12, flat button "Telefondayım", 18, 166 75 41 12, flat button "Yemekteyim", 9, 60 61 50 12, flat button "Oyundayım", 10, 113 61 50 12, flat button "Uyuyorum", 11, 166 61 41 12, flat box "Hazır Away Mesajları :", 12, 3 42 220 70 text "Seçtiğiniz Away Sebebinin Üstüne Tıkla***** Otomatik Olarak Away Olabilirsiniz.", 13, 12 50 196 8, disable button "AWAYDAN DÖN", 7, 17 92 87 12 button "PENCEREYİ KAPAT", 14, 111 92 87 12, ok } on *:dialog:arkaway:init:0: { .timer -m 1 10 /did -f arkaway 2 if (%addnick != $null) { did -c arkaway 4 | did -a arkaway 5 %addnick | did -e arkaway 5 } if (%awayres != $null) { did -a arkaway 2 %awayres } if (%addnick == $null) { did -u arkaway 4 | did -b arkaway 5 } } on *:dialog:arkaway:sclick:3: { set %addnick $did(5) set %awayres $did(2) if ($did(4).state == 1) { if ($away == $true) halt set %backnick $me /ame Şuanda Awayım. Sebep : ( $+ $did(2) $+ )  | echo -a %logo $+ 2 Şuan awaysınız.  /away %logo 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 $did(2)  /nick $me $+ $did(5) } if ($did(4).state == 0) { if ($away == $true) halt /ame Şuanda Awayım. Sebep : ( $did(2) )  [Away Meşgul Sistemi]  | echo -a %logo $+ 2 Şuan awaysınız.  /away %logo 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 $did(2)  } } on *:dialog:arkaway:sclick:4: { if ($did(4).state == 0) { did -r arkaway 5 | did -b arkaway 5 | unset %addnick } if ($did(4).state == 1) { if (%addnick == $null) { set %addnick _aWay did -r arkaway 5 did -a arkaway 5 %addnick did -e arkaway 5 } did -e arkaway 5 } } on *:dialog:arkaway:sclick:8: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Dışarıdayım!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:9: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Yemekteyim!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:10: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Oyundayım!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:11: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Uyuyorum!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:15: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 TV İzliyorum!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:16: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 PC Başında Değilim!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:17: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Hemen Döneceğim!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:18: { away 14Şuan awayım10 $nick 14mesajlarına yanıt veremiyorum. Away sebebim:10 Telefondayım!  | echo %logo 2Şuanda Awaysınız. } on *:dialog:arkaway:sclick:7: { away | /amsg Awaydım Geri Döndüm! | echo %logo 2Away Modundan Çıktınız. }


Bu şekilde, denersen olacaktır.. iyi forumlar..

Disco Bu Kodun Menu Seklı Olması Gerekir Ama Ben Bır Turlu bulamadım : (

 
Alıntı ile Cevapla

Cevapla

Etiketler
addonu, menu, mirc, mirc download, mirc indir, seklinde


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
elinde baloncuk addonu ve baglantı menusu addonu olan varmı? Leo mIRC Scripting Sorunları 12 26 Şubat 2010 10:19
nick in ozele girince liste seklinde yazi cikmasi Sanquin mIRC Scripting Sorunları 5 30 Ağustos 2009 18:00
Kanal ve User korumaları ( Dialog seklinde ) RNA mIRC Scripting Hazır Kodlar 15 28 Mart 2007 16:23