IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 2 Toplam 3 Sayfadan 1 2 3
Konuya ait 40 Mesajı başka Sayfada göster

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Memo mesajınız var... (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/174867-memo-mesajiniz-var.html)

Hayat 31 Ocak 2009 14:24
Cevap: Memo mesajınız var...
 
MErhaba kodlar benim sunucumda çalışmıyor ilk olarak memo algılama olayında sizin serverinizin de sanırım *nick'inden yeni bir notunuz var* diye notice geliyor ona göre ayar yapmışsınız benim serverimde ise *nickinden yeni mesajınız var.* diye notice geliyor. Bu kısmı düzelttim şu an yeni memo geldiğinde uyarı penceresi çıkıyor fakat mesajın içeriği pencereye aktarılamıyor. Sanırım bu sorun da


if (*msg MemoServ READ*yazarak okuyabilirsiniz* iswm $strip($1-)) {

kodun bu kısmıyla alakalı olsa gerek benim sunucum bu noticeyi şu şekilde gönderiyor

-MemoServ- Okumak için /msg MemoServ READ 42 yazın.

Bu bölümü şu şekilde düzenledim.

if (*msg MemoServ- Okumak için /msg MemoServ READ* iswm $strip($1-)) {

fakat hala mesajın içeriği pencereye yansımıyor yardımcı olursanız sevinirim.

Difuzyon 31 Ocak 2009 14:31
Cevap: Memo mesajınız var...
 
Uyarı metninden , mesajı okutana kadar olan kısmı buraya kopyalarsanız size yardımcı oluruz...

Hayat 31 Ocak 2009 14:45
Cevap: Memo mesajınız var...
 
Alıntı:
Difuzyon Nickli Üyeden Alıntı (Mesaj 629746)
Uyarı metninden , mesajı okutana kadar olan kısmı buraya kopyalarsanız size yardımcı oluruz...
[14:24] -MemoServ- serseri nickine mesajınız gönderildi.
-
[14:24] -MemoServ- Hayat nickinden yeni mesajınız var.
-
[14:24] -MemoServ- Okumak için /msg MemoServ READ 44 yazın.


Kodlar bu şekilde.

Aklıma birşey geldi yalnız hemen bu addonun devamına mini bir diyalog eklesek diyoloğun amacı memo göndermek olsa.

Kime göndereceksiniz : Nick girin
Mesajınınızı yazın : Mesajınızı Girin TEMIZLE
Size Gelenleri okuyun : Memo no girin OKU

Gönder İptal

Böylece bir mirc içerisinde hem memo gönderme diyalogu olacak hemde memo alma (zaten var) OKU denildiğinde sizin şu anki diyalogunuz memonumarasını tespit ederek memoyu açacak bu numarada bir msj yoksa mesaj bulunamadı diyecek.

(Not şahsım adına istemiyorum aklıma sadece yaratıcı olabileceğini ve insanlara faydalı olabileceğini düşüdüm. Eğer boş zamanlarınızda kodlamayı seviyorsanız böyle bir diyalog insaları mutlu edecektir diye düşünüyorum.)

Zamanınız yok ise akşam kafamdaki diyalogu çizebilirim kodlaması kutucuk ve butonların işlevini aktif etmek kalır sizede sadece.

Difuzyon 31 Ocak 2009 14:52
Cevap: Memo mesajınız var...
 
/msg MemoServ READ 44
yaptığınızda, çıkan metinleride buraya kopyalayın.

Hayat 31 Ocak 2009 14:56
Cevap: Memo mesajınız var...
 
[14:43] -> *MemoServ* READ 44
-
[14:43] -MemoServ- 44 nolu mesaj Hayat nickinden (Oca 31 14:24:10 2009 EET). Silmek için: /msg MemoServ DEL 44 yazın.
-
[14:43] -MemoServ- selam
-

Difuzyon 31 Ocak 2009 15:03
Cevap: Memo mesajınız var...
 
Kod:
#memokuma on
on *:notice:*:*: {
  if $nick == Memoserv {
    if (*nickinden yeni mesajınız var* iswm $1-) {
      set -e %memonick $1
      $iif($window(@Memo),window -c @Memo)
      window -dk0po +let @Memo 200 170 490 85
      .titlebar @Memo mesajınız var...
      var %yeah,%red,%green,%blue,%di,%fuz,%yon
      %red = 255
      %green = 0
      %blue = 0
      %di = $calc(0 / 490)
      %fuz = $calc(255 / 490)
      %yon = $calc(0 / 490)
      %yeah = 0
      while (%yeah < 490) {
        drawrect -rn @Memo $rgb(%red,%green,%blue) 1 %yeah 0 1 85
        inc %red %di
        inc %green %fuz
        inc %blue %yon
        inc %yeah
      }
      drawdot @Memo
      drawtext @Memo 1 Verdana 11 8 1 Gönderen:
      drawtext -o @Memo 1 Verdana 11 75 1 $1
    }
    if (*kumak için*yazın* iswm $strip($1-)) {
      set -e %memono $strip($6)
      ms read $strip($6)
      .enable #memomesaj
      .disable #memokuma
    }
  }
}
#memokuma end
#memomesaj off
on *:notice:*:*: {
  if $nick == Memoserv && %memonick && %memono && (*nolu mesaj*nickinden*Silmek için:* !iswm $strip($1-)) {
    if $len($1-) <= 90 { drawtext @Memo 1 Verdana 9 1 25 $1- }
    if $len($1-) <= 180 && $len($1-) > 90 { drawtext @Memo 1 Verdana 9 1 20 $mid($1-,1,90) | drawtext @Memo 1 Verdana 9 1 40 $mid($1-,91,$len($1-)) }
    if $len($1-) < 270 && $len($1-) > 180 { drawtext @Memo 1 Verdana 9 1 15 $mid($1-,1,90) | drawtext @Memo 1 Verdana 9 1 30 $mid($1-,91,182) | drawtext @Memo 1 Verdana 9 1 45 $mid($1-,183,$len($1-)) }
    unset %memonick %memono
    .enable #memokuma
    .disable #memomesaj
  }
}
#memomesaj end
Bu şekilde denermisiniz...

RapStar 01 Şubat 2009 03:10
Cevap: Memo mesajınız var...
 
çok Güzel Bir Çalışma Olmuş. Renkleri Pek Beğenmedim Ama Kodun Mantığı Çok Güzel. İki Saat Oku V.s. Uğraştırmıyor.

ekselansx 04 Şubat 2009 15:46
Cevap: Memo mesajınız var...
 
ben bunu yükledim...sonra kaldırmama rağmen biri özelime mesaj yazdığında nicklerin sıralandığı sekmede 'message' penceresi altında özelime gelen her mesaj bu kutuda toplanıyor yerine...ve bu 'message' penceresine baktığımda hazırda bekleyen /msg komutu yazıyor...bu pencerede /msg komutndan sonra ileti yazdığımda da * /msg: insufficient parameters diye uyarı veriyor...
eski haline nasıl çevirebilirim acaba?

Difuzyon 04 Şubat 2009 17:10
Cevap: Memo mesajınız var...
 
Bu kodu ekleyip-kaldırdıktan böyle bir sorun olmaması gerekiyor.
Bahsettiğin sorunun düzelmesi içinde /dqwindow off komutunu uygulayacaksın.
Bu yöndeki sorunların içinde mIRC Scripting Sorunları bölümünü kullanmalısın.

aspawa 03 Ocak 2013 00:00
Cevap: Memo mesajınız var...
 
Konu biraz eski yenisini açmaktansa bunu hortlatalım bune ebenzer bir diyalog arıyorum elinde olan varmı ?


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 15:48.
Sayfa 2 Toplam 3 Sayfadan 1 2 3
Konuya ait 40 Mesajı başka Sayfada göster

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk