tx · AQ42qYw3JN3qQkhy297wznzjmWJnS9UxRddN7SARwJNg

3Mx9259DXd7MFiAw294TvP3QkBPbUjkB3sP:  -0.01200000 Waves

2022.09.20 11:29 [2237223] smart account 3Mx9259DXd7MFiAw294TvP3QkBPbUjkB3sP > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "AQ42qYw3JN3qQkhy297wznzjmWJnS9UxRddN7SARwJNg",
    "fee": 1200000,
    "feeAssetId": null,
    "timestamp": 1663662528526,
    "version": 2,
    "chainId": 84,
    "sender": "3Mx9259DXd7MFiAw294TvP3QkBPbUjkB3sP",
    "senderPublicKey": "8FvcW5FVcnWjYSA4vjLsRR8hhEQMbCQykv8mCYVa8MRy",
    "proofs": [
        "44rt8p97DgmF5GRTQSRwTTTKo5u9tbWDbipaCgW6V4CqdK3XUxCABWnC6oZVh8L269c4vdapAiGKXQQskTQoDsQe",
        "51GrbvpkbtNoQ1Q8WSVedXY3uHwoDZZncKwfBPgChWY58TdfZZ8VMmV47gv544nYCRQPmzBvmikChaDicHEaoscv"
    ],
    "script": "base64:BgITCAISABIECgIIARIDCgEIEgASACMAB2tBY3RpdmUCBmFjdGl2ZQAGa0NhdXNlAg5zaHV0ZG93bl9jYXVzZQAWa0xhc3RQb29sVG9rZW5JbnRlcmVzdAITX3Bvb2xfbGFzdF9pbnRlcmVzdAARa1VzZXJMYXN0SW50ZXJlc3QCE191c2VyX2xhc3RfaW50ZXJlc3QAE2tVc2VyQ2xhaW1BdmFpbGFibGUCGF91c2VyX2F2YWlsYWJsZV90b19jbGFpbQAWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAIUX3NoYXJlX3Rva2Vuc19sb2NrZWQAEmtTaGFyZVRva2Vuc0xvY2tlZAIaX3RvdGFsX3NoYXJlX3Rva2Vuc19sb2NrZWQAC2tPcmFjbGVQb29sAgVwb29sXwANa1Bvb2xBc3NldElkcwIJYXNzZXRfaWRzAA1rQWRtaW5QdWJLZXkxAgthZG1pbl9wdWJfMQANa0FkbWluUHViS2V5MgILYWRtaW5fcHViXzIADWtBZG1pblB1YktleTMCC2FkbWluX3B1Yl8zAAxrRmFybWluZ0FkZHICD2Zhcm1pbmdfYWRkcmVzcwAQa01vbmV5Qm94QWRkcmVzcwIRbW9uZXlfYm94X2FkZHJlc3MACnNjYWxlVmFsdWUAgMLXLwAGb3JhY2xlCQEHQWRkcmVzcwEBGgFU6UWqHpAvOq7xug7mLpqSXxqYhOHzYrMIARNnZXRCYXNlNThGcm9tT3JhY2xlAQNrZXkEByRtYXRjaDAJAJ0IAgUGb3JhY2xlBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAZzdHJpbmcFByRtYXRjaDAJANkEAQUGc3RyaW5nBAdub3RoaW5nBQckbWF0Y2gwCQACAQkArAICBQNrZXkCCGlzIGVtcHR5AAxhZG1pblB1YktleTEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUNa0FkbWluUHViS2V5MQAMYWRtaW5QdWJLZXkyCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDWtBZG1pblB1YktleTIADGFkbWluUHViS2V5MwkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQ1rQWRtaW5QdWJLZXkzAAtmYXJtaW5nQWRkcgkBB0FkZHJlc3MBCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDGtGYXJtaW5nQWRkcgAPbW9uZXlCb3hBZGRyZXNzCQEHQWRkcmVzcwEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUQa01vbmV5Qm94QWRkcmVzcwAGYWN0aXZlCQELdmFsdWVPckVsc2UCCQCbCAIFBHRoaXMFB2tBY3RpdmUGAQhpc0FjdGl2ZQADBQZhY3RpdmUFBHVuaXQJAAIBAh9EQXBwIGlzIGluYWN0aXZlIGF0IHRoaXMgbW9tZW50AQppc1Bvb2xDYWxsAQZjYWxsZXIDCQEJaXNEZWZpbmVkAQkAnQgCBQZvcmFjbGUJAKwCAgULa09yYWNsZVBvb2wJAKUIAQUGY2FsbGVyBQR1bml0CQACAQIgT25seSBwb29sIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24BDWlzRmFybWluZ0NhbGwBBmNhbGxlcgMJAAACBQZjYWxsZXIFC2Zhcm1pbmdBZGRyBQR1bml0CQACAQIjT25seSBmYXJtaW5nIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24BB3N1c3BlbmQBBWNhdXNlCQDMCAIJAQxCb29sZWFuRW50cnkCBQdrQWN0aXZlBwkAzAgCCQELU3RyaW5nRW50cnkCBQZrQ2F1c2UFBWNhdXNlBQNuaWwBGGdldFVzZXJTaGFyZVRva2Vuc0xvY2tlZAIEcG9vbAt1c2VyQWRkcmVzcwkBC3ZhbHVlT3JFbHNlAgkAmggCBQtmYXJtaW5nQWRkcgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwULdXNlckFkZHJlc3MFFmtVc2VyU2hhcmVUb2tlbnNMb2NrZWQAAAEZZ2V0VG90YWxTaGFyZVRva2Vuc0xvY2tlZAEEcG9vbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQtmYXJtaW5nQWRkcgkArAICBQRwb29sBRJrU2hhcmVUb2tlbnNMb2NrZWQAAAETZ2V0VXNlckxhc3RJbnRlcmVzdAMEdXNlcgRwb29sB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FBHBvb2wCAV8FB2Fzc2V0SWQFEWtVc2VyTGFzdEludGVyZXN0AAABGGdldFBvb2xUb2tlbkxhc3RJbnRlcmVzdAIEcG9vbAdhc3NldElkCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FB2Fzc2V0SWQFFmtMYXN0UG9vbFRva2VuSW50ZXJlc3QAAAEVZ2V0VXNlckNsYWltQXZhaWxhYmxlAwR1c2VyBHBvb2wHYXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUEdXNlcgIBXwUEcG9vbAIBXwUHYXNzZXRJZAUTa1VzZXJDbGFpbUF2YWlsYWJsZQAAAQ1nZXRTdHJBc3NldElkAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAmlkBQckbWF0Y2gwCQDYBAEFAmlkAwkAAQIFByRtYXRjaDACBFVuaXQEBXdhdmVzBQckbWF0Y2gwAgVXQVZFUwkAAgECC01hdGNoIGVycm9yAQ9jYWxjQ2xhaW1BbW91bnQDBHBvb2wHYXNzZXRJZAR1c2VyBAxsYXN0SW50ZXJlc3QJARhnZXRQb29sVG9rZW5MYXN0SW50ZXJlc3QCBQRwb29sBQdhc3NldElkBBB1c2VyTGFzdEludGVyZXN0CQETZ2V0VXNlckxhc3RJbnRlcmVzdAMFBHVzZXIFBHBvb2wFB2Fzc2V0SWQEFXVzZXJTaGFyZVRva2Vuc0xvY2tlZAkBGGdldFVzZXJTaGFyZVRva2Vuc0xvY2tlZAIFBHBvb2wFBHVzZXIEEnVzZXJDbGFpbUF2YWlsYWJsZQkBFWdldFVzZXJDbGFpbUF2YWlsYWJsZQMFBHVzZXIFBHBvb2wFB2Fzc2V0SWQEFW5ld1VzZXJDbGFpbUF2YWlsYWJsZQkAawMFFXVzZXJTaGFyZVRva2Vuc0xvY2tlZAkAZQIFDGxhc3RJbnRlcmVzdAUQdXNlckxhc3RJbnRlcmVzdAUKc2NhbGVWYWx1ZQkAlAoCCQBkAgUSdXNlckNsYWltQXZhaWxhYmxlBRVuZXdVc2VyQ2xhaW1BdmFpbGFibGUFDGxhc3RJbnRlcmVzdAEXY2FsY0NsYWltQW1vdW50RXZhbHVhdGUCBHBvb2wEdXNlcgQIcG9vbEFkZHIJAQdBZGRyZXNzAQkA2QQBBQRwb29sBAhhc3NldElkcwkAtQkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFDWtQb29sQXNzZXRJZHMCFkNhbid0IGZpbmQgcG9vbCBhc3NldHMCASwKARBjYWxjQ2xhaW1BbW91bnRzAgNhY2MHYXNzZXRJZAQLJHQwMzQ0NTM1MTUJAQ9jYWxjQ2xhaW1BbW91bnQDBQRwb29sBQdhc3NldElkBQR1c2VyBAtjbGFpbUFtb3VudAgFCyR0MDM0NDUzNTE1Al8xBAxsYXN0SW50ZXJlc3QIBQskdDAzNDQ1MzUxNQJfMgkAzQgCBQNhY2MJAMwIAgULY2xhaW1BbW91bnQFA25pbAQMY2xhaW1BbW91bnRzCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARBjYWxjQ2xhaW1BbW91bnRzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwkAlAoCBQhhc3NldElkcwUMY2xhaW1BbW91bnRzBQFpAQdhaXJEcm9wAAkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAkBC3ZhbHVlT3JFbHNlAgkBCmlzUG9vbENhbGwBCAUBaQZjYWxsZXIECyR0MDM3MjgzODAzCQCUCgIICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQECXBtdEFtb3VudAgFCyR0MDM3MjgzODAzAl8xBApwbXRBc3NldElkCAULJHQwMzcyODM4MDMCXzIEBHBvb2wJAKUIAQgFAWkGY2FsbGVyBBZ0b3RhbFNoYXJlVG9rZW5zTG9ja2VkCQEZZ2V0VG90YWxTaGFyZVRva2Vuc0xvY2tlZAEFBHBvb2wDCQAAAgUWdG90YWxTaGFyZVRva2Vuc0xvY2tlZAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD21vbmV5Qm94QWRkcmVzcwUJcG10QW1vdW50BQpwbXRBc3NldElkBQNuaWwEDGxhc3RJbnRlcmVzdAkBGGdldFBvb2xUb2tlbkxhc3RJbnRlcmVzdAIFBHBvb2wJAQ1nZXRTdHJBc3NldElkAQUKcG10QXNzZXRJZAQLaW50ZXJlc3ROZXcJAGQCBQxsYXN0SW50ZXJlc3QDCQBmAgUJcG10QW1vdW50AAAJAGsDBQlwbXRBbW91bnQFCnNjYWxlVmFsdWUFFnRvdGFsU2hhcmVUb2tlbnNMb2NrZWQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwkBDWdldFN0ckFzc2V0SWQBBQpwbXRBc3NldElkBRZrTGFzdFBvb2xUb2tlbkludGVyZXN0BQtpbnRlcmVzdE5ldwUDbmlsAWkBEnVwZGF0ZVVzZXJJbnRlcmVzdAIEcG9vbBhuZXdVc2VyU2hhcmVUb2tlbnNMb2NrZWQJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAJAQt2YWx1ZU9yRWxzZQIJAQ1pc0Zhcm1pbmdDYWxsAQgFAWkGY2FsbGVyBAhwb29sQWRkcgkBB0FkZHJlc3MBCQDZBAEFBHBvb2wEBHVzZXIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAhhc3NldElkcwkAtQkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFDWtQb29sQXNzZXRJZHMCFkNhbid0IGZpbmQgcG9vbCBhc3NldHMCASwKASdjYWxjTmV3VXNlckludGVyZXN0QW5kQ2xhaW1BbW91bnRFdHJpZXMCA2FjYwdhc3NldElkBAskdDA0NzgwNDg1MAkBD2NhbGNDbGFpbUFtb3VudAMFBHBvb2wFB2Fzc2V0SWQFBHVzZXIEC2NsYWltQW1vdW50CAULJHQwNDc4MDQ4NTACXzEEDGxhc3RJbnRlcmVzdAgFCyR0MDQ3ODA0ODUwAl8yCQDOCAIFA2FjYwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FBHBvb2wCAV8FB2Fzc2V0SWQFE2tVc2VyQ2xhaW1BdmFpbGFibGUFC2NsYWltQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUEdXNlcgIBXwUEcG9vbAIBXwUHYXNzZXRJZAURa1VzZXJMYXN0SW50ZXJlc3QFDGxhc3RJbnRlcmVzdAUDbmlsCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJASdjYWxjTmV3VXNlckludGVyZXN0QW5kQ2xhaW1BbW91bnRFdHJpZXMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDE1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPAWkBBWNsYWltAQRwb29sCQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUABAhwb29sQWRkcgkBB0FkZHJlc3MBCQDZBAEFBHBvb2wEBHVzZXIJAKUIAQgFAWkGY2FsbGVyBAhhc3NldElkcwkAtQkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFDWtQb29sQXNzZXRJZHMCFkNhbid0IGZpbmQgcG9vbCBhc3NldHMCASwKARZjYWxjQ2xhaW1BbW91bnRFbnRyaWVzAgNhY2MHYXNzZXRJZAQLJHQwNTUwNDU1MjgFA2FjYwQHZW50cmllcwgFCyR0MDU1MDQ1NTI4Al8xBANzdW0IBQskdDA1NTA0NTUyOAJfMgQLJHQwNTUzNTU2MDUJAQ9jYWxjQ2xhaW1BbW91bnQDBQRwb29sBQdhc3NldElkBQR1c2VyBAtjbGFpbUFtb3VudAgFCyR0MDU1MzU1NjA1Al8xBAxsYXN0SW50ZXJlc3QIBQskdDA1NTM1NTYwNQJfMgkAlAoCCQDOCAIFB2VudHJpZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQtjbGFpbUFtb3VudAkA2QQBBQdhc3NldElkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUEdXNlcgIBXwUEcG9vbAIBXwUHYXNzZXRJZAUTa1VzZXJDbGFpbUF2YWlsYWJsZQAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUEdXNlcgIBXwUEcG9vbAIBXwUHYXNzZXRJZAURa1VzZXJMYXN0SW50ZXJlc3QFDGxhc3RJbnRlcmVzdAUDbmlsCQBkAgUDc3VtBQtjbGFpbUFtb3VudAQLJHQwNTkxMTU5OTQKAAIkbAUIYXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARZjYWxjQ2xhaW1BbW91bnRFbnRyaWVzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwQMY2xhaW1FbnRyaWVzCAULJHQwNTkxMTU5OTQCXzEECXN1bVRva2VucwgFCyR0MDU5MTE1OTk0Al8yAwkAAAIFCXN1bVRva2VucwAACQACAQIcWW91IGhhdmUgbm8gdG9rZW5zIGZvciBjbGFpbQUMY2xhaW1FbnRyaWVzAWkBCHNodXRkb3duAAMJAQEhAQUGYWN0aXZlCQACAQkArAICAiJEQXBwIGlzIGFscmVhZHkgc3VzcGVuZGVkLiBDYXVzZTogCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMFBmtDYXVzZQIadGhlIGNhdXNlIHdhc24ndCBzcGVjaWZpZWQDCQEBIQEJAQ9jb250YWluc0VsZW1lbnQCCQDMCAIFDGFkbWluUHViS2V5MQkAzAgCBQxhZG1pblB1YktleTIJAMwIAgUMYWRtaW5QdWJLZXkzBQNuaWwIBQFpD2NhbGxlclB1YmxpY0tleQkAAgECIU9ubHkgYWRtaW4gY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgkBB3N1c3BlbmQBAg9QYXVzZWQgYnkgYWRtaW4BaQEIYWN0aXZhdGUAAwUGYWN0aXZlCQACAQIWREFwcCBpcyBhbHJlYWR5IGFjdGl2ZQMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIJAMwIAgUMYWRtaW5QdWJLZXkxCQDMCAIFDGFkbWluUHViS2V5MgkAzAgCBQxhZG1pblB1YktleTMFA25pbAgFAWkPY2FsbGVyUHVibGljS2V5CQACAQIhT25seSBhZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uCQDMCAIJAQxCb29sZWFuRW50cnkCBQdrQWN0aXZlBgkAzAgCCQELRGVsZXRlRW50cnkBBQZrQ2F1c2UFA25pbAECdHgBBnZlcmlmeQAEEmFkbWluUHViS2V5MVNpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFDGFkbWluUHViS2V5MQABAAAEEmFkbWluUHViS2V5MlNpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAEFDGFkbWluUHViS2V5MgABAAAEEmFkbWluUHViS2V5M1NpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAIFDGFkbWluUHViS2V5MwABAAAJAGcCCQBkAgkAZAIFEmFkbWluUHViS2V5MVNpZ25lZAUSYWRtaW5QdWJLZXkyU2lnbmVkBRJhZG1pblB1YktleTNTaWduZWQAAqy8r9g=",
    "height": 2237223,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DSCWkEX2ijsCiJMQaxLZ9UdqTttV7r1Wo8kYMAotc2fA
