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 217 98
option dbu
text "Away Sebebi : ", 1, 7 12 39 8
edit "", 2, 47 11 161 10
button "AWAY OL", 3, 141 27 57 9, flat
check "Nickin Sonuna Ekle :", 4, 7 27 57 8
edit "", 5, 68 26 64 10
box "Away Menü Ayarları :", 6, 3 1 210 40
button "TV İzliyorum", 8, 7 61 49 12, flat
button "PC Başında Değilim", 9, 61 61 49 12, flat
button "Hemen Döneceğim", 10, 113 61 49 12, flat
button "Telefondayım", 11, 166 61 41 12, flat
box "Hazır Away Mesajları :", 12, 3 42 210 35
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 82 87 12
button "PENCEREYİ KAPAT", 14, 111 82 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) $+ ) [-Arkadasca Script v6-] | 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) ) [-CooL Love Esra-] | 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 Tv İzliyorum! | 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 PC Başında Değilim! | 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 Hemen Döneceğim! | 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 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. }