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

arkadaslar soyle bırsey yaptım ama hep hata alıyorum acaba sorun nerde kodları komple ben yazmadım orneklerle ekleye ekleye yaptık ama hata var anlamayan ıcın kodu eklip actıgında resim değiş bastıgınızda dosya seçme menusunden resmi resim/galeri/avatar.resimci olarak kaydedıp değiştirmek istedım ama her defasında hata oluyor yanı a resmi varken ben b resmı ıle değiştip her actıgımda b resmı olmasını b resmını değiştirıyorum mesela c resmını kaydedıp addonu her actıgımda c resmının goruntulenmesını ıstıyorum ama hata verıyor sorun nerde acaba yardımın ıcın sımdıden tesekkur avatar gibi düşünün

Kod:

dialog dene {

  title "resim değiştirme"

  size -1 -1 84 66

  option dbu

  icon 1, 21 8 40 34

  link "Resim Değiştir.", 2, 24 47 36 8

}
 
 

on *:dialog:dene:*:*:{

  if ($devent == sclick) {

    if $did == 1 || $did == 2 {

      degistir

    }

  }

}
 

alias degistir {

  var %degis $sfile(*.jpg)

  if %degis {

    if $gettok(%degis,-1,46) == jpg {

      %olcak = jpg

    }

    elseif $gettok(%degis,-1,46) == bmp {

      %olcak = bmp

    }

    elseif $gettok(%degis,-1,46) == gif {

      %olcak = gif

    }

    else {

      hata Resim Uzantısı Hatası

      return

    }

    if $file($+(resim\galeri\avatar.,%olcak)) {

      .remove $+(resim\galeri\avatar.,%olcak)

    }

    .copy $shortfn(%degis) $+(resim\galeri\avatar.,%olcak)

    if $dialog(dene) {

      did -g dene 1 $+(resim\galeri\avatar.,%olcak)

    }

    

    hadd -m avatar benimresmim $+(resim\galeri\avatar.,%olcak)

    kayit avatar

  }

}
 
 

alias kayit {

  if $hget($1) {

    kayit $1 $+(resim\galeri\,$1,.resimci)

  }

}