w8 · tx · 5yf···T5M

tx · 5yfJPe1SVAMULjBiDZ6KKRPD7y9mPtBwiS3ek75EYT5M

3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv:  -0.01400000 Waves

2024.09.13 05:39 [3281265] smart account 3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5yfJPe1SVAMULjBiDZ6KKRPD7y9mPtBwiS3ek75EYT5M",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1726195169996,
    "version": 2,
    "chainId": 84,
    "sender": "3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv",
    "senderPublicKey": "2fNSk5gmWbXBDTkSYSKd66xSgVvAYzrJnP9YSAFNvTwC",
    "proofs": [
        "3BiGh9MujKYxG7sfmxbuHZQ9576bk1HiXxV3Nnt3r2AwAk4MWoQfiFFythT2KpRWZDAWfes5w3mrgeo4i8FEVdfd"
    ],
    "script": "base64:BgIWCAISAwoBGBIDCgEIEgMKAQgSAwoBCFsAA1NFUAICX18ABWNoYWluCQDJAQIJAMoBAggFBHRoaXMFYnl0ZXMAAQABAAt1c2R0QXNzZXRJZAQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAEghNp6sggDP07Ru8qO7ouTvMmC3Qtd+geWqNQj+agP/7kDCQAAAgEBVAUHJG1hdGNoMAEgVbHYn3KHgu/l41uNrAWrZd6aQ6EvFrsF8xq3h6XxxRgJAAIBAg1Vbmtub3duIGNoYWluABZkZWZhdWx0UmVzdDJBZGRyZXNzU3RyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUEZ3WXRhOGJpRXozMXpwZUZlNURKSzh3RTV0clNwUVZGOAMJAAACAQFUBQckbWF0Y2gwAiMzTjdVdVlhcjYyNjRQNThGQmhWV0tQUUFoNFl1YTJoZ25ndgkAAgECDVVua25vd24gY2hhaW4AFW9sZFN0YWtpbmdDb250cmFjdFN0cgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAIjM1BMbmNYdFMxVTgzRDZjUWJGRDNIOHJCSFBMZ3p4U0ZLWjEDCQAAAgEBVAUHJG1hdGNoMAIjM05EQ3lCRzVxODVKdWFSaWlnVWVFdGFpbnlqQ1FUM1hwWm0JAAIBAg1Vbmtub3duIGNoYWluAQ9nZXRTdHJpbmdPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAAQSWR4Q2ZnQWNyZXMyRGFwcAABAA1JZHhDZmdXbGdEYXBwAAIAFElkeENmZ1B1enpsZVBvb2xEYXBwAAQAFElkeENmZ0ludmVzdEZ1bmREYXBwAAUBCmtleVJlc3RDZmcAAg4lc19fcmVzdENvbmZpZwEPa2V5UmVzdDJBZGRyZXNzAAINJXNfX3Jlc3QyQWRkcgERcmVhZFJlc3RDZmdPckZhaWwBBHJlc3QJALwJAgkBD2dldFN0cmluZ09yRmFpbAIFBHJlc3QJAQprZXlSZXN0Q2ZnAAUDU0VQARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCCHJlc3QyQ2ZnA2lkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUIcmVzdDJDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AA1yZXN0MkNvbnRyYWN0CQERQGV4dHJOYXRpdmUoMTA2MikBCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJAQ9rZXlSZXN0MkFkZHJlc3MABRZkZWZhdWx0UmVzdDJBZGRyZXNzU3RyAAhyZXN0MkNmZwkBEXJlYWRSZXN0Q2ZnT3JGYWlsAQUNcmVzdDJDb250cmFjdAAOYWNyZXMyQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQhyZXN0MkNmZwUQSWR4Q2ZnQWNyZXMyRGFwcAALd2xnQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQhyZXN0MkNmZwUNSWR4Q2ZnV2xnRGFwcAAScHV6emxlUG9vbENvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUIcmVzdDJDZmcFFElkeENmZ1B1enpsZVBvb2xEYXBwABJpbnZlc3RGdW5kQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQhyZXN0MkNmZwUUSWR4Q2ZnSW52ZXN0RnVuZERhcHAAE29sZEFjcmVzQ29udHJhY3RLZXkCEG9sZEFjcmVzQ29udHJhY3QBEWtleUxhc3RUeElkQnlVc2VyAQRhZGRyCQCsAgICD2xhc3RUeElkQnlVc2VyXwUEYWRkcgANd2xnQXNzZXRJZEtleQILd2xnX2Fzc2V0SWQACndsZ0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQt3bGdDb250cmFjdAUNd2xnQXNzZXRJZEtleQIYV0xHT0xEIGlzIG5vdCBpc3N1ZWQgeWV0AA9hY3Jlc0Fzc2V0SWRLZXkCDGFjcmVzQXNzZXRJZAAMYWNyZXNBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJwIAgUOYWNyZXMyQ29udHJhY3QFD2FjcmVzQXNzZXRJZEtleQIXQUNSRVMgaXMgbm90IGlzc3VlZCB5ZXQBFGtleVN0YWtlZER1Y2tCeU93bmVyAQlvd25lckFkZHIJAKwCAgISc3Rha2VkRHVja0J5T3duZXJfBQlvd25lckFkZHIBFmtleUFkZHJlc3NUb0N1c3RvbU5hbWUBBGFkZHIJAKwCAgIYYWNjb3VudEN1c3RvbU5hbWVCeUFkZHJfBQRhZGRyAQ9rZXlBZGRyZXNzUmVmQnkBBGFkZHIJAKwCAgIJYWNjUmVmQnlfBQRhZGRyARNrZXlBZGRyZXNzUmVmZXJyYWxzAQRhZGRyCQCsAgICDWFjY1JlZmVycmFsc18FBGFkZHIBDGFzVHVwbGU0SW50cwEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIUKEludCwgSW50LCBJbnQsIEludCkEAXQFByRtYXRjaDAFAXQJAAIBAiZmYWlsIHRvIGNhc3QgaW50byAoSW50LCBJbnQsIEludCwgSW50KQEMYXNUdXBsZTNJbnRzAQN2YWwEByRtYXRjaDAFA3ZhbAMJAAECBQckbWF0Y2gwAg8oSW50LCBJbnQsIEludCkEAXQFByRtYXRjaDAFAXQJAAIBAiFmYWlsIHRvIGNhc3QgaW50byAoSW50LCBJbnQsIEludCkBDGFzVHVwbGUySW50cwEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIKKEludCwgSW50KQQBdAUHJG1hdGNoMAUBdAkAAgECHGZhaWwgdG8gY2FzdCBpbnRvIChJbnQsIEludCkAA002XwDAhD0AA004XwCAwtcvAAVNSUxMNgCAgOmDsd4WAApURUFNX1NIQVJFAMCaDAAOQUNUSVZJVFlfU0hBUkUAoI0GAAxQTEFZRVJfU0hBUkUAgLUYAAtZRUFSX01JTExJUwCAhuvHdQADY2huCQDJAQIJAMoBAggFBHRoaXMFYnl0ZXMAAQABAA1VU0RUX1RWTF9DT1JSBAckbWF0Y2gwBQNjaG4DCQAAAgEBVwUHJG1hdGNoMADw9ajABAMJAAACAQFUBQckbWF0Y2gwAAAJAAIBAg1Vbmtub3duIGNoYWluAAp0ZWFtQWRyS2V5Agh0ZWFtQWRkcgAObGFzdFRlYW1UaW1LZXkCFGxhc3RDbGFpbWVkVGltZV90ZWFtAA50ZWFtQW10TGVmdEtleQIOdGVhbUFtb3VudExlZnQAFGxhc3RBY3Rpdml0aWVzVGltS2V5AhpsYXN0Q2xhaW1lZFRpbWVfYWN0aXZpdGllcwANYWN0QW10TGVmdEtleQIUYWN0aXZpdGllc0Ftb3VudExlZnQAEXN0YWtlcnNBbXRMZWZ0S2V5AhFzdGFrZXJzQW1vdW50TGVmdAEWa2V5TGFzdENsYWltVGltZUJ5VXNlcgEEYWRkcgkArAICAhRsYXN0Q2xhaW1lZFRpbWVVc2VyXwUEYWRkcgENZGlzdHJCeVBlcmlvZAEGcGVyaW9kCQBrAwUFTUlMTDYJAGgCBQxQTEFZRVJfU0hBUkUJAGQCBQZwZXJpb2QAAQkAaAIABgUDTTZfAA53bGdJc3N1ZVRpbUtleQINd2xnX2lzc3VlVGltZQAPd2xnSXNzdWVkQW10S2V5AhB3bGdfaXNzdWVkQW1vdW50AA56Yklzc3VlZEFtdEtleQISemJpbGxfaXNzdWVkQW1vdW50ARdrZXlBY3Jlc1N0YWtlZEFtdEJ5VXNlcgEEYWRkcgkArAICAhhhY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcl8FBGFkZHIAEmFjcmVzU3Rha2RUb3RhbEtleQIWYWNyZXNTdGFrZWRBbW91bnRUb3RhbAAJZGFwcDJSZXN0AAAADGRhcHAyU3Rha2luZwABAAhkYXBwMldsZwACAAtkYXBwMlB1enpsZQADAA9kYXBwMkludmVzdEZ1bmQABAAGbGV2ZWxzCQDMCAIACgkAzAgCABQJAMwIAgAoCQDMCAIAUAkAzAgCAJYBCQDMCAIA+gEJAMwIAgCQAwkAzAgCALwFCQDMCAIA6AcFA25pbAEPZ2V0TGV2ZWxCeUFjcmVzAQVhY3JlcwQDYWNyCQBpAgUFYWNyZXMFA004XwoBB2NoZWNrZXICA2FjYwRpdGVtAwkAZgIFBGl0ZW0FA2FjcgUDYWNjCQBkAgUDYWNjAAEEA2lkeAoAAiRsBQZsZXZlbHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2NoZWNrZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoJAGQCBQNpZHgAAQEWZ2V0RmFybWluZ1Bvd2VyQnlBY3JlcwEFYWNyZXMJAGgCCQBoAgUFYWNyZXMAFAkAZAIJAQ9nZXRMZXZlbEJ5QWNyZXMBBQVhY3JlcwAEARBnZXRGYXJtaW5nUG93ZXJzAhJ1c2VyQWRkclN0ck9yRW1wdHkPc3Rha2luZ0NvbnRyYWN0BAp0b3RhbEFjcmVzCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAUSYWNyZXNTdGFrZFRvdGFsS2V5AAAEB3RvdGFsRlAJARZnZXRGYXJtaW5nUG93ZXJCeUFjcmVzAQUKdG90YWxBY3JlcwQJdXNlckFjcmVzCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBF2tleUFjcmVzU3Rha2VkQW10QnlVc2VyAQUSdXNlckFkZHJTdHJPckVtcHR5AAAEBnVzZXJGUAkBFmdldEZhcm1pbmdQb3dlckJ5QWNyZXMBBQl1c2VyQWNyZXMJAMwIAgUHdG90YWxGUAkAzAgCBQZ1c2VyRlAFA25pbAAKaWR4VG90YWxGUAAAAAlpZHhVc2VyRlAAAQALaXhXbGdBbW91bnQAAAAKaXhXbGdQcmljZQABAAppeFdsZ0Z1bmRzAAIADWl4V2xnQWN0aXZpdHkAAwAOaXhXbGdBcmJpdHJhZ2UABAAJaXhXbGdQb29sAAUADml4V2xnSXNzdWVUaW1lAAYAFGl4V2xnTGFzdFRlYW1BY3RUaW1lAAcADml4V2xnVGVhbVRvdGFsAAgAD2l4V2xnVGVhbUFtTGVmdAAJABNpeFdsZ1RlYW1BbUF2YWlsTm93AAoAD2l4V2xnVGVhbVdsZ29sZAALAA1peFdsZ0FjdFRvdGFsAAwADml4V2xnQWN0QW1MZWZ0AA0AEml4V2xnQWN0QW1BdmFpbE5vdwAOAA5peFdsZ0FjdFdsZ29sZAAPAA5peFdsZ0N1clBlcmlvZAAQABBpeFdsZ0FtTGVmdFRvdGFsABEAGml4V2xnQ3VyUGVyaW9kRGlzdHJpYnV0aW9uABIAEWl4V2xnTGFzdFVzZXJUaW1lABMAFWl4V2xnSW52ZXN0RnVuZEFtb3VudAAUABNpeFdsZ1VzZXJBbUF2YWlsTm93ABUAEGl4V2xnRWZmVXNlclRpbWUAFgEMZ2V0V2xnU3RhdHMyBAt1c2VyQWRkck9wdAljb250cmFjdHMGdXNkdElkFXVzZHRCYWxhbmNlQ29ycmVjdGlvbgQMaXNzdWVkQW1vdW50CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnBQ93bGdJc3N1ZWRBbXRLZXkCGFdMR09MRCBpcyBub3QgaXNzdWVkIHlldAQHcmVzdFVzZAkA8AcCCQCRAwIFCWNvbnRyYWN0cwUJZGFwcDJSZXN0BQZ1c2R0SWQEBndsZ1VzZAkAZQIJAPAHAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnBQZ1c2R0SWQFFXVzZHRCYWxhbmNlQ29ycmVjdGlvbgQJcHV6emxlVXNkCQDwBwIJAJEDAgUJY29udHJhY3RzBQtkYXBwMlB1enpsZQUGdXNkdElkBBFpbnZlc3RGbmRDb250cmFjdAkAkQMCBQljb250cmFjdHMFD2RhcHAySW52ZXN0RnVuZAQPaW52ZXN0RnVuZFRvdGFsCQBkAgkA8AcCBRFpbnZlc3RGbmRDb250cmFjdAUGdXNkdElkCQELdmFsdWVPckVsc2UCCQCaCAIFEWludmVzdEZuZENvbnRyYWN0BQ56Yklzc3VlZEFtdEtleQAABA10b3RhbEZ1bmRzVXNkCQBkAgUGd2xnVXNkBQ9pbnZlc3RGdW5kVG90YWwEBXdsZ0lkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJwIAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnAgt3bGdfYXNzZXRJZAITTm90IGluaXRpYWxpemVkIHlldAQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQJaXNzdWVUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnBQ53bGdJc3N1ZVRpbUtleQIPTm90IGluaXRpYWxpemVkBAl0ZWFtVG90YWwJAGsDBQVNSUxMNgUKVEVBTV9TSEFSRQUDTTZfBA50ZWFtQW1vdW50TGVmdAkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFDnRlYW1BbXRMZWZ0S2V5BQl0ZWFtVG90YWwEDGxhc3RUZWFtVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFDmxhc3RUZWFtVGltS2V5BQlpc3N1ZVRpbWUECHRlYW1BZGRyCQERQGV4dHJOYXRpdmUoMTA2MikBCQEFdmFsdWUBCQCdCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUKdGVhbUFkcktleQQWdGVhbUFtb3VudEF2YWlsYWJsZU5vdwkAlwMBCQDMCAIJAGsDBQl0ZWFtVG90YWwJAGUCBQNub3cFDGxhc3RUZWFtVGltZQkAaAIAAwULWUVBUl9NSUxMSVMJAMwIAgUOdGVhbUFtb3VudExlZnQFA25pbAQKdGVhbVdsZ29sZAkA8AcCBQh0ZWFtQWRkcgUFd2xnSWQECGFjdFRvdGFsCQBrAwUFTUlMTDYFDkFDVElWSVRZX1NIQVJFBQNNNl8EDWFjdEFtb3VudExlZnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnBQ1hY3RBbXRMZWZ0S2V5BQhhY3RUb3RhbAQSbGFzdEFjdGl2aXRpZXNUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUUbGFzdEFjdGl2aXRpZXNUaW1LZXkFCWlzc3VlVGltZQQVYWN0QW1vdW50QXZhaWxhYmxlTm93CQCXAwEJAMwIAgkAawMFCGFjdFRvdGFsCQBlAgUDbm93BRJsYXN0QWN0aXZpdGllc1RpbWUJAGgCAAMFC1lFQVJfTUlMTElTCQDMCAIFDWFjdEFtb3VudExlZnQFA25pbAQJYWN0V2xnb2xkCQDwBwIJAJEDAgUJY29udHJhY3RzBQlkYXBwMlJlc3QFBXdsZ0lkBAxsYXN0VXNlclRpbWUJAQt2YWx1ZU9yRWxzZQIJAJoIAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnCQEWa2V5TGFzdENsYWltVGltZUJ5VXNlcgEFC3VzZXJBZGRyT3B0BQlpc3N1ZVRpbWUEDmxhc3RVc2VyUGVyaW9kCQBpAgkAZQIFDGxhc3RVc2VyVGltZQUJaXNzdWVUaW1lBQtZRUFSX01JTExJUwQKbm93TGltaXRlZAkAlwMBCQDMCAIFA25vdwkAzAgCCQBkAgUJaXNzdWVUaW1lCQBoAgADBQtZRUFSX01JTExJUwUDbmlsBAljdXJQZXJpb2QJAJcDAQkAzAgCCQBpAgkAZQIFA25vdwUJaXNzdWVUaW1lBQtZRUFSX01JTExJUwkAzAgCAAIFA25pbAQDZWZmCQEQZ2V0RmFybWluZ1Bvd2VycwIFC3VzZXJBZGRyT3B0CQCRAwIFCWNvbnRyYWN0cwUMZGFwcDJTdGFraW5nBBVjdXJQZXJpb2REaXN0cmlidXRpb24JAQ1kaXN0ckJ5UGVyaW9kAQUJY3VyUGVyaW9kBAgkdDA3OTExOQMJAAACBQ5sYXN0VXNlclBlcmlvZAUJY3VyUGVyaW9kBAJhMAkAawMFFWN1clBlcmlvZERpc3RyaWJ1dGlvbgkAZQIFCm5vd0xpbWl0ZWQFDGxhc3RVc2VyVGltZQULWUVBUl9NSUxMSVMEB2VmZlRpbWUFCm5vd0xpbWl0ZWQJAJQKAgUCYTAFB2VmZlRpbWUDCQAAAgUObGFzdFVzZXJQZXJpb2QJAGUCBQljdXJQZXJpb2QAAQQCYTEJAGsDCQENZGlzdHJCeVBlcmlvZAEJAGUCBQljdXJQZXJpb2QAAQkAZQIJAGQCBQlpc3N1ZVRpbWUJAGgCBQtZRUFSX01JTExJUwUJY3VyUGVyaW9kBQxsYXN0VXNlclRpbWUFC1lFQVJfTUlMTElTBAJhMAkAawMFFWN1clBlcmlvZERpc3RyaWJ1dGlvbgkAZQIFCm5vd0xpbWl0ZWQJAGQCBQlpc3N1ZVRpbWUJAGgCBQtZRUFSX01JTExJUwUJY3VyUGVyaW9kBQtZRUFSX01JTExJUwQFYXZhaWwJAGQCBQJhMQUCYTAEB2VmZlRpbWUDCQBnAgUCYTEFBWF2YWlsCQBkAgUMbGFzdFVzZXJUaW1lCQBrAwULWUVBUl9NSUxMSVMFBWF2YWlsCQENZGlzdHJCeVBlcmlvZAEJAGUCBQljdXJQZXJpb2QAAQkAZAIJAGQCBQlpc3N1ZVRpbWUJAGgCBQtZRUFSX01JTExJUwUJY3VyUGVyaW9kCQBrAwULWUVBUl9NSUxMSVMJAGUCBQVhdmFpbAUCYTEFFWN1clBlcmlvZERpc3RyaWJ1dGlvbgkAlAoCBQVhdmFpbAUHZWZmVGltZQQCYTIJAGsDCQENZGlzdHJCeVBlcmlvZAEJAGUCBQljdXJQZXJpb2QAAgkAZQIJAGQCBQlpc3N1ZVRpbWUJAGgCBQtZRUFSX01JTExJUwkAZQIFCWN1clBlcmlvZAABBQxsYXN0VXNlclRpbWUFC1lFQVJfTUlMTElTBAJhMQkBDWRpc3RyQnlQZXJpb2QBCQBlAgUJY3VyUGVyaW9kAAEEAmEwCQBrAwUVY3VyUGVyaW9kRGlzdHJpYnV0aW9uCQBlAgUKbm93TGltaXRlZAkAZAIFCWlzc3VlVGltZQkAaAIFC1lFQVJfTUlMTElTBQljdXJQZXJpb2QFC1lFQVJfTUlMTElTBAVhdmFpbAkAZAIJAGQCBQJhMgUCYTEFAmEwBAdlZmZUaW1lAwkAZwIFAmEyBQVhdmFpbAkAZAIFDGxhc3RVc2VyVGltZQkAawMFC1lFQVJfTUlMTElTBQVhdmFpbAkBDWRpc3RyQnlQZXJpb2QBCQBlAgUJY3VyUGVyaW9kAAIDCQBnAgkAZAIFAmEyBQJhMQUFYXZhaWwJAGQCCQBkAgUJaXNzdWVUaW1lCQBoAgULWUVBUl9NSUxMSVMJAGUCBQljdXJQZXJpb2QAAQkAawMFC1lFQVJfTUlMTElTCQBlAgUFYXZhaWwFAmEyCQENZGlzdHJCeVBlcmlvZAEJAGUCBQljdXJQZXJpb2QAAQkAZAIJAGQCBQlpc3N1ZVRpbWUJAGgCBQtZRUFSX01JTExJUwUJY3VyUGVyaW9kCQBrAwULWUVBUl9NSUxMSVMJAGUCCQBlAgUFYXZhaWwFAmEyBQJhMQUVY3VyUGVyaW9kRGlzdHJpYnV0aW9uCQCUCgIFBWF2YWlsBQdlZmZUaW1lBA11c2VyQXZhaWxhYmxlCAUIJHQwNzkxMTkCXzEEC2VmZkxhc3RUaW1lCAUIJHQwNzkxMTkCXzIED2Ftb3VudExlZnRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFEXN0YWtlcnNBbXRMZWZ0S2V5AAAEDHVucm9iYmVkVXNlcgMJAQIhPQIJAJEDAgUDZWZmBQppZHhUb3RhbEZQAAAJAGsDBQ11c2VyQXZhaWxhYmxlCQCRAwIFA2VmZgUJaWR4VXNlckZQCQCRAwIFA2VmZgUKaWR4VG90YWxGUAAACQDMCAIFDGlzc3VlZEFtb3VudAkAzAgCCQBrAwkAZQIFDXRvdGFsRnVuZHNVc2QFDVVTRFRfVFZMX0NPUlIFA004XwUMaXNzdWVkQW1vdW50CQDMCAIFDXRvdGFsRnVuZHNVc2QJAMwIAgUHcmVzdFVzZAkAzAgCBQZ3bGdVc2QJAMwIAgUJcHV6emxlVXNkCQDMCAIFCWlzc3VlVGltZQkAzAgCBQxsYXN0VGVhbVRpbWUJAMwIAgUJdGVhbVRvdGFsCQDMCAIFDnRlYW1BbW91bnRMZWZ0CQDMCAIFFnRlYW1BbW91bnRBdmFpbGFibGVOb3cJAMwIAgUKdGVhbVdsZ29sZAkAzAgCBQhhY3RUb3RhbAkAzAgCBQ1hY3RBbW91bnRMZWZ0CQDMCAIFFWFjdEFtb3VudEF2YWlsYWJsZU5vdwkAzAgCBQlhY3RXbGdvbGQJAMwIAgUJY3VyUGVyaW9kCQDMCAIFD2Ftb3VudExlZnRUb3RhbAkAzAgCBRVjdXJQZXJpb2REaXN0cmlidXRpb24JAMwIAgUMbGFzdFVzZXJUaW1lCQDMCAIFD2ludmVzdEZ1bmRUb3RhbAkAzAgCBQx1bnJvYmJlZFVzZXIJAMwIAgULZWZmTGFzdFRpbWUFA25pbAEOd2FsbGV0SW50ZXJuYWwBDnVzZXJBZGRyZXNzT3B0BARhZGRyCQCmCAEFDnVzZXJBZGRyZXNzT3B0BAdiYWxhbmNlAwkBCWlzRGVmaW5lZAEFBGFkZHIJAO8HAQkBBXZhbHVlAQUEYWRkcgkBDkJhbGFuY2VEZXRhaWxzBAAAAAAAAAAABA13bGdvbGRCYWxhbmNlAwkBCWlzRGVmaW5lZAEFBGFkZHIJAPAHAgkBBXZhbHVlAQUEYWRkcgUKd2xnQXNzZXRJZAAABApjdXN0b21OYW1lCQELdmFsdWVPckVsc2UCCQCdCAIFDmFjcmVzMkNvbnRyYWN0CQEWa2V5QWRkcmVzc1RvQ3VzdG9tTmFtZQEFDnVzZXJBZGRyZXNzT3B0BQ51c2VyQWRkcmVzc09wdAQIcmVmQnlLZXkJAQ9rZXlBZGRyZXNzUmVmQnkBBQ51c2VyQWRkcmVzc09wdAQFcmVmQnkJAJ0IAgUOYWNyZXMyQ29udHJhY3QFCHJlZkJ5S2V5BARyZWZzCQELdmFsdWVPckVsc2UCCQCdCAIFDmFjcmVzMkNvbnRyYWN0CQETa2V5QWRkcmVzc1JlZmVycmFscwEFDnVzZXJBZGRyZXNzT3B0AgAECGxhc3RUeElkCQELdmFsdWVPckVsc2UCCQCdCAIFDmFjcmVzMkNvbnRyYWN0CQERa2V5TGFzdFR4SWRCeVVzZXIBBQ51c2VyQWRkcmVzc09wdAIABAxhY3Jlc0JhbGFuY2UDCQEJaXNEZWZpbmVkAQUEYWRkcgkA8AcCCQEFdmFsdWUBBQRhZGRyBQxhY3Jlc0Fzc2V0SWQAAAQLc3Rha2VkQWNyZXMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOYWNyZXMyQ29udHJhY3QJARdrZXlBY3Jlc1N0YWtlZEFtdEJ5VXNlcgEFDnVzZXJBZGRyZXNzT3B0AAAEA2x2bAkBD2dldExldmVsQnlBY3JlcwEFDGFjcmVzQmFsYW5jZQkAzAgCCQCsAgICEiVzJXNfX2N1c3RvbU5hbWVfXwUKY3VzdG9tTmFtZQkAzAgCCQCsAgICEiVzJXNfX3JlZmVycmVkQnlfXwkBC3ZhbHVlT3JFbHNlAgUFcmVmQnkCAAkAzAgCCQCsAgICESVzJXNfX3JlZmVycmFsc19fBQRyZWZzCQDMCAIJAKwCAgIQJXMlc19fbGFzdFR4SWRfXwUIbGFzdFR4SWQJAMwIAgkArAICAhQlcyVkX193YXZlc0JhbGFuY2VfXwkApAMBCAUHYmFsYW5jZQlhdmFpbGFibGUJAMwIAgkArAICAhUlcyVkX193bGdvbGRCYWxhbmNlX18JAKQDAQUNd2xnb2xkQmFsYW5jZQkAzAgCCQCsAgICFCVzJWRfX2FjcmVzQmFsYW5jZV9fCQCkAwEFDGFjcmVzQmFsYW5jZQkAzAgCCQCsAgICEyVzJWRfX3N0YWtlZEFjcmVzX18JAKQDAQULc3Rha2VkQWNyZXMJAMwIAgkArAICAhIlcyVkX19jdXJyZW50THZsX18JAKQDAQUDbHZsBQNuaWwEAWkBDWNvbnN0cnVjdG9yVjEBCWNvbnRyYWN0cwMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEnBlcm1pc3Npb25zIGRlbmllZAoBCmRlc2NyaXB0b3ICA2FjYwtpZ25vcmVkSXRlbQkArAICBQNhY2MCAiVzBAVkZXNjcgoAAiRsBQljb250cmFjdHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAgAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCmRlc2NyaXB0b3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoJAMwIAgkBC1N0cmluZ0VudHJ5AgkBCmtleVJlc3RDZmcACQC5CQIJAMwIAgUFZGVzY3IFCWNvbnRyYWN0cwUDU0VQCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ9rZXlSZXN0MkFkZHJlc3MACQClCAEFBHRoaXMFA25pbAFpARJ3YWxsZXRJbmZvUkVBRE9OTFkBDnVzZXJBZGRyZXNzT3B0CQCUCgIFA25pbAkBDndhbGxldEludGVybmFsAQUOdXNlckFkZHJlc3NPcHQBaQEWY29udmVyc2lvbkluZm9SRUFET05MWQEOdXNlckFkZHJlc3NPcHQED29sZEFjcmVzQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBEUBleHRyTmF0aXZlKDEwNTMpAgUOYWNyZXMyQ29udHJhY3QFE29sZEFjcmVzQ29udHJhY3RLZXkECyR0MDQwNTA0MTcyCQEMYXNUdXBsZTJJbnRzAQkA/AcEBQ9vbGRBY3Jlc0FkZHJlc3MCF3Vuc3Rha2VBbGxBY3Jlc1JFQURPTkxZCQDMCAIFDnVzZXJBZGRyZXNzT3B0BQNuaWwFA25pbAQNdW5zdGFrZWRBY3JlcwgFCyR0MDQwNTA0MTcyAl8xBAxjbGFpbWVkQWNyZXMIBQskdDA0MDUwNDE3MgJfMgQLJHQwNDE3NTQzMjQJAQxhc1R1cGxlNEludHMBCQD8BwQFDmFjcmVzMkNvbnRyYWN0AhR1bnN0YWtlTGFuZHNSRUFET05MWQkAzAgCBQ51c2VyQWRkcmVzc09wdAUDbmlsBQNuaWwED2FjcmVzRnJvbVBpZWNlcwgFCyR0MDQxNzU0MzI0Al8xBAxhY3Jlc0Zyb21SZXMIBQskdDA0MTc1NDMyNAJfMgQMYWNyZXNGcm9tTWF0CAULJHQwNDE3NTQzMjQCXzMEDWFjcmVzRnJvbVByb2QIBQskdDA0MTc1NDMyNAJfNAQRb2xkU3Rha2luZ0FkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEFFW9sZFN0YWtpbmdDb250cmFjdFN0cgQLZHVja0Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAJ0IAgURb2xkU3Rha2luZ0FkZHJlc3MJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFDnVzZXJBZGRyZXNzT3B0AgAECyR0MDQ1MDI0NzI0AwkBAiE9AgULZHVja0Fzc2V0SWQCAAkBDGFzVHVwbGUzSW50cwEJAPwHBAURb2xkU3Rha2luZ0FkZHJlc3MCE3Vuc3Rha2VEdWNrUkVBRE9OTFkJAMwIAgULZHVja0Fzc2V0SWQJAMwIAgUOdXNlckFkZHJlc3NPcHQFA25pbAUDbmlsCQCVCgMAAAAAAAAEEGFjcmVzRnJvbUR1Y2tSZXMIBQskdDA0NTAyNDcyNAJfMQQQYWNyZXNGcm9tRHVja01hdAgFCyR0MDQ1MDI0NzI0Al8yBBFhY3Jlc0Zyb21EdWNrUHJvZAgFCyR0MDQ1MDI0NzI0Al8zCQCUCgIFA25pbAkAzAgCCQCsAgICFSVzJWRfX3Vuc3Rha2VkQWNyZXNfXwkApAMBBQ11bnN0YWtlZEFjcmVzCQDMCAIJAKwCAgIUJXMlZF9fY2xhaW1lZEFjcmVzX18JAKQDAQUMY2xhaW1lZEFjcmVzCQDMCAIJAKwCAgIXJXMlZF9fYWNyZXNGcm9tUGllY2VzX18JAKQDAQUPYWNyZXNGcm9tUGllY2VzCQDMCAIJAKwCAgIUJXMlZF9fYWNyZXNGcm9tUmVzX18JAKQDAQUMYWNyZXNGcm9tUmVzCQDMCAIJAKwCAgIUJXMlZF9fYWNyZXNGcm9tTWF0X18JAKQDAQUMYWNyZXNGcm9tTWF0CQDMCAIJAKwCAgIVJXMlZF9fYWNyZXNGcm9tUHJvZF9fCQCkAwEFDWFjcmVzRnJvbVByb2QJAMwIAgkArAICAhglcyVkX19hY3Jlc0Zyb21EdWNrUmVzX18JAKQDAQUQYWNyZXNGcm9tRHVja1JlcwkAzAgCCQCsAgICGCVzJWRfX2FjcmVzRnJvbUR1Y2tNYXRfXwkApAMBBRBhY3Jlc0Zyb21EdWNrTWF0CQDMCAIJAKwCAgIZJXMlZF9fYWNyZXNGcm9tRHVja1Byb2RfXwkApAMBBRFhY3Jlc0Zyb21EdWNrUHJvZAUDbmlsAWkBEHdsZ1N0YXRzUkVBRE9OTFkBC3VzZXJBZGRyT3B0BAhjdXJTdGF0cwkBDGdldFdsZ1N0YXRzMgQFC3VzZXJBZGRyT3B0CQDMCAIFDXJlc3QyQ29udHJhY3QJAMwIAgUOYWNyZXMyQ29udHJhY3QJAMwIAgULd2xnQ29udHJhY3QJAMwIAgUScHV6emxlUG9vbENvbnRyYWN0CQDMCAIFEmludmVzdEZ1bmRDb250cmFjdAUDbmlsBQt1c2R0QXNzZXRJZAAACQCUCgIFA25pbAkAzAgCCQCsAgICESVzJWRfX3dsZ0Ftb3VudF9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFC2l4V2xnQW1vdW50CQDMCAIJAKwCAgIQJXMlZF9fd2xnUHJpY2VfXwkApAMBCQCRAwIFCGN1clN0YXRzBQppeFdsZ1ByaWNlCQDMCAIJAKwCAgIRJXMlZF9fdXNkdEZ1bmRzX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUKaXhXbGdGdW5kcwkAzAgCCQCsAgICFCVzJWRfX3VzZHRBY3Rpdml0eV9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFDWl4V2xnQWN0aXZpdHkJAMwIAgkArAICAhUlcyVkX191c2R0QXJiaXRyYWdlX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUOaXhXbGdBcmJpdHJhZ2UJAMwIAgkArAICAhAlcyVkX191c2R0UG9vbF9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFCWl4V2xnUG9vbAkAzAgCCQCsAgICFCVzJWRfX3dsZ0lzc3VlVGltZV9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFDml4V2xnSXNzdWVUaW1lCQDMCAIJAKwCAgIjJXMlZF9fd2xnTGFzdE1hcmtldGluZ1RlYW1BY3RUaW1lX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUUaXhXbGdMYXN0VGVhbUFjdFRpbWUJAMwIAgkArAICAhQlcyVkX193bGdUZWFtVG90YWxfXwkApAMBCQCRAwIFCGN1clN0YXRzBQ5peFdsZ1RlYW1Ub3RhbAkAzAgCCQCsAgICFSVzJWRfX3dsZ1RlYW1BbUxlZnRfXwkApAMBCQCRAwIFCGN1clN0YXRzBQ9peFdsZ1RlYW1BbUxlZnQJAMwIAgkArAICAhklcyVkX193bGdUZWFtQW1BdmFpbE5vd19fCQCkAwEJAJEDAgUIY3VyU3RhdHMFE2l4V2xnVGVhbUFtQXZhaWxOb3cJAMwIAgkArAICAhUlcyVkX193bGdUZWFtV2xnb2xkX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUPaXhXbGdUZWFtV2xnb2xkCQDMCAIJAKwCAgITJXMlZF9fd2xnQWN0VG90YWxfXwkApAMBCQCRAwIFCGN1clN0YXRzBQ1peFdsZ0FjdFRvdGFsCQDMCAIJAKwCAgIUJXMlZF9fd2xnQWN0QW1MZWZ0X18JAKQDAQkAkQMCBQhjdXJTdGF0cwUOaXhXbGdBY3RBbUxlZnQJAMwIAgkArAICAhglcyVkX193bGdBY3RBbUF2YWlsTm93X18JAKQDAQkAkQMCBQhjdXJTdGF0cwUSaXhXbGdBY3RBbUF2YWlsTm93CQDMCAIJAKwCAgIUJXMlZF9fd2xnQWN0V2xnb2xkX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUOaXhXbGdBY3RXbGdvbGQJAMwIAgkArAICAhQlcyVkX193bGdDdXJQZXJpb2RfXwkApAMBCQCRAwIFCGN1clN0YXRzBQ5peFdsZ0N1clBlcmlvZAkAzAgCCQCsAgICFiVzJWRfX3dsZ0FtTGVmdFRvdGFsX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUQaXhXbGdBbUxlZnRUb3RhbAkAzAgCCQCsAgICICVzJWRfX3dsZ0N1clBlcmlvZERpc3RyaWJ1dGlvbl9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFGml4V2xnQ3VyUGVyaW9kRGlzdHJpYnV0aW9uCQDMCAIJAKwCAgIXJXMlZF9fd2xnTGFzdFVzZXJUaW1lX18JAKQDAQkAkQMCBQhjdXJTdGF0cwURaXhXbGdMYXN0VXNlclRpbWUJAMwIAgkArAICAholcyVkX193bGdJbnZlc3RGdW5kVG90YWxfXwkApAMBCQCRAwIFCGN1clN0YXRzBRVpeFdsZ0ludmVzdEZ1bmRBbW91bnQJAMwIAgkArAICAhklcyVkX193bGdVc2VyQW1BdmFpbE5vd19fCQCkAwEJAJEDAgUIY3VyU3RhdHMFE2l4V2xnVXNlckFtQXZhaWxOb3cJAMwIAgkArAICAhYlcyVkX193bGdFZmZVc2VyVGltZV9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFEGl4V2xnRWZmVXNlclRpbWUFA25pbADFL1NE",
    "height": 3281265,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: G2mdREjNEm7rvRZHwiL82oYnhVh3Eu1rkoBAopBkocoS