Next: none

Diff: 
Old
New
Differences
187
187
 
    let poolAddr = Address(fromBase58String(pool))
188
188
 
    let user = toString(i.caller)
189
189
 
    let assetIds = split(valueOrErrorMessage(getString(poolAddr, kPoolAssetIds), "Can't find pool assets"), ",")
190
-
    func calcClaimAmountEtries (acc,assetId) =     {
191
-
        let $t055035527 = acc
192
-
        let entries = $t055035527._1
193
-
        let sum = $t055035527._2
194
-
        let $t055345604 = calcClaimAmount(pool, assetId, user)
195
-
        let claimAmount = $t055345604._1
196
-
        let lastInterest = $t055345604._2
197
-
        $Tuple2((entries ++ [ScriptTransfer(i.caller, claimAmount, fromBase58String(assetId)), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserClaimAvailable), 0), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserLastInterest), lastInterest)]), claimAmount)
190
+
    func calcClaimAmountEntries (acc,assetId) =     {
191
+
        let $t055045528 = acc
192
+
        let entries = $t055045528._1
193
+
        let sum = $t055045528._2
194
+
        let $t055355605 = calcClaimAmount(pool, assetId, user)
195
+
        let claimAmount = $t055355605._1
196
+
        let lastInterest = $t055355605._2
197
+
        $Tuple2((entries ++ [ScriptTransfer(i.caller, claimAmount, fromBase58String(assetId)), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserClaimAvailable), 0), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserLastInterest), lastInterest)]), (sum + claimAmount))
