w8 · tx · 2VP···bVk

tx · 2VP9ZzkYswYEnJkj7RpSi7bp9fZ6daWfHrBdtbHmgbVk

3MrWcipACLhYRJHpFXTZJThH65pnP9vCZow:  -0.01000000 Waves

2021.11.23 14:52 [1803631] smart account 3MrWcipACLhYRJHpFXTZJThH65pnP9vCZow > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2VP9ZzkYswYEnJkj7RpSi7bp9fZ6daWfHrBdtbHmgbVk",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1637668344158,
    "version": 1,
    "sender": "3MrWcipACLhYRJHpFXTZJThH65pnP9vCZow",
    "senderPublicKey": "BCvAm7CyQwCK8SaiMMxYNL4sfMxyEHmSssYWaD9t4iUg",
    "proofs": [
        "7F43ggNQkF6xng21W3k5PsRFh7U2BEHJPkPGxBCSTvg8dQDorAZBeeSh6Ups2GbqDgpuCuWSbDRXpSjojSsHxMB"
    ],
    "script": "base64:AAIFAAAAAAAAABoIAhIDCgEIEgASBAoCCAESAwoBCBIECgIICAAAADgAAAAABlNDQUxFOAAAAAAAAAAACAAAAAAFTVVMVDgAAAAAAAX14QAAAAAAB1NDQUxFMTgAAAAAAAAAABIAAAAABk1VTFQxOAkAATYAAAABAA3gtrOnZAAAAAAAAANTRVACAAAAAl9fAAAAAA5QT09MV0VJR0hUTVVMVAUAAAAFTVVMVDgBAAAAD2dldFN0cmluZ09yRmFpbAAAAAEAAAADa2V5CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQiAAAAAQUAAAADa2V5CQABLAAAAAIJAAEsAAAAAgIAAAAPbWFuZGF0b3J5IHRoaXMuBQAAAANrZXkCAAAADyBpcyBub3QgZGVmaW5lZAEAAAAYZ2V0U3RyaW5nQnlBZGRyZXNzT3JGYWlsAAAAAgAAAAdhZGRyZXNzAAAAA2tleQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAAB2FkZHJlc3MFAAAAA2tleQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAptYW5kYXRvcnkgCQAEJQAAAAEFAAAAB2FkZHJlc3MCAAAAAS4FAAAAA2tleQIAAAAPIGlzIG5vdCBkZWZpbmVkAQAAAAxnZXRJbnRPclplcm8AAAACAAAAB2FkZHJlc3MAAAADa2V5CQEAAAALdmFsdWVPckVsc2UAAAACCQAEGgAAAAIFAAAAB2FkZHJlc3MFAAAAA2tleQAAAAAAAAAAAAEAAAAPZ2V0SW50T3JEZWZhdWx0AAAAAwAAAAdhZGRyZXNzAAAAA2tleQAAAApkZWZhdWx0VmFsCQEAAAALdmFsdWVPckVsc2UAAAACCQAEGgAAAAIFAAAAB2FkZHJlc3MFAAAAA2tleQUAAAAKZGVmYXVsdFZhbAEAAAAMZ2V0SW50T3JGYWlsAAAAAgAAAAdhZGRyZXNzAAAAA2tleQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGgAAAAIFAAAAB2FkZHJlc3MFAAAAA2tleQkAASwAAAACCQABLAAAAAICAAAAD21hbmRhdG9yeSB0aGlzLgUAAAADa2V5AgAAAA8gaXMgbm90IGRlZmluZWQBAAAAEWtleUZhY3RvcnlBZGRyZXNzAAAAAAIAAAAcJXMlc19fY29uZmlnX19mYWN0b3J5QWRkcmVzcwAAAAAYSWR4RmFjdG9yeUNmZ1N0YWtpbmdEYXBwAAAAAAAAAAABAAAAABlJZHhGYWN0b3J5Q2ZnQm9vc3RpbmdEYXBwAAAAAAAAAAACAAAAABRJZHhGYWN0b3J5Q2ZnSWRvRGFwcAAAAAAAAAAAAwAAAAAVSWR4RmFjdG9yeUNmZ1RlYW1EYXBwAAAAAAAAAAAEAAAAABlJZHhGYWN0b3J5Q2ZnRW1pc3Npb25EYXBwAAAAAAAAAAAFAAAAABVJZHhGYWN0b3J5Q2ZnUmVzdERhcHAAAAAAAAAAAAYAAAAAGUlkeEZhY3RvcnlDZmdTbGlwcGFnZURhcHAAAAAAAAAAAAcBAAAADWtleUZhY3RvcnlDZmcAAAAAAgAAABElc19fZmFjdG9yeUNvbmZpZwEAAAAaa2V5RmFjdG9yeUxwMkFzc2V0c01hcHBpbmcAAAABAAAACmxwQXNzZXRTdHIJAAS5AAAAAgkABEwAAAACAgAAAAYlcyVzJXMJAARMAAAAAgUAAAAKbHBBc3NldFN0cgkABEwAAAACAgAAAB5tYXBwaW5nc19fbHBBc3NldDJQb29sQ29udHJhY3QFAAAAA25pbAUAAAADU0VQAQAAABBrZXlGYWN0b3J5THBMaXN0AAAAAAIAAAAQJXNfX2xwVG9rZW5zTGlzdAEAAAAma2V5RmFjdG9yeUxwQXNzZXRUb1Bvb2xDb250cmFjdEFkZHJlc3MAAAABAAAACmxwQXNzZXRTdHIJAAS5AAAAAgkABEwAAAACAgAAAAYlcyVzJXMJAARMAAAAAgUAAAAKbHBBc3NldFN0cgkABEwAAAACAgAAAB5tYXBwaW5nc19fbHBBc3NldDJQb29sQ29udHJhY3QFAAAAA25pbAUAAAADU0VQAQAAABRrZXlGYWN0b3J5UG9vbFdlaWdodAAAAAEAAAAPY29udHJhY3RBZGRyZXNzCQAEuQAAAAIJAARMAAAAAgIAAAAEJXMlcwkABEwAAAACAgAAAApwb29sV2VpZ2h0CQAETAAAAAIFAAAAD2NvbnRyYWN0QWRkcmVzcwUAAAADbmlsBQAAAANTRVABAAAAGHJlYWRGYWN0b3J5QWRkcmVzc09yRmFpbAAAAAAJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAQAAAA9nZXRTdHJpbmdPckZhaWwAAAABCQEAAAARa2V5RmFjdG9yeUFkZHJlc3MAAAAAAQAAAApyZWFkTHBMaXN0AAAAAAkABLUAAAACCQEAAAALdmFsdWVPckVsc2UAAAACCQAEHQAAAAIJAQAAABhyZWFkRmFjdG9yeUFkZHJlc3NPckZhaWwAAAAACQEAAAAQa2V5RmFjdG9yeUxwTGlzdAAAAAACAAAAAAUAAAADU0VQAQAAABRyZWFkRmFjdG9yeUNmZ09yRmFpbAAAAAEAAAAHZmFjdG9yeQkABLUAAAACCQEAAAAYZ2V0U3RyaW5nQnlBZGRyZXNzT3JGYWlsAAAAAgUAAAAHZmFjdG9yeQkBAAAADWtleUZhY3RvcnlDZmcAAAAABQAAAANTRVABAAAAGGdldEJvb3N0aW5nQWRkcmVzc09yRmFpbAAAAAEAAAAKZmFjdG9yeUNmZwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAApmYWN0b3J5Q2ZnBQAAABlJZHhGYWN0b3J5Q2ZnQm9vc3RpbmdEYXBwAQAAABhnZXRFbWlzc2lvbkFkZHJlc3NPckZhaWwAAAABAAAACmZhY3RvcnlDZmcJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAKZmFjdG9yeUNmZwUAAAAZSWR4RmFjdG9yeUNmZ0VtaXNzaW9uRGFwcAEAAAAXZ2V0U3Rha2luZ0FkZHJlc3NPckZhaWwAAAABAAAACmZhY3RvcnlDZmcJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAKZmFjdG9yeUNmZwUAAAAYSWR4RmFjdG9yeUNmZ1N0YWtpbmdEYXBwAQAAAB5rZXlFbWlzc2lvblJhdGVQZXJCbG9ja0N1cnJlbnQAAAAAAgAAABslcyVzX19yYXRlUGVyQmxvY2tfX2N1cnJlbnQBAAAAIWtleUVtaXNzaW9uUmF0ZVBlckJsb2NrTWF4Q3VycmVudAAAAAACAAAAHiVzJXNfX3JhdGVQZXJCbG9ja01heF9fY3VycmVudAEAAAAVa2V5RW1pc3Npb25TdGFydEJsb2NrAAAAAAIAAAAaJXMlc19fZW1pc3Npb25fX3N0YXJ0QmxvY2sBAAAAG2tleUVtaXNzaW9uRHVyYXRpb25JbkJsb2NrcwAAAAACAAAAGCVzJXNfX2VtaXNzaW9uX19kdXJhdGlvbgEAAAATa2V5RW1pc3Npb25FbmRCbG9jawAAAAACAAAAGCVzJXNfX2VtaXNzaW9uX19lbmRCbG9jawEAAAAPa2V5U3Rha2VkQnlVc2VyAAAAAgAAAA51c2VyQWRkcmVzc1N0cgAAAAxscEFzc2V0SWRTdHIJAAS5AAAAAgkABEwAAAACAgAAAA4lcyVzJXNfX3N0YWtlZAkABEwAAAACBQAAAA51c2VyQWRkcmVzc1N0cgkABEwAAAACBQAAAAxscEFzc2V0SWRTdHIFAAAAA25pbAUAAAADU0VQAQAAAA5rZXlTdGFrZWRUb3RhbAAAAAEAAAAMbHBBc3NldElkU3RyCQABLAAAAAICAAAAFyVzJXMlc19fc3Rha2VkX190b3RhbF9fBQAAAAxscEFzc2V0SWRTdHIBAAAACnJlYWRTdGFrZWQAAAABAAAAA2tleQkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkAAAAAAAAAAAABAAAAFWtleUxhc3RUb3RhbExwQmFsYW5jZQAAAAEAAAAJbHBBc3NldElkCQAEuQAAAAIJAARMAAAAAgIAAAAGJXMlcyVzCQAETAAAAAIFAAAACWxwQXNzZXRJZAkABEwAAAACAgAAAAV0b3RhbAkABEwAAAACAgAAAANiYWwFAAAAA25pbAUAAAADU0VQAQAAABRrZXlMYXN0VXNlckxwQmFsYW5jZQAAAAIAAAAJbHBBc3NldElkAAAAC3VzZXJBZGRyZXNzCQAEuQAAAAIJAARMAAAAAgIAAAAGJXMlcyVzCQAETAAAAAIFAAAACWxwQXNzZXRJZAkABEwAAAACBQAAAAt1c2VyQWRkcmVzcwkABEwAAAACAgAAAANiYWwFAAAAA25pbAUAAAADU0VQAQAAABlrZXlUb3RhbExwQmFsYW5jZUludGVncmFsAAAAAQAAAAlscEFzc2V0SWQJAAS5AAAAAgkABEwAAAACAgAAAAYlcyVzJXMJAARMAAAAAgUAAAAJbHBBc3NldElkCQAETAAAAAICAAAABXRvdGFsCQAETAAAAAICAAAABmJhbElOVAUAAAADbmlsBQAAAANTRVABAAAAGGtleVVzZXJMcEJhbGFuY2VJbnRlZ3JhbAAAAAIAAAAJbHBBc3NldElkAAAAC3VzZXJBZGRyZXNzCQAEuQAAAAIJAARMAAAAAgIAAAAGJXMlcyVzCQAETAAAAAIFAAAACWxwQXNzZXRJZAkABEwAAAACBQAAAAt1c2VyQWRkcmVzcwkABEwAAAACAgAAAAZiYWxJTlQFAAAAA25pbAUAAAADU0VQAQAAACZrZXlUb3RhbExwQmFsYW5jZUludGVncmFsTGFzdFVwZEhlaWdodAAAAAEAAAAJbHBBc3NldElkCQAEuQAAAAIJAARMAAAAAgIAAAAGJXMlcyVzCQAETAAAAAIFAAAACWxwQXNzZXRJZAkABEwAAAACAgAAAAV0b3RhbAkABEwAAAACAgAAAAdsYXN0VXBkBQAAAANuaWwFAAAAA1NFUAEAAAAla2V5VXNlckxwQmFsYW5jZUludGVncmFsTGFzdFVwZEhlaWdodAAAAAIAAAAJbHBBc3NldElkAAAAC3VzZXJBZGRyZXNzCQAEuQAAAAIJAARMAAAAAgIAAAAGJXMlcyVzCQAETAAAAAIFAAAACWxwQXNzZXRJZAkABEwAAAACBQAAAAt1c2VyQWRkcmVzcwkABEwAAAACAgAAAAdsYXN0VXBkBQAAAANuaWwFAAAAA1NFUAEAAAASa2V5V3hQZXJMcEludGVncmFsAAAAAQAAAAlscEFzc2V0SWQJAAS5AAAAAgkABEwAAAACAgAAAAglcyVzJXMlcwkABEwAAAACBQAAAAlscEFzc2V0SWQJAARMAAAAAgIAAAAGY29tbW9uCQAETAAAAAICAAAABWxwSW50BQAAAANuaWwFAAAAA1NFUAEAAAAfa2V5V3hQZXJMcEludGVncmFsTGFzdFVwZEhlaWdodAAAAAEAAAAJbHBBc3NldElkCQAEuQAAAAIJAARMAAAAAgIAAAAIJXMlcyVzJXMJAARMAAAAAgUAAAAJbHBBc3NldElkCQAETAAAAAICAAAABmNvbW1vbgkABEwAAAACAgAAAAZscEludEgFAAAAA25pbAUAAAADU0VQAQAAABBrZXlXeFRvQ2xhaW1Vc2VyAAAAAgAAAAlscEFzc2V0SWQAAAALdXNlckFkZHJlc3MJAAS5AAAAAgkABEwAAAACAgAAAAglcyVzJXMlcwkABEwAAAACBQAAAAlscEFzc2V0SWQJAARMAAAAAgUAAAALdXNlckFkZHJlc3MJAARMAAAAAgIAAAAFbHBJbnQFAAAAA25pbAUAAAADU0VQAQAAACNrZXlXeFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodAAAAAIAAAAJbHBBc3NldElkAAAAC3VzZXJBZGRyZXNzCQAEuQAAAAIJAARMAAAAAgIAAAAIJXMlcyVzJXMJAARMAAAAAgUAAAAJbHBBc3NldElkCQAETAAAAAIFAAAAC3VzZXJBZGRyZXNzCQAETAAAAAICAAAABmxwSW50SAUAAAADbmlsBQAAAANTRVABAAAACmtleVd4UGVyTHAAAAABAAAACWxwQXNzZXRJZAkABLkAAAACCQAETAAAAAICAAAAAiVzCQAETAAAAAIFAAAACWxwQXNzZXRJZAkABEwAAAACAgAAAAd3eFBlckxwBQAAAANuaWwFAAAAA1NFUAEAAAAaa2V5V3hQZXJMcEludGVncmFsVXNlckxhc3QAAAACAAAACWxwQXNzZXRJZAAAAAt1c2VyQWRkcmVzcwkABLkAAAACCQAETAAAAAICAAAACCVzJXMlcyVzCQAETAAAAAIFAAAACWxwQXNzZXRJZAkABEwAAAACBQAAAAt1c2VyQWRkcmVzcwkABEwAAAACAgAAAAV1SW50TAUAAAADbmlsBQAAAANTRVABAAAAGWtleU9wZXJhdGlvbkhpc3RvcnlSZWNvcmQAAAADAAAABHR5cGUAAAALdXNlckFkZHJlc3MAAAAGdHhJZDU4CQAEuQAAAAIJAARMAAAAAgIAAAARJXMlcyVzJXNfX2hpc3RvcnkJAARMAAAAAgUAAAAEdHlwZQkABEwAAAACBQAAAAt1c2VyQWRkcmVzcwkABEwAAAACBQAAAAZ0eElkNTgFAAAAA25pbAUAAAADU0VQAQAAABNmb3JtYXRIaXN0b3J5UmVjb3JkAAAABAAAAAt1c2VyQWRkcmVzcwAAAAlscEFzc2V0SWQAAAAEdHlwZQAAAAZhbW91bnQJAAS5AAAAAgkABEwAAAACAgAAAAwlcyVzJXMlZCVkJWQJAARMAAAAAgUAAAALdXNlckFkZHJlc3MJAARMAAAAAgUAAAAJbHBBc3NldElkCQAETAAAAAIFAAAABHR5cGUJAARMAAAAAgkAAaQAAAABBQAAAAZoZWlnaHQJAARMAAAAAgkAAaQAAAABCAUAAAAJbGFzdEJsb2NrAAAACXRpbWVzdGFtcAkABEwAAAACCQABpAAAAAEFAAAABmFtb3VudAUAAAADbmlsBQAAAANTRVABAAAAFU9wZXJhdGlvbkhpc3RvcnlFbnRyeQAAAAUAAAAEdHlwZQAAAAt1c2VyQWRkcmVzcwAAAAlscEFzc2V0SWQAAAAGYW1vdW50AAAABHR4SWQJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAABlrZXlPcGVyYXRpb25IaXN0b3J5UmVjb3JkAAAAAwUAAAAEdHlwZQUAAAALdXNlckFkZHJlc3MJAAJYAAAAAQUAAAAEdHhJZAkBAAAAE2Zvcm1hdEhpc3RvcnlSZWNvcmQAAAAEBQAAAAt1c2VyQWRkcmVzcwUAAAAJbHBBc3NldElkBQAAAAR0eXBlBQAAAAZhbW91bnQAAAAAD2ZhY3RvcnlDb250cmFjdAkBAAAAGHJlYWRGYWN0b3J5QWRkcmVzc09yRmFpbAAAAAAAAAAACmZhY3RvcnlDZmcJAQAAABRyZWFkRmFjdG9yeUNmZ09yRmFpbAAAAAEFAAAAD2ZhY3RvcnlDb250cmFjdAAAAAAQZW1pc3Npb25Db250cmFjdAkBAAAAGGdldEVtaXNzaW9uQWRkcmVzc09yRmFpbAAAAAEFAAAACmZhY3RvcnlDZmcAAAAFAAAAAWkBAAAAC2NvbnN0cnVjdG9yAAAAAQAAABFmYWN0b3J5QWRkcmVzc1N0cgMJAQAAAAIhPQAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAAEdGhpcwkAAAIAAAABAgAAAA5ub3QgYXV0aG9yaXplZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAARa2V5RmFjdG9yeUFkZHJlc3MAAAAABQAAABFmYWN0b3J5QWRkcmVzc1N0cgUAAAADbmlsAAAAAWkBAAAABXN0YWtlAAAAAAMJAQAAAAIhPQAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEJAAACAAAAAQIAAAA0aW52YWxpZCBwYXltZW50IC0gZXhhY3Qgb25lIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQAAAADcG10CQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAlscEFzc2V0SWQJAQAAAAV2YWx1ZQAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAQAAAAMbHBBc3NldElkU3RyCQACWAAAAAEFAAAACWxwQXNzZXRJZAQAAAAGYW1vdW50CAUAAAADcG10AAAABmFtb3VudAQAAAAOcG9vbEFkZHJlc3NTdHIJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAA9mYWN0b3J5Q29udHJhY3QJAQAAABprZXlGYWN0b3J5THAyQXNzZXRzTWFwcGluZwAAAAEFAAAADGxwQXNzZXRJZFN0cgkAASwAAAACAgAAABV1bnN1cHBvcnRlZCBscCBhc3NldCAFAAAADGxwQXNzZXRJZFN0cgQAAAAJY2FsbGVyU3RyCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAAOdXNlckFkZHJlc3NTdHIDCQAAAAAAAAIFAAAACWNhbGxlclN0cgUAAAAOcG9vbEFkZHJlc3NTdHIJAAQlAAAAAQgFAAAAAWkAAAAMb3JpZ2luQ2FsbGVyBQAAAAljYWxsZXJTdHIEAAAAD3N0YWtlZEJ5VXNlcktFWQkBAAAAD2tleVN0YWtlZEJ5VXNlcgAAAAIFAAAADnVzZXJBZGRyZXNzU3RyBQAAAAxscEFzc2V0SWRTdHIEAAAADnN0YWtlZFRvdGFsS0VZCQEAAAAOa2V5U3Rha2VkVG90YWwAAAABBQAAAAxscEFzc2V0SWRTdHIEAAAADHN0YWtlZEJ5VXNlcgkBAAAACnJlYWRTdGFrZWQAAAABBQAAAA9zdGFrZWRCeVVzZXJLRVkEAAAAC3N0YWtlZFRvdGFsCQEAAAAKcmVhZFN0YWtlZAAAAAEFAAAADnN0YWtlZFRvdGFsS0VZBAAAAApwb29sV2VpZ2h0CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAA9mYWN0b3J5Q29udHJhY3QJAQAAABRrZXlGYWN0b3J5UG9vbFdlaWdodAAAAAEFAAAADnBvb2xBZGRyZXNzU3RyBAAAABJlbWlzc2lvblN0YXJ0QmxvY2sJAQAAAAxnZXRJbnRPckZhaWwAAAACBQAAABBlbWlzc2lvbkNvbnRyYWN0CQEAAAAVa2V5RW1pc3Npb25TdGFydEJsb2NrAAAAAAQAAAASd3hFbWlzc2lvblBlckJsb2NrCQEAAAAMZ2V0SW50T3JGYWlsAAAAAgUAAAAQZW1pc3Npb25Db250cmFjdAkBAAAAHmtleUVtaXNzaW9uUmF0ZVBlckJsb2NrQ3VycmVudAAAAAAEAAAAFnBvb2xXeEVtaXNzaW9uUGVyQmxvY2sJAABrAAAAAwUAAAASd3hFbWlzc2lvblBlckJsb2NrBQAAAApwb29sV2VpZ2h0CQAAaAAAAAIFAAAADlBPT0xXRUlHSFRNVUxUAAAAAAAAAAADBAAAABJ3eFBlckxwSW50ZWdyYWxLRVkJAQAAABJrZXlXeFBlckxwSW50ZWdyYWwAAAABBQAAAAxscEFzc2V0SWRTdHIEAAAAH3d4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHRLRVkJAQAAAB9rZXlXeFBlckxwSW50ZWdyYWxMYXN0VXBkSGVpZ2h0AAAAAQUAAAAMbHBBc3NldElkU3RyBAAAABB3eFRvQ2xhaW1Vc2VyS0VZCQEAAAAQa2V5V3hUb0NsYWltVXNlcgAAAAIFAAAADGxwQXNzZXRJZFN0cgUAAAAOdXNlckFkZHJlc3NTdHIEAAAAI3d4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0VXBkSGVpZ2h0S0VZCQEAAAAja2V5V3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHQAAAACBQAAAAxscEFzc2V0SWRTdHIFAAAADnVzZXJBZGRyZXNzU3RyBAAAAAp3eFBlckxwS0VZCQEAAAAKa2V5V3hQZXJMcAAAAAEFAAAADGxwQXNzZXRJZFN0cgQAAAAad3hQZXJMcEludGVncmFsVXNlckxhc3RLRVkJAQAAABprZXlXeFBlckxwSW50ZWdyYWxVc2VyTGFzdAAAAAIFAAAADGxwQXNzZXRJZFN0cgUAAAAOdXNlckFkZHJlc3NTdHIEAAAAHHd4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHQJAQAAAA9nZXRJbnRPckRlZmF1bHQAAAADBQAAAAR0aGlzBQAAAB93eFBlckxwSW50ZWdyYWxMYXN0VXBkSGVpZ2h0S0VZBQAAABJlbWlzc2lvblN0YXJ0QmxvY2sEAAAAD3d4UGVyTHBJbnRlZ3JhbAkBAAAADGdldEludE9yWmVybwAAAAIFAAAABHRoaXMFAAAAEnd4UGVyTHBJbnRlZ3JhbEtFWQQAAAANd3hUb0NsYWltVXNlcgkBAAAADGdldEludE9yWmVybwAAAAIFAAAABHRoaXMFAAAAEHd4VG9DbGFpbVVzZXJLRVkEAAAAIHd4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0VXBkSGVpZ2h0CQEAAAAMZ2V0SW50T3JaZXJvAAAAAgUAAAAEdGhpcwUAAAAjd3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHRLRVkEAAAADXd4UGVyTHBPclplcm8JAQAAAAxnZXRJbnRPclplcm8AAAACBQAAAAR0aGlzBQAAAAp3eFBlckxwS0VZBAAAAAJkaAkAAZYAAAABCQAETAAAAAIJAABlAAAAAgUAAAAGaGVpZ2h0BQAAABx3eFBlckxwSW50ZWdyYWxMYXN0VXBkSGVpZ2h0CQAETAAAAAIAAAAAAAAAAAAFAAAAA25pbAQAAAAHd3hQZXJMcAMJAQAAAAIhPQAAAAIFAAAADXd4UGVyTHBPclplcm8AAAAAAAAAAAAFAAAADXd4UGVyTHBPclplcm8JAABpAAAAAgUAAAAWcG9vbFd4RW1pc3Npb25QZXJCbG9jawUAAAALc3Rha2VkVG90YWwEAAAADnN0YWtlZFRvdGFsTmV3CQAAZAAAAAIFAAAAC3N0YWtlZFRvdGFsBQAAAAZhbW91bnQEAAAAEnd4UGVyTHBJbnRlZ3JhbE5ldwkAAGQAAAACBQAAAA93eFBlckxwSW50ZWdyYWwJAABoAAAAAgUAAAAHd3hQZXJMcAUAAAACZGgEAAAAF3d4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0AwMJAAAAAAAAAgUAAAAgd3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHQAAAAAAAAAAAAJAABmAAAAAgUAAAAMc3Rha2VkQnlVc2VyAAAAAAAAAAAABwAAAAAAAAAAAAMJAAAAAAAAAgUAAAAMc3Rha2VkQnlVc2VyAAAAAAAAAAAABQAAABJ3eFBlckxwSW50ZWdyYWxOZXcDAwkAAGYAAAACBQAAACB3eFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodAAAAAAAAAAAAAkAAGYAAAACBQAAAAxzdGFrZWRCeVVzZXIAAAAAAAAAAAAHCQEAAAAMZ2V0SW50T3JGYWlsAAAAAgUAAAAEdGhpcwUAAAAad3hQZXJMcEludGVncmFsVXNlckxhc3RLRVkJAAACAAAAAQIAAAARSW52YWxpZCBjb25kaXRpb24EAAAAEHd4VG9DbGFpbVVzZXJOZXcJAABkAAAAAgUAAAANd3hUb0NsYWltVXNlcgkAAGgAAAACCQAAZQAAAAIFAAAAEnd4UGVyTHBJbnRlZ3JhbE5ldwUAAAAXd3hQZXJMcEludGVncmFsVXNlckxhc3QFAAAADHN0YWtlZEJ5VXNlcgQAAAAad3hQZXJMcEludGVncmFsVXNlckxhc3ROZXcFAAAAEnd4UGVyTHBJbnRlZ3JhbE5ldwQAAAAKd3hQZXJMcE5ldwkAAGkAAAACBQAAABZwb29sV3hFbWlzc2lvblBlckJsb2NrBQAAAA5zdGFrZWRUb3RhbE5ldwQAAAAfd3hQZXJMcEludGVncmFsTGFzdFVwZEhlaWdodE5ldwUAAAAGaGVpZ2h0BAAAACN3eFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodE5ldwUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAA9zdGFrZWRCeVVzZXJLRVkJAABkAAAAAgUAAAAMc3Rha2VkQnlVc2VyBQAAAAZhbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAADnN0YWtlZFRvdGFsS0VZBQAAAA5zdGFrZWRUb3RhbE5ldwkABEwAAAACCQEAAAAVT3BlcmF0aW9uSGlzdG9yeUVudHJ5AAAABQIAAAAFc3Rha2UFAAAADnVzZXJBZGRyZXNzU3RyBQAAAAxscEFzc2V0SWRTdHIFAAAABmFtb3VudAgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAUAAAADbmlsAAAAAWkBAAAAB3Vuc3Rha2UAAAACAAAADGxwQXNzZXRJZFN0cgAAAAZhbW91bnQEAAAADnVzZXJBZGRyZXNzU3RyCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAAJbHBBc3NldElkCQACWQAAAAEFAAAADGxwQXNzZXRJZFN0cgMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAAPZmFjdG9yeUNvbnRyYWN0CQEAAAAaa2V5RmFjdG9yeUxwMkFzc2V0c01hcHBpbmcAAAABBQAAAAxscEFzc2V0SWRTdHIJAAACAAAAAQkAASwAAAACAgAAABV1bnN1cHBvcnRlZCBscCBhc3NldCAFAAAADGxwQXNzZXRJZFN0cgMJAAAAAAAAAgUAAAAOdXNlckFkZHJlc3NTdHIFAAAADnVzZXJBZGRyZXNzU3RyCQAAAgAAAAECAAAAE1NvbXRoaW5nIHdlbnQgd3JvbmcEAAAAD3N0YWtlZEJ5VXNlcktFWQkBAAAAD2tleVN0YWtlZEJ5VXNlcgAAAAIFAAAADnVzZXJBZGRyZXNzU3RyBQAAAAxscEFzc2V0SWRTdHIEAAAADnN0YWtlZFRvdGFsS0VZCQEAAAAOa2V5U3Rha2VkVG90YWwAAAABBQAAAAxscEFzc2V0SWRTdHIEAAAADHN0YWtlZEJ5VXNlcgkBAAAACnJlYWRTdGFrZWQAAAABBQAAAA9zdGFrZWRCeVVzZXJLRVkEAAAAC3N0YWtlZFRvdGFsCQEAAAAKcmVhZFN0YWtlZAAAAAEFAAAADnN0YWtlZFRvdGFsS0VZAwkAAGYAAAACBQAAAAZhbW91bnQFAAAADHN0YWtlZEJ5VXNlcgkAAAIAAAABAgAAACRwYXNzZWQgYW1vdW50IGlzIGxlc3MgdGhlbiBhdmFpbGFibGUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAD3N0YWtlZEJ5VXNlcktFWQkAAGUAAAACBQAAAAxzdGFrZWRCeVVzZXIFAAAABmFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAOc3Rha2VkVG90YWxLRVkJAABlAAAAAgUAAAALc3Rha2VkVG90YWwFAAAABmFtb3VudAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAABmFtb3VudAUAAAAJbHBBc3NldElkCQAETAAAAAIJAQAAABVPcGVyYXRpb25IaXN0b3J5RW50cnkAAAAFAgAAAAd1bnN0YWtlBQAAAA51c2VyQWRkcmVzc1N0cgUAAAAMbHBBc3NldElkU3RyBQAAAAZhbW91bnQIBQAAAAFpAAAADXRyYW5zYWN0aW9uSWQFAAAAA25pbAAAAAFpAQAAAAdjbGFpbVd4AAAAAQAAAAxscEFzc2V0SWRTdHIJAAACAAAAAQIAAAASdGVtcG9yYXJ5IGRpc2FibGVkAAAAAWkBAAAAD2NsYWltV3hSRUFET05MWQAAAAIAAAAMbHBBc3NldElkU3RyAAAADnVzZXJBZGRyZXNzU3RyBAAAAA9zdGFrZWRCeVVzZXJLRVkJAQAAAA9rZXlTdGFrZWRCeVVzZXIAAAACBQAAAA51c2VyQWRkcmVzc1N0cgUAAAAMbHBBc3NldElkU3RyBAAAAA5zdGFrZWRUb3RhbEtFWQkBAAAADmtleVN0YWtlZFRvdGFsAAAAAQUAAAAMbHBBc3NldElkU3RyBAAAAAxzdGFrZWRCeVVzZXIJAQAAAApyZWFkU3Rha2VkAAAAAQUAAAAPc3Rha2VkQnlVc2VyS0VZBAAAAAtzdGFrZWRUb3RhbAkBAAAACnJlYWRTdGFrZWQAAAABBQAAAA5zdGFrZWRUb3RhbEtFWQQAAAAOcG9vbEFkZHJlc3NTdHIJAQAAABhnZXRTdHJpbmdCeUFkZHJlc3NPckZhaWwAAAACBQAAAA9mYWN0b3J5Q29udHJhY3QJAQAAACZrZXlGYWN0b3J5THBBc3NldFRvUG9vbENvbnRyYWN0QWRkcmVzcwAAAAEFAAAADGxwQXNzZXRJZFN0cgQAAAAOcG9vbFdlaWdodE11bHQFAAAABU1VTFQ4BAAAAApwb29sV2VpZ2h0CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAA9mYWN0b3J5Q29udHJhY3QJAQAAABRrZXlGYWN0b3J5UG9vbFdlaWdodAAAAAEFAAAADnBvb2xBZGRyZXNzU3RyBAAAABJ3eEVtaXNzaW9uUGVyQmxvY2sJAQAAAAxnZXRJbnRPckZhaWwAAAACBQAAABBlbWlzc2lvbkNvbnRyYWN0CQEAAAAea2V5RW1pc3Npb25SYXRlUGVyQmxvY2tDdXJyZW50AAAAAAQAAAASZW1pc3Npb25TdGFydEJsb2NrCQEAAAAMZ2V0SW50T3JGYWlsAAAAAgUAAAAQZW1pc3Npb25Db250cmFjdAkBAAAAFWtleUVtaXNzaW9uU3RhcnRCbG9jawAAAAAEAAAADHBhc3NlZEJsb2NrcwMJAABmAAAAAgUAAAASZW1pc3Npb25TdGFydEJsb2NrBQAAAAZoZWlnaHQAAAAAAAAAAAAJAABlAAAAAgUAAAAGaGVpZ2h0BQAAABJlbWlzc2lvblN0YXJ0QmxvY2sEAAAADnBvb2xXeEVtaXNzaW9uCQAAawAAAAMJAABoAAAAAgUAAAASd3hFbWlzc2lvblBlckJsb2NrBQAAAAxwYXNzZWRCbG9ja3MFAAAACnBvb2xXZWlnaHQFAAAADnBvb2xXZWlnaHRNdWx0BAAAAAx1c2VyV3hSZXdhcmQJAABrAAAAAwUAAAAOcG9vbFd4RW1pc3Npb24FAAAADHN0YWtlZEJ5VXNlcgUAAAALc3Rha2VkVG90YWwEAAAAFnBvb2xXeEVtaXNzaW9uUGVyQmxvY2sJAABrAAAAAwUAAAASd3hFbWlzc2lvblBlckJsb2NrBQAAAApwb29sV2VpZ2h0BQAAAA5QT09MV0VJR0hUTVVMVAQAAAAGYW1vdW50AAAAAAAAAAAABAAAABJ3eFBlckxwSW50ZWdyYWxLRVkJAQAAABJrZXlXeFBlckxwSW50ZWdyYWwAAAABBQAAAAxscEFzc2V0SWRTdHIEAAAAH3d4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHRLRVkJAQAAAB9rZXlXeFBlckxwSW50ZWdyYWxMYXN0VXBkSGVpZ2h0AAAAAQUAAAAMbHBBc3NldElkU3RyBAAAABB3eFRvQ2xhaW1Vc2VyS0VZCQEAAAAQa2V5V3hUb0NsYWltVXNlcgAAAAIFAAAADGxwQXNzZXRJZFN0cgUAAAAOdXNlckFkZHJlc3NTdHIEAAAAI3d4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0VXBkSGVpZ2h0S0VZCQEAAAAja2V5V3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHQAAAACBQAAAAxscEFzc2V0SWRTdHIFAAAADnVzZXJBZGRyZXNzU3RyBAAAAAp3eFBlckxwS0VZCQEAAAAKa2V5V3hQZXJMcAAAAAEFAAAADGxwQXNzZXRJZFN0cgQAAAAad3hQZXJMcEludGVncmFsVXNlckxhc3RLRVkJAQAAABprZXlXeFBlckxwSW50ZWdyYWxVc2VyTGFzdAAAAAIFAAAADGxwQXNzZXRJZFN0cgUAAAAOdXNlckFkZHJlc3NTdHIEAAAAHHd4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHQJAQAAAA9nZXRJbnRPckRlZmF1bHQAAAADBQAAAAR0aGlzBQAAAB93eFBlckxwSW50ZWdyYWxMYXN0VXBkSGVpZ2h0S0VZBQAAABJlbWlzc2lvblN0YXJ0QmxvY2sEAAAAD3d4UGVyTHBJbnRlZ3JhbAkBAAAADGdldEludE9yWmVybwAAAAIFAAAABHRoaXMFAAAAEnd4UGVyTHBJbnRlZ3JhbEtFWQQAAAANd3hUb0NsYWltVXNlcgkBAAAADGdldEludE9yWmVybwAAAAIFAAAABHRoaXMFAAAAEHd4VG9DbGFpbVVzZXJLRVkEAAAAIHd4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0VXBkSGVpZ2h0CQEAAAAMZ2V0SW50T3JaZXJvAAAAAgUAAAAEdGhpcwUAAAAjd3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHRLRVkEAAAADXd4UGVyTHBPclplcm8JAQAAAAxnZXRJbnRPclplcm8AAAACBQAAAAR0aGlzBQAAAAp3eFBlckxwS0VZBAAAAAJkaAkAAZYAAAABCQAETAAAAAIJAABlAAAAAgUAAAAGaGVpZ2h0BQAAABx3eFBlckxwSW50ZWdyYWxMYXN0VXBkSGVpZ2h0CQAETAAAAAIAAAAAAAAAAAAFAAAAA25pbAQAAAAHd3hQZXJMcAMJAQAAAAIhPQAAAAIFAAAADXd4UGVyTHBPclplcm8AAAAAAAAAAAAFAAAADXd4UGVyTHBPclplcm8JAABpAAAAAgUAAAAWcG9vbFd4RW1pc3Npb25QZXJCbG9jawUAAAALc3Rha2VkVG90YWwEAAAADnN0YWtlZFRvdGFsTmV3CQAAZAAAAAIFAAAAC3N0YWtlZFRvdGFsBQAAAAZhbW91bnQEAAAAEnd4UGVyTHBJbnRlZ3JhbE5ldwkAAGQAAAACBQAAAA93eFBlckxwSW50ZWdyYWwJAABoAAAAAgUAAAAHd3hQZXJMcAUAAAACZGgEAAAAF3d4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0AwMJAAAAAAAAAgUAAAAgd3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHQAAAAAAAAAAAAJAABmAAAAAgUAAAAMc3Rha2VkQnlVc2VyAAAAAAAAAAAABwAAAAAAAAAAAAMJAAAAAAAAAgUAAAAMc3Rha2VkQnlVc2VyAAAAAAAAAAAABQAAABJ3eFBlckxwSW50ZWdyYWxOZXcDAwkAAGYAAAACBQAAACB3eFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodAAAAAAAAAAAAAkAAGYAAAACBQAAAAxzdGFrZWRCeVVzZXIAAAAAAAAAAAAHCQEAAAAMZ2V0SW50T3JGYWlsAAAAAgUAAAAEdGhpcwUAAAAad3hQZXJMcEludGVncmFsVXNlckxhc3RLRVkJAAACAAAAAQIAAAARSW52YWxpZCBjb25kaXRpb24EAAAAEHd4VG9DbGFpbVVzZXJOZXcJAABkAAAAAgUAAAANd3hUb0NsYWltVXNlcgkAAGgAAAACCQAAZQAAAAIFAAAAEnd4UGVyTHBJbnRlZ3JhbE5ldwUAAAAXd3hQZXJMcEludGVncmFsVXNlckxhc3QFAAAADHN0YWtlZEJ5VXNlcgQAAAAad3hQZXJMcEludGVncmFsVXNlckxhc3ROZXcFAAAAEnd4UGVyTHBJbnRlZ3JhbE5ldwQAAAAKd3hQZXJMcE5ldwkAAGkAAAACBQAAABZwb29sV3hFbWlzc2lvblBlckJsb2NrBQAAAA5zdGFrZWRUb3RhbE5ldwQAAAAfd3hQZXJMcEludGVncmFsTGFzdFVwZEhlaWdodE5ldwUAAAAGaGVpZ2h0BAAAACN3eFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodE5ldwUAAAAGaGVpZ2h0BAAAAAVkZWJ1ZwkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAAaQAAAABBQAAAA13eFRvQ2xhaW1Vc2VyAgAAAAI6OgkAAaQAAAABBQAAABJ3eFBlckxwSW50ZWdyYWxOZXcCAAAAAjo6CQABpAAAAAEFAAAAF3d4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0AgAAAAI6OgkAAaQAAAABBQAAAAxzdGFrZWRCeVVzZXICAAAAAjo6CQABpAAAAAEFAAAAAmRoAgAAAAI6OgkAAaQAAAABBQAAAAd3eFBlckxwAgAAAAI6OgkAAaQAAAABBQAAAAtzdGFrZWRUb3RhbAIAAAACOjoJAAGkAAAAAQUAAAAWcG9vbFd4RW1pc3Npb25QZXJCbG9jawIAAAACOjoJAAGkAAAAAQUAAAASd3hFbWlzc2lvblBlckJsb2NrAgAAAAI6OgkAAaQAAAABBQAAAApwb29sV2VpZ2h0CQAFFAAAAAIFAAAAA25pbAkABLkAAAACCQAETAAAAAICAAAACCVzJXMlZCVzCQAETAAAAAIFAAAADGxwQXNzZXRJZFN0cgkABEwAAAACBQAAAA51c2VyQWRkcmVzc1N0cgkABEwAAAACCQABpAAAAAEFAAAADHVzZXJXeFJld2FyZAkABEwAAAACBQAAAAVkZWJ1ZwUAAAADbmlsBQAAAANTRVAAAAAAiZRo/Q==",
    "chainId": 84,
    "height": 1803631,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 5nyU8JwLdDHRxzuacYfsXcaDgjpq6igxWGETwdjid8CY
