Mad Libs: Difference between revisions
m
→{{header|Oforth}}
Line 1,420:
<lang Oforth>: madlibs
| story i word |
"" while(System.Console askln dup notEmpty) [ + ] drop ->story
while(story indexOf('<') dup ->i notNull) [
story extract(i, story indexOfFrom('>', i)) ->word
Line 1,430 ⟶ 1,429:
]
"Your story :
=={{header|Pascal}}==
| |||