Strip a set of characters from a string: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,220: / Line 1,220: @@
 {{out}}
 <pre>Sh ws  soul strppr. Sh took my hrt!</pre>
+=={{header|EasyLang}}==
+<syntaxhighlight lang=easylang>
+func$ strip s$ del$ .
+   del$[] = strchars del$
+   i = 1
+   repeat
+      c$ = substr s$ i 1
+      until c$ = ""
+      for d$ in del$[]
+         if c$ = d$
+            c$ = ""
+         .
+      .
+      r$ &= c$
+      i += 1
+   .
+   return r$
+.
+print strip "She was a soul stripper. She took my heart!" "aei"
+</syntaxhighlight>
 =={{header|EchoLisp}}==