198
198
 
        }
199
199
 
200
-
    let $t059045986 = {
200
+
    let $t059115994 = {
201
201
 
        let $l = assetIds
202
202
 
        let $s = size($l)
203
203
 
        let $acc0 = $Tuple2(nil, 0)
204
204
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
205
205
 
            then $a
206
-
            else calcClaimAmountEtries($a, $l[$i])
206
+
            else calcClaimAmountEntries($a, $l[$i])
207
207
 
208
208
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
209
209
 
            then $a
211
211
 
212
212
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15)
213
213
 
        }
214
-
    let claimEntries = $t059045986._1
215
-
    let sumTokens = $t059045986._2
214
+
    let claimEntries = $t059115994._1
215
+
    let sumTokens = $t059115994._2
216
216
 
    if ((sumTokens == 0))
217
217
 
        then throw("You have no tokens for claim")
218
218
 
        else claimEntries
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let kActive = "active"
5
5
 
6
6
 
let kCause = "shutdown_cause"
7
7
 
8
8
 
let kLastPoolTokenInterest = "_pool_last_interest"
9
9
 
10
10
 
let kUserLastInterest = "_user_last_interest"
11
11
 
12
12
 
let kUserClaimAvailable = "_user_available_to_claim"
13
13
 
14
14
 
