New Project

actus.xml

<xml xmlns="https://developers.google.com/blockly/xml"><block type="BaseContractType" id="root_contract" deletable="false" x="13" y="187"><statement name="BaseContractType"><block type="PaymentAtMaturity" id="{=}_ITjLvl4@`q(3yb.1"><value name="start_date"><block type="ActusDate" id="HP|!CTeJ5^81UiX~}:%]"><field name="yyyy">2020</field><field name="mm">1</field><field name="dd">1</field></block></value><value name="maturity_date"><block type="ActusDate" id="sRa@%r-g[$FoEiXaD4{F"><field name="yyyy">2040</field><field name="mm">1</field><field name="dd">1</field></block></value><value name="notional"><block type="ActusDecimalType" id="][{za^q3]:v{^(!Nre.G"><field name="value">1000</field></block></value></block></statement></block></xml>

blockly.xml

<xml xmlns="https://developers.google.com/blockly/xml"><block type="BaseContractType" id="root_contract" deletable="false" x="13" y="187"><statement name="BaseContractType"><block type="WhenContractType" id="jVGgte],ZdRlhvBQ:Bwx"><field name="timeout">5</field><statement name="case"><block type="DepositActionType" id="meF8y/B0Jn:vkwe^i(EP"><value name="from_party"><block type="RolePartyType" id="N=13eq1V4*NqGu3bV5fy"><field name="role">issuer</field></block></value><value name="value"><block type="ConstantValueType" id="HZ(e}anJZ}(|By13cQx8"><field name="constant">150</field></block></value><value name="token"><block type="AdaTokenType" id="l8A;DU}{m.2^YJkcvGuY"/></value><value name="party"><block type="RolePartyType" id="EiiGh*9:{M~8|W3a.UQ5"><field name="role">issuer</field></block></value><statement name="contract"><block type="WhenContractType" id="+))nm$@[A0-+PygZmJ@F"><field name="timeout">10</field><statement name="case"><block type="DepositActionType" id="^$vqWZq5I3N~P7NUZNJ["><value name="from_party"><block type="RolePartyType" id="/fc%+-ceEg]ZPi}`8se}"><field name="role">investor</field></block></value><value name="value"><block type="ConstantValueType" id="/9m/cUnYN|t*C|f3(v`O"><field name="constant">850</field></block></value><value name="token"><block type="AdaTokenType" id="o0aziTxQe:YK:qhg=a%P"/></value><value name="party"><block type="RolePartyType" id="D8V^r-,vQj!/#SgG*x-6"><field name="role">investor</field></block></value><statement name="contract"><block type="PayContractType" id="eBQjVJCsCDS%r{_ALmMc"><value name="payee"><block type="PartyPayeeType" id="A|,+GQd(4h^tH]^Qtebm"><value name="party"><block type="RolePartyType" id="s*.(61+.Uy`[/(RdDM#P"><field name="role">issuer</field></block></value></block></value><value name="value"><block type="ConstantValueType" id="ngL.L%F@-*vL%r:QSz)W"><field name="constant">850</field></block></value><value name="token"><block type="AdaTokenType" id="fV[]VTO$*_02w2xiBO1_"/></value><value name="party"><block type="RolePartyType" id="5N~]ou5/PRC*t?`zK6X0"><field name="role">investor</field></block></value><statement name="contract"><block type="WhenContractType" id=";NL*K@q2*;2wq$,M-O9r"><field name="timeout">20</field><statement name="case"><block type="DepositActionType" id="A2+8_Md=cmvTtrwT.w_*"><value name="from_party"><block type="RolePartyType" id="pI3XhG@(5$s5cGSNn9xT"><field name="role">issuer</field></block></value><value name="value"><block type="ConstantValueType" id="!,A$!!yIP`IXxP7vn)Kl"><field name="constant">850</field></block></value><value name="token"><block type="AdaTokenType" id="Tk(!AIDJ}Y8]f`^|X?8]"/></value><value name="party"><block type="RolePartyType" id="S]en)*wuv+%@Quhzs5U7"><field name="role">issuer</field></block></value><statement name="contract"><block type="PayContractType" id="@vRy|]U]`souyEs^NK+|"><value name="payee"><block type="PartyPayeeType" id="J*?|b~ou)JSXOC,UU6:n"><value name="party"><block type="RolePartyType" id="1zdV+!b?g|R@nH!H})8|"><field name="role">issuer</field></block></value></block></value><value name="value"><block type="ConstantValueType" id="~y1q_@oBR=lUOGLR~2on"><field name="constant">1000</field></block></value><value name="token"><block type="AdaTokenType" id="h}hI|yCdVEVKYVC_2Xjm"/></value><value name="party"><block type="RolePartyType" id="!|G;T2|lwB$aN[V|_jTn"><field name="role">issuer</field></block></value><statement name="contract"><block type="CloseContractType" id="bRW=$J]|_j~9~feny*vr"/></statement></block></statement></block></statement><statement name="contract"><block type="CloseContractType" id="Iq-Zn86i5/1I5[]lH_Cr"/></statement></block></statement></block></statement></block></statement><statement name="contract"><block type="CloseContractType" id="jV[[LnFXrLx0x/K^e,sy"/></statement></block></statement></block></statement><statement name="contract"><block type="CloseContractType" id="bYv?n65jVU84r!e7-F,L"/></statement></block></statement></block></xml>

playground.marlowe

When
    [Case
        (Deposit
            (Role "issuer")
            (Role "issuer")
            (Token "" "")
            (Constant 150)
        )
        (When
            [Case
                (Deposit
                    (Role "investor")
                    (Role "investor")
                    (Token "" "")
                    (Constant 850)
                )
                (Pay
                    (Role "investor")
                    (Party (Role "issuer"))
                    (Token "" "")
                    (Constant 850)
                    (When
                        [Case
                            (Deposit
                                (Role "issuer")
                                (Role "issuer")
                                (Token "" "")
                                (Constant 850)
                            )
                            (Pay
                                (Role "issuer")
                                (Party (Role "issuer"))
                                (Token "" "")
                                (Constant 1000)
                                Close 
                            )]
                        20 Close 
                    )
                )]
            10 Close 
        )]
    5 Close 

playground.marlowe.json

{}