Next: Ga8m63nR2WvXPud5H6zUk1FK5Zm1TtZzSrxHRrEGCbgE

Diff: 
Old New Differences
296 296      let wxPerLpNew = (poolWxEmissionPerBlock / stakedTotalNew)
297 297      let wxPerLpIntegralLastUpdHeightNew = height
298 298      let wxPerLpIntegralUserLastUpdHeightNew = height
299 -     let debug = ((((((((((toString(wxToClaimUser) + "::") + toString(wxPerLpIntegralNew)) + "::") + toString(wxPerLpIntegralUserLast)) + "::") + toString(stakedByUser)) + "::") + toString(dh)) + "::") + toString(wxPerLp))
299 +     let debug = ((((((((((((((((((toString(wxToClaimUser) + "::") + toString(wxPerLpIntegralNew)) + "::") + toString(wxPerLpIntegralUserLast)) + "::") + toString(stakedByUser)) + "::") + toString(dh)) + "::") + toString(wxPerLp)) + "::") + toString(stakedTotal)) + "::") + toString(poolWxEmissionPerBlock)) + "::") + toString(wxEmissionPerBlock)) + "::") + toString(poolWeight))
300 300      $Tuple2(nil, makeString(["%s%s%d%s", lpAssetIdStr, userAddressStr, toString(userWxReward), debug], SEP))
301 301      }
302 302  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let SCALE8 = 8
5 5  
6 6  let MULT8 = 100000000
7 7  
8 8  let SCALE18 = 18
9 9  
10 10  let MULT18 = toBigInt(1000000000000000000)
11 11  
12 12  let SEP = "__"
13 13  
14 14  let POOLWEIGHTMULT = MULT8
15 15  
16 16  func getStringOrFail (key) = valueOrErrorMessage(getString(key), (("mandatory this." + key) + " is not defined"))
17 17  
18 18  
19 19  func getStringByAddressOrFail (address,key) = valueOrErrorMessage(getString(address, key), (((("mandatory " + toString(address)) + ".") + key) + " is not defined"))
20 20  
21 21  
22 22  func getIntOrZero (address,key) = valueOrElse(getInteger(address, key), 0)
23 23  
24 24  
25 25  func getIntOrDefault (address,key,defaultVal) = valueOrElse(getInteger(address, key), defaultVal)
26 26  
27 27  
28 28  func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), (("mandatory this." + key) + " is not defined"))
29 29  
30 30  
31 31  func keyFactoryAddress () = "%s%s__config__factoryAddress"
32 32  
33 33  
34 34  let IdxFactoryCfgStakingDapp = 1
35 35  
36 36  let IdxFactoryCfgBoostingDapp = 2
37 37  
38 38  let IdxFactoryCfgIdoDapp = 3
39 39  
40 40  let IdxFactoryCfgTeamDapp = 4
41 41  
42 42  let IdxFactoryCfgEmissionDapp = 5
43 43  
44 44  let IdxFactoryCfgRestDapp = 6
45 45  
46 46  let IdxFactoryCfgSlippageDapp = 7
47 47  
48 48  func keyFactoryCfg () = "%s__factoryConfig"
49 49  
50 50  
51 51  func keyFactoryLp2AssetsMapping (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
52 52  
53 53  
54 54  func keyFactoryLpList () = "%s__lpTokensList"
55 55  
56 56  
57 57  func keyFactoryLpAssetToPoolContractAddress (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
58 58  
59 59  
60 60  func keyFactoryPoolWeight (contractAddress) = makeString(["%s%s", "poolWeight", contractAddress], SEP)
61 61  
62 62  
63 63  func readFactoryAddressOrFail () = addressFromStringValue(getStringOrFail(keyFactoryAddress()))
64 64  
65 65  
66 66  func readLpList () = split(valueOrElse(getString(readFactoryAddressOrFail(), keyFactoryLpList()), ""), SEP)
67 67  
68 68  
69 69  func readFactoryCfgOrFail (factory) = split(getStringByAddressOrFail(factory, keyFactoryCfg()), SEP)
70 70  
71 71  
72 72  func getBoostingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgBoostingDapp])
73 73  
74 74  
75 75  func getEmissionAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgEmissionDapp])
76 76  
77 77  
78 78  func getStakingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgStakingDapp])
79 79  
80 80  
81 81  func keyEmissionRatePerBlockCurrent () = "%s%s__ratePerBlock__current"
82 82  
83 83  
84 84  func keyEmissionRatePerBlockMaxCurrent () = "%s%s__ratePerBlockMax__current"
85 85  
86 86  
87 87  func keyEmissionStartBlock () = "%s%s__emission__startBlock"
88 88  
89 89  
90 90  func keyEmissionDurationInBlocks () = "%s%s__emission__duration"
91 91  
92 92  
93 93  func keyEmissionEndBlock () = "%s%s__emission__endBlock"
94 94  
95 95  
96 96  func keyStakedByUser (userAddressStr,lpAssetIdStr) = makeString(["%s%s%s__staked", userAddressStr, lpAssetIdStr], SEP)
97 97  
98 98  
99 99  func keyStakedTotal (lpAssetIdStr) = ("%s%s%s__staked__total__" + lpAssetIdStr)
100 100  
101 101  
102 102  func readStaked (key) = valueOrElse(getInteger(this, key), 0)
103 103  
104 104  
105 105  func keyLastTotalLpBalance (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "bal"], SEP)
106 106  
107 107  
108 108  func keyLastUserLpBalance (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "bal"], SEP)
109 109  
110 110  
111 111  func keyTotalLpBalanceIntegral (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "balINT"], SEP)
112 112  
113 113  
114 114  func keyUserLpBalanceIntegral (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "balINT"], SEP)
115 115  
116 116  
117 117  func keyTotalLpBalanceIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "lastUpd"], SEP)
118 118  
119 119  
120 120  func keyUserLpBalanceIntegralLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "lastUpd"], SEP)
121 121  
122 122  
123 123  func keyWxPerLpIntegral (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpInt"], SEP)
124 124  
125 125  
126 126  func keyWxPerLpIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpIntH"], SEP)
127 127  
128 128  
129 129  func keyWxToClaimUser (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpInt"], SEP)
130 130  
131 131  
132 132  func keyWxPerLpIntegralUserLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpIntH"], SEP)
133 133  
134 134  
135 135  func keyWxPerLp (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLp"], SEP)
136 136  
137 137  
138 138  func keyWxPerLpIntegralUserLast (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "uIntL"], SEP)
139 139  
140 140  
141 141  func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
142 142  
143 143  
144 144  func formatHistoryRecord (userAddress,lpAssetId,type,amount) = makeString(["%s%s%s%d%d%d", userAddress, lpAssetId, type, toString(height), toString(lastBlock.timestamp), toString(amount)], SEP)
145 145  
146 146  
147 147  func OperationHistoryEntry (type,userAddress,lpAssetId,amount,txId) = StringEntry(keyOperationHistoryRecord(type, userAddress, toBase58String(txId)), formatHistoryRecord(userAddress, lpAssetId, type, amount))
148 148  
149 149  
150 150  let factoryContract = readFactoryAddressOrFail()
151 151  
152 152  let factoryCfg = readFactoryCfgOrFail(factoryContract)
153 153  
154 154  let emissionContract = getEmissionAddressOrFail(factoryCfg)
155 155  
156 156  @Callable(i)
157 157  func constructor (factoryAddressStr) = if ((i.caller != this))
158 158      then throw("not authorized")
159 159      else [StringEntry(keyFactoryAddress(), factoryAddressStr)]
160 160  
161 161  
162 162  
163 163  @Callable(i)
164 164  func stake () = if ((size(i.payments) != 1))
165 165      then throw("invalid payment - exact one payment must be attached")
166 166      else {
167 167          let pmt = i.payments[0]
168 168          let lpAssetId = value(pmt.assetId)
169 169          let lpAssetIdStr = toBase58String(lpAssetId)
170 170          let amount = pmt.amount
171 171          let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
172 172          let callerStr = toString(i.caller)
173 173          let userAddressStr = if ((callerStr == poolAddressStr))
174 174              then toString(i.originCaller)
175 175              else callerStr
176 176          let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
177 177          let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
178 178          let stakedByUser = readStaked(stakedByUserKEY)
179 179          let stakedTotal = readStaked(stakedTotalKEY)
180 180          let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
181 181          let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
182 182          let wxEmissionPerBlock = getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent())
183 183          let poolWxEmissionPerBlock = fraction(wxEmissionPerBlock, poolWeight, (POOLWEIGHTMULT * 3))
184 184          let wxPerLpIntegralKEY = keyWxPerLpIntegral(lpAssetIdStr)
185 185          let wxPerLpIntegralLastUpdHeightKEY = keyWxPerLpIntegralLastUpdHeight(lpAssetIdStr)
186 186          let wxToClaimUserKEY = keyWxToClaimUser(lpAssetIdStr, userAddressStr)
187 187          let wxPerLpIntegralUserLastUpdHeightKEY = keyWxPerLpIntegralUserLastUpdHeight(lpAssetIdStr, userAddressStr)
188 188          let wxPerLpKEY = keyWxPerLp(lpAssetIdStr)
189 189          let wxPerLpIntegralUserLastKEY = keyWxPerLpIntegralUserLast(lpAssetIdStr, userAddressStr)
190 190          let wxPerLpIntegralLastUpdHeight = getIntOrDefault(this, wxPerLpIntegralLastUpdHeightKEY, emissionStartBlock)
191 191          let wxPerLpIntegral = getIntOrZero(this, wxPerLpIntegralKEY)
192 192          let wxToClaimUser = getIntOrZero(this, wxToClaimUserKEY)
193 193          let wxPerLpIntegralUserLastUpdHeight = getIntOrZero(this, wxPerLpIntegralUserLastUpdHeightKEY)
194 194          let wxPerLpOrZero = getIntOrZero(this, wxPerLpKEY)
195 195          let dh = max([(height - wxPerLpIntegralLastUpdHeight), 0])
196 196          let wxPerLp = if ((wxPerLpOrZero != 0))
197 197              then wxPerLpOrZero
198 198              else (poolWxEmissionPerBlock / stakedTotal)
199 199          let stakedTotalNew = (stakedTotal + amount)
200 200          let wxPerLpIntegralNew = (wxPerLpIntegral + (wxPerLp * dh))
201 201          let wxPerLpIntegralUserLast = if (if ((wxPerLpIntegralUserLastUpdHeight == 0))
202 202              then (stakedByUser > 0)
203 203              else false)
204 204              then 0
205 205              else if ((stakedByUser == 0))
206 206                  then wxPerLpIntegralNew
207 207                  else if (if ((wxPerLpIntegralUserLastUpdHeight > 0))
208 208                      then (stakedByUser > 0)
209 209                      else false)
210 210                      then getIntOrFail(this, wxPerLpIntegralUserLastKEY)
211 211                      else throw("Invalid condition")
212 212          let wxToClaimUserNew = (wxToClaimUser + ((wxPerLpIntegralNew - wxPerLpIntegralUserLast) * stakedByUser))
213 213          let wxPerLpIntegralUserLastNew = wxPerLpIntegralNew
214 214          let wxPerLpNew = (poolWxEmissionPerBlock / stakedTotalNew)
215 215          let wxPerLpIntegralLastUpdHeightNew = height
216 216          let wxPerLpIntegralUserLastUpdHeightNew = height
217 217  [IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, stakedTotalNew), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)]
218 218          }
219 219  
220 220  
221 221  
222 222  @Callable(i)
223 223  func unstake (lpAssetIdStr,amount) = {
224 224      let userAddressStr = toString(i.caller)
225 225      let lpAssetId = fromBase58String(lpAssetIdStr)
226 226      if (!(isDefined(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)))))
227 227          then throw(("unsupported lp asset " + lpAssetIdStr))
228 228          else if ((userAddressStr == userAddressStr))
229 229              then throw("Somthing went wrong")
230 230              else {
231 231                  let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
232 232                  let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
233 233                  let stakedByUser = readStaked(stakedByUserKEY)
234 234                  let stakedTotal = readStaked(stakedTotalKEY)
235 235                  if ((amount > stakedByUser))
236 236                      then throw("passed amount is less then available")
237 237                      else [IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(i.caller, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)]
238 238                  }
239 239      }
240 240  
241 241  
242 242  
243 243  @Callable(i)
244 244  func claimWx (lpAssetIdStr) = throw("temporary disabled")
245 245  
246 246  
247 247  
248 248  @Callable(i)
249 249  func claimWxREADONLY (lpAssetIdStr,userAddressStr) = {
250 250      let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
251 251      let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
252 252      let stakedByUser = readStaked(stakedByUserKEY)
253 253      let stakedTotal = readStaked(stakedTotalKEY)
254 254      let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
255 255      let poolWeightMult = MULT8
256 256      let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
257 257      let wxEmissionPerBlock = getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent())
258 258      let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
259 259      let passedBlocks = if ((emissionStartBlock > height))
260 260          then 0
261 261          else (height - emissionStartBlock)
262 262      let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, poolWeightMult)
263 263      let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
264 264      let poolWxEmissionPerBlock = fraction(wxEmissionPerBlock, poolWeight, POOLWEIGHTMULT)
265 265      let amount = 0
266 266      let wxPerLpIntegralKEY = keyWxPerLpIntegral(lpAssetIdStr)
267 267      let wxPerLpIntegralLastUpdHeightKEY = keyWxPerLpIntegralLastUpdHeight(lpAssetIdStr)
268 268      let wxToClaimUserKEY = keyWxToClaimUser(lpAssetIdStr, userAddressStr)
269 269      let wxPerLpIntegralUserLastUpdHeightKEY = keyWxPerLpIntegralUserLastUpdHeight(lpAssetIdStr, userAddressStr)
270 270      let wxPerLpKEY = keyWxPerLp(lpAssetIdStr)
271 271      let wxPerLpIntegralUserLastKEY = keyWxPerLpIntegralUserLast(lpAssetIdStr, userAddressStr)
272 272      let wxPerLpIntegralLastUpdHeight = getIntOrDefault(this, wxPerLpIntegralLastUpdHeightKEY, emissionStartBlock)
273 273      let wxPerLpIntegral = getIntOrZero(this, wxPerLpIntegralKEY)
274 274      let wxToClaimUser = getIntOrZero(this, wxToClaimUserKEY)
275 275      let wxPerLpIntegralUserLastUpdHeight = getIntOrZero(this, wxPerLpIntegralUserLastUpdHeightKEY)
276 276      let wxPerLpOrZero = getIntOrZero(this, wxPerLpKEY)
277 277      let dh = max([(height - wxPerLpIntegralLastUpdHeight), 0])
278 278      let wxPerLp = if ((wxPerLpOrZero != 0))
279 279          then wxPerLpOrZero
280 280          else (poolWxEmissionPerBlock / stakedTotal)
281 281      let stakedTotalNew = (stakedTotal + amount)
282 282      let wxPerLpIntegralNew = (wxPerLpIntegral + (wxPerLp * dh))
283 283      let wxPerLpIntegralUserLast = if (if ((wxPerLpIntegralUserLastUpdHeight == 0))
284 284          then (stakedByUser > 0)
285 285          else false)
286 286          then 0
287 287          else if ((stakedByUser == 0))
288 288              then wxPerLpIntegralNew
289 289              else if (if ((wxPerLpIntegralUserLastUpdHeight > 0))
290 290                  then (stakedByUser > 0)
291 291                  else false)
292 292                  then getIntOrFail(this, wxPerLpIntegralUserLastKEY)
293 293                  else throw("Invalid condition")
294 294      let wxToClaimUserNew = (wxToClaimUser + ((wxPerLpIntegralNew - wxPerLpIntegralUserLast) * stakedByUser))
295 295      let wxPerLpIntegralUserLastNew = wxPerLpIntegralNew
296 296      let wxPerLpNew = (poolWxEmissionPerBlock / stakedTotalNew)
297 297      let wxPerLpIntegralLastUpdHeightNew = height
298 298      let wxPerLpIntegralUserLastUpdHeightNew = height
299 -     let debug = ((((((((((toString(wxToClaimUser) + "::") + toString(wxPerLpIntegralNew)) + "::") + toString(wxPerLpIntegralUserLast)) + "::") + toString(stakedByUser)) + "::") + toString(dh)) + "::") + toString(wxPerLp))
299 +     let debug = ((((((((((((((((((toString(wxToClaimUser) + "::") + toString(wxPerLpIntegralNew)) + "::") + toString(wxPerLpIntegralUserLast)) + "::") + toString(stakedByUser)) + "::") + toString(dh)) + "::") + toString(wxPerLp)) + "::") + toString(stakedTotal)) + "::") + toString(poolWxEmissionPerBlock)) + "::") + toString(wxEmissionPerBlock)) + "::") + toString(poolWeight))
300 300      $Tuple2(nil, makeString(["%s%s%d%s", lpAssetIdStr, userAddressStr, toString(userWxReward), debug], SEP))
301 301      }
302 302  
303 303

