Day of the week: Difference between revisions
Content added Content deleted
(demo of variable-length space-padded opcodes in English dialect) |
|||
Line 1,000: | Line 1,000: | ||
=={{header|Protium}}== |
=={{header|Protium}}== |
||
<lang html><@ SAI> |
<lang html><@ SAI> |
||
<@ ITEFORLI3>2121|2008| |
<@ ITEFORLI3>2121|2008| |
||
<@ LETVARCAP>Christmas Day|25-Dec-<@ SAYVALFOR>...</@></@> |
<@ LETVARCAP>Christmas Day|25-Dec-<@ SAYVALFOR>...</@></@> |
||
<@ TSTDOWVARLIT>Christmas Day|1</@> |
<@ TSTDOWVARLIT>Christmas Day|1</@> |
||
<@ IFF> |
|||
<@ SAYCAP>Christmas Day <@ SAYVALFOR>...</@> is a Sunday</@><@ SAYKEY>__Newline</@> |
|||
⚫ | |||
</@> |
|||
⚫ | |||
</@></lang> |
</@></lang> |
||
English dialect variable-length space-padded opcodes |
|||
<lang html><# suppressimplicitoutput> |
|||
<# iterate foriteration literalstring3>2121|2008| |
|||
<# let variable capture>Christmas Day|25-Dec-<# say value foriteration>...</#></#> |
|||
<# test dayofweek variable literal>Christmas Day|1</#> |
|||
<# if> |
|||
<# say capture>Christmas Day <# say value foriteration>...</#> is a Sunday</#><# say keyword>__Newline</#> |
|||
</#> |
|||
</#> |
|||
</#></lang> |
|||
''Output'' |
''Output'' |