w8 · tx · 2a3···MoQ

tx · 2a3MPP5RgimxsNpXpzSALWYkEaVDcP9VFKtPEM73sMoQ

3MxFYk97QYdeHRMTu51rVyHqvFEVB4UtmBX:  -0.10700000 Waves

2022.09.14 17:25 [2228890] smart account 3MxFYk97QYdeHRMTu51rVyHqvFEVB4UtmBX > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2a3MPP5RgimxsNpXpzSALWYkEaVDcP9VFKtPEM73sMoQ",
    "fee": 10700000,
    "feeAssetId": null,
    "timestamp": 1663165521769,
    "version": 2,
    "chainId": 84,
    "sender": "3MxFYk97QYdeHRMTu51rVyHqvFEVB4UtmBX",
    "senderPublicKey": "2panvMtE3s1p1oCdVqRGMuBYaZJV3AZ6zpdmZ6vHkDaL",
    "proofs": [
        "4qwF4qM2MwEsJzy2S5v2tuf1Yr4RBnjU1nEmdWcMRHaAiKsAHoBwGxnX2gW8LQVvQtWmxwTnVSerkAHvENk3RFM",
        "1EdpqUPhhTZgqnBBoDV48zN1N5xmxQDCXPvFxXpVACRBHiGss3BPGhSoG9L7TJnedHspducAb44akPdcpsnspZD"
    ],
    "script": "base64:BgISCAISABIDCgEBEgMKAQgSABIAIAAHa0FjdGl2ZQIGYWN0aXZlAAZrQ2F1c2UCDnNodXRkb3duX2NhdXNlABZrTGFzdFBvb2xUb2tlbkludGVyZXN0AhNfcG9vbF9sYXN0X2ludGVyZXN0ABFrVXNlckxhc3RJbnRlcmVzdAITX3VzZXJfbGFzdF9pbnRlcmVzdAATa1VzZXJDbGFpbUF2YWlsYWJsZQIYX3VzZXJfYXZhaWxhYmxlX3RvX2NsYWltABZrVXNlclNoYXJlVG9rZW5zTG9ja2VkAhRfc2hhcmVfdG9rZW5zX2xvY2tlZAASa1NoYXJlVG9rZW5zTG9ja2VkAhpfdG90YWxfc2hhcmVfdG9rZW5zX2xvY2tlZAALa09yYWNsZVBvb2wCBXBvb2xfAA1rUG9vbEFzc2V0SWRzAglhc3NldF9pZHMADWtBZG1pblB1YktleTECC2FkbWluX3B1Yl8xAA1rQWRtaW5QdWJLZXkyAgthZG1pbl9wdWJfMgANa0FkbWluUHViS2V5MwILYWRtaW5fcHViXzMADGtGYXJtaW5nQWRkcgIPZmFybWluZ19hZGRyZXNzAApzY2FsZVZhbHVlAIDC1y8ABm9yYWNsZQkBB0FkZHJlc3MBARoBVOlFqh6QLzqu8boO5i6akl8amITh82KzCAETZ2V0QmFzZTU4RnJvbU9yYWNsZQEDa2V5BAckbWF0Y2gwCQCdCAIFBm9yYWNsZQUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQGc3RyaW5nBQckbWF0Y2gwCQDZBAEFBnN0cmluZwQHbm90aGluZwUHJG1hdGNoMAkAAgEJAKwCAgUDa2V5AghpcyBlbXB0eQAMYWRtaW5QdWJLZXkxCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDWtBZG1pblB1YktleTEADGFkbWluUHViS2V5MgkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQ1rQWRtaW5QdWJLZXkyAAxhZG1pblB1YktleTMJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUNa0FkbWluUHViS2V5MwALZmFybWluZ0FkZHIJAQdBZGRyZXNzAQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQxrRmFybWluZ0FkZHIABmFjdGl2ZQkBC3ZhbHVlT3JFbHNlAgkBEUBleHRyTmF0aXZlKDEwNTEpAgUEdGhpcwUHa0FjdGl2ZQYBCGlzQWN0aXZlAAMFBmFjdGl2ZQUEdW5pdAkAAgECH0RBcHAgaXMgaW5hY3RpdmUgYXQgdGhpcyBtb21lbnQBCmlzUG9vbENhbGwBBmNhbGxlcgMJAQlpc0RlZmluZWQBCQCdCAIFBm9yYWNsZQkArAICBQtrT3JhY2xlUG9vbAkApQgBBQZjYWxsZXIFBHVuaXQJAAIBAiBPbmx5IHBvb2wgY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgEHc3VzcGVuZAEFY2F1c2UJAMwIAgkBDEJvb2xlYW5FbnRyeQIFB2tBY3RpdmUHCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmtDYXVzZQUFY2F1c2UFA25pbAEYZ2V0VXNlclNoYXJlVG9rZW5zTG9ja2VkAgRwb29sC3VzZXJBZGRyZXNzCQELdmFsdWVPckVsc2UCCQCaCAIFC2Zhcm1pbmdBZGRyCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQt1c2VyQWRkcmVzcwUWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAAAARlnZXRUb3RhbFNoYXJlVG9rZW5zTG9ja2VkAQRwb29sCQELdmFsdWVPckVsc2UCCQCaCAIFC2Zhcm1pbmdBZGRyCQCsAgIFBHBvb2wFEmtTaGFyZVRva2Vuc0xvY2tlZAAAARNnZXRVc2VyTGFzdEludGVyZXN0AwR1c2VyBHBvb2wHYXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUEdXNlcgIBXwUEcG9vbAIBXwUHYXNzZXRJZAURa1VzZXJMYXN0SW50ZXJlc3QAAAEYZ2V0UG9vbFRva2VuTGFzdEludGVyZXN0AgRwb29sB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUHYXNzZXRJZAUWa0xhc3RQb29sVG9rZW5JbnRlcmVzdAAAARVnZXRVc2VyQ2xhaW1BdmFpbGFibGUDBHVzZXIEcG9vbAdhc3NldElkCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQR1c2VyAgFfBQRwb29sAgFfBQdhc3NldElkBRNrVXNlckNsYWltQXZhaWxhYmxlAAABDWdldFN0ckFzc2V0SWQBB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCaWQFByRtYXRjaDAJANgEAQUCaWQDCQABAgUHJG1hdGNoMAIEVW5pdAQFd2F2ZXMFByRtYXRjaDACBVdBVkVTCQACAQILTWF0Y2ggZXJyb3IBD2NhbGNDbGFpbUFtb3VudAMEcG9vbAdhc3NldElkBHVzZXIEDGxhc3RJbnRlcmVzdAkBGGdldFBvb2xUb2tlbkxhc3RJbnRlcmVzdAIFBHBvb2wFB2Fzc2V0SWQEEHVzZXJMYXN0SW50ZXJlc3QJARNnZXRVc2VyTGFzdEludGVyZXN0AwUEdXNlcgUEcG9vbAUHYXNzZXRJZAQVdXNlclNoYXJlVG9rZW5zTG9ja2VkCQEYZ2V0VXNlclNoYXJlVG9rZW5zTG9ja2VkAgUEcG9vbAUEdXNlcgQSdXNlckNsYWltQXZhaWxhYmxlCQEVZ2V0VXNlckNsYWltQXZhaWxhYmxlAwUEdXNlcgUEcG9vbAUHYXNzZXRJZAQVbmV3VXNlckNsYWltQXZhaWxhYmxlCQBrAwUVdXNlclNoYXJlVG9rZW5zTG9ja2VkCQBlAgUMbGFzdEludGVyZXN0BRB1c2VyTGFzdEludGVyZXN0BQpzY2FsZVZhbHVlCQCUCgIJAGQCBRJ1c2VyQ2xhaW1BdmFpbGFibGUFFW5ld1VzZXJDbGFpbUF2YWlsYWJsZQUMbGFzdEludGVyZXN0ARdjYWxjQ2xhaW1BbW91bnRFdmFsdWF0ZQIEcG9vbAR1c2VyBAhwb29sQWRkcgkBB0FkZHJlc3MBCQDZBAEFBHBvb2wECGFzc2V0SWRzCQC1CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQhwb29sQWRkcgUNa1Bvb2xBc3NldElkcwIWQ2FuJ3QgZmluZCBwb29sIGFzc2V0cwIBLAoBEGNhbGNDbGFpbUFtb3VudHMCA2FjYwdhc3NldElkBAskdDAzMjEwMzI4MAkBD2NhbGNDbGFpbUFtb3VudAMFBHBvb2wFB2Fzc2V0SWQFBHVzZXIEC2NsYWltQW1vdW50CAULJHQwMzIxMDMyODACXzEEDGxhc3RJbnRlcmVzdAgFCyR0MDMyMTAzMjgwAl8yCQDNCAIFA2FjYwkAzAgCBQtjbGFpbUFtb3VudAUDbmlsBAxjbGFpbUFtb3VudHMKAAIkbAUIYXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEGNhbGNDbGFpbUFtb3VudHMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDE1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPCQCUCgIFCGFzc2V0SWRzBQxjbGFpbUFtb3VudHMFAWkBB2FpckRyb3AACQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUACQELdmFsdWVPckVsc2UCCQEKaXNQb29sQ2FsbAEIBQFpBmNhbGxlcgQLJHQwMzQ5MzM1NjgJAJQKAggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAQJcG10QW1vdW50CAULJHQwMzQ5MzM1NjgCXzEECnBtdEFzc2V0SWQIBQskdDAzNDkzMzU2OAJfMgQEcG9vbAkApQgBCAUBaQZjYWxsZXIEFnRvdGFsU2hhcmVUb2tlbnNMb2NrZWQJARlnZXRUb3RhbFNoYXJlVG9rZW5zTG9ja2VkAQUEcG9vbAQMbGFzdEludGVyZXN0CQEYZ2V0UG9vbFRva2VuTGFzdEludGVyZXN0AgUEcG9vbAkBDWdldFN0ckFzc2V0SWQBBQpwbXRBc3NldElkBAtpbnRlcmVzdE5ldwkAZAIFDGxhc3RJbnRlcmVzdAkAawMFCXBtdEFtb3VudAUKc2NhbGVWYWx1ZQUWdG90YWxTaGFyZVRva2Vuc0xvY2tlZAkAzAgCCQEMSW50ZWdlckVudHJ5AgUWa0xhc3RQb29sVG9rZW5JbnRlcmVzdAULaW50ZXJlc3ROZXcFA25pbAFpARJ1cGRhdGVVc2VySW50ZXJlc3QBGG5ld1VzZXJTaGFyZVRva2Vuc0xvY2tlZAkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAkBC3ZhbHVlT3JFbHNlAgkBCmlzUG9vbENhbGwBCAUBaQZjYWxsZXIECHBvb2xBZGRyCAUBaQZjYWxsZXIEBHVzZXIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBARwb29sCQClCAEFCHBvb2xBZGRyBAhhc3NldElkcwkAtQkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFDWtQb29sQXNzZXRJZHMCFkNhbid0IGZpbmQgcG9vbCBhc3NldHMCASwKASdjYWxjTmV3VXNlckludGVyZXN0QW5kQ2xhaW1BbW91bnRFdHJpZXMCA2FjYwdhc3NldElkBAskdDA0MzQyNDQxMgkBD2NhbGNDbGFpbUFtb3VudAMFBHBvb2wFB2Fzc2V0SWQFBHVzZXIEC2NsYWltQW1vdW50CAULJHQwNDM0MjQ0MTICXzEEDGxhc3RJbnRlcmVzdAgFCyR0MDQzNDI0NDEyAl8yCQDNCAIFA2FjYwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FBHBvb2wCAV8FB2Fzc2V0SWQFE2tVc2VyQ2xhaW1BdmFpbGFibGUFC2NsYWltQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUEdXNlcgIBXwUEcG9vbAIBXwUHYXNzZXRJZAURa1VzZXJMYXN0SW50ZXJlc3QFDGxhc3RJbnRlcmVzdAUDbmlsCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJASdjYWxjTmV3VXNlckludGVyZXN0QW5kQ2xhaW1BbW91bnRFdHJpZXMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDE1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPAWkBBWNsYWltAQRwb29sCQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUABAhwb29sQWRkcgkBB0FkZHJlc3MBCQDZBAEFBHBvb2wEBHVzZXIJAKUIAQgFAWkGY2FsbGVyBAhhc3NldElkcwkAtQkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFDWtQb29sQXNzZXRJZHMCFkNhbid0IGZpbmQgcG9vbCBhc3NldHMCASwKARVjYWxjQ2xhaW1BbW91bnRFdHJpZXMCA2FjYwdhc3NldElkBAskdDA1MDY1NTA4OQUDYWNjBAdlbnRyaWVzCAULJHQwNTA2NTUwODkCXzEEA3N1bQgFCyR0MDUwNjU1MDg5Al8yBAskdDA1MDk2NTE2NgkBD2NhbGNDbGFpbUFtb3VudAMFBHBvb2wFB2Fzc2V0SWQFBHVzZXIEC2NsYWltQW1vdW50CAULJHQwNTA5NjUxNjYCXzEEDGxhc3RJbnRlcmVzdAgFCyR0MDUwOTY1MTY2Al8yCQCUCgIJAM0IAgUHZW50cmllcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFC2NsYWltQW1vdW50CQDZBAEFB2Fzc2V0SWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQR1c2VyAgFfBQRwb29sAgFfBQdhc3NldElkBRNrVXNlckNsYWltQXZhaWxhYmxlAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQR1c2VyAgFfBQRwb29sAgFfBQdhc3NldElkBRFrVXNlckxhc3RJbnRlcmVzdAUMbGFzdEludGVyZXN0BQNuaWwFC2NsYWltQW1vdW50BAskdDA1NDY2NTU0OAoAAiRsBQhhc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBFWNhbGNDbGFpbUFtb3VudEV0cmllcwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8EDGNsYWltRW50cmllcwgFCyR0MDU0NjY1NTQ4Al8xBAlzdW1Ub2tlbnMIBQskdDA1NDY2NTU0OAJfMgMJAAACBQlzdW1Ub2tlbnMAAAkAAgECHFlvdSBoYXZlIG5vIHRva2VucyBmb3IgY2xhaW0FDGNsYWltRW50cmllcwFpAQhzaHV0ZG93bgADCQEBIQEFBmFjdGl2ZQkAAgEJAKwCAgIiREFwcCBpcyBhbHJlYWR5IHN1c3BlbmRlZC4gQ2F1c2U6IAkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzBQZrQ2F1c2UCGnRoZSBjYXVzZSB3YXNuJ3Qgc3BlY2lmaWVkAwkBASEBCQEPY29udGFpbnNFbGVtZW50AgkAzAgCBQxhZG1pblB1YktleTEJAMwIAgUMYWRtaW5QdWJLZXkyCQDMCAIFDGFkbWluUHViS2V5MwUDbmlsCAUBaQ9jYWxsZXJQdWJsaWNLZXkJAAIBAiFPbmx5IGFkbWluIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24JAQdzdXNwZW5kAQIPUGF1c2VkIGJ5IGFkbWluAWkBCGFjdGl2YXRlAAMFBmFjdGl2ZQkAAgECFkRBcHAgaXMgYWxyZWFkeSBhY3RpdmUDCQEBIQEJAQ9jb250YWluc0VsZW1lbnQCCQDMCAIFDGFkbWluUHViS2V5MQkAzAgCBQxhZG1pblB1YktleTIJAMwIAgUMYWRtaW5QdWJLZXkzBQNuaWwIBQFpD2NhbGxlclB1YmxpY0tleQkAAgECIU9ubHkgYWRtaW4gY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgkAzAgCCQEMQm9vbGVhbkVudHJ5AgUHa0FjdGl2ZQYJAMwIAgkBC0RlbGV0ZUVudHJ5AQUGa0NhdXNlBQNuaWwBAnR4AQZ2ZXJpZnkABBJhZG1pblB1YktleTFTaWduZWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABQxhZG1pblB1YktleTEAAQAABBJhZG1pblB1YktleTJTaWduZWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwABBQxhZG1pblB1YktleTIAAQAABBJhZG1pblB1YktleTNTaWduZWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwACBQxhZG1pblB1YktleTMAAQAACQBnAgkAZAIJAGQCBRJhZG1pblB1YktleTFTaWduZWQFEmFkbWluUHViS2V5MlNpZ25lZAUSYWRtaW5QdWJLZXkzU2lnbmVkAAL9H5uL",
    "height": 2228890,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: CMYnog9aWtWcQVuzUcdv2bfLZtxMV7iMrpRDeBayYoXM