let kUserShareTokensLocked = "_share_tokens_locked"
15
15
 
16
16
 
let kShareTokensLocked = "_total_share_tokens_locked"
17
17
 
18
18
 
let kOraclePool = "pool_"
19
19
 
20
20
 
let kPoolAssetIds = "asset_ids"
21
21
 
22
22
 
let kAdminPubKey1 = "admin_pub_1"
23
23
 
24
24
 
let kAdminPubKey2 = "admin_pub_2"
25
25
 
26
26
 
let kAdminPubKey3 = "admin_pub_3"
27
27
 
28
28
 
let kFarmingAddr = "farming_address"
29
29
 
30
30
 
let kMoneyBoxAddress = "money_box_address"
31
31
 
32
32
 
let scaleValue = 100000000
33
33
 
34
34
 
let oracle = Address(base58'3NBBWfzZtZtszaXbitTKnrB2xXwv26Bn7H9')
35
35
 
36
36
 
func getBase58FromOracle (key) = match getString(oracle, key) {
37
37
 
    case string: String => 
38
38
 
        fromBase58String(string)
39
39
 
    case nothing => 
40
40
 
        throw((key + "is empty"))
41
41
 
}
42
42
 
43
43
 
44
44
 
let adminPubKey1 = getBase58FromOracle(kAdminPubKey1)
45
45
 
