PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias _ran {
var %i = 1
while $mid($3,%i,1) {
var %a = a.i.o.u.e
if ($istok(%a,$mid($3,%i,1),46)) {
var %is = $1,%im = 0
while %is {
if ($istok(%a,$mid($3,$calc(%i + %is - 1),1),46)) {
inc %im
}
if (%im == $1) { return evet }
if ($calc((%i + %im) -1) >= $2) { return }
dec %is
}
}
inc %i
}
}
Çalışmıo diyenin alnını çizerim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.