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

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 09 Ocak 2010, 17:23   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Memo var uyarısı(dialog şeklinde)




Merhaba Arkadaslar

Bazen Arkadasımızdan, vs not gelir görmeyiz unuturuz veya gec görürüz ,bende bunu düşünerek "yeni notunuz var" hatırlatma kodunu dialoga cevirdim piyasada olan dialogda hareketli yazı kodunuda kullanarak bu dialoga uyarladım umarım işinize yarar.

yanlız kodun sorunsuz calısması icin mdx.dll nin mirc ana dizininde olması lazım mirc ana klasorunde ise sorun yok eger değilse ana klasorede kopyalayın aynısını. eger mdx.dll kesip ana klasore tasırsanız diger dialogların calısmamasına neden olabilir. sadece mdx.dll'yi kopyalayıp mirc ana klasorune atın ve alt+r yapıp remoteyiş acıyoruz kodu remoteye ekliyoruz bukadar. iyi kullanımlar..

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias memo dialog -m memo memo
dialog memo 
{
  
title "                                   • M e m o S e r v i s P a n e L i  • "
  
size --1 199 100
  option dbu
  text 
""10 11 132 8
  button 
"Oku"410 56 52 20
  button 
"Notu SiL"575 56 52 20
  button 
"Kapat"6136 56 52 20ok
  box 
""72 48 195 33
  link 
"Memoserv Hakkında Geniş Bilgi"8123 88 74 8
  text 
""20 36 400 7
  box 
"Notunuz"30 29 200 20
  box 
""90 4 200 20
}


on *:dialog:memo:init:*: {
  
did -a memo 1 %mnick
  mdx MarkDialog $dname
  set 
%text.w $gettok($mdxdll(MoveControl,$dname 1),4,32)
  
mdx MoveControl $dname 1 $dialog($dname).*
  
mdx SetFont 1,+bu 16 600 arial 
  mdx SetFont 4
,5,6 18 600 tohoma
  mdx SetFont 3 15 600 arial 
  mdx SetColor $dname 8
,4,5,6 background $rgb(102,204,255
  
mdx SetDialog $dname Bgcolor $rgb(245,245,220)
  
mdx SetColor $dname 1 text $rgb(148,0,211)
  
mdx SetColor $dname 2 text $rgb(255,0,0)
  
mdx SetColor $dname 1,2,3 textbg $rgb(245,245,220)
  
mdx SetDialog $dname style title tool sysmenü
  
.timer1 $calc($len(%mnick)*90 kaydir
}

on 1:dialog:memo:sclick:*: { 
  if (
$did == 4) { .timer2 0 0 kaydir2 did -a memo 2 %mnot 
  if (
$did == 8) { /run http://
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">if (
$did == 5) {  ms del %mnumara | unset %mn* | did -a memo 2 Son Notunuz Silindi.  } 
}


on *:notice:*:*: { 
  if (
$nick == memoserv) && (*notunuz var* iswm $1-) {  set %mnick $1- | .ms read new  | .memo }
  if (
$nick == memoserv) && (*numarali notiswm $1-) { set %mnumara $}
  if (
$nick == memoserv) {
    .
set %mnot $1-
  }
}

alias mdx return $dll(mdx.dll,$1,$2-)
alias -l mdx dll mdx.dll $1-
alias -l mdxdll return $dll(mdx.dll,$1,$2-)
alias -l kaydir {
  if (
$dialog(memo)) {
    
set %text.x $gettok($mdxdll(MoveControl,memo 1),2,32)
    if (%
text.== $+(-,%text.w)) set %text.x $dialog(memo).w
    dec 
%text.x
    mdx MoveControl memo 1 
%text.
  
}
  else {
    unset %
text.%text.w
    
.timer1 off
  
}
}
alias -l kaydir2 {
  if (
$dialog(memo)) {
    
set %text.x $gettok($mdxdll(MoveControl,memo 2),2,32)
    if (%
text.== $+(-,%text.w)) set %text.x $dialog(memo).w
    dec 
%text.x
    mdx MoveControl memo 2 
%text.
  
}
  else {
    unset %
text.%text.w
    
.timer2 off
  
}



 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 09 Ocak 2010, 20:30   #2
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Memo var uyarısı(dialog şeklinde)




Yükledim ama yorum yapmadan önce birşey sormak istiyorum. Kodu remoteye ve mdx.dll'yi ana klasöre kopyaladıktan sonra bana gelecek herhangi bir memo için, ben online olur olmaz ekranıma "memonuz var" şeklinde bir uyarı mı gelmesi gerekiyor? Yoksa;
Ben deneme amaçlı kendime memo gönderdim kayıtlı başka bir nickle. memo gönderdiğim nickle servera girdim herhangi bi pencere açılmadı ama mircin notice penceresine yeni bir memo var uyarısı geldi ki bu her zaman gelen uyarıdan. Ben de /memo yazıp enterladım ve burdaki memo dialog açıldı ama üst kısımda gri bir şey geçiyor, altındaki satırda ise memolarınızı okumak için /ms list diye kayan yazı.

Bu kodu ekleyince hangi işe yarıyor onu sormak istedim. Teşekkürler bu arada

 
Alıntı ile Cevapla

Alt 09 Ocak 2010, 21:10   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Memo var uyarısı(dialog şeklinde)




Online 'iken veya online oldugunda (servere girdiginde) Eger size gönderilen yeni bir memo varsa dialog otomatikmen acılıyor . kodun işlevi bu.
Sizin girmiş oldugunuz serverde Yeni memo geldiginde memoserv in gönderdigi mesaj farklı olabilir veya Sunucu Cr de olabilir . kendimde denedim Sorunsuz calısıyor .

 
Alıntı ile Cevapla

Alt 09 Ocak 2010, 22:40   #4
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Memo var uyarısı(dialog şeklinde)




Teşekkürler. O zaman benden kaynaklanan bir durumdur. Elinize sağlık.

 
Alıntı ile Cevapla

Cevapla

Etiketler
memo, mirc download, mirc indir, seklinde, uyarisidialog, uyarısıdialog, var, şeklinde


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
Memo mesajınız var... Difuzyon mIRC Scripting Hazır Kodlar 20 29 Ağustos 2017 00:52
Dialog Aç Kapat Uyarısı DenperaS mIRC Scripting Sorunları 7 22 Ekim 2010 04:18
Dialog Studio ile bir dialog yapımı (Resimli) CipriX mIRC Scripting Programları 15 12 Aralık 2008 21:59
Global mesaj atılınca Dialog şeklinde pencere açılması Sunay mIRC Scripting Sorunları 6 23 Nisan 2007 23:27
Users'takiler Dialog Açılınca Dialog'da Çıkmıyor... Tragedy mIRC Scripting Sorunları 1 18 Temmuz 2005 18:34