Next: 6Bo6MLwMtWFm37WkH8bvkDWv8i4Sw9btSRSQHUrce8Hx

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(getBooleanValue(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 $t032103280 = calcClaimAmount(pool, assetId, user)
105 105          let claimAmount = $t032103280._1
106 106          let lastInterest = $t032103280._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 $t034933568 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
131 131      let pmtAmount = $t034933568._1
132 132      let pmtAssetId = $t034933568._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 + fraction(pmtAmount, scaleValue, totalShareTokensLocked))
137 137  [IntegerEntry(kLastPoolTokenInterest, interestNew)]
138 138      }))
139 139  
140 140  
141 141  
142 142  @Callable(i)
143 143  func updateUserInterest (newUserShareTokensLocked) = valueOrElse(isActive(), valueOrElse(isPoolCall(i.caller), {
144 144      let poolAddr = i.caller
145 145      let user = toString(i.originCaller)
146 146      let pool = toString(poolAddr)
147 147      let assetIds = split(valueOrErrorMessage(getString(poolAddr, kPoolAssetIds), "Can't find pool assets"), ",")
148 148      func calcNewUserInterestAndClaimAmountEtries (acc,assetId) =     {
149 149          let $t043424412 = calcClaimAmount(pool, assetId, user)
150 150          let claimAmount = $t043424412._1
151 151          let lastInterest = $t043424412._2
152 152          (acc :+ [IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserClaimAvailable), claimAmount), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserLastInterest), lastInterest)])
153 153          }
154 154  
155 155      let $l = assetIds
156 156      let $s = size($l)
157 157      let $acc0 = nil
158 158      func $f0_1 ($a,$i) =     if (($i >= $s))
159 159          then $a
160 160          else calcNewUserInterestAndClaimAmountEtries($a, $l[$i])
161 161  
162 162      func $f0_2 ($a,$i) =     if (($i >= $s))
163 163          then $a
164 164          else throw("List size exceeds 15")
165 165  
166 166      $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)
167 167      }))
168 168  
169 169  
170 170  
171 171  @Callable(i)
172 172  func claim (pool) = valueOrElse(isActive(), {
173 173      let poolAddr = Address(fromBase58String(pool))
174 174      let user = toString(i.caller)
175 175      let assetIds = split(valueOrErrorMessage(getString(poolAddr, kPoolAssetIds), "Can't find pool assets"), ",")
176 176      func calcClaimAmountEtries (acc,assetId) =     {
177 177          let $t050655089 = acc
178 178          let entries = $t050655089._1
179 179          let sum = $t050655089._2
180 180          let $t050965166 = calcClaimAmount(pool, assetId, user)
181 181          let claimAmount = $t050965166._1
182 182          let lastInterest = $t050965166._2
183 183          $Tuple2((entries :+ [ScriptTransfer(i.caller, claimAmount, fromBase58String(assetId)), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserClaimAvailable), 0), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserLastInterest), lastInterest)]), claimAmount)
184 184          }
185 185  
186 186      let $t054665548 = {
187 187          let $l = assetIds
188 188          let $s = size($l)
189 189          let $acc0 = $Tuple2(nil, 0)
190 190          func $f0_1 ($a,$i) =         if (($i >= $s))
191 191              then $a
192 192              else calcClaimAmountEtries($a, $l[$i])
193 193  
194 194          func $f0_2 ($a,$i) =         if (($i >= $s))
195 195              then $a
196 196              else throw("List size exceeds 15")
197 197  
198 198          $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)
199 199          }
200 200      let claimEntries = $t054665548._1
201 201      let sumTokens = $t054665548._2
202 202      if ((sumTokens == 0))
203 203          then throw("You have no tokens for claim")
204 204          else claimEntries
205 205      })
206 206  
207 207  
208 208  
209 209  @Callable(i)
210 210  func shutdown () = if (!(active))
211 211      then throw(("DApp is already suspended. Cause: " + valueOrElse(getString(this, kCause), "the cause wasn't specified")))
212 212      else if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
213 213          then throw("Only admin can call this function")
214 214          else suspend("Paused by admin")
215 215  
216 216  
217 217  
218 218  @Callable(i)
219 219  func activate () = if (active)
220 220      then throw("DApp is already active")
221 221      else if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
222 222          then throw("Only admin can call this function")
223 223          else [BooleanEntry(kActive, true), DeleteEntry(kCause)]
224 224  
225 225  
226 226  @Verifier(tx)
227 227  func verify () = {
228 228      let adminPubKey1Signed = if (sigVerify(tx.bodyBytes, tx.proofs[0], adminPubKey1))
229 229          then 1
230 230          else 0
231 231      let adminPubKey2Signed = if (sigVerify(tx.bodyBytes, tx.proofs[1], adminPubKey2))
232 232          then 1
233 233          else 0
234 234      let adminPubKey3Signed = if (sigVerify(tx.bodyBytes, tx.proofs[2], adminPubKey3))
235 235          then 1
236 236          else 0
237 237      (((adminPubKey1Signed + adminPubKey2Signed) + adminPubKey3Signed) >= 2)
238 238      }
239 239

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(getBooleanValue(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 $t032103280 = calcClaimAmount(pool, assetId, user)
105	105	let claimAmount = $t032103280._1
106	106	let lastInterest = $t032103280._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 $t034933568 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
131	131	let pmtAmount = $t034933568._1
132	132	let pmtAssetId = $t034933568._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 + fraction(pmtAmount, scaleValue, totalShareTokensLocked))
137	137	[IntegerEntry(kLastPoolTokenInterest, interestNew)]
138	138	}))
139	139
140	140
141	141
142	142	@Callable(i)
143	143	func updateUserInterest (newUserShareTokensLocked) = valueOrElse(isActive(), valueOrElse(isPoolCall(i.caller), {
144	144	let poolAddr = i.caller
145	145	let user = toString(i.originCaller)
146	146	let pool = toString(poolAddr)
147	147	let assetIds = split(valueOrErrorMessage(getString(poolAddr, kPoolAssetIds), "Can't find pool assets"), ",")
148	148	func calcNewUserInterestAndClaimAmountEtries (acc,assetId) = {
149	149	let $t043424412 = calcClaimAmount(pool, assetId, user)
150	150	let claimAmount = $t043424412._1
151	151	let lastInterest = $t043424412._2
152	152	(acc :+ [IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserClaimAvailable), claimAmount), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserLastInterest), lastInterest)])
153	153	}
154	154
155	155	let $l = assetIds
156	156	let $s = size($l)
157	157	let $acc0 = nil
158	158	func $f0_1 ($a,$i) = if (($i >= $s))
159	159	then $a
160	160	else calcNewUserInterestAndClaimAmountEtries($a, $l[$i])
161	161
162	162	func $f0_2 ($a,$i) = if (($i >= $s))
163	163	then $a
164	164	else throw("List size exceeds 15")
165	165
166	166	$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)
167	167	}))
168	168
169	169
170	170
171	171	@Callable(i)
172	172	func claim (pool) = valueOrElse(isActive(), {
173	173	let poolAddr = Address(fromBase58String(pool))
174	174	let user = toString(i.caller)
175	175	let assetIds = split(valueOrErrorMessage(getString(poolAddr, kPoolAssetIds), "Can't find pool assets"), ",")
176	176	func calcClaimAmountEtries (acc,assetId) = {
177	177	let $t050655089 = acc
178	178	let entries = $t050655089._1
179	179	let sum = $t050655089._2
180	180	let $t050965166 = calcClaimAmount(pool, assetId, user)
181	181	let claimAmount = $t050965166._1
182	182	let lastInterest = $t050965166._2
183	183	$Tuple2((entries :+ [ScriptTransfer(i.caller, claimAmount, fromBase58String(assetId)), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserClaimAvailable), 0), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserLastInterest), lastInterest)]), claimAmount)
184	184	}
185	185
186	186	let $t054665548 = {
187	187	let $l = assetIds
188	188	let $s = size($l)
189	189	let $acc0 = $Tuple2(nil, 0)
190	190	func $f0_1 ($a,$i) = if (($i >= $s))
191	191	then $a
192	192	else calcClaimAmountEtries($a, $l[$i])
193	193
194	194	func $f0_2 ($a,$i) = if (($i >= $s))
195	195	then $a
196	196	else throw("List size exceeds 15")
197	197
198	198	$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)
199	199	}
200	200	let claimEntries = $t054665548._1
201	201	let sumTokens = $t054665548._2
202	202	if ((sumTokens == 0))
203	203	then throw("You have no tokens for claim")
204	204	else claimEntries
205	205	})
206	206
207	207
208	208
209	209	@Callable(i)
210	210	func shutdown () = if (!(active))
211	211	then throw(("DApp is already suspended. Cause: " + valueOrElse(getString(this, kCause), "the cause wasn't specified")))
212	212	else if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
213	213	then throw("Only admin can call this function")
214	214	else suspend("Paused by admin")
215	215
216	216
217	217
218	218	@Callable(i)
219	219	func activate () = if (active)
220	220	then throw("DApp is already active")
221	221	else if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
222	222	then throw("Only admin can call this function")
223	223	else [BooleanEntry(kActive, true), DeleteEntry(kCause)]
224	224
225	225
226	226	@Verifier(tx)
227	227	func verify () = {
228	228	let adminPubKey1Signed = if (sigVerify(tx.bodyBytes, tx.proofs[0], adminPubKey1))
229	229	then 1
230	230	else 0
231	231	let adminPubKey2Signed = if (sigVerify(tx.bodyBytes, tx.proofs[1], adminPubKey2))
232	232	then 1
233	233	else 0
234	234	let adminPubKey3Signed = if (sigVerify(tx.bodyBytes, tx.proofs[2], adminPubKey3))
235	235	then 1
236	236	else 0
237	237	(((adminPubKey1Signed + adminPubKey2Signed) + adminPubKey3Signed) >= 2)
238	238	}
239	239

github/deemru/w8io/026f985 
48.62 ms ◑