12 lines
422 B
Plaintext
12 lines
422 B
Plaintext
parameter key;
|
|
storage string;
|
|
return unit;
|
|
code {CAR; DIP{UNIT; LAMBDA (pair string unit)
|
|
(pair string unit)
|
|
{CAR; UNIT; SWAP; PAIR};
|
|
PUSH tez "100.00"; PUSH bool False;
|
|
PUSH bool False; NONE key};
|
|
CREATE_CONTRACT; DIP{PUSH string ""}; PUSH tez "0.00";
|
|
PUSH string "abcdefg"; TRANSFER_TOKENS;
|
|
DIP{DROP}; UNIT; PAIR};
|