Old	New		Differences
296	296		let wxPerLpNew = (poolWxEmissionPerBlock / stakedTotalNew)
297	297		let wxPerLpIntegralLastUpdHeightNew = height
298	298		let wxPerLpIntegralUserLastUpdHeightNew = height
299		-	let debug = ((((((((((toString(wxToClaimUser) + "::") + toString(wxPerLpIntegralNew)) + "::") + toString(wxPerLpIntegralUserLast)) + "::") + toString(stakedByUser)) + "::") + toString(dh)) + "::") + toString(wxPerLp))
	299	+	let debug = ((((((((((((((((((toString(wxToClaimUser) + "::") + toString(wxPerLpIntegralNew)) + "::") + toString(wxPerLpIntegralUserLast)) + "::") + toString(stakedByUser)) + "::") + toString(dh)) + "::") + toString(wxPerLp)) + "::") + toString(stakedTotal)) + "::") + toString(poolWxEmissionPerBlock)) + "::") + toString(wxEmissionPerBlock)) + "::") + toString(poolWeight))
300	300		$Tuple2(nil, makeString(["%s%s%d%s", lpAssetIdStr, userAddressStr, toString(userWxReward), debug], SEP))
301	301		}
302	302

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let SCALE8 = 8
5	5
6	6		let MULT8 = 100000000
7	7
8	8		let SCALE18 = 18
9	9
10	10		let MULT18 = toBigInt(1000000000000000000)
11	11
12	12		let SEP = "__"
13	13
14	14		let POOLWEIGHTMULT = MULT8
15	15
16	16		func getStringOrFail (key) = valueOrErrorMessage(getString(key), (("mandatory this." + key) + " is not defined"))
17	17
18	18
19	19		func getStringByAddressOrFail (address,key) = valueOrErrorMessage(getString(address, key), (((("mandatory " + toString(address)) + ".") + key) + " is not defined"))
20	20
21	21
22	22		func getIntOrZero (address,key) = valueOrElse(getInteger(address, key), 0)
23	23
24	24
25	25		func getIntOrDefault (address,key,defaultVal) = valueOrElse(getInteger(address, key), defaultVal)
26	26
27	27
28	28		func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), (("mandatory this." + key) + " is not defined"))
29	29
30	30
31	31		func keyFactoryAddress () = "%s%s__config__factoryAddress"
32	32
33	33
34	34		let IdxFactoryCfgStakingDapp = 1
35	35
36	36		let IdxFactoryCfgBoostingDapp = 2
37	37
38	38		let IdxFactoryCfgIdoDapp = 3
39	39
40	40		let IdxFactoryCfgTeamDapp = 4
41	41
42	42		let IdxFactoryCfgEmissionDapp = 5
43	43
44	44		let IdxFactoryCfgRestDapp = 6
45	45
46	46		let IdxFactoryCfgSlippageDapp = 7
47	47
48	48		func keyFactoryCfg () = "%s__factoryConfig"
49	49
50	50
51	51		func keyFactoryLp2AssetsMapping (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
52	52
53	53
54	54		func keyFactoryLpList () = "%s__lpTokensList"
55	55
56	56
57	57		func keyFactoryLpAssetToPoolContractAddress (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
58	58
59	59
60	60		func keyFactoryPoolWeight (contractAddress) = makeString(["%s%s", "poolWeight", contractAddress], SEP)
61	61
62	62
63	63		func readFactoryAddressOrFail () = addressFromStringValue(getStringOrFail(keyFactoryAddress()))
64	64
65	65
66	66		func readLpList () = split(valueOrElse(getString(readFactoryAddressOrFail(), keyFactoryLpList()), ""), SEP)
67	67
68	68
69	69		func readFactoryCfgOrFail (factory) = split(getStringByAddressOrFail(factory, keyFactoryCfg()), SEP)
70	70
71	71
72	72		func getBoostingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgBoostingDapp])
73	73
74	74
75	75		func getEmissionAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgEmissionDapp])
76	76
77	77
78	78		func getStakingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgStakingDapp])
79	79
80	80
81	81		func keyEmissionRatePerBlockCurrent () = "%s%s__ratePerBlock__current"
82	82
83	83
84	84		func keyEmissionRatePerBlockMaxCurrent () = "%s%s__ratePerBlockMax__current"
85	85
86	86
87	87		func keyEmissionStartBlock () = "%s%s__emission__startBlock"
88	88
89	89
90	90		func keyEmissionDurationInBlocks () = "%s%s__emission__duration"
91	91
92	92
93	93		func keyEmissionEndBlock () = "%s%s__emission__endBlock"
94	94
95	95
96	96		func keyStakedByUser (userAddressStr,lpAssetIdStr) = makeString(["%s%s%s__staked", userAddressStr, lpAssetIdStr], SEP)
97	97
98	98
99	99		func keyStakedTotal (lpAssetIdStr) = ("%s%s%s__staked__total__" + lpAssetIdStr)
100	100
101	101
102	102		func readStaked (key) = valueOrElse(getInteger(this, key), 0)
103	103
104	104
105	105		func keyLastTotalLpBalance (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "bal"], SEP)
106	106
107	107
108	108		func keyLastUserLpBalance (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "bal"], SEP)
109	109
110	110
111	111		func keyTotalLpBalanceIntegral (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "balINT"], SEP)
112	112
113	113
114	114		func keyUserLpBalanceIntegral (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "balINT"], SEP)
115	115
116	116
117	117		func keyTotalLpBalanceIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "lastUpd"], SEP)
118	118
119	119
120	120		func keyUserLpBalanceIntegralLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "lastUpd"], SEP)
121	121
122	122
123	123		func keyWxPerLpIntegral (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpInt"], SEP)
124	124
125	125
126	126		func keyWxPerLpIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpIntH"], SEP)
127	127
128	128
129	129		func keyWxToClaimUser (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpInt"], SEP)
130	130
131	131
132	132		func keyWxPerLpIntegralUserLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpIntH"], SEP)
133	133
134	134
135	135		func keyWxPerLp (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLp"], SEP)
136	136
137	137
138	138		func keyWxPerLpIntegralUserLast (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "uIntL"], SEP)
139	139
140	140
141	141		func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
142	142
143	143
144	144		func formatHistoryRecord (userAddress,lpAssetId,type,amount) = makeString(["%s%s%s%d%d%d", userAddress, lpAssetId, type, toString(height), toString(lastBlock.timestamp), toString(amount)], SEP)
145	145
146	146
147	147		func OperationHistoryEntry (type,userAddress,lpAssetId,amount,txId) = StringEntry(keyOperationHistoryRecord(type, userAddress, toBase58String(txId)), formatHistoryRecord(userAddress, lpAssetId, type, amount))
148	148
149	149
150	150		let factoryContract = readFactoryAddressOrFail()
151	151
152	152		let factoryCfg = readFactoryCfgOrFail(factoryContract)
153	153
154	154		let emissionContract = getEmissionAddressOrFail(factoryCfg)
155	155
156	156		@Callable(i)
157	157		func constructor (factoryAddressStr) = if ((i.caller != this))
158	158		then throw("not authorized")
159	159		else [StringEntry(keyFactoryAddress(), factoryAddressStr)]
160	160
161	161
162	162
163	163		@Callable(i)
164	164		func stake () = if ((size(i.payments) != 1))
165	165		then throw("invalid payment - exact one payment must be attached")
166	166		else {
167	167		let pmt = i.payments[0]
168	168		let lpAssetId = value(pmt.assetId)
169	169		let lpAssetIdStr = toBase58String(lpAssetId)
170	170		let amount = pmt.amount
171	171		let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
172	172		let callerStr = toString(i.caller)
173	173		let userAddressStr = if ((callerStr == poolAddressStr))
174	174		then toString(i.originCaller)
175	175		else callerStr
176	176		let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
177	177		let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
178	178		let stakedByUser = readStaked(stakedByUserKEY)
179	179		let stakedTotal = readStaked(stakedTotalKEY)
180	180		let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
181	181		let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
182	182		let wxEmissionPerBlock = getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent())
183	183		let poolWxEmissionPerBlock = fraction(wxEmissionPerBlock, poolWeight, (POOLWEIGHTMULT * 3))
184	184		let wxPerLpIntegralKEY = keyWxPerLpIntegral(lpAssetIdStr)
185	185		let wxPerLpIntegralLastUpdHeightKEY = keyWxPerLpIntegralLastUpdHeight(lpAssetIdStr)
186	186		let wxToClaimUserKEY = keyWxToClaimUser(lpAssetIdStr, userAddressStr)
187	187		let wxPerLpIntegralUserLastUpdHeightKEY = keyWxPerLpIntegralUserLastUpdHeight(lpAssetIdStr, userAddressStr)
188	188		let wxPerLpKEY = keyWxPerLp(lpAssetIdStr)
189	189		let wxPerLpIntegralUserLastKEY = keyWxPerLpIntegralUserLast(lpAssetIdStr, userAddressStr)
190	190		let wxPerLpIntegralLastUpdHeight = getIntOrDefault(this, wxPerLpIntegralLastUpdHeightKEY, emissionStartBlock)
191	191		let wxPerLpIntegral = getIntOrZero(this, wxPerLpIntegralKEY)
192	192		let wxToClaimUser = getIntOrZero(this, wxToClaimUserKEY)
193	193		let wxPerLpIntegralUserLastUpdHeight = getIntOrZero(this, wxPerLpIntegralUserLastUpdHeightKEY)
194	194		let wxPerLpOrZero = getIntOrZero(this, wxPerLpKEY)
195	195		let dh = max([(height - wxPerLpIntegralLastUpdHeight), 0])
196	196		let wxPerLp = if ((wxPerLpOrZero != 0))
197	197		then wxPerLpOrZero
198	198		else (poolWxEmissionPerBlock / stakedTotal)
199	199		let stakedTotalNew = (stakedTotal + amount)
200	200		let wxPerLpIntegralNew = (wxPerLpIntegral + (wxPerLp * dh))
201	201		let wxPerLpIntegralUserLast = if (if ((wxPerLpIntegralUserLastUpdHeight == 0))
202	202		then (stakedByUser > 0)
203	203		else false)
204	204		then 0
205	205		else if ((stakedByUser == 0))
206	206		then wxPerLpIntegralNew
207	207		else if (if ((wxPerLpIntegralUserLastUpdHeight > 0))
208	208		then (stakedByUser > 0)
209	209		else false)
210	210		then getIntOrFail(this, wxPerLpIntegralUserLastKEY)
211	211		else throw("Invalid condition")
212	212		let wxToClaimUserNew = (wxToClaimUser + ((wxPerLpIntegralNew - wxPerLpIntegralUserLast) * stakedByUser))
213	213		let wxPerLpIntegralUserLastNew = wxPerLpIntegralNew
214	214		let wxPerLpNew = (poolWxEmissionPerBlock / stakedTotalNew)
215	215		let wxPerLpIntegralLastUpdHeightNew = height
216	216		let wxPerLpIntegralUserLastUpdHeightNew = height
217	217		[IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, stakedTotalNew), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)]
218	218		}
219	219
220	220
221	221
222	222		@Callable(i)
223	223		func unstake (lpAssetIdStr,amount) = {
224	224		let userAddressStr = toString(i.caller)
225	225		let lpAssetId = fromBase58String(lpAssetIdStr)
226	226		if (!(isDefined(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)))))
227	227		then throw(("unsupported lp asset " + lpAssetIdStr))
228	228		else if ((userAddressStr == userAddressStr))
229	229		then throw("Somthing went wrong")
230	230		else {
231	231		let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
232	232		let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
233	233		let stakedByUser = readStaked(stakedByUserKEY)
234	234		let stakedTotal = readStaked(stakedTotalKEY)
235	235		if ((amount > stakedByUser))
236	236		then throw("passed amount is less then available")
237	237		else [IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(i.caller, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)]
238	238		}
239	239		}
240	240
241	241
242	242
243	243		@Callable(i)
244	244		func claimWx (lpAssetIdStr) = throw("temporary disabled")
245	245
246	246
247	247
248	248		@Callable(i)
249	249		func claimWxREADONLY (lpAssetIdStr,userAddressStr) = {
250	250		let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
251	251		let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
252	252		let stakedByUser = readStaked(stakedByUserKEY)
253	253		let stakedTotal = readStaked(stakedTotalKEY)
254	254		let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
255	255		let poolWeightMult = MULT8
256	256		let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
257	257		let wxEmissionPerBlock = getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent())
258	258		let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
259	259		let passedBlocks = if ((emissionStartBlock > height))
260	260		then 0
261	261		else (height - emissionStartBlock)
262	262		let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, poolWeightMult)
263	263		let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
264	264		let poolWxEmissionPerBlock = fraction(wxEmissionPerBlock, poolWeight, POOLWEIGHTMULT)
265	265		let amount = 0
266	266		let wxPerLpIntegralKEY = keyWxPerLpIntegral(lpAssetIdStr)
267	267		let wxPerLpIntegralLastUpdHeightKEY = keyWxPerLpIntegralLastUpdHeight(lpAssetIdStr)
268	268		let wxToClaimUserKEY = keyWxToClaimUser(lpAssetIdStr, userAddressStr)
269	269		let wxPerLpIntegralUserLastUpdHeightKEY = keyWxPerLpIntegralUserLastUpdHeight(lpAssetIdStr, userAddressStr)
270	270		let wxPerLpKEY = keyWxPerLp(lpAssetIdStr)
271	271		let wxPerLpIntegralUserLastKEY = keyWxPerLpIntegralUserLast(lpAssetIdStr, userAddressStr)
272	272		let wxPerLpIntegralLastUpdHeight = getIntOrDefault(this, wxPerLpIntegralLastUpdHeightKEY, emissionStartBlock)
273	273		let wxPerLpIntegral = getIntOrZero(this, wxPerLpIntegralKEY)
274	274		let wxToClaimUser = getIntOrZero(this, wxToClaimUserKEY)
275	275		let wxPerLpIntegralUserLastUpdHeight = getIntOrZero(this, wxPerLpIntegralUserLastUpdHeightKEY)
276	276		let wxPerLpOrZero = getIntOrZero(this, wxPerLpKEY)
277	277		let dh = max([(height - wxPerLpIntegralLastUpdHeight), 0])
278	278		let wxPerLp = if ((wxPerLpOrZero != 0))
279	279		then wxPerLpOrZero
280	280		else (poolWxEmissionPerBlock / stakedTotal)
281	281		let stakedTotalNew = (stakedTotal + amount)
282	282		let wxPerLpIntegralNew = (wxPerLpIntegral + (wxPerLp * dh))
283	283		let wxPerLpIntegralUserLast = if (if ((wxPerLpIntegralUserLastUpdHeight == 0))
284	284		then (stakedByUser > 0)
285	285		else false)
286	286		then 0
287	287		else if ((stakedByUser == 0))
288	288		then wxPerLpIntegralNew
289	289		else if (if ((wxPerLpIntegralUserLastUpdHeight > 0))
290	290		then (stakedByUser > 0)
291	291		else false)
292	292		then getIntOrFail(this, wxPerLpIntegralUserLastKEY)
293	293		else throw("Invalid condition")
294	294		let wxToClaimUserNew = (wxToClaimUser + ((wxPerLpIntegralNew - wxPerLpIntegralUserLast) * stakedByUser))
295	295		let wxPerLpIntegralUserLastNew = wxPerLpIntegralNew
296	296		let wxPerLpNew = (poolWxEmissionPerBlock / stakedTotalNew)
297	297		let wxPerLpIntegralLastUpdHeightNew = height
298	298		let wxPerLpIntegralUserLastUpdHeightNew = height
299		-	let debug = ((((((((((toString(wxToClaimUser) + "::") + toString(wxPerLpIntegralNew)) + "::") + toString(wxPerLpIntegralUserLast)) + "::") + toString(stakedByUser)) + "::") + toString(dh)) + "::") + toString(wxPerLp))
	299	+	let debug = ((((((((((((((((((toString(wxToClaimUser) + "::") + toString(wxPerLpIntegralNew)) + "::") + toString(wxPerLpIntegralUserLast)) + "::") + toString(stakedByUser)) + "::") + toString(dh)) + "::") + toString(wxPerLp)) + "::") + toString(stakedTotal)) + "::") + toString(poolWxEmissionPerBlock)) + "::") + toString(wxEmissionPerBlock)) + "::") + toString(poolWeight))
300	300		$Tuple2(nil, makeString(["%s%s%d%s", lpAssetIdStr, userAddressStr, toString(userWxReward), debug], SEP))
301	301		}
302	302
303	303

github/deemru/w8io/026f985 
112.84 ms ◑