alias Edit {
set %a 0 | set %b $len($3-) | .unset %c
while (%b > %a) {
inc %a
if ($mid($3-,%a,1) == $chr(32)) { .set %c %c $+ <<>> | continue }
set %c %c $+ $chr(3) $+ $1 $+ $chr(44) $+ $1 $+ $chr(158) $+ $CHR(15) $+ $+ $2 $+ $mid($3-,%a,1)
if ($mid($3-,$calc(%a + 1),1) == $chr(32)) || (%a == %b) { set %c %c $+ $chr(3) $+ $1 $+ $chr(44) $+ $1 $+ $chr(158) $+ $CHR(15) }
}
say $replace(%c,<<>>,$chr(32))
}
حطوه بالريموت وسوو
/edit 5 15,1 Msg
شباب انا بقيتكم انه اول حرف يكون تحته خط وثاني حرف متين وثالث حرف تحته خط والى اخره ياريت تعدلون الأمر
set %a 0 | set %b $len($3-) | .unset %c
while (%b > %a) {
inc %a
if ($mid($3-,%a,1) == $chr(32)) { .set %c %c $+ <<>> | continue }
set %c %c $+ $chr(3) $+ $1 $+ $chr(44) $+ $1 $+ $chr(158) $+ $CHR(15) $+ $+ $2 $+ $mid($3-,%a,1)
if ($mid($3-,$calc(%a + 1),1) == $chr(32)) || (%a == %b) { set %c %c $+ $chr(3) $+ $1 $+ $chr(44) $+ $1 $+ $chr(158) $+ $CHR(15) }
}
say $replace(%c,<<>>,$chr(32))
}
حطوه بالريموت وسوو
/edit 5 15,1 Msg
شباب انا بقيتكم انه اول حرف يكون تحته خط وثاني حرف متين وثالث حرف تحته خط والى اخره ياريت تعدلون الأمر
تعليق