tx · 2b1HweFDzDAUkGzFThayThXbg4J2fyqsxppSrxBjKVsJ

3MxFYk97QYdeHRMTu51rVyHqvFEVB4UtmBX:  -0.01700000 Waves

2022.09.14 18:18 [2228945] smart account 3MxFYk97QYdeHRMTu51rVyHqvFEVB4UtmBX > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2b1HweFDzDAUkGzFThayThXbg4J2fyqsxppSrxBjKVsJ",
    "fee": 1700000,
    "feeAssetId": null,
    "timestamp": 1663168710777,
    "version": 2,
    "chainId": 84,
    "sender": "3MxFYk97QYdeHRMTu51rVyHqvFEVB4UtmBX",
    "senderPublicKey": "2panvMtE3s1p1oCdVqRGMuBYaZJV3AZ6zpdmZ6vHkDaL",
    "proofs": [
        "4c7vgZKqE7MkBaygkiAXCi5bEsMYNd5CEWuPzNYfMgebyM74D9Hu6FbYtiavM3tu7Vc9mV29tMW14Z7b8HLuc4ED",
        "5FZazJdtb1YUWpJU2eb4cvJMSzRnNQDXs4fUPKv4bEKfJZHiCcMj8n99kpCHneRZKfQ4rAPzWtdZKL5aCEM6VEZB"
    ],
    "script": "base64:BgISCAISABIDCgEBEgMKAQgSABIAIAAHa0FjdGl2ZQIGYWN0aXZlAAZrQ2F1c2UCDnNodXRkb3duX2NhdXNlABZrTGFzdFBvb2xUb2tlbkludGVyZXN0AhNfcG9vbF9sYXN0X2ludGVyZXN0ABFrVXNlckxhc3RJbnRlcmVzdAITX3VzZXJfbGFzdF9pbnRlcmVzdAATa1VzZXJDbGFpbUF2YWlsYWJsZQIYX3VzZXJfYXZhaWxhYmxlX3RvX2NsYWltABZrVXNlclNoYXJlVG9rZW5zTG9ja2VkAhRfc2hhcmVfdG9rZW5zX2xvY2tlZAASa1NoYXJlVG9rZW5zTG9ja2VkAhpfdG90YWxfc2hhcmVfdG9rZW5zX2xvY2tlZAALa09yYWNsZVBvb2wCBXBvb2xfAA1rUG9vbEFzc2V0SWRzAglhc3NldF9pZHMADWtBZG1pblB1YktleTECC2FkbWluX3B1Yl8xAA1rQWRtaW5QdWJLZXkyAgthZG1pbl9wdWJfMgANa0FkbWluUHViS2V5MwILYWRtaW5fcHViXzMADGtGYXJtaW5nQWRkcgIPZmFybWluZ19hZGRyZXNzAApzY2FsZVZhbHVlAIDC1y8ABm9yYWNsZQkBB0FkZHJlc3MBARoBVOlFqh6QLzqu8boO5i6akl8amITh82KzCAETZ2V0QmFzZTU4RnJvbU9yYWNsZQEDa2V5BAckbWF0Y2gwCQCdCAIFBm9yYWNsZQUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQGc3RyaW5nBQckbWF0Y2gwCQDZBAEFBnN0cmluZwQHbm90aGluZwUHJG1hdGNoMAkAAgEJAKwCAgUDa2V5AghpcyBlbXB0eQAMYWRtaW5QdWJLZXkxCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDWtBZG1pblB1YktleTEADGFkbWluUHViS2V5MgkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQ1rQWRtaW5QdWJLZXkyAAxhZG1pblB1YktleTMJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUNa0FkbWluUHViS2V5MwALZmFybWluZ0FkZHIJAQdBZGRyZXNzAQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQxrRmFybWluZ0FkZHIABmFjdGl2ZQkBC3ZhbHVlT3JFbHNlAgkAmwgCBQR0aGlzBQdrQWN0aXZlBgEIaXNBY3RpdmUAAwUGYWN0aXZlBQR1bml0CQACAQIfREFwcCBpcyBpbmFjdGl2ZSBhdCB0aGlzIG1vbWVudAEKaXNQb29sQ2FsbAEGY2FsbGVyAwkBCWlzRGVmaW5lZAEJAJ0IAgUGb3JhY2xlCQCsAgIFC2tPcmFjbGVQb29sCQClCAEFBmNhbGxlcgUEdW5pdAkAAgECIE9ubHkgcG9vbCBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQdzdXNwZW5kAQVjYXVzZQkAzAgCCQEMQm9vbGVhbkVudHJ5AgUHa0FjdGl2ZQcJAMwIAgkBC1N0cmluZ0VudHJ5AgUGa0NhdXNlBQVjYXVzZQUDbmlsARhnZXRVc2VyU2hhcmVUb2tlbnNMb2NrZWQCBHBvb2wLdXNlckFkZHJlc3MJAQt2YWx1ZU9yRWxzZQIJAJoIAgULZmFybWluZ0FkZHIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FC3VzZXJBZGRyZXNzBRZrVXNlclNoYXJlVG9rZW5zTG9ja2VkAAABGWdldFRvdGFsU2hhcmVUb2tlbnNMb2NrZWQBBHBvb2wJAQt2YWx1ZU9yRWxzZQIJAJoIAgULZmFybWluZ0FkZHIJAKwCAgUEcG9vbAUSa1NoYXJlVG9rZW5zTG9ja2VkAAABE2dldFVzZXJMYXN0SW50ZXJlc3QDBHVzZXIEcG9vbAdhc3NldElkCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQR1c2VyAgFfBQRwb29sAgFfBQdhc3NldElkBRFrVXNlckxhc3RJbnRlcmVzdAAAARhnZXRQb29sVG9rZW5MYXN0SW50ZXJlc3QCBHBvb2wHYXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQdhc3NldElkBRZrTGFzdFBvb2xUb2tlbkludGVyZXN0AAABFWdldFVzZXJDbGFpbUF2YWlsYWJsZQMEdXNlcgRwb29sB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FBHBvb2wCAV8FB2Fzc2V0SWQFE2tVc2VyQ2xhaW1BdmFpbGFibGUAAAENZ2V0U3RyQXNzZXRJZAEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJpZAUHJG1hdGNoMAkA2AQBBQJpZAMJAAECBQckbWF0Y2gwAgRVbml0BAV3YXZlcwUHJG1hdGNoMAIFV0FWRVMJAAIBAgtNYXRjaCBlcnJvcgEPY2FsY0NsYWltQW1vdW50AwRwb29sB2Fzc2V0SWQEdXNlcgQMbGFzdEludGVyZXN0CQEYZ2V0UG9vbFRva2VuTGFzdEludGVyZXN0AgUEcG9vbAUHYXNzZXRJZAQQdXNlckxhc3RJbnRlcmVzdAkBE2dldFVzZXJMYXN0SW50ZXJlc3QDBQR1c2VyBQRwb29sBQdhc3NldElkBBV1c2VyU2hhcmVUb2tlbnNMb2NrZWQJARhnZXRVc2VyU2hhcmVUb2tlbnNMb2NrZWQCBQRwb29sBQR1c2VyBBJ1c2VyQ2xhaW1BdmFpbGFibGUJARVnZXRVc2VyQ2xhaW1BdmFpbGFibGUDBQR1c2VyBQRwb29sBQdhc3NldElkBBVuZXdVc2VyQ2xhaW1BdmFpbGFibGUJAGsDBRV1c2VyU2hhcmVUb2tlbnNMb2NrZWQJAGUCBQxsYXN0SW50ZXJlc3QFEHVzZXJMYXN0SW50ZXJlc3QFCnNjYWxlVmFsdWUJAJQKAgkAZAIFEnVzZXJDbGFpbUF2YWlsYWJsZQUVbmV3VXNlckNsYWltQXZhaWxhYmxlBQxsYXN0SW50ZXJlc3QBF2NhbGNDbGFpbUFtb3VudEV2YWx1YXRlAgRwb29sBHVzZXIECHBvb2xBZGRyCQEHQWRkcmVzcwEJANkEAQUEcG9vbAQIYXNzZXRJZHMJALUJAgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ1rUG9vbEFzc2V0SWRzAhZDYW4ndCBmaW5kIHBvb2wgYXNzZXRzAgEsCgEQY2FsY0NsYWltQW1vdW50cwIDYWNjB2Fzc2V0SWQECyR0MDMyMDUzMjc1CQEPY2FsY0NsYWltQW1vdW50AwUEcG9vbAUHYXNzZXRJZAUEdXNlcgQLY2xhaW1BbW91bnQIBQskdDAzMjA1MzI3NQJfMQQMbGFzdEludGVyZXN0CAULJHQwMzIwNTMyNzUCXzIJAM0IAgUDYWNjCQDMCAIFC2NsYWltQW1vdW50BQNuaWwEDGNsYWltQW1vdW50cwoAAiRsBQhhc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEQY2FsY0NsYWltQW1vdW50cwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8JAJQKAgUIYXNzZXRJZHMFDGNsYWltQW1vdW50cwUBaQEHYWlyRHJvcAAJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAJAQt2YWx1ZU9yRWxzZQIJAQppc1Bvb2xDYWxsAQgFAWkGY2FsbGVyBAskdDAzNDg4MzU2MwkAlAoCCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBAlwbXRBbW91bnQIBQskdDAzNDg4MzU2MwJfMQQKcG10QXNzZXRJZAgFCyR0MDM0ODgzNTYzAl8yBARwb29sCQClCAEIBQFpBmNhbGxlcgQWdG90YWxTaGFyZVRva2Vuc0xvY2tlZAkBGWdldFRvdGFsU2hhcmVUb2tlbnNMb2NrZWQBBQRwb29sBAxsYXN0SW50ZXJlc3QJARhnZXRQb29sVG9rZW5MYXN0SW50ZXJlc3QCBQRwb29sCQENZ2V0U3RyQXNzZXRJZAEFCnBtdEFzc2V0SWQEC2ludGVyZXN0TmV3CQBkAgUMbGFzdEludGVyZXN0AwMJAGYCBRZ0b3RhbFNoYXJlVG9rZW5zTG9ja2VkAAAJAGYCBQlwbXRBbW91bnQAAAcJAGsDBQlwbXRBbW91bnQFCnNjYWxlVmFsdWUFFnRvdGFsU2hhcmVUb2tlbnNMb2NrZWQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwkBDWdldFN0ckFzc2V0SWQBBQpwbXRBc3NldElkBRZrTGFzdFBvb2xUb2tlbkludGVyZXN0BQtpbnRlcmVzdE5ldwUDbmlsAWkBEnVwZGF0ZVVzZXJJbnRlcmVzdAEYbmV3VXNlclNoYXJlVG9rZW5zTG9ja2VkCQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUACQELdmFsdWVPckVsc2UCCQEKaXNQb29sQ2FsbAEIBQFpBmNhbGxlcgQIcG9vbEFkZHIIBQFpBmNhbGxlcgQEdXNlcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEBHBvb2wJAKUIAQUIcG9vbEFkZHIECGFzc2V0SWRzCQC1CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQhwb29sQWRkcgUNa1Bvb2xBc3NldElkcwIWQ2FuJ3QgZmluZCBwb29sIGFzc2V0cwIBLAoBJ2NhbGNOZXdVc2VySW50ZXJlc3RBbmRDbGFpbUFtb3VudEV0cmllcwIDYWNjB2Fzc2V0SWQECyR0MDQ0NDU0NTE1CQEPY2FsY0NsYWltQW1vdW50AwUEcG9vbAUHYXNzZXRJZAUEdXNlcgQLY2xhaW1BbW91bnQIBQskdDA0NDQ1NDUxNQJfMQQMbGFzdEludGVyZXN0CAULJHQwNDQ0NTQ1MTUCXzIJAM0IAgUDYWNjCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUEdXNlcgIBXwUEcG9vbAIBXwUHYXNzZXRJZAUTa1VzZXJDbGFpbUF2YWlsYWJsZQULY2xhaW1BbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQR1c2VyAgFfBQRwb29sAgFfBQdhc3NldElkBRFrVXNlckxhc3RJbnRlcmVzdAUMbGFzdEludGVyZXN0BQNuaWwKAAIkbAUIYXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBJ2NhbGNOZXdVc2VySW50ZXJlc3RBbmRDbGFpbUFtb3VudEV0cmllcwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8BaQEFY2xhaW0BBHBvb2wJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAECHBvb2xBZGRyCQEHQWRkcmVzcwEJANkEAQUEcG9vbAQEdXNlcgkApQgBCAUBaQZjYWxsZXIECGFzc2V0SWRzCQC1CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQhwb29sQWRkcgUNa1Bvb2xBc3NldElkcwIWQ2FuJ3QgZmluZCBwb29sIGFzc2V0cwIBLAoBFWNhbGNDbGFpbUFtb3VudEV0cmllcwIDYWNjB2Fzc2V0SWQECyR0MDUxNjg1MTkyBQNhY2MEB2VudHJpZXMIBQskdDA1MTY4NTE5MgJfMQQDc3VtCAULJHQwNTE2ODUxOTICXzIECyR0MDUxOTk1MjY5CQEPY2FsY0NsYWltQW1vdW50AwUEcG9vbAUHYXNzZXRJZAUEdXNlcgQLY2xhaW1BbW91bnQIBQskdDA1MTk5NTI2OQJfMQQMbGFzdEludGVyZXN0CAULJHQwNTE5OTUyNjkCXzIJAJQKAgkAzQgCBQdlbnRyaWVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgULY2xhaW1BbW91bnQJANkEAQUHYXNzZXRJZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FBHBvb2wCAV8FB2Fzc2V0SWQFE2tVc2VyQ2xhaW1BdmFpbGFibGUAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FBHBvb2wCAV8FB2Fzc2V0SWQFEWtVc2VyTGFzdEludGVyZXN0BQxsYXN0SW50ZXJlc3QFA25pbAULY2xhaW1BbW91bnQECyR0MDU1Njk1NjUxCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEVY2FsY0NsYWltQW1vdW50RXRyaWVzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwQMY2xhaW1FbnRyaWVzCAULJHQwNTU2OTU2NTECXzEECXN1bVRva2VucwgFCyR0MDU1Njk1NjUxAl8yAwkAAAIFCXN1bVRva2VucwAACQACAQIcWW91IGhhdmUgbm8gdG9rZW5zIGZvciBjbGFpbQUMY2xhaW1FbnRyaWVzAWkBCHNodXRkb3duAAMJAQEhAQUGYWN0aXZlCQACAQkArAICAiJEQXBwIGlzIGFscmVhZHkgc3VzcGVuZGVkLiBDYXVzZTogCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMFBmtDYXVzZQIadGhlIGNhdXNlIHdhc24ndCBzcGVjaWZpZWQDCQEBIQEJAQ9jb250YWluc0VsZW1lbnQCCQDMCAIFDGFkbWluUHViS2V5MQkAzAgCBQxhZG1pblB1YktleTIJAMwIAgUMYWRtaW5QdWJLZXkzBQNuaWwIBQFpD2NhbGxlclB1YmxpY0tleQkAAgECIU9ubHkgYWRtaW4gY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgkBB3N1c3BlbmQBAg9QYXVzZWQgYnkgYWRtaW4BaQEIYWN0aXZhdGUAAwUGYWN0aXZlCQACAQIWREFwcCBpcyBhbHJlYWR5IGFjdGl2ZQMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIJAMwIAgUMYWRtaW5QdWJLZXkxCQDMCAIFDGFkbWluUHViS2V5MgkAzAgCBQxhZG1pblB1YktleTMFA25pbAgFAWkPY2FsbGVyUHVibGljS2V5CQACAQIhT25seSBhZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uCQDMCAIJAQxCb29sZWFuRW50cnkCBQdrQWN0aXZlBgkAzAgCCQELRGVsZXRlRW50cnkBBQZrQ2F1c2UFA25pbAECdHgBBnZlcmlmeQAEEmFkbWluUHViS2V5MVNpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFDGFkbWluUHViS2V5MQABAAAEEmFkbWluUHViS2V5MlNpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAEFDGFkbWluUHViS2V5MgABAAAEEmFkbWluUHViS2V5M1NpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAIFDGFkbWluUHViS2V5MwABAAAJAGcCCQBkAgkAZAIFEmFkbWluUHViS2V5MVNpZ25lZAUSYWRtaW5QdWJLZXkyU2lnbmVkBRJhZG1pblB1YktleTNTaWduZWQAAs4x/3g=",
    "height": 2228945,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DfKhkihVhFrQmyXj3CapTDXiWZRSKgE2DTXZ1CuMwhWu
Next: 998GTpcEfvuZn33A2s39oMv81gypA2XgXt7ygiBjT6M5

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

github/deemru/w8io/03bedc9 
58.02 ms ◑