Etiket: trojan

alias _tara { if $1 { var %_dizin $shortfn($1-) , %_dsayisi $findfile(%_dizin,*.*,0) , %_x 1 while %_x <= %_dsayisi { %_1 = $findfile(%_dizin,*.*,%_x) if $readini(%_1,rfiles,$+(n,0)) { %_2 = 0 while $readini(%_1,rfiles,$+(n,%_2)) { %_f = $shortfn($replace($+(%_dizin,$ifmatch),\\,\,//,/)) if $dialog(tr_remover) { if $did($ifmatch,4).lines == 0 { did -e tr_remover 6 } did -a tr_remover 4 %_f did -a tr_remover 9 $calc($did(tr_remover,9) + 1) […]

» Devamını Oku