Next: 6JuEiPzZyootpYM9dga1vmVKR1RJH9rJi1NMdBW4E5Qv

Diff: 
Old New Differences
299 299      let $t079119 = if ((lastUserPeriod == curPeriod))
300 300          then {
301 301              let a0 = fraction(curPeriodDistribution, (nowLimited - lastUserTime), YEAR_MILLIS)
302 -             let effTime = ((lastUserTime + nowLimited) - lastUserTime)
302 +             let effTime = nowLimited
303 303              $Tuple2(a0, effTime)
304 304              }
305 305          else if ((lastUserPeriod == (curPeriod - 1)))
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let SEP = "__"
5 5  
6 6  let chain = take(drop(this.bytes, 1), 1)
7 7  
8 8  let usdtAssetId = match chain {
9 9      case _ => 
10 10          if ((base58'2W' == $match0))
11 11              then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
12 12              else if ((base58'2T' == $match0))
13 13                  then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
14 14                  else throw("Unknown chain")
15 15  }
16 16  
17 17  let defaultRest2AddressStr = match chain {
18 18      case _ => 
19 19          if ((base58'2W' == $match0))
20 20              then "3PFwYta8biEz31zpeFe5DJK8wE5trSpQVF8"
21 21              else if ((base58'2T' == $match0))
22 22                  then "3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv"
23 23                  else throw("Unknown chain")
24 24  }
25 25  
26 26  let oldStakingContractStr = match chain {
27 27      case _ => 
28 28          if ((base58'2W' == $match0))
29 29              then "3PLncXtS1U83D6cQbFD3H8rBHPLgzxSFKZ1"
30 30              else if ((base58'2T' == $match0))
31 31                  then "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm"
32 32                  else throw("Unknown chain")
33 33  }
34 34  
35 35  func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
36 36  
37 37  
38 38  let IdxCfgAcres2Dapp = 1
39 39  
40 40  let IdxCfgWlgDapp = 2
41 41  
42 42  let IdxCfgPuzzlePoolDapp = 4
43 43  
44 44  let IdxCfgInvestFundDapp = 5
45 45  
46 46  func keyRestCfg () = "%s__restConfig"
47 47  
48 48  
49 49  func keyRest2Address () = "%s__rest2Addr"
50 50  
51 51  
52 52  func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
53 53  
54 54  
55 55  func getContractAddressOrFail (rest2Cfg,idx) = valueOrErrorMessage(addressFromString(rest2Cfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
56 56  
57 57  
58 58  let rest2Contract = addressFromStringValue(valueOrElse(getString(this, keyRest2Address()), defaultRest2AddressStr))
59 59  
60 60  let rest2Cfg = readRestCfgOrFail(rest2Contract)
61 61  
62 62  let acres2Contract = getContractAddressOrFail(rest2Cfg, IdxCfgAcres2Dapp)
63 63  
64 64  let wlgContract = getContractAddressOrFail(rest2Cfg, IdxCfgWlgDapp)
65 65  
66 66  let puzzlePoolContract = getContractAddressOrFail(rest2Cfg, IdxCfgPuzzlePoolDapp)
67 67  
68 68  let investFundContract = getContractAddressOrFail(rest2Cfg, IdxCfgInvestFundDapp)
69 69  
70 70  let oldAcresContractKey = "oldAcresContract"
71 71  
72 72  func keyLastTxIdByUser (addr) = ("lastTxIdByUser_" + addr)
73 73  
74 74  
75 75  let wlgAssetIdKey = "wlg_assetId"
76 76  
77 77  let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "WLGOLD is not issued yet")
78 78  
79 79  let acresAssetIdKey = "acresAssetId"
80 80  
81 81  let acresAssetId = valueOrErrorMessage(getBinary(acres2Contract, acresAssetIdKey), "ACRES is not issued yet")
82 82  
83 83  func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
84 84  
85 85  
86 86  func keyAddressToCustomName (addr) = ("accountCustomNameByAddr_" + addr)
87 87  
88 88  
89 89  func keyAddressRefBy (addr) = ("accRefBy_" + addr)
90 90  
91 91  
92 92  func keyAddressReferrals (addr) = ("accReferrals_" + addr)
93 93  
94 94  
95 95  func asTuple4Ints (val) = match val {
96 96      case t: (Int, Int, Int, Int) => 
97 97          t
98 98      case _ => 
99 99          throw("fail to cast into (Int, Int, Int, Int)")
100 100  }
101 101  
102 102  
103 103  func asTuple3Ints (val) = match val {
104 104      case t: (Int, Int, Int) => 
105 105          t
106 106      case _ => 
107 107          throw("fail to cast into (Int, Int, Int)")
108 108  }
109 109  
110 110  
111 111  func asTuple2Ints (val) = match val {
112 112      case t: (Int, Int) => 
113 113          t
114 114      case _ => 
115 115          throw("fail to cast into (Int, Int)")
116 116  }
117 117  
118 118  
119 119  let M6_ = 1000000
120 120  
121 121  let M8_ = 100000000
122 122  
123 123  let MILL6 = 100000000000000
124 124  
125 125  let TEAM_SHARE = 200000
126 126  
127 127  let ACTIVITY_SHARE = 100000
128 128  
129 129  let PLAYER_SHARE = 400000
130 130  
131 131  let YEAR_MILLIS = 31557600000
132 132  
133 133  let chn = take(drop(this.bytes, 1), 1)
134 134  
135 135  let USDT_TVL_CORR = match chn {
136 136      case _ => 
137 137          if ((base58'2W' == $match0))
138 138              then 1208630000
139 139              else if ((base58'2T' == $match0))
140 140                  then 0
141 141                  else throw("Unknown chain")
142 142  }
143 143  
144 144  let teamAdrKey = "teamAddr"
145 145  
146 146  let lastTeamTimKey = "lastClaimedTime_team"
147 147  
148 148  let teamAmtLeftKey = "teamAmountLeft"
149 149  
150 150  let lastActivitiesTimKey = "lastClaimedTime_activities"
151 151  
152 152  let actAmtLeftKey = "activitiesAmountLeft"
153 153  
154 154  let stakersAmtLeftKey = "stakersAmountLeft"
155 155  
156 156  func keyLastClaimTimeByUser (addr) = ("lastClaimedTimeUser_" + addr)
157 157  
158 158  
159 159  func distrByPeriod (period) = fraction(MILL6, (PLAYER_SHARE * (period + 1)), (6 * M6_))
160 160  
161 161  
162 162  let wlgIssueTimKey = "wlg_issueTime"
163 163  
164 164  let wlgIssuedAmtKey = "wlg_issuedAmount"
165 165  
166 166  let zbIssuedAmtKey = "zbill_issuedAmount"
167 167  
168 168  func keyAcresStakedAmtByUser (addr) = ("acresStakedAmountByUser_" + addr)
169 169  
170 170  
171 171  let acresStakdTotalKey = "acresStakedAmountTotal"
172 172  
173 173  let dapp2Rest = 0
174 174  
175 175  let dapp2Staking = 1
176 176  
177 177  let dapp2Wlg = 2
178 178  
179 179  let dapp2Puzzle = 3
180 180  
181 181  let dapp2InvestFund = 4
182 182  
183 183  let levels = [10, 20, 40, 80, 150, 250, 400, 700, 1000]
184 184  
185 185  func getLevelByAcres (acres) = {
186 186      let acr = (acres / M8_)
187 187      func checker (acc,item) =     if ((item > acr))
188 188          then acc
189 189          else (acc + 1)
190 190  
191 191      let idx = {
192 192          let $l = levels
193 193          let $s = size($l)
194 194          let $acc0 = 0
195 195          func $f0_1 ($a,$i) =         if (($i >= $s))
196 196              then $a
197 197              else checker($a, $l[$i])
198 198  
199 199          func $f0_2 ($a,$i) =         if (($i >= $s))
200 200              then $a
201 201              else throw("List size exceeds 10")
202 202  
203 203          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
204 204          }
205 205      (idx + 1)
206 206      }
207 207  
208 208  
209 209  func getFarmingPowerByAcres (acres) = ((acres * 20) * (getLevelByAcres(acres) + 4))
210 210  
211 211  
212 212  func getFarmingPowers (userAddrStrOrEmpty,stakingContract) = {
213 213      let totalAcres = valueOrElse(getInteger(stakingContract, acresStakdTotalKey), 0)
214 214      let totalFP = getFarmingPowerByAcres(totalAcres)
215 215      let userAcres = valueOrElse(getInteger(stakingContract, keyAcresStakedAmtByUser(userAddrStrOrEmpty)), 0)
216 216      let userFP = getFarmingPowerByAcres(userAcres)
217 217  [totalFP, userFP]
218 218      }
219 219  
220 220  
221 221  let idxTotalFP = 0
222 222  
223 223  let idxUserFP = 1
224 224  
225 225  let ixWlgAmount = 0
226 226  
227 227  let ixWlgPrice = 1
228 228  
229 229  let ixWlgFunds = 2
230 230  
231 231  let ixWlgActivity = 3
232 232  
233 233  let ixWlgArbitrage = 4
234 234  
235 235  let ixWlgPool = 5
236 236  
237 237  let ixWlgIssueTime = 6
238 238  
239 239  let ixWlgLastTeamActTime = 7
240 240  
241 241  let ixWlgTeamTotal = 8
242 242  
243 243  let ixWlgTeamAmLeft = 9
244 244  
245 245  let ixWlgTeamAmAvailNow = 10
246 246  
247 247  let ixWlgTeamWlgold = 11
248 248  
249 249  let ixWlgActTotal = 12
250 250  
251 251  let ixWlgActAmLeft = 13
252 252  
253 253  let ixWlgActAmAvailNow = 14
254 254  
255 255  let ixWlgActWlgold = 15
256 256  
257 257  let ixWlgCurPeriod = 16
258 258  
259 259  let ixWlgAmLeftTotal = 17
260 260  
261 261  let ixWlgCurPeriodDistribution = 18
262 262  
263 263  let ixWlgLastUserTime = 19
264 264  
265 265  let ixWlgInvestFundAmount = 20
266 266  
267 267  let ixWlgUserAmAvailNow = 21
268 268  
269 269  let ixWlgEffUserTime = 22
270 270  
271 271  func getWlgStats2 (userAddrOpt,contracts,usdtId,usdtBalanceCorrection) = {
272 272      let issuedAmount = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssuedAmtKey), "WLGOLD is not issued yet")
273 273      let restUsd = assetBalance(contracts[dapp2Rest], usdtId)
274 274      let wlgUsd = (assetBalance(contracts[dapp2Wlg], usdtId) - usdtBalanceCorrection)
275 275      let puzzleUsd = assetBalance(contracts[dapp2Puzzle], usdtId)
276 276      let investFndContract = contracts[dapp2InvestFund]
277 277      let investFundTotal = (assetBalance(investFndContract, usdtId) + valueOrElse(getInteger(investFndContract, zbIssuedAmtKey), 0))
278 278      let totalFundsUsd = (wlgUsd + investFundTotal)
279 279      let wlgId = valueOrErrorMessage(getBinary(contracts[dapp2Wlg], "wlg_assetId"), "Not initialized yet")
280 280      let now = lastBlock.timestamp
281 281      let issueTime = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssueTimKey), "Not initialized")
282 282      let teamTotal = fraction(MILL6, TEAM_SHARE, M6_)
283 283      let teamAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], teamAmtLeftKey), teamTotal)
284 284      let lastTeamTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastTeamTimKey), issueTime)
285 285      let teamAddr = addressFromStringValue(value(getString(contracts[dapp2Wlg], teamAdrKey)))
286 286      let teamAmountAvailableNow = min([fraction(teamTotal, (now - lastTeamTime), (3 * YEAR_MILLIS)), teamAmountLeft])
287 287      let teamWlgold = assetBalance(teamAddr, wlgId)
288 288      let actTotal = fraction(MILL6, ACTIVITY_SHARE, M6_)
289 289      let actAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], actAmtLeftKey), actTotal)
290 290      let lastActivitiesTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastActivitiesTimKey), issueTime)
291 291      let actAmountAvailableNow = min([fraction(actTotal, (now - lastActivitiesTime), (3 * YEAR_MILLIS)), actAmountLeft])
292 292      let actWlgold = assetBalance(contracts[dapp2Rest], wlgId)
293 293      let lastUserTime = valueOrElse(getInteger(contracts[dapp2Wlg], keyLastClaimTimeByUser(userAddrOpt)), issueTime)
294 294      let lastUserPeriod = ((lastUserTime - issueTime) / YEAR_MILLIS)
295 295      let nowLimited = min([now, (issueTime + (3 * YEAR_MILLIS))])
296 296      let curPeriod = min([((now - issueTime) / YEAR_MILLIS), 2])
297 297      let eff = getFarmingPowers(userAddrOpt, contracts[dapp2Staking])
298 298      let curPeriodDistribution = distrByPeriod(curPeriod)
299 299      let $t079119 = if ((lastUserPeriod == curPeriod))
300 300          then {
301 301              let a0 = fraction(curPeriodDistribution, (nowLimited - lastUserTime), YEAR_MILLIS)
302 -             let effTime = ((lastUserTime + nowLimited) - lastUserTime)
302 +             let effTime = nowLimited
303 303              $Tuple2(a0, effTime)
304 304              }
305 305          else if ((lastUserPeriod == (curPeriod - 1)))
306 306              then {
307 307                  let a1 = fraction(distrByPeriod((curPeriod - 1)), ((issueTime + (YEAR_MILLIS * curPeriod)) - lastUserTime), YEAR_MILLIS)
308 308                  let a0 = fraction(curPeriodDistribution, (nowLimited - (issueTime + (YEAR_MILLIS * curPeriod))), YEAR_MILLIS)
309 309                  let avail = (a1 + a0)
310 310                  let effTime = if ((a1 >= avail))
311 311                      then (lastUserTime + fraction(YEAR_MILLIS, avail, distrByPeriod((curPeriod - 1))))
312 312                      else ((issueTime + (YEAR_MILLIS * curPeriod)) + fraction(YEAR_MILLIS, (avail - a1), curPeriodDistribution))
313 313                  $Tuple2(avail, effTime)
314 314                  }
315 315              else {
316 316                  let a2 = fraction(distrByPeriod((curPeriod - 2)), ((issueTime + (YEAR_MILLIS * (curPeriod - 1))) - lastUserTime), YEAR_MILLIS)
317 317                  let a1 = distrByPeriod((curPeriod - 1))
318 318                  let a0 = fraction(curPeriodDistribution, (nowLimited - (issueTime + (YEAR_MILLIS * curPeriod))), YEAR_MILLIS)
319 319                  let avail = ((a2 + a1) + a0)
320 320                  let effTime = if ((a2 >= avail))
321 321                      then (lastUserTime + fraction(YEAR_MILLIS, avail, distrByPeriod((curPeriod - 2))))
322 322                      else if (((a2 + a1) >= avail))
323 323                          then ((issueTime + (YEAR_MILLIS * (curPeriod - 1))) + fraction(YEAR_MILLIS, (avail - a2), distrByPeriod((curPeriod - 1))))
324 324                          else ((issueTime + (YEAR_MILLIS * curPeriod)) + fraction(YEAR_MILLIS, ((avail - a2) - a1), curPeriodDistribution))
325 325                  $Tuple2(avail, effTime)
326 326                  }
327 327      let userAvailable = $t079119._1
328 328      let effLastTime = $t079119._2
329 329      let amountLeftTotal = valueOrElse(getInteger(contracts[dapp2Wlg], stakersAmtLeftKey), 0)
330 330      let unrobbedUser = if ((eff[idxTotalFP] != 0))
331 331          then fraction(userAvailable, eff[idxUserFP], eff[idxTotalFP])
332 332          else 0
333 333  [issuedAmount, fraction((totalFundsUsd - USDT_TVL_CORR), M8_, issuedAmount), totalFundsUsd, restUsd, wlgUsd, puzzleUsd, issueTime, lastTeamTime, teamTotal, teamAmountLeft, teamAmountAvailableNow, teamWlgold, actTotal, actAmountLeft, actAmountAvailableNow, actWlgold, curPeriod, amountLeftTotal, curPeriodDistribution, lastUserTime, investFundTotal, unrobbedUser, effLastTime]
334 334      }
335 335  
336 336  
337 337  func walletInternal (userAddressOpt) = {
338 338      let addr = addressFromString(userAddressOpt)
339 339      let balance = if (isDefined(addr))
340 340          then wavesBalance(value(addr))
341 341          else BalanceDetails(0, 0, 0, 0)
342 342      let wlgoldBalance = if (isDefined(addr))
343 343          then assetBalance(value(addr), wlgAssetId)
344 344          else 0
345 345      let customName = valueOrElse(getString(acres2Contract, keyAddressToCustomName(userAddressOpt)), userAddressOpt)
346 346      let refByKey = keyAddressRefBy(userAddressOpt)
347 347      let refBy = getString(acres2Contract, refByKey)
348 348      let refs = valueOrElse(getString(acres2Contract, keyAddressReferrals(userAddressOpt)), "")
349 349      let lastTxId = valueOrElse(getString(acres2Contract, keyLastTxIdByUser(userAddressOpt)), "")
350 350      let acresBalance = if (isDefined(addr))
351 351          then assetBalance(value(addr), acresAssetId)
352 352          else 0
353 353      let stakedAcres = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmtByUser(userAddressOpt)), 0)
354 354      let lvl = getLevelByAcres(acresBalance)
355 355  [("%s%s__customName__" + customName), ("%s%s__referredBy__" + valueOrElse(refBy, "")), ("%s%s__referrals__" + refs), ("%s%s__lastTxId__" + lastTxId), ("%s%d__wavesBalance__" + toString(balance.available)), ("%s%d__wlgoldBalance__" + toString(wlgoldBalance)), ("%s%d__acresBalance__" + toString(acresBalance)), ("%s%d__stakedAcres__" + toString(stakedAcres)), ("%s%d__currentLvl__" + toString(lvl))]
356 356      }
357 357  
358 358  
359 359  @Callable(i)
360 360  func constructorV1 (contracts) = if ((i.caller != this))
361 361      then throw("permissions denied")
362 362      else {
363 363          func descriptor (acc,ignoredItem) =         (acc + "%s")
364 364  
365 365          let descr = {
366 366              let $l = contracts
367 367              let $s = size($l)
368 368              let $acc0 = ""
369 369              func $f0_1 ($a,$i) =             if (($i >= $s))
370 370                  then $a
371 371                  else descriptor($a, $l[$i])
372 372  
373 373              func $f0_2 ($a,$i) =             if (($i >= $s))
374 374                  then $a
375 375                  else throw("List size exceeds 10")
376 376  
377 377              $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
378 378              }
379 379  [StringEntry(keyRestCfg(), makeString(descr :: contracts, SEP)), StringEntry(keyRest2Address(), toString(this))]
380 380          }
381 381  
382 382  
383 383  
384 384  @Callable(i)
385 385  func walletInfoREADONLY (userAddressOpt) = $Tuple2(nil, walletInternal(userAddressOpt))
386 386  
387 387  
388 388  
389 389  @Callable(i)
390 390  func conversionInfoREADONLY (userAddressOpt) = {
391 391      let oldAcresAddress = addressFromStringValue(getStringValue(acres2Contract, oldAcresContractKey))
392 392      let $t040504172 = asTuple2Ints(invoke(oldAcresAddress, "unstakeAllAcresREADONLY", [userAddressOpt], nil))
393 393      let unstakedAcres = $t040504172._1
394 394      let claimedAcres = $t040504172._2
395 395      let $t041754324 = asTuple4Ints(invoke(acres2Contract, "unstakeLandsREADONLY", [userAddressOpt], nil))
396 396      let acresFromPieces = $t041754324._1
397 397      let acresFromRes = $t041754324._2
398 398      let acresFromMat = $t041754324._3
399 399      let acresFromProd = $t041754324._4
400 400      let oldStakingAddress = addressFromStringValue(oldStakingContractStr)
401 401      let duckAssetId = valueOrElse(getString(oldStakingAddress, keyStakedDuckByOwner(userAddressOpt)), "")
402 402      let $t045024724 = if ((duckAssetId != ""))
403 403          then asTuple3Ints(invoke(oldStakingAddress, "unstakeDuckREADONLY", [duckAssetId, userAddressOpt], nil))
404 404          else $Tuple3(0, 0, 0)
405 405      let acresFromDuckRes = $t045024724._1
406 406      let acresFromDuckMat = $t045024724._2
407 407      let acresFromDuckProd = $t045024724._3
408 408      $Tuple2(nil, [("%s%d__unstakedAcres__" + toString(unstakedAcres)), ("%s%d__claimedAcres__" + toString(claimedAcres)), ("%s%d__acresFromPieces__" + toString(acresFromPieces)), ("%s%d__acresFromRes__" + toString(acresFromRes)), ("%s%d__acresFromMat__" + toString(acresFromMat)), ("%s%d__acresFromProd__" + toString(acresFromProd)), ("%s%d__acresFromDuckRes__" + toString(acresFromDuckRes)), ("%s%d__acresFromDuckMat__" + toString(acresFromDuckMat)), ("%s%d__acresFromDuckProd__" + toString(acresFromDuckProd))])
409 409      }
410 410  
411 411  
412 412  
413 413  @Callable(i)
414 414  func wlgStatsREADONLY (userAddrOpt) = {
415 415      let curStats = getWlgStats2(userAddrOpt, [rest2Contract, acres2Contract, wlgContract, puzzlePoolContract, investFundContract], usdtAssetId, 0)
416 416      $Tuple2(nil, [("%s%d__wlgAmount__" + toString(curStats[ixWlgAmount])), ("%s%d__wlgPrice__" + toString(curStats[ixWlgPrice])), ("%s%d__usdtFunds__" + toString(curStats[ixWlgFunds])), ("%s%d__usdtActivity__" + toString(curStats[ixWlgActivity])), ("%s%d__usdtArbitrage__" + toString(curStats[ixWlgArbitrage])), ("%s%d__usdtPool__" + toString(curStats[ixWlgPool])), ("%s%d__wlgIssueTime__" + toString(curStats[ixWlgIssueTime])), ("%s%d__wlgLastMarketingTeamActTime__" + toString(curStats[ixWlgLastTeamActTime])), ("%s%d__wlgTeamTotal__" + toString(curStats[ixWlgTeamTotal])), ("%s%d__wlgTeamAmLeft__" + toString(curStats[ixWlgTeamAmLeft])), ("%s%d__wlgTeamAmAvailNow__" + toString(curStats[ixWlgTeamAmAvailNow])), ("%s%d__wlgTeamWlgold__" + toString(curStats[ixWlgTeamWlgold])), ("%s%d__wlgActTotal__" + toString(curStats[ixWlgActTotal])), ("%s%d__wlgActAmLeft__" + toString(curStats[ixWlgActAmLeft])), ("%s%d__wlgActAmAvailNow__" + toString(curStats[ixWlgActAmAvailNow])), ("%s%d__wlgActWlgold__" + toString(curStats[ixWlgActWlgold])), ("%s%d__wlgCurPeriod__" + toString(curStats[ixWlgCurPeriod])), ("%s%d__wlgAmLeftTotal__" + toString(curStats[ixWlgAmLeftTotal])), ("%s%d__wlgCurPeriodDistribution__" + toString(curStats[ixWlgCurPeriodDistribution])), ("%s%d__wlgLastUserTime__" + toString(curStats[ixWlgLastUserTime])), ("%s%d__wlgInvestFundTotal__" + toString(curStats[ixWlgInvestFundAmount])), ("%s%d__wlgUserAmAvailNow__" + toString(curStats[ixWlgUserAmAvailNow])), ("%s%d__wlgEffUserTime__" + toString(curStats[ixWlgEffUserTime]))])
417 417      }
418 418  
419 419

