Split a character string based on change of character: Difference between revisions

Content added Content deleted
No edit summary
Line 424: Line 424:
* {SNOWMAN} x 1,
* {SNOWMAN} x 1,
* {COMET} x 2
* {COMET} x 2

=={{header|PowerShell}}==
{{trans|BBC BASIC}}
<lang PowerShell>
function Split-String ([string]$String)
{
[string]$c = $String.Substring(0,1)
[string]$splitString = $c

for ($i = 1; $i -lt $String.Length; $i++)
{
[string]$d = $String.Substring($i,1)

if ($d -ne $c)
{
$splitString += ", "
$c = $d
}

$splitString += $d
}

$splitString
}
</lang>
<lang PowerShell>
Split-String "gHHH5YY++///\"
</lang>
{{Out}}
<pre>
g, HHH, 5, YY, ++, ///, \
</pre>


=={{header|Python}}==
=={{header|Python}}==