46
46
 
let adminPubKey2 = getBase58FromOracle(kAdminPubKey2)
47
47
 
48
48
 
let adminPubKey3 = getBase58FromOracle(kAdminPubKey3)
49
49
 
50
50
 
let farmingAddr = Address(getBase58FromOracle(kFarmingAddr))
51
51
 
52
52
 
let moneyBoxAddress = Address(getBase58FromOracle(kMoneyBoxAddress))
53
53
 
54
54
 
let active = valueOrElse(getBoolean(this, kActive), true)
55
55
 
56
56
 
func isActive () = if (active)
57
57
 
    then unit
58
58
 
    else throw("DApp is inactive at this moment")
59
59
 
60
60
 
61
61
 
func isPoolCall (caller) = if (isDefined(getString(oracle, (kOraclePool + toString(caller)))))
62
62
 
    then unit
63
63
 
    else throw("Only pool can call this function")
64
64
 
65
65
 
66
66
 
func isFarmingCall (caller) = if ((caller == farmingAddr))
67
67
 
    then unit
68
68
 
    else throw("Only farming can call this function")
69
69
 
70
70
 
71
71
 
func suspend (cause) = [BooleanEntry(kActive, false), StringEntry(kCause, cause)]
72
72
 
73
73
 
74
74
 
