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

2Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 21 Kasım 2005, 21:41   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
away addonda son nokta.




merhaba bu anddon avrupada çok kulanıyor çok moda örnegin awayken kanaldan seslenen ayrı özeline yazana ayrı away mesajı ayrı ayrı seslenen cevap veriyor umarım bilrinin işine yarar iyi çalışmalar ..
kod :
alias awayon {
if ($readini(away.ini,settings,nickchange) == on) {
/nick $readini(away.ini,settings,awaynick)
set %timeaway $time
set %timeaway2 $ctime
/away $readini(away.ini,settings,awayreason) $chr(166) %version
/ame Away: $readini(away.ini,settings,awayreason) $chr(166) %version
}
else {
set %timeaway $time
set %timeaway2 $ctime
/away $readini(away.ini,settings,awayreason) $chr(166) %version
/ame Away: $readini(away.ini,settings,awayreason) $chr(166) %version
}
}
alias awayoff {
if ($readini(away.ini,settings,nickchange) == on) {
/nick $readini(away.ini,settings,normalnick)
/away
/ame Back: Was away: $duration($calc($ctime - %timeaway2)) since %timeaway $+ , reason was: $readini(away.ini,settings,awayreason) $chr(166) %version
}
else {
/away
/ame Back: Was away: $duration($calc($ctime - %timeaway2)) since %timeaway $+ , reason was: $readini(away.ini,settings,awayreason) $chr(166) %version
}
}
on 1:text:*:?: {
if ($away) {
.notice $nick $readini(away.ini,settings,queryreply) $chr(166) %version
}
}
on 1:text:*:#: {
if ($me isin $strip($1-)) {
if ($away) {
.notice $nick $readini(away.ini,settings,chanreply) $chr(166) %version
}
}
}
on 1:text:*:*: {
if ($me isin $strip($1-)) {
if ($away) {
.notice $nick $readini(away.ini,settings,highreply) $chr(166) %version
}
}
}
dialog away {
title "Away system"
size -1 -1 242 226
option dbu
text "BlackWolf script away system", 1, 77 3 71 8
text "Away nick:", 2, 6 18 32 8
edit "", 3, 36 17 73 10, read
button "Change", 4, 189 15 37 12
edit "", 5, 112 17 74 10
text "Normal nick:", 6, 6 31 29 8
edit "", 7, 36 30 73 10, read
edit "", 8, 112 30 74 10
button "Change", 9, 189 29 37 12
box "Nicks", 10, 4 9 236 59
button "Ok", 11, 89 210 37 12, ok
box "Replies", 12, 4 68 236 83
text "Query:", 13, 7 78 20 9
edit "", 14, 30 76 203 10, read
edit "", 15, 7 88 188 10
button "Change", 16, 196 87 37 12
text "Channel:", 17, 7 102 25 8
edit "", 18, 30 100 203 10, read
edit "", 19, 7 112 188 10
button "Change", 20, 196 111 37 12
text "Highlight:", 21, 7 126 25 8
edit "", 22, 30 124 203 10, read
edit "", 23, 7 136 188 10
button "Change", 24, 196 135 37 12
text "Reason:", 25, 7 155 25 8
edit "", 26, 30 153 203 10, read
edit "", 27, 7 165 188 10
button "Change", 28, 196 164 37 12
button "Away on", 29, 89 181 37 12
button "Away off", 30, 128 181 37 12
box "Away info", 31, 4 175 235 33
text "Away:", 32, 7 183 25 8
edit "Off", 33, 38 182 17 10, read
edit "Time", 34, 38 194 50 10, read
text "Away time:", 35, 7 195 30 8
box "Change nick", 36, 6 42 220 23
button "On", 37, 106 49 25 11
button "Off", 38, 133 49 25 11
edit "", 39, 65 49 22 11, read
text "Change nick on away:", 40, 10 51 54 8
}
on *:dialog:away:init:*:{
set %awayniks $readini(away.ini,settings,awaynick)
set %normalnick $readini(away.ini,settings,normalnick)
set %awayreason $readini(away.ini,settings,awayreason)
set %nickchange $readini(away.ini,settings,nickchange)
.did -ra $dname 3 %awayniks
.did -ra $dname 7 %normalnick
.did -ra $dname 14 %queryreply
.did -ra $dname 18 %chanreply
.did -ra $dname 22 %highreply
.did -ra $dname 26 %awayreason
.did -ra $dname 39 %nickchange
if ($away) {
.did -ra $dname 33 On
.did -ra $dname 34 $duration($calc($ctime - %timeaway2))
}
else {
.did -ra $dname 33 Off
.did -ra $dname 34 Not away
}
}
ON *:DIALOG:away:sclick:4:{
.writeini away.ini settings awaynick $did($dname,5).text
.did -ra $dname 3 $did($dname,5)
.did -r $dname 5
}
ON *:DIALOG:away:sclick:9:{
.writeini away.ini settings normalnick $did($dname,8).text
.did -ra $dname 7 $did($dname,8)
.did -r $dname 8
}
ON *:DIALOG:away:sclick:28:{
.writeini away.ini settings awayreason $did($dname,27).text
.did -ra $dname 26 $did($dname,27)
.did -r $dname 27
}
ON *:DIALOG:away:sclick:29:{
awayon
.did -ra $dname 33 On
.did -ra $dname 34 $duration($calc($ctime - %timeaway2))
}
ON *:DIALOG:away:sclick:30:{
awayoff
.did -ra $dname 33 Off
.did -ra $dname 34 Not away
}
ON *:DIALOG:away:sclick:16:{
.writeini away.ini settings queryreply $did($dname,15).text
set %queryreply $did($dname,15).text
.did -ra $dname 14 $did($dname,15)
.did -r $dname 15
}
ON *:DIALOG:away:sclick:20:{
.writeini away.ini settings chanreply $did($dname,19).text
set %chanreply $did($dname,19).text
.did -ra $dname 18 $did($dname,19)
.did -r $dname 19
}
ON *:DIALOG:away:sclick:24:{
.writeini away.ini settings highreply $did($dname,23).text
set %highreply $did($dname,23).text
.did -ra $dname 22 $did($dname,23)
.did -r $dname 23
}
ON *:DIALOG:away:sclick:37:{
.writeini away.ini settings nickchange On
set %nickchange On
.did -ra $dname 39 On
}
ON *:DIALOG:away:sclick:38:{
.writeini away.ini settings nickchange Off
set %nickchange Off
.did -ra $dname 39 Off
}
menu menubar,status,channel {
Away system:dialog -m away away
}


