Uploader addon yardım.

[OzaN44_TC]

;================================================= ==
dialog imgh {
title "ImagesHack Photo Uploader vBeta SeRDaR406 | mIRCdb.com"
size -1 -1 172 133
option dbu
box "Upload İşlemleri", 1, 1 1 169 57
text "Upload edilecek dosyayı seçin:", 2, 4 13 73 8
edit "", 3, 4 21 141 10, read autohs
button "Seç", 4, 147 21 18 10
edit "", 5, 4 34 163 10, read autohs
box "Upload Sonraki", 6, 0 59 170 76
text "Resim Link'i:", 7, 3 69 29 8
edit "", 8, 33 68 133 10, read
box "Önizleme", 10, 2 79 51 50
icon 11, 5 85 43 40
box "", 12, 55 82 112 4
link "Bilgiler:", 13, 56 88 17 8
text "Dosya adı:", 14, 56 98 26 8
text "", 15, 84 98 82 8
text "Resmin boyutları:", 16, 56 110 42 8
text "", 17, 100 110 58 8
button "Kapat", 18, 130 121 37 11, cancel
link "mIRCdb.com | SeRDaR406", 19, 56 123 64 8
button "Upload işlemine başla", 20, 111 45 55 11, disable
}

alias -l f return $gettok($1-,-1,46)
alias imageshack if (!$dialog(imgh)) dialog -mdo imgh imgh
on *:dialog:imgh:sclick:*: {
if ($did == 4) {
var %file = $sfile($mircdir,Dosya seç)
if (%file) && ($f(%file) == gif) || ($f(%file) == png) || ($f(%file) == jpg) { set %upfile %file | did -ra $dname 3 %file | did -e $dname 20 | did -g $dname 11 $shortfn(%file) | did -ra imgh 15 $nopath(%upfile) | did -ra $dname 17 $pic($shortfn(%file)).width $+ x $+ $pic($shortfn(%file)).height | did -r $dname 8,5 }
}
if ($did == 20) {
did -ra $dname 5 Resim upload ediliyor.Bekleyin...
dll fuploader.dll UploadFile [Only Registered Users Can See Links] fileupload > aa.txt > %upfile
}
}
alias -l get_url_codes {
var %i = 1
while (%i <= $lines(aa.txt)) {
if (*style="width: 500px;height:30px;overflow* iswm $read(aa.txt,%i)) {
var %file = $remove($gettok($read(aa.txt,%i),5,32),size=,"70",,[URL,[/URL],>=[Only Registered Users Can See Links]],500px;height:30px;overflow:hidden",)
if (%file) && ($dialog(imgh)) { did -ra imgh 8 %file | .remove $shortfn(aa.txt) | unset %upfile | did -ra imgh 5 Upload işlemi tamamlanmıştır. }
}
inc %i
}
}
on *:signal:fuploader: {
if (*devam ediyor* iswm $1-) return $input(Şuanda devam eden bir upload işlemi var.,ohud,Hata)
elseif (tamamlanmıştır isin $1-) get_url_codes
}


on *:load: echo -a Açmak için: /imageshack yazın.

resmi seçip upload et dediğimde Addonda,

* Geçersiz format: $ (Satır 42, imageshack.mrc hatası alıyorum yardımcı olurmusunuz