Determine sentence type: Difference between revisions

Added Epoxy
(Added Epoxy)
Line 217:
{{out}}
<pre>QSEN</pre>
 
=={{header|Epoxy}}==
<lang epoxy>const SentenceTypes: {
["?"]:"Q",
["."]:"S",
["!"]:"E"
}
 
fn DetermineSentenceType(Char)
return SentenceTypes[Char]||"N"
cls
 
fn GetSentences(Text)
var Sentences: [],
Index: 0,
Length: #Text
loop i:0;i<Length;i+:1 do
var Char: string.subs(Text,i,1)
var Type: DetermineSentenceType(Char)
if Type != "N" || i==Length-1 then
log(string.sub(Text,Index,i+1)+" ("+Type+")")
Index:i+2;
cls
cls
cls
 
GetSentences("hi there, how are you today? I'd like to present to you the washing machine 9001. You have been nominated to win one of these! Just make sure you don't break it")</lang>
{{out}}
<pre>
hi there, how are you today? (Q)
I'd like to present to you the washing machine 9001. (S)
You have been nominated to win one of these! (E)
Just make sure you don't break it (N)
</pre>
 
=={{header|Factor}}==
Anonymous user