alıntıdın yapanın eline saglık ..


Konu UOnur tarafından (23 Kasım 2005 Saat 17:52 ) değiştirilmiştir.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 18 Aralık 2005, 03:51   #2
CipriX
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)



Türkçeleştirdim...

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias awayon {
  if (
$readini(away.ini,settings,nickchange) == on) {
    /
nick $readini(away.ini,settings,awaynick)
    
set %timeaway $time
    set 
%timeaway2 $ctime
    
/away $readini(away.ini,settings,awayreason$chr(166) %version
    
/ame Away oLDum$readini(away.ini,settings,awayreason$chr(166) %version
  
}
  else {
    
set %timeaway $time
    set 
%timeaway2 $ctime
    
/away $readini(away.ini,settings,awayreason$chr(166) %version
    
/ame Away$readini(away.ini,settings,awayreason$chr(166) %version
  
}
}
alias awayoff {
  if (
$readini(away.ini,settings,nickchange) == on) {
    /
nick $readini(away.ini,settings,normalnick)
    /
away
    
/ame DöndümAway Kalma Sürem $duration($calc($ctime - %timeaway2)) Ne Zaman Away oLdum: %timeaway $+ , Sebep$readini(away.ini,settings,awayreason$chr(166) %version
  
}
  else {
    /
away
    
/ame DöndümAway Kalma Sürem$duration($calc($ctime - %timeaway2)) Ne Zaman Away oLDum: %timeaway $+ , Sebep$readini(away.ini,settings,awayreason$chr(166) %version
  
}
}
on 1:text:*:?: { 
  if (
$away) { 
    .
notice $nick $readini(away.ini,settings,queryreply$chr(166) %version
  
}
}
on 1:text:*:#: { 
  
if ($me isin $strip($1-)) { 
    if (
$away) { 
      .
notice $nick $readini(away.ini,settings,chanreply$chr(166) %version
    
}
  }
}
on 1:text:*:*: { 
  if (
$me isin $strip($1-)) { 
    if (
$away) { 
      .
notice $nick $readini(away.ini,settings,highreply$chr(166) %version
    
}
  }
}
dialog away {
  
title "Away Sistemi"
  
size --1 242 226
  option dbu
  text 
"Cem AKCA Away Sistemi"177 3 71 8
  text 
"Away nicki:"26 18 32 8
  edit 
""336 17 73 10read
  button 
"Değiştir"4189 15 37 12
  edit 
""5112 17 74 10
  text 
"Normal nick:"66 31 29 8
  edit 
""736 30 73 10read
  edit 
""8112 30 74 10
  button 
"Değiştir"9189 29 37 12
  box 
"Nickler"104 9 236 59
  button 
"Tamam"1189 210 37 12ok
  box 
"Replies"124 68 236 83
  text 
"Özel:"137 78 20 9
  edit 
""1430 76 203 10read
  edit 
""157 88 188 10
  button 
"Değiştir"16196 87 37 12
  text 
"Vazgeç:"177 102 25 8
  edit 
""1830 100 203 10read
  edit 
""197 112 188 10
  button 
"Değiştir"20196 111 37 12
  text 
"Highlight:"217 126 25 8
  edit 
""2230 124 203 10read
  edit 
""237 136 188 10
  button 
"Değiştir"24196 135 37 12
  text 
"Sebep:"257 155 25 8
  edit 
""2630 153 203 10read
  edit 
""277 165 188 10
  button 
"Değiştir"28196 164 37 12
  button 
"Away oL"2989 181 37 12
  button 
"Away'den Dön"30128 181 37 12
  box 
"Away info"314 175 235 33
  text 
"Away:"327 183 25 8
  edit 
"Kapat"3338 182 17 10read
  edit 
"Saat"3438 194 50 10read
  text 
"Away Saati:"357 195 30 8
  box 
"Nick Değiş"366 42 220 23
  button 
"Açık"37106 49 25 11
  button 
"Kapalı"38133 49 25 11
  edit 
""3965 49 22 11read
  text 
"Nick Değiş:"4010 51 54 8
}
on *:dialog:away:init:*:{
  
set %awayniks $readini(away.ini,settings,awaynick)
  
set %normalnick $readini(away.ini,settings,normalnick)
  
set %awayreason $readini(away.ini,settings,awayreason)
  
set %nickchange $readini(away.ini,settings,nickchange)
  .
did -ra $dname 3 %awayniks
  
.did -ra $dname 7 %normalnick
  
.did -ra $dname 14 %queryreply
  
.did -ra $dname 18 %chanreply
  
.did -ra $dname 22 %highreply
  
.did -ra $dname 26 %awayreason
  
.did -ra $dname 39 %nickchange
  
if ($away) {
    .
did -ra $dname 33 Açık
    
.did -ra $dname 34 $duration($calc($ctime - %timeaway2))
  }
  else {
    .
did -ra $dname 33 Kapalı
    
.did -ra $dname 34 Away Değilsin
  
}
}
ON *:DIALOG:away:sclick:4:{
  .
writeini away.ini settings awaynick $did($dname,5).text
  
.did -ra $dname 3 $did($dname,5)
  .
did -r $dname 5
}
ON *:DIALOG:away:sclick:9:{
  .
writeini away.ini settings normalnick $did($dname,8).text 
  
.did -ra $dname 7 $did($dname,8)
  .
did -r $dname 8
}
ON *:DIALOG:away:sclick:28:{
  .
writeini away.ini settings awayreason $did($dname,27).text 
  
.did -ra $dname 26 $did($dname,27)
  .
did -r $dname 27
}
ON *:DIALOG:away:sclick:29:{
  
awayon
  
.did -ra $dname 33 On
  
.did -ra $dname 34 $duration($calc($ctime - %timeaway2))
}
ON *:DIALOG:away:sclick:30:{
  
awayoff
  
.did -ra $dname 33 Kapalı
  
.did -ra $dname 34 Away Değilsin
}
ON *:DIALOG:away:sclick:16:{
  .
writeini away.ini settings queryreply $did($dname,15).text 
  set 
%queryreply $did($dname,15).text 
  
.did -ra $dname 14 $did($dname,15)
  .
did -r $dname 15
}
ON *:DIALOG:away:sclick:20:{
  .
writeini away.ini settings chanreply $did($dname,19).text 
  set 
%chanreply $did($dname,19).text 
  
.did -ra $dname 18 $did($dname,19)
  .
did -r $dname 19
}
ON *:DIALOG:away:sclick:24:{
  .
writeini away.ini settings highreply $did($dname,23).text 
  set 
%highreply $did($dname,23).text 
  
.did -ra $dname 22 $did($dname,23)
  .
did -r $dname 23
}
ON *:DIALOG:away:sclick:37:{
  .
writeini away.ini settings nickchange On
  set 
%nickchange On 
  
.did -ra $dname 39 On
}
ON *:DIALOG:away:sclick:38:{
  .
writeini away.ini settings nickchange Off
  set 
%nickchange Off 
  
.did -ra $dname 39 Off
}
menu menubar,status,channel {
  
Away system:dialog -m away away



 
Alıntı ile Cevapla

Alt 18 Aralık 2005, 09:08   #3
Çevrimiçi
Bir Adanalı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



Tşk ederim emeqinize Saqlik.

__________________
"Her bir fikir, bin dönüşüm başlatır; her kelime, yeni bir ufuk açar ve dünyayı şekillendirir. Bizim sözlerimiz değişimi taşıyan rüzgarlar gibidir, geleceği oluşturan temel taşlardır."
 
Alıntı ile Cevapla

Alt 30 Aralık 2005, 11:29   #4
Silencer
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)



Tşkler... Elinize SağLık.

 
Alıntı ile Cevapla

Alt 16 Mart 2006, 13:02   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



hem code leri getiren hemde turkcelestiren arkadaslardan cok tesekkur ediyorum. saolun.

 
Alıntı ile Cevapla

Alt 17 Mart 2006, 13:22   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



ciprix çok büyük bi iş yapmışsın =p

 
Alıntı ile Cevapla

Alt 29 Mart 2006, 09:05   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



valla Allah razı olsun sizden
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 29 Mart 2006, 15:01   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



pnp'nin away addonu dışında away addonu tanımam
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 31 Mart 2006, 19:03   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Re: away addonda son nokta.




PnP dışında script tanımam
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
TAVŞAN DAĞA KÜSMÜŞ, DAĞ ŞOOK
 
Alıntı ile Cevapla

Alt 10 Temmuz 2006, 18:45   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: away addonda son nokta.




eviL Nickli Üyeden Alıntı
pnp'nin away addonu dışında away addonu tanımam
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

BLaCk Nickli Üyeden Alıntı
PnP den Baska Script Tanımam

Güzel olmus Bunlar Gereksiz Mesajlar Bence EMEGE SAYGI

 
Alıntı ile Cevapla

Cevapla

Etiketler
addonda, away, mirc, mirc download, mirc indir, nokta, son


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

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
Nazan Öncel - Nokta Nokta Amelia M, N, O, Ö, P 0 06 Mayıs 2014 18:05
Addonda değişiklik yapıldığında kendi kendini silmesi Utku mIRC Scripting Dersleri 2 29 Ocak 2007 12:17
Away addonda zamanı Türkçe yapmak • MasteR • mIRC Scripting Sorunları 1 13 Temmuz 2006 08:47