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: Kodu kopyalamak için üzerine çift tıklayın!
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)
}
}