func getUserShareTokensLocked (pool,userAddress) = valueOrElse(getInteger(farmingAddr, (((pool + "_") + userAddress) + kUserShareTokensLocked)), 0)
75
75
 
76
76
 
77
77
 
func getTotalShareTokensLocked (pool) = valueOrElse(getInteger(farmingAddr, (pool + kShareTokensLocked)), 0)
78
78
 
79
79
 
80
80
 
func getUserLastInterest (user,pool,assetId) = valueOrElse(getInteger(this, (((((user + "_") + pool) + "_") + assetId) + kUserLastInterest)), 0)
81
81
 
82
82
 
83
83
 
func getPoolTokenLastInterest (pool,assetId) = valueOrElse(getInteger(this, (((pool + "_") + assetId) + kLastPoolTokenInterest)), 0)
84
84
 
85
85
 
86
86
 
func getUserClaimAvailable (user,pool,assetId) = valueOrElse(getInteger(this, (((((user + "_") + pool) + "_") + assetId) + kUserClaimAvailable)), 0)
87
87
 
88
88
 
89
89
 
func getStrAssetId (assetId) = match assetId {
90
90
 
    case id: ByteVector => 
91
91
 
        toBase58String(id)
92
92
 
    case waves: Unit => 
93
93
 
        "WAVES"
94
94
 
    case _ => 
95
95
 
        throw("Match error")
96
96
 
}
97
97
 
98
98
 
99
99
 
func calcClaimAmount (pool,assetId,user) = {
100
100
 
    let lastInterest = getPoolTokenLastInterest(pool, assetId)
101
101
 
    let userLastInterest = getUserLastInterest(user, pool, assetId)
102
102
 
    let userShareTokensLocked = getUserShareTokensLocked(pool, user)
103
103
 
    let userClaimAvailable = getUserClaimAvailable(user, pool, assetId)
104
104
 
    let newUserClaimAvailable = fraction(userShareTokensLocked, (lastInterest - userLastInterest), scaleValue)
105
105
 
    $Tuple2((userClaimAvailable + newUserClaimAvailable), lastInterest)
106
106
 
    }
