7 lines
279 B
Plaintext
7 lines
279 B
Plaintext
|
parameter unit;
|
||
|
|
storage (pair timestamp (pair (contract unit unit) (contract unit unit)));
|
||
|
|
return unit;
|
||
|
|
code { CDR; DUP; CAR; NOW; CMPLT; IF {FAIL} {};
|
||
|
|
DUP; CDAR; PUSH tez "100"; UNIT; TRANSFER_TOKENS; DROP;
|
||
|
|
DUP; CDDR; PUSH tez "100"; UNIT; TRANSFER_TOKENS; PAIR }
|