[*]Profan

Var Test$ = "Dies is a Test"
Print Del$(Test$,1,5)
'the would then "Dies is ein" spend
Print Del$(Test$,1,-5)
WaitInput

Del$(Test$,n1,n2)' deletes n2 characters ex n1 (How the original vorgesehen is)
Del$(Test$,-n1,n2)' deletes n2 characters (direction Stringende) ex n1 of hinten calculated
Del$(Test$,n1,-n2)' deletes n2 characters (direction Stringanfang) ex n1 of in front
Del$(Test$,-n1,-n2)' deletes n2 characters (direction Stringanfang) ex n1 of hinten