107
107
 
108
108
 
109
109
 
func calcClaimAmountEvaluate (pool,user) = {
110
110
 
    let poolAddr = Address(fromBase58String(pool))
111
111
 
    let assetIds = split(valueOrErrorMessage(getString(poolAddr, kPoolAssetIds), "Can't find pool assets"), ",")
112
112
 
    func calcClaimAmounts (acc,assetId) =     {
113
113
 
        let $t034453515 = calcClaimAmount(pool, assetId, user)
114
114
 
        let claimAmount = $t034453515._1
115
115
 
        let lastInterest = $t034453515._2
116
116
 
        (acc :+ [claimAmount])
117
117
 
        }
118
118
 
119
119
 
    let claimAmounts = {
120
120
 
        let $l = assetIds
121
121
 
        let $s = size($l)
122
122
 
        let $acc0 = nil
123
123
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
124
124
 
            then $a
125
125
 
            else calcClaimAmounts($a, $l[$i])
126
126
 
127
127
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
128
128
 
            then $a
129
129
 
            else throw("List size exceeds 15")
130
130
 
131
131
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15)
132
132
 
        }
133
133
 
    $Tuple2(assetIds, claimAmounts)
134
134
 
    }
135
135
 
136
136
 
137
137
 
@Callable(i)
138
138
 
func airDrop () = valueOrElse(isActive(), valueOrElse(isPoolCall(i.caller), {
139
139
 
    let $t037283803 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
140
140
 
    let pmtAmount = $t037283803._1
141
141
 
    let pmtAssetId = $t037283803._2
142
142
 
    let pool = toString(i.caller)
143
143
 
    let totalShareTokensLocked = getTotalShareTokensLocked(pool)
144
144
 
    if ((totalShareTokensLocked == 0))
145
145
 
        then [ScriptTransfer(moneyBoxAddress, pmtAmount, pmtAssetId)]
146
146
 
        else {
147
147
 
            let lastInterest = getPoolTokenLastInterest(pool, getStrAssetId(pmtAssetId))
148
148
 
            let interestNew = (lastInterest + (if ((pmtAmount > 0))
149
149
 
                then fraction(pmtAmount, scaleValue, totalShareTokensLocked)
150
150
 
                else 0))
151
151
 
[IntegerEntry((((pool + "_") + getStrAssetId(pmtAssetId)) + kLastPoolTokenInterest), interestNew)]
152
152
 
            }
153
153
 
    }))
154
154
 
155
155
 
156
156
 
157
157
 
@Callable(i)
158
158
 
func updateUserInterest (pool,newUserShareTokensLocked) = valueOrElse(isActive(), valueOrElse(isFarmingCall(i.caller), {
159
159
 
    let poolAddr = Address(fromBase58String(pool))
160
160
 
    let user = toString(i.originCaller)
161
161
 
    let assetIds = split(valueOrErrorMessage(getString(poolAddr, kPoolAssetIds), "Can't find pool assets"), ",")
162
162
 
    func calcNewUserInterestAndClaimAmountEtries (acc,assetId) =     {
163
163
 
        let $t047804850 = calcClaimAmount(pool, assetId, user)
164
164
 
        let claimAmount = $t047804850._1
165
165
 
        let lastInterest = $t047804850._2
166
166
 
        (acc ++ [IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserClaimAvailable), claimAmount), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserLastInterest), lastInterest)])
167
167
 
        }
168
168
 
169
169
 
    let $l = assetIds
170
170
 
    let $s = size($l)
171
171
 
    let $acc0 = nil
172
172
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
173
173
 
        then $a
174
174
 
        else calcNewUserInterestAndClaimAmountEtries($a, $l[$i])
175
175
 
176
176
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
177
177
 
        then $a
178
178
 
        else throw("List size exceeds 15")
179
179
 
180
180
 
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15)
181
181
 
    }))
182
182
 
183
183
 
184
184
 
185
185
 
@Callable(i)
186
186
 