Old	New		Differences
299	299		let $t079119 = if ((lastUserPeriod == curPeriod))
300	300		then {
301	301		let a0 = fraction(curPeriodDistribution, (nowLimited - lastUserTime), YEAR_MILLIS)
302		-	let effTime = ~~((lastUserTime +~~ nowLimited~~) - lastUserTime)~~
	302	+	let effTime = nowLimited
303	303		$Tuple2(a0, effTime)
304	304		}
305	305		else if ((lastUserPeriod == (curPeriod - 1)))

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let SEP = "__"
5	5
6	6		let chain = take(drop(this.bytes, 1), 1)
7	7
8	8		let usdtAssetId = match chain {
9	9		case _ =>
10	10		if ((base58'2W' == $match0))
11	11		then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
12	12		else if ((base58'2T' == $match0))
13	13		then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
14	14		else throw("Unknown chain")
15	15		}
16	16
17	17		let defaultRest2AddressStr = match chain {
18	18		case _ =>
19	19		if ((base58'2W' == $match0))
20	20		then "3PFwYta8biEz31zpeFe5DJK8wE5trSpQVF8"
21	21		else if ((base58'2T' == $match0))
22	22		then "3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv"
23	23		else throw("Unknown chain")
24	24		}
25	25
26	26		let oldStakingContractStr = match chain {
27	27		case _ =>
28	28		if ((base58'2W' == $match0))
29	29		then "3PLncXtS1U83D6cQbFD3H8rBHPLgzxSFKZ1"
30	30		else if ((base58'2T' == $match0))
31	31		then "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm"
32	32		else throw("Unknown chain")
33	33		}
34	34
35	35		func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
36	36
37	37
38	38		let IdxCfgAcres2Dapp = 1
39	39
40	40		let IdxCfgWlgDapp = 2
41	41
42	42		let IdxCfgPuzzlePoolDapp = 4
43	43
44	44		let IdxCfgInvestFundDapp = 5
45	45
46	46		func keyRestCfg () = "%s__restConfig"
47	47
48	48
49	49		func keyRest2Address () = "%s__rest2Addr"
50	50
51	51
52	52		func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
53	53
54	54
55	55		func getContractAddressOrFail (rest2Cfg,idx) = valueOrErrorMessage(addressFromString(rest2Cfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
56	56
57	57
58	58		let rest2Contract = addressFromStringValue(valueOrElse(getString(this, keyRest2Address()), defaultRest2AddressStr))
59	59
60	60		let rest2Cfg = readRestCfgOrFail(rest2Contract)
61	61
62	62		let acres2Contract = getContractAddressOrFail(rest2Cfg, IdxCfgAcres2Dapp)
63	63
64	64		let wlgContract = getContractAddressOrFail(rest2Cfg, IdxCfgWlgDapp)
65	65
66	66		let puzzlePoolContract = getContractAddressOrFail(rest2Cfg, IdxCfgPuzzlePoolDapp)
67	67
68	68		let investFundContract = getContractAddressOrFail(rest2Cfg, IdxCfgInvestFundDapp)
69	69
70	70		let oldAcresContractKey = "oldAcresContract"
71	71
72	72		func keyLastTxIdByUser (addr) = ("lastTxIdByUser_" + addr)
73	73
74	74
75	75		let wlgAssetIdKey = "wlg_assetId"
76	76
77	77		let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "WLGOLD is not issued yet")
78	78
79	79		let acresAssetIdKey = "acresAssetId"
80	80
81	81		let acresAssetId = valueOrErrorMessage(getBinary(acres2Contract, acresAssetIdKey), "ACRES is not issued yet")
82	82
83	83		func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
84	84
85	85
86	86		func keyAddressToCustomName (addr) = ("accountCustomNameByAddr_" + addr)
87	87
88	88
89	89		func keyAddressRefBy (addr) = ("accRefBy_" + addr)
90	90
91	91
92	92		func keyAddressReferrals (addr) = ("accReferrals_" + addr)
93	93
94	94
95	95		func asTuple4Ints (val) = match val {
96	96		case t: (Int, Int, Int, Int) =>
97	97		t
98	98		case _ =>
99	99		throw("fail to cast into (Int, Int, Int, Int)")
100	100		}
101	101
102	102
103	103		func asTuple3Ints (val) = match val {
104	104		case t: (Int, Int, Int) =>
105	105		t
106	106		case _ =>
107	107		throw("fail to cast into (Int, Int, Int)")
108	108		}
109	109
110	110
111	111		func asTuple2Ints (val) = match val {
112	112		case t: (Int, Int) =>
113	113		t
114	114		case _ =>
115	115		throw("fail to cast into (Int, Int)")
116	116		}
117	117
118	118
119	119		let M6_ = 1000000
120	120
121	121		let M8_ = 100000000
122	122
123	123		let MILL6 = 100000000000000
124	124
125	125		let TEAM_SHARE = 200000
126	126
127	127		let ACTIVITY_SHARE = 100000
128	128
129	129		let PLAYER_SHARE = 400000
130	130
131	131		let YEAR_MILLIS = 31557600000
132	132
133	133		let chn = take(drop(this.bytes, 1), 1)
134	134
135	135		let USDT_TVL_CORR = match chn {
136	136		case _ =>
137	137		if ((base58'2W' == $match0))
138	138		then 1208630000
139	139		else if ((base58'2T' == $match0))
140	140		then 0
141	141		else throw("Unknown chain")
142	142		}
143	143
144	144		let teamAdrKey = "teamAddr"
145	145
146	146		let lastTeamTimKey = "lastClaimedTime_team"
147	147
148	148		let teamAmtLeftKey = "teamAmountLeft"
149	149
150	150		let lastActivitiesTimKey = "lastClaimedTime_activities"
151	151
152	152		let actAmtLeftKey = "activitiesAmountLeft"
153	153
154	154		let stakersAmtLeftKey = "stakersAmountLeft"
155	155
156	156		func keyLastClaimTimeByUser (addr) = ("lastClaimedTimeUser_" + addr)
157	157
158	158
159	159		func distrByPeriod (period) = fraction(MILL6, (PLAYER_SHARE * (period + 1)), (6 * M6_))
160	160
161	161
162	162		let wlgIssueTimKey = "wlg_issueTime"
163	163
164	164		let wlgIssuedAmtKey = "wlg_issuedAmount"
165	165
166	166		let zbIssuedAmtKey = "zbill_issuedAmount"
167	167
168	168		func keyAcresStakedAmtByUser (addr) = ("acresStakedAmountByUser_" + addr)
169	169
170	170
171	171		let acresStakdTotalKey = "acresStakedAmountTotal"
172	172
173	173		let dapp2Rest = 0
174	174
175	175		let dapp2Staking = 1
176	176
177	177		let dapp2Wlg = 2
178	178
179	179		let dapp2Puzzle = 3
180	180
181	181		let dapp2InvestFund = 4
182	182
183	183		let levels = [10, 20, 40, 80, 150, 250, 400, 700, 1000]
184	184
185	185		func getLevelByAcres (acres) = {
186	186		let acr = (acres / M8_)
187	187		func checker (acc,item) = if ((item > acr))
188	188		then acc
189	189		else (acc + 1)
190	190
191	191		let idx = {
192	192		let $l = levels
193	193		let $s = size($l)
194	194		let $acc0 = 0
195	195		func $f0_1 ($a,$i) = if (($i >= $s))
196	196		then $a
197	197		else checker($a, $l[$i])
198	198
199	199		func $f0_2 ($a,$i) = if (($i >= $s))
200	200		then $a
201	201		else throw("List size exceeds 10")
202	202
203	203		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
204	204		}
205	205		(idx + 1)
206	206		}
207	207
208	208
209	209		func getFarmingPowerByAcres (acres) = ((acres * 20) * (getLevelByAcres(acres) + 4))
210	210
211	211
212	212		func getFarmingPowers (userAddrStrOrEmpty,stakingContract) = {
213	213		let totalAcres = valueOrElse(getInteger(stakingContract, acresStakdTotalKey), 0)
214	214		let totalFP = getFarmingPowerByAcres(totalAcres)
215	215		let userAcres = valueOrElse(getInteger(stakingContract, keyAcresStakedAmtByUser(userAddrStrOrEmpty)), 0)
216	216		let userFP = getFarmingPowerByAcres(userAcres)
217	217		[totalFP, userFP]
218	218		}
219	219
220	220
221	221		let idxTotalFP = 0
222	222
223	223		let idxUserFP = 1
224	224
225	225		let ixWlgAmount = 0
226	226
227	227		let ixWlgPrice = 1
228	228
229	229		let ixWlgFunds = 2
230	230
231	231		let ixWlgActivity = 3
232	232
233	233		let ixWlgArbitrage = 4
234	234
235	235		let ixWlgPool = 5
236	236
237	237		let ixWlgIssueTime = 6
238	238
239	239		let ixWlgLastTeamActTime = 7
240	240
241	241		let ixWlgTeamTotal = 8
242	242
243	243		let ixWlgTeamAmLeft = 9
244	244
245	245		let ixWlgTeamAmAvailNow = 10
246	246
247	247		let ixWlgTeamWlgold = 11
248	248
249	249		let ixWlgActTotal = 12
250	250
251	251		let ixWlgActAmLeft = 13
252	252
253	253		let ixWlgActAmAvailNow = 14
254	254
255	255		let ixWlgActWlgold = 15
256	256
257	257		let ixWlgCurPeriod = 16
258	258
259	259		let ixWlgAmLeftTotal = 17
260	260
261	261		let ixWlgCurPeriodDistribution = 18
262	262
263	263		let ixWlgLastUserTime = 19
264	264
265	265		let ixWlgInvestFundAmount = 20
266	266
267	267		let ixWlgUserAmAvailNow = 21
268	268
269	269		let ixWlgEffUserTime = 22
270	270
271	271		func getWlgStats2 (userAddrOpt,contracts,usdtId,usdtBalanceCorrection) = {
272	272		let issuedAmount = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssuedAmtKey), "WLGOLD is not issued yet")
273	273		let restUsd = assetBalance(contracts[dapp2Rest], usdtId)
274	274		let wlgUsd = (assetBalance(contracts[dapp2Wlg], usdtId) - usdtBalanceCorrection)
275	275		let puzzleUsd = assetBalance(contracts[dapp2Puzzle], usdtId)
276	276		let investFndContract = contracts[dapp2InvestFund]
277	277		let investFundTotal = (assetBalance(investFndContract, usdtId) + valueOrElse(getInteger(investFndContract, zbIssuedAmtKey), 0))
278	278		let totalFundsUsd = (wlgUsd + investFundTotal)
279	279		let wlgId = valueOrErrorMessage(getBinary(contracts[dapp2Wlg], "wlg_assetId"), "Not initialized yet")
280	280		let now = lastBlock.timestamp
281	281		let issueTime = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssueTimKey), "Not initialized")
282	282		let teamTotal = fraction(MILL6, TEAM_SHARE, M6_)
283	283		let teamAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], teamAmtLeftKey), teamTotal)
284	284		let lastTeamTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastTeamTimKey), issueTime)
285	285		let teamAddr = addressFromStringValue(value(getString(contracts[dapp2Wlg], teamAdrKey)))
286	286		let teamAmountAvailableNow = min([fraction(teamTotal, (now - lastTeamTime), (3 * YEAR_MILLIS)), teamAmountLeft])
287	287		let teamWlgold = assetBalance(teamAddr, wlgId)
288	288		let actTotal = fraction(MILL6, ACTIVITY_SHARE, M6_)
289	289		let actAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], actAmtLeftKey), actTotal)
290	290		let lastActivitiesTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastActivitiesTimKey), issueTime)
291	291		let actAmountAvailableNow = min([fraction(actTotal, (now - lastActivitiesTime), (3 * YEAR_MILLIS)), actAmountLeft])
292	292		let actWlgold = assetBalance(contracts[dapp2Rest], wlgId)
293	293		let lastUserTime = valueOrElse(getInteger(contracts[dapp2Wlg], keyLastClaimTimeByUser(userAddrOpt)), issueTime)
294	294		let lastUserPeriod = ((lastUserTime - issueTime) / YEAR_MILLIS)
295	295		let nowLimited = min([now, (issueTime + (3 * YEAR_MILLIS))])
296	296		let curPeriod = min([((now - issueTime) / YEAR_MILLIS), 2])
297	297		let eff = getFarmingPowers(userAddrOpt, contracts[dapp2Staking])
298	298		let curPeriodDistribution = distrByPeriod(curPeriod)
299	299		let $t079119 = if ((lastUserPeriod == curPeriod))
300	300		then {
301	301		let a0 = fraction(curPeriodDistribution, (nowLimited - lastUserTime), YEAR_MILLIS)
302		-	let effTime = ~~((lastUserTime +~~ nowLimited~~) - lastUserTime)~~
	302	+	let effTime = nowLimited
303	303		$Tuple2(a0, effTime)
304	304		}
305	305		else if ((lastUserPeriod == (curPeriod - 1)))
306	306		then {
307	307		let a1 = fraction(distrByPeriod((curPeriod - 1)), ((issueTime + (YEAR_MILLIS * curPeriod)) - lastUserTime), YEAR_MILLIS)
308	308		let a0 = fraction(curPeriodDistribution, (nowLimited - (issueTime + (YEAR_MILLIS * curPeriod))), YEAR_MILLIS)
309	309		let avail = (a1 + a0)
310	310		let effTime = if ((a1 >= avail))
311	311		then (lastUserTime + fraction(YEAR_MILLIS, avail, distrByPeriod((curPeriod - 1))))
312	312		else ((issueTime + (YEAR_MILLIS * curPeriod)) + fraction(YEAR_MILLIS, (avail - a1), curPeriodDistribution))
313	313		$Tuple2(avail, effTime)
314	314		}
315	315		else {
316	316		let a2 = fraction(distrByPeriod((curPeriod - 2)), ((issueTime + (YEAR_MILLIS * (curPeriod - 1))) - lastUserTime), YEAR_MILLIS)
317	317		let a1 = distrByPeriod((curPeriod - 1))
318	318		let a0 = fraction(curPeriodDistribution, (nowLimited - (issueTime + (YEAR_MILLIS * curPeriod))), YEAR_MILLIS)
319	319		let avail = ((a2 + a1) + a0)
320	320		let effTime = if ((a2 >= avail))
321	321		then (lastUserTime + fraction(YEAR_MILLIS, avail, distrByPeriod((curPeriod - 2))))
322	322		else if (((a2 + a1) >= avail))
323	323		then ((issueTime + (YEAR_MILLIS * (curPeriod - 1))) + fraction(YEAR_MILLIS, (avail - a2), distrByPeriod((curPeriod - 1))))
324	324		else ((issueTime + (YEAR_MILLIS * curPeriod)) + fraction(YEAR_MILLIS, ((avail - a2) - a1), curPeriodDistribution))
325	325		$Tuple2(avail, effTime)
326	326		}
327	327		let userAvailable = $t079119._1
328	328		let effLastTime = $t079119._2
329	329		let amountLeftTotal = valueOrElse(getInteger(contracts[dapp2Wlg], stakersAmtLeftKey), 0)
330	330		let unrobbedUser = if ((eff[idxTotalFP] != 0))
331	331		then fraction(userAvailable, eff[idxUserFP], eff[idxTotalFP])
332	332		else 0
333	333		[issuedAmount, fraction((totalFundsUsd - USDT_TVL_CORR), M8_, issuedAmount), totalFundsUsd, restUsd, wlgUsd, puzzleUsd, issueTime, lastTeamTime, teamTotal, teamAmountLeft, teamAmountAvailableNow, teamWlgold, actTotal, actAmountLeft, actAmountAvailableNow, actWlgold, curPeriod, amountLeftTotal, curPeriodDistribution, lastUserTime, investFundTotal, unrobbedUser, effLastTime]
334	334		}
335	335
336	336
337	337		func walletInternal (userAddressOpt) = {
338	338		let addr = addressFromString(userAddressOpt)
339	339		let balance = if (isDefined(addr))
340	340		then wavesBalance(value(addr))
341	341		else BalanceDetails(0, 0, 0, 0)
342	342		let wlgoldBalance = if (isDefined(addr))
343	343		then assetBalance(value(addr), wlgAssetId)
344	344		else 0
345	345		let customName = valueOrElse(getString(acres2Contract, keyAddressToCustomName(userAddressOpt)), userAddressOpt)
346	346		let refByKey = keyAddressRefBy(userAddressOpt)
347	347		let refBy = getString(acres2Contract, refByKey)
348	348		let refs = valueOrElse(getString(acres2Contract, keyAddressReferrals(userAddressOpt)), "")
349	349		let lastTxId = valueOrElse(getString(acres2Contract, keyLastTxIdByUser(userAddressOpt)), "")
350	350		let acresBalance = if (isDefined(addr))
351	351		then assetBalance(value(addr), acresAssetId)
352	352		else 0
353	353		let stakedAcres = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmtByUser(userAddressOpt)), 0)
354	354		let lvl = getLevelByAcres(acresBalance)
355	355		[("%s%s__customName__" + customName), ("%s%s__referredBy__" + valueOrElse(refBy, "")), ("%s%s__referrals__" + refs), ("%s%s__lastTxId__" + lastTxId), ("%s%d__wavesBalance__" + toString(balance.available)), ("%s%d__wlgoldBalance__" + toString(wlgoldBalance)), ("%s%d__acresBalance__" + toString(acresBalance)), ("%s%d__stakedAcres__" + toString(stakedAcres)), ("%s%d__currentLvl__" + toString(lvl))]
356	356		}
357	357
358	358
359	359		@Callable(i)
360	360		func constructorV1 (contracts) = if ((i.caller != this))
361	361		then throw("permissions denied")
362	362		else {
363	363		func descriptor (acc,ignoredItem) = (acc + "%s")
364	364
365	365		let descr = {
366	366		let $l = contracts
367	367		let $s = size($l)
368	368		let $acc0 = ""
369	369		func $f0_1 ($a,$i) = if (($i >= $s))
370	370		then $a
371	371		else descriptor($a, $l[$i])
372	372
373	373		func $f0_2 ($a,$i) = if (($i >= $s))
374	374		then $a
375	375		else throw("List size exceeds 10")
376	376
377	377		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
378	378		}
379	379		[StringEntry(keyRestCfg(), makeString(descr :: contracts, SEP)), StringEntry(keyRest2Address(), toString(this))]
380	380		}
381	381
382	382
383	383
384	384		@Callable(i)
385	385		func walletInfoREADONLY (userAddressOpt) = $Tuple2(nil, walletInternal(userAddressOpt))
386	386
387	387
388	388
389	389		@Callable(i)
390	390		func conversionInfoREADONLY (userAddressOpt) = {
391	391		let oldAcresAddress = addressFromStringValue(getStringValue(acres2Contract, oldAcresContractKey))
392	392		let $t040504172 = asTuple2Ints(invoke(oldAcresAddress, "unstakeAllAcresREADONLY", [userAddressOpt], nil))
393	393		let unstakedAcres = $t040504172._1
394	394		let claimedAcres = $t040504172._2
395	395		let $t041754324 = asTuple4Ints(invoke(acres2Contract, "unstakeLandsREADONLY", [userAddressOpt], nil))
396	396		let acresFromPieces = $t041754324._1
397	397		let acresFromRes = $t041754324._2
398	398		let acresFromMat = $t041754324._3
399	399		let acresFromProd = $t041754324._4
400	400		let oldStakingAddress = addressFromStringValue(oldStakingContractStr)
401	401		let duckAssetId = valueOrElse(getString(oldStakingAddress, keyStakedDuckByOwner(userAddressOpt)), "")
402	402		let $t045024724 = if ((duckAssetId != ""))
403	403		then asTuple3Ints(invoke(oldStakingAddress, "unstakeDuckREADONLY", [duckAssetId, userAddressOpt], nil))
404	404		else $Tuple3(0, 0, 0)
405	405		let acresFromDuckRes = $t045024724._1
406	406		let acresFromDuckMat = $t045024724._2
407	407		let acresFromDuckProd = $t045024724._3
408	408		$Tuple2(nil, [("%s%d__unstakedAcres__" + toString(unstakedAcres)), ("%s%d__claimedAcres__" + toString(claimedAcres)), ("%s%d__acresFromPieces__" + toString(acresFromPieces)), ("%s%d__acresFromRes__" + toString(acresFromRes)), ("%s%d__acresFromMat__" + toString(acresFromMat)), ("%s%d__acresFromProd__" + toString(acresFromProd)), ("%s%d__acresFromDuckRes__" + toString(acresFromDuckRes)), ("%s%d__acresFromDuckMat__" + toString(acresFromDuckMat)), ("%s%d__acresFromDuckProd__" + toString(acresFromDuckProd))])
409	409		}
410	410
411	411
412	412
413	413		@Callable(i)
414	414		func wlgStatsREADONLY (userAddrOpt) = {
415	415		let curStats = getWlgStats2(userAddrOpt, [rest2Contract, acres2Contract, wlgContract, puzzlePoolContract, investFundContract], usdtAssetId, 0)
416	416		$Tuple2(nil, [("%s%d__wlgAmount__" + toString(curStats[ixWlgAmount])), ("%s%d__wlgPrice__" + toString(curStats[ixWlgPrice])), ("%s%d__usdtFunds__" + toString(curStats[ixWlgFunds])), ("%s%d__usdtActivity__" + toString(curStats[ixWlgActivity])), ("%s%d__usdtArbitrage__" + toString(curStats[ixWlgArbitrage])), ("%s%d__usdtPool__" + toString(curStats[ixWlgPool])), ("%s%d__wlgIssueTime__" + toString(curStats[ixWlgIssueTime])), ("%s%d__wlgLastMarketingTeamActTime__" + toString(curStats[ixWlgLastTeamActTime])), ("%s%d__wlgTeamTotal__" + toString(curStats[ixWlgTeamTotal])), ("%s%d__wlgTeamAmLeft__" + toString(curStats[ixWlgTeamAmLeft])), ("%s%d__wlgTeamAmAvailNow__" + toString(curStats[ixWlgTeamAmAvailNow])), ("%s%d__wlgTeamWlgold__" + toString(curStats[ixWlgTeamWlgold])), ("%s%d__wlgActTotal__" + toString(curStats[ixWlgActTotal])), ("%s%d__wlgActAmLeft__" + toString(curStats[ixWlgActAmLeft])), ("%s%d__wlgActAmAvailNow__" + toString(curStats[ixWlgActAmAvailNow])), ("%s%d__wlgActWlgold__" + toString(curStats[ixWlgActWlgold])), ("%s%d__wlgCurPeriod__" + toString(curStats[ixWlgCurPeriod])), ("%s%d__wlgAmLeftTotal__" + toString(curStats[ixWlgAmLeftTotal])), ("%s%d__wlgCurPeriodDistribution__" + toString(curStats[ixWlgCurPeriodDistribution])), ("%s%d__wlgLastUserTime__" + toString(curStats[ixWlgLastUserTime])), ("%s%d__wlgInvestFundTotal__" + toString(curStats[ixWlgInvestFundAmount])), ("%s%d__wlgUserAmAvailNow__" + toString(curStats[ixWlgUserAmAvailNow])), ("%s%d__wlgEffUserTime__" + toString(curStats[ixWlgEffUserTime]))])
417	417		}
418	418
419	419

github/deemru/w8io/169f3d6 
49.46 ms ◑