week5 done

This commit is contained in:
Thorn Avery 2019-08-12 13:31:37 +12:00
parent 1aed5df049
commit 016dc8728d

View File

@ -1,14 +1,27 @@
:: the comment ":: code belongs here" indicates that one or more lines of code are needed to make this section of the program work.
|= raw=tape
=<
:: code belongs here
=. raw (cuss raw)
(convert raw)
|%
:: the latest and greatest rapper
++ mcelem
|= l=@t
?|
&((gte l 'A') (lte l 'Z'))
&((gte l '0') (lte l '9'))
==
++ convert
:: code belongs here
:: (~(got by a) b) produces the value located at key b within map a
=/ chart ~(got by table)
:: code belongs here
|= m=tape
^- tape
%- zing
%+ turn m
|= l=@t
?: =(l ' ')
"[_]"
?: (mcelem l)
~[' ' (~(got by table) l) ' ']
~['[' l ']']
++ table
%- my
:~ :- 'A' '.-'