func claim (pool) = valueOrElse(isActive(), {
187
187
 
    let poolAddr = Address(fromBase58String(pool))
188
188
 
    let user = toString(i.caller)
189
189
 
    let assetIds = split(valueOrErrorMessage(getString(poolAddr, kPoolAssetIds), "Can't find pool assets"), ",")
190
-
    func calcClaimAmountEtries (acc,assetId) =     {
191
-
        let $t055035527 = acc
192
-
        let entries = $t055035527._1
193
-
        let sum = $t055035527._2
194
-
        let $t055345604 = calcClaimAmount(pool, assetId, user)
195
-
        let claimAmount = $t055345604._1
196
-
        let lastInterest = $t055345604._2
197
-
        $Tuple2((entries ++ [ScriptTransfer(i.caller, claimAmount, fromBase58String(assetId)), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserClaimAvailable), 0), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserLastInterest), lastInterest)]), claimAmount)
190
+
    func calcClaimAmountEntries (acc,assetId) =     {
191
+
        let $t055045528 = acc
192
+
        let entries = $t055045528._1
193
+
        let sum = $t055045528._2
194
+
        let $t055355605 = calcClaimAmount(pool, assetId, user)
195
+
        let claimAmount = $t055355605._1
196
+
        let lastInterest = $t055355605._2
197
+
        $Tuple2((entries ++ [ScriptTransfer(i.caller, claimAmount, fromBase58String(assetId)), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserClaimAvailable), 0), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserLastInterest), lastInterest)]), (sum + claimAmount))
198
198
 
        }
199
199
 
200
-
    let $t059045986 = {
200
+
    let $t059115994 = {
201
201
 
        let $l = assetIds
202
202
 
        let $s = size($l)
203
203
 
        let $acc0 = $Tuple2(nil, 0)
204
204
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
205
205
 
            then $a
206
-
            else calcClaimAmountEtries($a, $l[$i])
206
+
            else calcClaimAmountEntries($a, $l[$i])
207
207
 
208
208
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
209
209
 
            then $a
210
210
 
            else throw("List size exceeds 15")
211
211
 
212
212
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15)
213
213
 
        }
214
-
    let claimEntries = $t059045986._1
215
-
    let sumTokens = $t059045986._2
214
+
    let claimEntries = $t059115994._1
215
+
    let sumTokens = $t059115994._2
216
216
 
    if ((sumTokens == 0))
217
217
 
        then throw("You have no tokens for claim")
218
218
 
        else claimEntries
219
219
 
    })
220
220
 
221
221
 
222
222
 
223
223
 
@Callable(i)
224
224
 
func shutdown () = if (!(active))
225
225
 
    then throw(("DApp is already suspended. Cause: " + valueOrElse(getString(this, kCause), "the cause wasn't specified")))
226
226
 
    else if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
227
227
 
        then throw("Only admin can call this function")
228
228
 
        else suspend("Paused by admin")
229
229
 
230
230
 
231
231
 
232
232
 
@Callable(i)
233
233
 
func activate () = if (active)
234
234
 
    then throw("DApp is already active")
235
235
 
    else if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
236
236
 
        then throw("Only admin can call this function")
237
237
 
        else [BooleanEntry(kActive, true), DeleteEntry(kCause)]
238
238
 
239
239
 
240
240
 
@Verifier(tx)
241
241
 
func verify () = {
242
242
 
    let adminPubKey1Signed = if (sigVerify(tx.bodyBytes, tx.proofs[0], adminPubKey1))
243
243
 
        then 1
244
244
 
        else 0
245
245
 
    let adminPubKey2Signed = if (sigVerify(tx.bodyBytes, tx.proofs[1], adminPubKey2))
246
246
 
        then 1
247
247
 
        else 0
248
248
 
    let adminPubKey3Signed = if (sigVerify(tx.bodyBytes, tx.proofs[2], adminPubKey3))
249
249
 
        then 1
250
250
 
        else 0
251
251
 
    (((adminPubKey1Signed + adminPubKey2Signed) + adminPubKey3Signed) >= 2)
252
252
 
    }
253
253
 

github/deemru/w8io/873ac7e 
64.54 ms ◑