Programmeren in REXX/Voorbeeldprogramma's: verschil tussen versies
Verwijderde inhoud Toegevoegde inhoud
herschikt |
→Letterlijke tekst: tekstweergave |
||
Regel 8:
parse pull tekst
end
</pre>
==Tekstweergave==
<pre>
/* titel.rex */
breedte=40
rand=4
symbool='*'
opvulling='�'
say "Geef weer te geven titel"
parse pull titel
if length(titel) > breedte-rand
then
say "Uw titel is te lang en kan daarom niet weergegeven worden"
else do
say copies(symbool, breedte)
say symbool copies(opvulling, breedte-rand) symbool
say symbool center(titel, breedte-rand) symbool
say symbool copies(opvulling, breedte-rand) symbool
say copies(symbool, breedte)
end
</pre>
|