tx · 6YR9hdpFVFrZub1MrdVeYryzDEaAd5B6DJC9adwyVkQK

3MzJtUDo36TUmN6f28PjqC7PrWcGtbijQ8n:  -0.05000000 Waves

2023.07.12 15:21 [2662674] smart account 3MzJtUDo36TUmN6f28PjqC7PrWcGtbijQ8n > SELF 0.00000000 Waves

{ "type": 13, "id": "6YR9hdpFVFrZub1MrdVeYryzDEaAd5B6DJC9adwyVkQK", "fee": 5000000, "feeAssetId": null, "timestamp": 1689164534970, "version": 2, "chainId": 84, "sender": "3MzJtUDo36TUmN6f28PjqC7PrWcGtbijQ8n", "senderPublicKey": "9PZvvZ2Fe1yW1xAFS7pG5mACxDEy1CUwrrqYe1sTCtc7", "proofs": [ "5nbTr6M42gxh7c9Hpfg9jC1WrL7FAjVZfwTvopgkjNHK4QKpuz37quQp642h2K6UnheVo6EcJc1fLq7pCorjFxBJ" ], "script": "base64:BgLdDwgCEggKBggIAQEICBIECgIBARIDCgEIEgMKAQESAwoBCBIDCgEIEgMKAQgSBAoCCAESBQoDCAgBEgASAwoBCCIDU0VQIgVFTVBUWSIJUFJFQ0lTSU9OIhVNQVhfUkFURV9IRUlHSFRfREVMVEEiD09SQUNMRV9ERUNJTUFMUyIRTElRVUlEQVRJT05fQk9OVVMiGExJUVVJREFUSU9OX1BST1RPQ09MX0ZFRSISSWR4VmF1bHRBc3NldENvdW50IhNJZHhWYXVsdEFzc2V0QW1vdW50IhFJZHhWYXVsdEFzc2V0UmF0ZSIEZGl2cCICX3giAl95IgRtdWxwIgRqb2luIgJhciIOa2V5SW5pdGlhbGl6ZWQiFWtleUNvb3JkaW5hdG9yQWRkcmVzcyISa2V5VmVyaWZpZXJBZGRyZXNzIhJrZXlGcm9udGVuZEFkZHJlc3MiEmtleVRyZWFzdXJ5QWRkcmVzcyIQa2V5T3JhY2xlQWRkcmVzcyINa2V5VmF1bHRBc3NldCIHYWRkcmVzcyIFYXNzZXQiD2tleUJhY2tpbmdSYXRpbyITa2V5TGlxdWlkYXRpb25SYXRpbyIZa2V5TGlxdWlkYXRpb25Qcm90b2NvbEZlZSIJa2V5VGlja2VyIhVrZXlNYXhSYXRlSGVpZ2h0RGVsdGEiEmtleUNvbnRyYWN0QXNzZXRJZCIUa2V5T3JhY2xlVGlja2VyUHJpY2UiBnRpY2tlciIaa2V5T3JhY2xlVGlja2VyUHJpY2VIZWlnaHQiCWtleVNpZ25lZCIIX2FkZHJlc3MiBV90eElkIhFrZXlQcm90b2NvbEFjdGl2ZSINaXNJbml0aWFsaXplZCIPbXVzdEluaXRpYWxpemVkIhJtdXN0Tm90SW5pdGlhbGl6ZWQiCG11c3RTZWxmIgFpIgtjb29yZGluYXRvciIGb3JhY2xlIgh2ZXJpZmllciIHJG1hdGNoMCIBcyIKZ2V0QWRkcmVzcyIDa2V5IgNlcnIiEmdldEZyb250ZW5kQWRkcmVzcyISZ2V0VHJlYXN1cnlBZGRyZXNzIhVnZXRNYXhSYXRlSGVpZ2h0RGVsdGEiGWdldExpcXVpZGF0aW9uUHJvdG9jb2xGZWUiCmdldEFzc2V0SWQiCGlzQWN0aXZlIgptdXN0QWN0aXZlIgxtdXN0RnJvbnRlbmQiEm11c3RIYXZlT25lUGF5bWVudCIKaXNQb3NpdGl2ZSIGbnVtYmVyIg1pc05vdE5lZ2F0aXZlIhRnZXRBc3NldElkRnJvbVN0cmluZyIHYXNzZXRJZCIHaXNBc3NldCIBcCINY2hlY2tpbmdBc3NldCICYnYiBG5hbWUiByRtYXRjaDEiDHBheW1lbnRBc3NldCIPZ2V0QmFja2luZ1JhdGlvIhNnZXRMaXF1aWRhdGlvblJhdGlvIgxjaGVja0FkZHJlc3MiFWtleVRvdGFsQXNzZXRBY2NlcHRlZCISa2V5VG90YWxFYXN0TWludGVkIhJrZXlFYXN0TWludGVkTGltaXQiEGtleVN0YWtlckFkZHJlc3MiFWdldFRvdGFsQXNzZXRBY2NlcHRlZCISZ2V0VG90YWxFYXN0TWludGVkIhJnZXRFYXN0TWludGVkTGltaXQiEGdldFN0YWtlckFkZHJlc3MiBnN0YWtlciIIaXNTdGFrZWQiEmNoZWNrQmFja2luZ1JhdGlvcyIDX2JyIgNfbHIiDGdldFZhdWx0RGF0YSIIZnJvbnRlbmQiBXZhdWx0IgF2IgVjb3VudCILYXNzZXRBbW91bnQiBHJhdGUiEGNoZWNrSGVpZ2h0RGVsdGEiC3ByaWNlSGVpZ2h0Ig5tYXhIZWlnaHREZWx0YSILY3VycmVudERpZmYiEGdldEFzc2V0VXNkUHJpY2UiC2NoZWNrSGVpZ2h0IgVwcmljZSILdXBkYXRlVmF1bHQiB19hbW91bnQiDSR0MDEzMDk5MTMxNDgiCG5ld0NvdW50Ig5uZXdBc3NldEFtb3VudCIJYXNzZXRSYXRlIg9jb3VudEVxdWl2YWxlbnQiDGJhY2tpbmdSYXRpbyIFdXNkRXEiBmVhc3RFcSITX2Nvb3JkaW5hdG9yQWRkcmVzcyIOX29yYWNsZUFkZHJlc3MiDV9iYWNraW5nUmF0aW8iEV9saXF1aWRhdGlvblJhdGlvIghfYXNzZXRJZCIHX3RpY2tlciIGY2hlY2tzIgVjaGVjayIQX2Vhc3RNaW50ZWRMaW1pdCIHcGF5bWVudCIKdmF1bHRBc3NldCINJHQwMTU3NzAxNTgyMyIVbmV3VG90YWxBc3NldEFjY2VwdGVkIhJuZXdUb3RhbEVhc3RNaW50ZWQiD2Vhc3RNaW50ZWRMaW1pdCIIZG9BY3Rpb24iDHVwZGF0ZWRWYXVsdCINJHQwMTc0OTcxNzU0MyISX2xpcXVpZGF0b3JBZGRyZXNzIgZfcmF0aW8iDmFzc2V0UmVxdWVzdGVkIg0kdDAxODYzMzE4Njg2IgNmZWUiCmxpcXVpZGF0ZWQiD3RyZWFzdXJ5QWRkcmVzcyIRbGlxdWlkYXRvckFkZHJlc3MiDSR0MDE5NjczMTk3MjMiEGxpcXVpZGF0aW9uUmF0aW8iCXRocmVzaG9sZCICdHgiBnZlcmlmeUYAAWECAl9fAAFiAgAAAWMAgKCUpY0dAAFkAAUAAWUAwIQ9AAFmCQBoAgkAaQIFAWMAZAAFAAFnCQBoAgkAaQIFAWMAZAACAAFoAAEAAWkAAgABagADAQFrAgFsAW0JAG4EBQFsBQFjBQFtBQhIQUxGRVZFTgEBbgIBbAFtCQBuBAUBbAUBbQUBYwUISEFMRkVWRU4BAW8BAXAJALkJAgUBcAUBYQEBcQAJAQFvAQkAzAgCAgIlcwkAzAgCAgtpbml0aWFsaXplZAUDbmlsAQFyAAkBAW8BCQDMCAICAiVzCQDMCAICEmNvb3JkaW5hdG9yQWRkcmVzcwUDbmlsAQFzAAkBAW8BCQDMCAICAiVzCQDMCAICD3ZlcmlmaWVyQWRkcmVzcwUDbmlsAQF0AAkBAW8BCQDMCAICAiVzCQDMCAICD2Zyb250ZW5kQWRkcmVzcwUDbmlsAQF1AAkBAW8BCQDMCAICAiVzCQDMCAICD3RyZWFzdXJ5QWRkcmVzcwUDbmlsAQF2AAkBAW8BCQDMCAICAiVzCQDMCAICDW9yYWNsZUFkZHJlc3MFA25pbAEBdwIBeAF5CQEBbwEJAMwIAgIGJXMlcyVzCQDMCAICBXZhdWx0CQDMCAIFAXgJAMwIAgUBeQUDbmlsAQF6AAkBAW8BCQDMCAICAiVzCQDMCAICDGJhY2tpbmdSYXRpbwUDbmlsAQFBAAkBAW8BCQDMCAICAiVzCQDMCAICEGxpcXVpZGF0aW9uUmF0aW8FA25pbAEBQgAJAQFvAQkAzAgCAgIlcwkAzAgCAhZsaXF1aWRhdGlvblByb3RvY29sRmVlBQNuaWwBAUMACQEBbwEJAMwIAgICJXMJAMwIAgIGdGlja2VyBQNuaWwBAUQACQEBbwEJAMwIAgICJXMJAMwIAgISbWF4UmF0ZUhlaWdodERlbHRhBQNuaWwBAUUACQEBbwEJAMwIAgICJXMJAMwIAgIPY29udHJhY3RBc3NldElkBQNuaWwBAUYBAUcJAQFvAQkAzAgCAgQlcyVzCQDMCAICBXByaWNlCQDMCAIFAUcFA25pbAEBSAEBRwkBAW8BCQDMCAICBCVzJXMJAMwIAgIKbGFzdEhlaWdodAkAzAgCBQFHBQNuaWwBAUkCAUoBSwkBAW8BCQDMCAICBiVzJXMlcwkAzAgCAgZzaWduZWQJAMwIAgUBSgkAzAgCBQFLBQNuaWwBAUwACQEBbwEJAMwIAgICJXMJAMwIAgIOcHJvdG9jb2xBY3RpdmUFA25pbAEBTQAJAQt2YWx1ZU9yRWxzZQIJAJsIAgUEdGhpcwkBAXEABwEBTgADCQEBIQEJAQFNAAkAAgECD05vdCBpbml0aWFsaXplZAUEdW5pdAEBTwADCQEBTQAJAAIBAhNBbHJlYWR5IGluaXRpYWxpemVkBQR1bml0AQFQAQFRAwkBAiE9AggFAVEGY2FsbGVyBQR0aGlzCQACAQIdT25seSBzZWxmIGludm9jYXRpb24gYWxsb3dlZC4FBHVuaXQBAVIACQERQGV4dHJOYXRpdmUoMTA2MikBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBAXIAAhZDb29yZGluYXRvciBpcyBub3Qgc2V0AQFTAAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJAQF2AAIRT3JhY2xlIGlzIG5vdCBzZXQBAVQABAFVCQCiCAEJAQFyAAMJAAECBQFVAgZTdHJpbmcEAVYFAVUJAJ0IAgkBEUBleHRyTmF0aXZlKDEwNjIpAQUBVgkBAXMAAwkAAQIFAVUCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgEBVwIBWAFZCQERQGV4dHJOYXRpdmUoMTA2MikBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgkBAVIABQFYBQFZAQFaAAkBAVcCCQEBdAACE0Zyb250ZW5kIGlzIG5vdCBzZXQBAmFhAAkBAVcCCQEBdQACE1RyZWFzdXJ5IGlzIG5vdCBzZXQBAmFiAAkBC3ZhbHVlT3JFbHNlAgkAmggCCQEBUgAJAQFEAAUBZAECYWMACQELdmFsdWVPckVsc2UCCQCaCAIJAQFSAAkBAUIABQFnAQJhZAAJARFAZXh0ck5hdGl2ZSgxMDU4KQEJAQFFAAECYWUACQELdmFsdWVPckVsc2UCCQCbCAIJAQFSAAkBAUwABwECYWYAAwMJAQEhAQkBAmFlAAYJAQEhAQkBAU0ACQACAQItUHJvdG9jb2wgaXMgZGlzYWJsZWQuIFBsZWFzZSBjb250YWN0IHN1cHBvcnQuBQR1bml0AQJhZwEBUQMJAQIhPQIIBQFRBmNhbGxlcgkBAVoACQACAQILTm90IGFsbG93ZWQFBHVuaXQBAmFoAQFRAwkBAiE9AgkAkAMBCAUBUQhwYXltZW50cwABCQACAQIWTXVzdCBoYXZlIG9uZSBwYXltZW50LgUEdW5pdAECYWkBAmFqAwkAZwIAAAUCYWoJAAIBAh1BdHRyaWJ1dGUgc2hvdWxkIGJlIHBvc2l0aXZlLgUEdW5pdAECYWsBAmFqAwkAZgIAAAUCYWoJAAIBAiVBdHRyaWJ1dGUgc2hvdWxkIGJlIHBvc2l0aXZlIG9yIHplcm8uBQR1bml0AQJhbAECYW0DCQAAAgUCYW0CBVdBVkVTBQR1bml0CQDZBAEFAmFtAQJhbgICYW8CYXAEAmFtBAFVBQJhcAMJAAECBQFVAgpCeXRlVmVjdG9yBAJhcQUBVQUCYXEDCQABAgUBVQIGU3RyaW5nBAFWBQFVCQECYWwBBQFWAwkAAQIFAVUCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgQBVQUCYW0DCQABAgUBVQIKQnl0ZVZlY3RvcgQCYXEFAVUEAmFyBAJhcwkA7AcBBQJhcQMJAAECBQJhcwIFQXNzZXQEAXkFAmFzCAUBeQRuYW1lAwkAAQIFAmFzAgRVbml0CQACAQkArAICAhFDYW4ndCBmaW5kIGFzc2V0IAkA2AQBBQJhcQkAAgECC01hdGNoIGVycm9yBAFZCQACAQkArAICAh5BdHRhY2hlZCBwYXltZW50IGFzc2V0IGlzIG5vdCAFAmFyBAJhcwgFAmFvB2Fzc2V0SWQDCQABAgUCYXMCCkJ5dGVWZWN0b3IEAmF0BQJhcwMJAQIhPQIFAmF0BQJhbQUBWQUEdW5pdAMJAAECBQJhcwIEVW5pdAUBWQkAAgECC01hdGNoIGVycm9yAwkAAQIFAVUCBFVuaXQDCQECIT0CCAUCYW8HYXNzZXRJZAUEdW5pdAkAAgECI0F0dGFjaGVkIHBheW1lbnQgYXNzZXQgaXMgbm90IFdBVkVTBQR1bml0CQACAQILTWF0Y2ggZXJyb3IBAmF1AAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEJAQF6AAIYQmFja2luZyByYXRpbyBpcyBub3Qgc2V0AQJhdgAJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnwgBCQEBQQACHExpcXVpZGF0aW9uIHJhdGlvIGlzIG5vdCBzZXQBAmF3AQFKBAFVCQCmCAEFAUoDCQABAgUBVQIHQWRkcmVzcwQBeAUBVQYDCQABAgUBVQIEVW5pdAkAAgECD0ludmFsaWQgYWRkcmVzcwkAAgECC01hdGNoIGVycm9yAQJheAAJAQFvAQkAzAgCAgIlcwkAzAgCAhJ0b3RhbEFzc2V0QWNjZXB0ZWQFA25pbAECYXkACQEBbwEJAMwIAgICJXMJAMwIAgIPdG90YWxFYXN0TWludGVkBQNuaWwBAmF6AAkBAW8BCQDMCAICAiVzCQDMCAICD2Vhc3RNaW50ZWRMaW1pdAUDbmlsAQJhQQAJAQFvAQkAzAgCAgIlcwkAzAgCAg1zdGFrZXJBZGRyZXNzBQNuaWwBAmFCAAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQECYXgAAAABAmFDAAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQECYXkAAAABAmFEAAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQECYXoAAAABAmFFAAkBC3ZhbHVlT3JFbHNlAgkAoggBCQECYUEABQFiAQJhRgAJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQJhRQABAmFHAAkBAiE9AgkBAmFFAAUBYgECYUgCAmFJAmFKAwMJAGYCAAAFAmFKBgkAZgIAAAUCYUkJAAIBAh5CYWNraW5nIHJhdGlvIG11c3QgYmUgcG9zaXRpdmUDCQBmAgkAZAIFAWMFAWYFAmFKCQACAQIqTGlxdWlkYXRpb24gcmF0aW8gbXVzdCBiZSBoaWdoZXIgdGhhbiAxMDUlAwkAZwIFAmFKBQJhSQkAAgECM0JhY2tpbmcgcmF0aW8gbXVzdCBiZSBoaWdoZXIgdGhhbiBsaXF1aWRhdGlvbiByYXRpbwUEdW5pdAECYUsBAUoEAXkJAQJhZAAEAmFMCQEBWgAEAmFNCQCdCAIFAmFMCQEBdwIFAUoFAXkEAmFOBAFVBQJhTQMJAAECBQFVAgRVbml0CQDMCAICBiVkJWQlZAkAzAgCAgEwCQDMCAICATAJAMwIAgIBMAUDbmlsAwkAAQIFAVUCBlN0cmluZwQBVgUBVQkAtQkCBQFWBQFhCQACAQILTWF0Y2ggZXJyb3IEAmFPCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYU4FAWgEAmFQCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYU4FAWkEAmFRCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYU4FAWoJAJUKAwUCYVAFAmFPBQJhUQECYVIBAmFTBAJhVAkBAmFiAAQCYVUJAGUCCAUJbGFzdEJsb2NrBmhlaWdodAUCYVMDCQBnAgUCYVQFAmFVBQR1bml0CQACAQISTGFyZ2UgcHJpY2UgZGVsdGEuAQJhVgAEAUcJARFAZXh0ck5hdGl2ZSgxMDU4KQEJAQFDAAQCYVMJARFAZXh0ck5hdGl2ZSgxMDUwKQIJAQFTAAkBAUgBBQFHBAJhVwkBAmFSAQUCYVMDCQAAAgUCYVcFAmFXBAJhWAkBEUBleHRyTmF0aXZlKDEwNTApAgkBAVMACQEBRgEFAUcJAGsDBQJhWAUBYwUBZQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECYVkCAUoCYVoEAmJhCQECYUsBBQFKBAJhUAgFAmJhAl8xBAJhTwgFAmJhAl8yBAJiYgkAZAIFAmFPAAEEAmJjCQBkAgUCYVAFAmFaAwkAZgIAAAUCYmMJAAIBAiZTb21ldGhpbmcgd2VudCB3cm9uZy4gQ29udGFjdCBzdXBwb3J0LgQCYmQJAQJhVgAJALkJAgkAzAgCAgYlZCVkJWQJAMwIAgkApAMBBQJiYgkAzAgCCQCkAwEFAmJjCQDMCAIJAKQDAQUCYmQFA25pbAUBYQECYmUBAmFaBAJiZgkBAmF1AAQCYmQJAQJhVgAEAmJnCQEBbgIFAmFaBQJiZAQCYmgJAQFrAgUCYmcFAmJmCQCUCgIFAmJnBQJiaAsBUQEKaW5pdGlhbGl6ZQYCYmkCYmoCYmsCYmwCYm0CYm4EAmJvCQDMCAIJAQFQAQUBUQkAzAgCCQEBTwAJAMwIAgkBAmF3AQUCYmkJAMwIAgkBAmF3AQUCYmoJAMwIAgkBAmFIAgUCYmsFAmJsBQNuaWwDCQAAAgUCYm8FAmJvCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBegAFAmJrCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBQQAFAmJsCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFyAAUCYmkJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAXYABQJiagkAzAgCCQELU3RyaW5nRW50cnkCCQEBQwAFAmJuCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFFAAUCYm0JAMwIAgkBDEJvb2xlYW5FbnRyeQIJAQFxAAYFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFRAQlzZXRSYXRpb3MCAmJrAmJsBAJibwkAzAgCCQEBTgAJAMwIAgkBAVABBQFRCQDMCAIJAQJhSAIFAmJrBQJibAUDbmlsAwkAAAIFAmJvBQJibwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAXoABQJiawkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAUEABQJibAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAVEBCXNldE9yYWNsZQEBSgQCYnAJAMwIAgkBAVABBQFRCQDMCAIJAQJhdwEFAUoFA25pbAMJAAACBQJicAUCYnAJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAXYABQFKBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BUQESc2V0RWFzdE1pbnRlZExpbWl0AQJicQQCYm8JAMwIAgkBAU4ACQDMCAIJAQFQAQUBUQkAzAgCCQECYWsBBQJicQUDbmlsAwkAAAIFAmJvBQJibwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAmF6AAUCYnEFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFRAQlzZXRTdGFrZXIBAUoEAmJvCQDMCAIJAQFOAAkAzAgCCQEBUAEFAVEJAMwIAgkBAmF3AQUBSgUDbmlsAwkAAAIFAmJvBQJibwMJAQJhRwAJAAIBAilVbmFibGUgdG8gcHJvY2VlZC4gU3Rha2VyIGlzIGFscmVhZHkgc2V0LgkAzAgCCQELU3RyaW5nRW50cnkCCQECYUEABQFKBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BUQEEbWludAEBSgQCYnIJAJEDAggFAVEIcGF5bWVudHMAAAQCYnMJAQJhZAAEAmJwCQDMCAIJAQJhZgAJAMwIAgkBAmFnAQUBUQkAzAgCCQECYWgBBQFRCQDMCAIJAQJhbgIFAmJyBQJicwUDbmlsAwkAAAIFAmJwBQJicAQCYnQJAQJiZQEIBQJicgZhbW91bnQEAmJnCAUCYnQCXzEEAmJoCAUCYnQCXzIEAmFNCQECYVkCBQFKCAUCYnIGYW1vdW50BAJidQkAZAIJAQJhQgAIBQJicgZhbW91bnQEAmJ2CQBkAgkBAmFDAAkAaQIFAmJoAGQEAmJ3CQECYUQAAwMJAGYCBQJidwAACQBmAgUCYnYFAmJ3BwkAAgECOFVuYWJsZSB0byBwcm9jZWVkLiBUb28gbXVjaCBFQVNUIG1pbnRlZCB3aXRoIHRoaXMgYXNzZXQuBAJieAMJAQJhRwAJAPwHBAkBAmFGAAIFc3Rha2UFA25pbAkAzAgCBQJicgUDbmlsBQR1bml0AwkAAAIFAmJ4BQJieAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYXgABQJidQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAmF5AAUCYnYFA25pbAkAlAoCBQJhTQUCYmgJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BUQEGc3VwcGx5AQFKBAJicgkAkQMCCAUBUQhwYXltZW50cwAABAJicwkBAmFkAAQCYnAJAMwIAgkBAmFmAAkAzAgCCQECYWcBBQFRCQDMCAIJAQJhaAEFAVEJAMwIAgkBAmFuAgUCYnIFAmJzBQNuaWwDCQAAAgUCYnAFAmJwBAJhTQkBAmFZAgUBSggFAmJyBmFtb3VudAQCYnUJAGQCCQECYUIACAUCYnIGYW1vdW50BAJieAMJAQJhRwAJAPwHBAkBAmFGAAIFc3Rha2UFA25pbAkAzAgCBQJicgUDbmlsBQR1bml0AwkAAAIFAmJ4BQJieAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYXgABQJidQUDbmlsBQJhTQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFRAQVjbG9zZQIBSgJhWgQCYnAJAMwIAgkBAmFmAAkAzAgCCQECYWcBBQFRCQDMCAIJAQJhdwEFAUoJAMwIAgkBAmFpAQUCYVoFA25pbAMJAAACBQJicAUCYnAEAmFQCAkBAmFLAQUBSgJfMQMJAGYCBQJhWgUCYVAJAAIBAi1VbmFibGUgdG8gcHJvY2VlZC4gTm90IGVub3VnaCBhc3NldCBpbiB2YXVsdC4DCQBmAgUCYVoJAQJhQgAJAAIBAjBVbmFibGUgdG8gcHJvY2VlZC4gTm90IGVub3VnaCBhc3NldCBpbiB0cmVhc3VyeS4EAmJ5CQECYVkCBQFKCQEBLQEFAmFaBAJiegkBAmJlAQUCYVoEAmJnCAUCYnoCXzEEAmJoCAUCYnoCXzIEAmJ4AwkBAmFHAAkA/AcECQECYUYAAgd1bnN0YWtlCQDMCAIFAmFaBQNuaWwFA25pbAUEdW5pdAMJAAACBQJieAUCYngEAmFtCQECYWwBCQECYWQABAF4CQERQGV4dHJOYXRpdmUoMTA2MikBBQFKBAJidQkAZQIJAQJhQgAFAmFaBAJidgkAZQIJAQJhQwAJAGkCBQJiaABkCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJheAAFAmJ1CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYXkABQJidgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQF4BQJhWgUCYW0FA25pbAkAlQoDBQJieQUCYmgFAmJnCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAVEBCWxpcXVpZGF0ZQMCYkEBSgJiQgQCYnAJAMwIAgkBAmFmAAkAzAgCCQECYWcBBQFRBQNuaWwDCQAAAgUCYnAFAmJwBAJhUAgJAQJhSwEFAUoCXzEEAmJDCQEBbgIFAmFQBQJiQgMJAGYCBQJiQwUCYVAJAAIBAi1VbmFibGUgdG8gcHJvY2VlZC4gTm90IGVub3VnaCBhc3NldCBpbiB2YXVsdC4DCQBmAgUCYkMJAQJhQgAJAAIBAiRVbmFibGUgdG8gcHJvY2VlZC4gTm90IGVub3VnaCBhc3NldC4EAmJ5CQECYVkCBQFKCQEBLQEFAmJDBAJiRAkBAmJlAQUCYkMEAmJnCAUCYkQCXzEEAmJoCAUCYkQCXzIEAmJ4AwkBAmFHAAkA/AcECQECYUYAAgd1bnN0YWtlCQDMCAIFAmJDBQNuaWwFA25pbAUEdW5pdAMJAAACBQJieAUCYngEAmJFCQEBbgIFAmJDCQECYWMABAJiRgkAZQIFAmJDBQJiRQQCYnUJAGUCCQECYUIABQJiQwQCYnYJAGUCCQECYUMACQBpAgUCYmgAZAQCYkcJAQJhYQAEAmJICQERQGV4dHJOYXRpdmUoMTA2MikBBQJiQQQCYW0JAQJhbAEJAQJhZAAJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAmF4AAUCYnUJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJheQAFAmJ2CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmJIBQJiRgUCYW0JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYkcFAmJFBQJhbQUDbmlsCQCUCgIFAmJ5BQJiaAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFRARJnZXRDdXJyZW50VXNkUHJpY2UACQCUCgIFA25pbAkBAmFWAAFRAQ9nZXRTdWJ2YXVsdEluZm8BAUoEAmFQCAkBAmFLAQUBSgJfMQQCYkkJAQJiZQEFAmFQBAJiZwgFAmJJAl8xBAJiaAgFAmJJAl8yBAJiSgkBAmF2AAQCYksJAQFuAgUCYmcFAmJKCQCUCgIFA25pbAkAlQoDBQJiZwUCYmgFAmJLAQJiTAECYk0ABAFVCQEBVAADCQABAgUBVQIGU3RyaW5nBAF4BQFVCQELdmFsdWVPckVsc2UCCQCbCAIJARFAZXh0ck5hdGl2ZSgxMDYyKQEFAXgJAQFJAgkApQgBBQR0aGlzCQDYBAEIBQJiTAJpZAcJAPQDAwgFAmJMCWJvZHlCeXRlcwkAkQMCCAUCYkwGcHJvb2ZzAAAIBQJiTA9zZW5kZXJQdWJsaWNLZXno9RIx", "height": 2662674, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: none Next: none Full:
OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 6 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let SEP = "__"
5+
6+let EMPTY = ""
7+
8+let PRECISION = 1000000000000
9+
10+let MAX_RATE_HEIGHT_DELTA = 5
11+
12+let ORACLE_DECIMALS = 1000000
13+
14+let LIQUIDATION_BONUS = ((PRECISION / 100) * 5)
15+
16+let LIQUIDATION_PROTOCOL_FEE = ((PRECISION / 100) * 2)
17+
18+let IdxVaultAssetCount = 1
19+
20+let IdxVaultAssetAmount = 2
21+
22+let IdxVaultAssetRate = 3
23+
24+func divp (_x,_y) = fraction(_x, PRECISION, _y, HALFEVEN)
25+
26+
27+func mulp (_x,_y) = fraction(_x, _y, PRECISION, HALFEVEN)
28+
29+
30+func join (ar) = makeString(ar, SEP)
31+
32+
33+func keyInitialized () = join(["%s", "initialized"])
34+
35+
36+func keyCoordinatorAddress () = join(["%s", "coordinatorAddress"])
37+
38+
39+func keyVerifierAddress () = join(["%s", "verifierAddress"])
40+
41+
42+func keyFrontendAddress () = join(["%s", "frontendAddress"])
43+
44+
45+func keyTreasuryAddress () = join(["%s", "treasuryAddress"])
46+
47+
48+func keyOracleAddress () = join(["%s", "oracleAddress"])
49+
50+
51+func keyVaultAsset (address,asset) = join(["%s%s%s", "vault", address, asset])
52+
53+
54+func keyBackingRatio () = join(["%s", "backingRatio"])
55+
56+
57+func keyLiquidationRatio () = join(["%s", "liquidationRatio"])
58+
59+
60+func keyLiquidationProtocolFee () = join(["%s", "liquidationProtocolFee"])
61+
62+
63+func keyTicker () = join(["%s", "ticker"])
64+
65+
66+func keyMaxRateHeightDelta () = join(["%s", "maxRateHeightDelta"])
67+
68+
69+func keyContractAssetId () = join(["%s", "contractAssetId"])
70+
71+
72+func keyOracleTickerPrice (ticker) = join(["%s%s", "price", ticker])
73+
74+
75+func keyOracleTickerPriceHeight (ticker) = join(["%s%s", "lastHeight", ticker])
76+
77+
78+func keySigned (_address,_txId) = join(["%s%s%s", "signed", _address, _txId])
79+
80+
81+func keyProtocolActive () = join(["%s", "protocolActive"])
82+
83+
84+func isInitialized () = valueOrElse(getBoolean(this, keyInitialized()), false)
85+
86+
87+func mustInitialized () = if (!(isInitialized()))
88+ then throw("Not initialized")
89+ else unit
90+
91+
92+func mustNotInitialized () = if (isInitialized())
93+ then throw("Already initialized")
94+ else unit
95+
96+
97+func mustSelf (i) = if ((i.caller != this))
98+ then throw("Only self invocation allowed.")
99+ else unit
100+
101+
102+func coordinator () = addressFromStringValue(valueOrErrorMessage(getString(keyCoordinatorAddress()), "Coordinator is not set"))
103+
104+
105+func oracle () = addressFromStringValue(valueOrErrorMessage(getString(keyOracleAddress()), "Oracle is not set"))
106+
107+
108+func verifier () = match getString(keyCoordinatorAddress()) {
109+ case s: String =>
110+ getString(addressFromStringValue(s), keyVerifierAddress())
111+ case _: Unit =>
112+ unit
113+ case _ =>
114+ throw("Match error")
115+}
116+
117+
118+func getAddress (key,err) = addressFromStringValue(valueOrErrorMessage(getString(coordinator(), key), err))
119+
120+
121+func getFrontendAddress () = getAddress(keyFrontendAddress(), "Frontend is not set")
122+
123+
124+func getTreasuryAddress () = getAddress(keyTreasuryAddress(), "Treasury is not set")
125+
126+
127+func getMaxRateHeightDelta () = valueOrElse(getInteger(coordinator(), keyMaxRateHeightDelta()), MAX_RATE_HEIGHT_DELTA)
128+
129+
130+func getLiquidationProtocolFee () = valueOrElse(getInteger(coordinator(), keyLiquidationProtocolFee()), LIQUIDATION_PROTOCOL_FEE)
131+
132+
133+func getAssetId () = getStringValue(keyContractAssetId())
134+
135+
136+func isActive () = valueOrElse(getBoolean(coordinator(), keyProtocolActive()), false)
137+
138+
139+func mustActive () = if (if (!(isActive()))
140+ then true
141+ else !(isInitialized()))
142+ then throw("Protocol is disabled. Please contact support.")
143+ else unit
144+
145+
146+func mustFrontend (i) = if ((i.caller != getFrontendAddress()))
147+ then throw("Not allowed")
148+ else unit
149+
150+
151+func mustHaveOnePayment (i) = if ((size(i.payments) != 1))
152+ then throw("Must have one payment.")
153+ else unit
154+
155+
156+func isPositive (number) = if ((0 >= number))
157+ then throw("Attribute should be positive.")
158+ else unit
159+
160+
161+func isNotNegative (number) = if ((0 > number))
162+ then throw("Attribute should be positive or zero.")
163+ else unit
164+
165+
166+func getAssetIdFromString (assetId) = if ((assetId == "WAVES"))
167+ then unit
168+ else fromBase58String(assetId)
169+
170+
171+func isAsset (p,checkingAsset) = {
172+ let assetId = match checkingAsset {
173+ case bv: ByteVector =>
174+ bv
175+ case s: String =>
176+ getAssetIdFromString(s)
177+ case _: Unit =>
178+ unit
179+ case _ =>
180+ throw("Match error")
181+ }
182+ match assetId {
183+ case bv: ByteVector =>
184+ let name = match assetInfo(bv) {
185+ case asset: Asset =>
186+ asset.name
187+ case _: Unit =>
188+ throw(("Can't find asset " + toBase58String(bv)))
189+ case _ =>
190+ throw("Match error")
191+ }
192+ let err = throw(("Attached payment asset is not " + name))
193+ match p.assetId {
194+ case paymentAsset: ByteVector =>
195+ if ((paymentAsset != assetId))
196+ then err
197+ else unit
198+ case _: Unit =>
199+ err
200+ case _ =>
201+ throw("Match error")
202+ }
203+ case _: Unit =>
204+ if ((p.assetId != unit))
205+ then throw("Attached payment asset is not WAVES")
206+ else unit
207+ case _ =>
208+ throw("Match error")
209+ }
210+ }
211+
212+
213+func getBackingRatio () = valueOrErrorMessage(getInteger(keyBackingRatio()), "Backing ratio is not set")
214+
215+
216+func getLiquidationRatio () = valueOrErrorMessage(getInteger(keyLiquidationRatio()), "Liquidation ratio is not set")
217+
218+
219+func checkAddress (_address) = match addressFromString(_address) {
220+ case address: Address =>
221+ true
222+ case _: Unit =>
223+ throw("Invalid address")
224+ case _ =>
225+ throw("Match error")
226+}
227+
228+
229+func keyTotalAssetAccepted () = join(["%s", "totalAssetAccepted"])
230+
231+
232+func keyTotalEastMinted () = join(["%s", "totalEastMinted"])
233+
234+
235+func keyEastMintedLimit () = join(["%s", "eastMintedLimit"])
236+
237+
238+func keyStakerAddress () = join(["%s", "stakerAddress"])
239+
240+
241+func getTotalAssetAccepted () = valueOrElse(getInteger(keyTotalAssetAccepted()), 0)
242+
243+
244+func getTotalEastMinted () = valueOrElse(getInteger(keyTotalEastMinted()), 0)
245+
246+
247+func getEastMintedLimit () = valueOrElse(getInteger(keyEastMintedLimit()), 0)
248+
249+
250+func getStakerAddress () = valueOrElse(getString(keyStakerAddress()), EMPTY)
251+
252+
253+func staker () = addressFromStringValue(getStakerAddress())
254+
255+
256+func isStaked () = (getStakerAddress() != EMPTY)
257+
258+
259+func checkBackingRatios (_br,_lr) = if (if ((0 > _lr))
260+ then true
261+ else (0 > _br))
262+ then throw("Backing ratio must be positive")
263+ else if (((PRECISION + LIQUIDATION_BONUS) > _lr))
264+ then throw("Liquidation ratio must be higher than 105%")
265+ else if ((_lr >= _br))
266+ then throw("Backing ratio must be higher than liquidation ratio")
267+ else unit
268+
269+
270+func getVaultData (_address) = {
271+ let asset = getAssetId()
272+ let frontend = getFrontendAddress()
273+ let vault = getString(frontend, keyVaultAsset(_address, asset))
274+ let v = match vault {
275+ case _: Unit =>
276+["%d%d%d", "0", "0", "0"]
277+ case s: String =>
278+ split(s, SEP)
279+ case _ =>
280+ throw("Match error")
281+ }
282+ let count = parseIntValue(v[IdxVaultAssetCount])
283+ let assetAmount = parseIntValue(v[IdxVaultAssetAmount])
284+ let rate = parseIntValue(v[IdxVaultAssetRate])
285+ $Tuple3(assetAmount, count, rate)
286+ }
287+
288+
289+func checkHeightDelta (priceHeight) = {
290+ let maxHeightDelta = getMaxRateHeightDelta()
291+ let currentDiff = (lastBlock.height - priceHeight)
292+ if ((maxHeightDelta >= currentDiff))
293+ then unit
294+ else throw("Large price delta.")
295+ }
296+
297+
298+func getAssetUsdPrice () = {
299+ let ticker = getStringValue(keyTicker())
300+ let priceHeight = getIntegerValue(oracle(), keyOracleTickerPriceHeight(ticker))
301+ let checkHeight = checkHeightDelta(priceHeight)
302+ if ((checkHeight == checkHeight))
303+ then {
304+ let price = getIntegerValue(oracle(), keyOracleTickerPrice(ticker))
305+ fraction(price, PRECISION, ORACLE_DECIMALS)
306+ }
307+ else throw("Strict value is not equal to itself.")
308+ }
309+
310+
311+func updateVault (_address,_amount) = {
312+ let $t01309913148 = getVaultData(_address)
313+ let assetAmount = $t01309913148._1
314+ let count = $t01309913148._2
315+ let newCount = (count + 1)
316+ let newAssetAmount = (assetAmount + _amount)
317+ if ((0 > newAssetAmount))
318+ then throw("Something went wrong. Contact support.")
319+ else {
320+ let assetRate = getAssetUsdPrice()
321+ makeString(["%d%d%d", toString(newCount), toString(newAssetAmount), toString(assetRate)], SEP)
322+ }
323+ }
324+
325+
326+func countEquivalent (_amount) = {
327+ let backingRatio = getBackingRatio()
328+ let assetRate = getAssetUsdPrice()
329+ let usdEq = mulp(_amount, assetRate)
330+ let eastEq = divp(usdEq, backingRatio)
331+ $Tuple2(usdEq, eastEq)
332+ }
333+
334+
335+@Callable(i)
336+func initialize (_coordinatorAddress,_oracleAddress,_backingRatio,_liquidationRatio,_assetId,_ticker) = {
337+ let checks = [mustSelf(i), mustNotInitialized(), checkAddress(_coordinatorAddress), checkAddress(_oracleAddress), checkBackingRatios(_backingRatio, _liquidationRatio)]
338+ if ((checks == checks))
339+ then [IntegerEntry(keyBackingRatio(), _backingRatio), IntegerEntry(keyLiquidationRatio(), _liquidationRatio), StringEntry(keyCoordinatorAddress(), _coordinatorAddress), StringEntry(keyOracleAddress(), _oracleAddress), StringEntry(keyTicker(), _ticker), StringEntry(keyContractAssetId(), _assetId), BooleanEntry(keyInitialized(), true)]
340+ else throw("Strict value is not equal to itself.")
341+ }
342+
343+
344+
345+@Callable(i)
346+func setRatios (_backingRatio,_liquidationRatio) = {
347+ let checks = [mustInitialized(), mustSelf(i), checkBackingRatios(_backingRatio, _liquidationRatio)]
348+ if ((checks == checks))
349+ then [IntegerEntry(keyBackingRatio(), _backingRatio), IntegerEntry(keyLiquidationRatio(), _liquidationRatio)]
350+ else throw("Strict value is not equal to itself.")
351+ }
352+
353+
354+
355+@Callable(i)
356+func setOracle (_address) = {
357+ let check = [mustSelf(i), checkAddress(_address)]
358+ if ((check == check))
359+ then [StringEntry(keyOracleAddress(), _address)]
360+ else throw("Strict value is not equal to itself.")
361+ }
362+
363+
364+
365+@Callable(i)
366+func setEastMintedLimit (_eastMintedLimit) = {
367+ let checks = [mustInitialized(), mustSelf(i), isNotNegative(_eastMintedLimit)]
368+ if ((checks == checks))
369+ then [IntegerEntry(keyEastMintedLimit(), _eastMintedLimit)]
370+ else throw("Strict value is not equal to itself.")
371+ }
372+
373+
374+
375+@Callable(i)
376+func setStaker (_address) = {
377+ let checks = [mustInitialized(), mustSelf(i), checkAddress(_address)]
378+ if ((checks == checks))
379+ then if (isStaked())
380+ then throw("Unable to proceed. Staker is already set.")
381+ else [StringEntry(keyStakerAddress(), _address)]
382+ else throw("Strict value is not equal to itself.")
383+ }
384+
385+
386+
387+@Callable(i)
388+func mint (_address) = {
389+ let payment = i.payments[0]
390+ let vaultAsset = getAssetId()
391+ let check = [mustActive(), mustFrontend(i), mustHaveOnePayment(i), isAsset(payment, vaultAsset)]
392+ if ((check == check))
393+ then {
394+ let $t01577015823 = countEquivalent(payment.amount)
395+ let usdEq = $t01577015823._1
396+ let eastEq = $t01577015823._2
397+ let vault = updateVault(_address, payment.amount)
398+ let newTotalAssetAccepted = (getTotalAssetAccepted() + payment.amount)
399+ let newTotalEastMinted = (getTotalEastMinted() + (eastEq / 100))
400+ let eastMintedLimit = getEastMintedLimit()
401+ if (if ((eastMintedLimit > 0))
402+ then (newTotalEastMinted > eastMintedLimit)
403+ else false)
404+ then throw("Unable to proceed. Too much EAST minted with this asset.")
405+ else {
406+ let doAction = if (isStaked())
407+ then invoke(staker(), "stake", nil, [payment])
408+ else unit
409+ if ((doAction == doAction))
410+ then $Tuple2([IntegerEntry(keyTotalAssetAccepted(), newTotalAssetAccepted), IntegerEntry(keyTotalEastMinted(), newTotalEastMinted)], $Tuple2(vault, eastEq))
411+ else throw("Strict value is not equal to itself.")
412+ }
413+ }
414+ else throw("Strict value is not equal to itself.")
415+ }
416+
417+
418+
419+@Callable(i)
420+func supply (_address) = {
421+ let payment = i.payments[0]
422+ let vaultAsset = getAssetId()
423+ let check = [mustActive(), mustFrontend(i), mustHaveOnePayment(i), isAsset(payment, vaultAsset)]
424+ if ((check == check))
425+ then {
426+ let vault = updateVault(_address, payment.amount)
427+ let newTotalAssetAccepted = (getTotalAssetAccepted() + payment.amount)
428+ let doAction = if (isStaked())
429+ then invoke(staker(), "stake", nil, [payment])
430+ else unit
431+ if ((doAction == doAction))
432+ then $Tuple2([IntegerEntry(keyTotalAssetAccepted(), newTotalAssetAccepted)], vault)
433+ else throw("Strict value is not equal to itself.")
434+ }
435+ else throw("Strict value is not equal to itself.")
436+ }
437+
438+
439+
440+@Callable(i)
441+func close (_address,_amount) = {
442+ let check = [mustActive(), mustFrontend(i), checkAddress(_address), isPositive(_amount)]
443+ if ((check == check))
444+ then {
445+ let assetAmount = getVaultData(_address)._1
446+ if ((_amount > assetAmount))
447+ then throw("Unable to proceed. Not enough asset in vault.")
448+ else if ((_amount > getTotalAssetAccepted()))
449+ then throw("Unable to proceed. Not enough asset in treasury.")
450+ else {
451+ let updatedVault = updateVault(_address, -(_amount))
452+ let $t01749717543 = countEquivalent(_amount)
453+ let usdEq = $t01749717543._1
454+ let eastEq = $t01749717543._2
455+ let doAction = if (isStaked())
456+ then invoke(staker(), "unstake", [_amount], nil)
457+ else unit
458+ if ((doAction == doAction))
459+ then {
460+ let assetId = getAssetIdFromString(getAssetId())
461+ let address = addressFromStringValue(_address)
462+ let newTotalAssetAccepted = (getTotalAssetAccepted() - _amount)
463+ let newTotalEastMinted = (getTotalEastMinted() - (eastEq / 100))
464+ $Tuple2([IntegerEntry(keyTotalAssetAccepted(), newTotalAssetAccepted), IntegerEntry(keyTotalEastMinted(), newTotalEastMinted), ScriptTransfer(address, _amount, assetId)], $Tuple3(updatedVault, eastEq, usdEq))
465+ }
466+ else throw("Strict value is not equal to itself.")
467+ }
468+ }
469+ else throw("Strict value is not equal to itself.")
470+ }
471+
472+
473+
474+@Callable(i)
475+func liquidate (_liquidatorAddress,_address,_ratio) = {
476+ let check = [mustActive(), mustFrontend(i)]
477+ if ((check == check))
478+ then {
479+ let assetAmount = getVaultData(_address)._1
480+ let assetRequested = mulp(assetAmount, _ratio)
481+ if ((assetRequested > assetAmount))
482+ then throw("Unable to proceed. Not enough asset in vault.")
483+ else if ((assetRequested > getTotalAssetAccepted()))
484+ then throw("Unable to proceed. Not enough asset.")
485+ else {
486+ let updatedVault = updateVault(_address, -(assetRequested))
487+ let $t01863318686 = countEquivalent(assetRequested)
488+ let usdEq = $t01863318686._1
489+ let eastEq = $t01863318686._2
490+ let doAction = if (isStaked())
491+ then invoke(staker(), "unstake", [assetRequested], nil)
492+ else unit
493+ if ((doAction == doAction))
494+ then {
495+ let fee = mulp(assetRequested, getLiquidationProtocolFee())
496+ let liquidated = (assetRequested - fee)
497+ let newTotalAssetAccepted = (getTotalAssetAccepted() - assetRequested)
498+ let newTotalEastMinted = (getTotalEastMinted() - (eastEq / 100))
499+ let treasuryAddress = getTreasuryAddress()
500+ let liquidatorAddress = addressFromStringValue(_liquidatorAddress)
501+ let assetId = getAssetIdFromString(getAssetId())
502+ $Tuple2([IntegerEntry(keyTotalAssetAccepted(), newTotalAssetAccepted), IntegerEntry(keyTotalEastMinted(), newTotalEastMinted), ScriptTransfer(liquidatorAddress, liquidated, assetId), ScriptTransfer(treasuryAddress, fee, assetId)], $Tuple2(updatedVault, eastEq))
503+ }
504+ else throw("Strict value is not equal to itself.")
505+ }
506+ }
507+ else throw("Strict value is not equal to itself.")
508+ }
509+
510+
511+
512+@Callable(i)
513+func getCurrentUsdPrice () = $Tuple2(nil, getAssetUsdPrice())
514+
515+
516+
517+@Callable(i)
518+func getSubvaultInfo (_address) = {
519+ let assetAmount = getVaultData(_address)._1
520+ let $t01967319723 = countEquivalent(assetAmount)
521+ let usdEq = $t01967319723._1
522+ let eastEq = $t01967319723._2
523+ let liquidationRatio = getLiquidationRatio()
524+ let threshold = mulp(usdEq, liquidationRatio)
525+ $Tuple2(nil, $Tuple3(usdEq, eastEq, threshold))
526+ }
527+
528+
529+@Verifier(tx)
530+func verify () = match verifier() {
531+ case address: String =>
532+ valueOrElse(getBoolean(addressFromStringValue(address), keySigned(toString(this), toBase58String(tx.id))), false)
533+ case _ =>
534+ sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
535+}
536+

github/deemru/w8io/026f985 
26.43 ms