tx · 6Bo6MLwMtWFm37WkH8bvkDWv8i4Sw9btSRSQHUrce8Hx

3MxFYk97QYdeHRMTu51rVyHqvFEVB4UtmBX:  -0.01700000 Waves

2022.09.14 17:54 [2228919] smart account 3MxFYk97QYdeHRMTu51rVyHqvFEVB4UtmBX > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "6Bo6MLwMtWFm37WkH8bvkDWv8i4Sw9btSRSQHUrce8Hx",
    "fee": 1700000,
    "feeAssetId": null,
    "timestamp": 1663167279185,
    "version": 2,
    "chainId": 84,
    "sender": "3MxFYk97QYdeHRMTu51rVyHqvFEVB4UtmBX",
    "senderPublicKey": "2panvMtE3s1p1oCdVqRGMuBYaZJV3AZ6zpdmZ6vHkDaL",
    "proofs": [
        "5hxvwixaNESQ3x41dXUTCUUQkxrr6WGKhu6pe3wmaNHoRhCsWzDMrBPgYk4AkLN8JjwRQSpS2tAsdrFFhCCh7bCk",
        "4ujBjyEjbsmbMyyutYquEYZUwdFxBAuewrq2g14inzGrgsyeCQB1nCDiaXussjZ7muXosGHv9N14mzkLN7Lq32S8"
    ],
    "script": "base64:BgISCAISABIDCgEBEgMKAQgSABIAIAAHa0FjdGl2ZQIGYWN0aXZlAAZrQ2F1c2UCDnNodXRkb3duX2NhdXNlABZrTGFzdFBvb2xUb2tlbkludGVyZXN0AhNfcG9vbF9sYXN0X2ludGVyZXN0ABFrVXNlckxhc3RJbnRlcmVzdAITX3VzZXJfbGFzdF9pbnRlcmVzdAATa1VzZXJDbGFpbUF2YWlsYWJsZQIYX3VzZXJfYXZhaWxhYmxlX3RvX2NsYWltABZrVXNlclNoYXJlVG9rZW5zTG9ja2VkAhRfc2hhcmVfdG9rZW5zX2xvY2tlZAASa1NoYXJlVG9rZW5zTG9ja2VkAhpfdG90YWxfc2hhcmVfdG9rZW5zX2xvY2tlZAALa09yYWNsZVBvb2wCBXBvb2xfAA1rUG9vbEFzc2V0SWRzAglhc3NldF9pZHMADWtBZG1pblB1YktleTECC2FkbWluX3B1Yl8xAA1rQWRtaW5QdWJLZXkyAgthZG1pbl9wdWJfMgANa0FkbWluUHViS2V5MwILYWRtaW5fcHViXzMADGtGYXJtaW5nQWRkcgIPZmFybWluZ19hZGRyZXNzAApzY2FsZVZhbHVlAIDC1y8ABm9yYWNsZQkBB0FkZHJlc3MBARoBVOlFqh6QLzqu8boO5i6akl8amITh82KzCAETZ2V0QmFzZTU4RnJvbU9yYWNsZQEDa2V5BAckbWF0Y2gwCQCdCAIFBm9yYWNsZQUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQGc3RyaW5nBQckbWF0Y2gwCQDZBAEFBnN0cmluZwQHbm90aGluZwUHJG1hdGNoMAkAAgEJAKwCAgUDa2V5AghpcyBlbXB0eQAMYWRtaW5QdWJLZXkxCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDWtBZG1pblB1YktleTEADGFkbWluUHViS2V5MgkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQ1rQWRtaW5QdWJLZXkyAAxhZG1pblB1YktleTMJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUNa0FkbWluUHViS2V5MwALZmFybWluZ0FkZHIJAQdBZGRyZXNzAQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQxrRmFybWluZ0FkZHIABmFjdGl2ZQkBC3ZhbHVlT3JFbHNlAgkAmwgCBQR0aGlzBQdrQWN0aXZlBgEIaXNBY3RpdmUAAwUGYWN0aXZlBQR1bml0CQACAQIfREFwcCBpcyBpbmFjdGl2ZSBhdCB0aGlzIG1vbWVudAEKaXNQb29sQ2FsbAEGY2FsbGVyAwkBCWlzRGVmaW5lZAEJAJ0IAgUGb3JhY2xlCQCsAgIFC2tPcmFjbGVQb29sCQClCAEFBmNhbGxlcgUEdW5pdAkAAgECIE9ubHkgcG9vbCBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQdzdXNwZW5kAQVjYXVzZQkAzAgCCQEMQm9vbGVhbkVudHJ5AgUHa0FjdGl2ZQcJAMwIAgkBC1N0cmluZ0VudHJ5AgUGa0NhdXNlBQVjYXVzZQUDbmlsARhnZXRVc2VyU2hhcmVUb2tlbnNMb2NrZWQCBHBvb2wLdXNlckFkZHJlc3MJAQt2YWx1ZU9yRWxzZQIJAJoIAgULZmFybWluZ0FkZHIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FC3VzZXJBZGRyZXNzBRZrVXNlclNoYXJlVG9rZW5zTG9ja2VkAAABGWdldFRvdGFsU2hhcmVUb2tlbnNMb2NrZWQBBHBvb2wJAQt2YWx1ZU9yRWxzZQIJAJoIAgULZmFybWluZ0FkZHIJAKwCAgUEcG9vbAUSa1NoYXJlVG9rZW5zTG9ja2VkAAABE2dldFVzZXJMYXN0SW50ZXJlc3QDBHVzZXIEcG9vbAdhc3NldElkCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQR1c2VyAgFfBQRwb29sAgFfBQdhc3NldElkBRFrVXNlckxhc3RJbnRlcmVzdAAAARhnZXRQb29sVG9rZW5MYXN0SW50ZXJlc3QCBHBvb2wHYXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQdhc3NldElkBRZrTGFzdFBvb2xUb2tlbkludGVyZXN0AAABFWdldFVzZXJDbGFpbUF2YWlsYWJsZQMEdXNlcgRwb29sB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FBHBvb2wCAV8FB2Fzc2V0SWQFE2tVc2VyQ2xhaW1BdmFpbGFibGUAAAENZ2V0U3RyQXNzZXRJZAEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJpZAUHJG1hdGNoMAkA2AQBBQJpZAMJAAECBQckbWF0Y2gwAgRVbml0BAV3YXZlcwUHJG1hdGNoMAIFV0FWRVMJAAIBAgtNYXRjaCBlcnJvcgEPY2FsY0NsYWltQW1vdW50AwRwb29sB2Fzc2V0SWQEdXNlcgQMbGFzdEludGVyZXN0CQEYZ2V0UG9vbFRva2VuTGFzdEludGVyZXN0AgUEcG9vbAUHYXNzZXRJZAQQdXNlckxhc3RJbnRlcmVzdAkBE2dldFVzZXJMYXN0SW50ZXJlc3QDBQR1c2VyBQRwb29sBQdhc3NldElkBBV1c2VyU2hhcmVUb2tlbnNMb2NrZWQJARhnZXRVc2VyU2hhcmVUb2tlbnNMb2NrZWQCBQRwb29sBQR1c2VyBBJ1c2VyQ2xhaW1BdmFpbGFibGUJARVnZXRVc2VyQ2xhaW1BdmFpbGFibGUDBQR1c2VyBQRwb29sBQdhc3NldElkBBVuZXdVc2VyQ2xhaW1BdmFpbGFibGUJAGsDBRV1c2VyU2hhcmVUb2tlbnNMb2NrZWQJAGUCBQxsYXN0SW50ZXJlc3QFEHVzZXJMYXN0SW50ZXJlc3QFCnNjYWxlVmFsdWUJAJQKAgkAZAIFEnVzZXJDbGFpbUF2YWlsYWJsZQUVbmV3VXNlckNsYWltQXZhaWxhYmxlBQxsYXN0SW50ZXJlc3QBF2NhbGNDbGFpbUFtb3VudEV2YWx1YXRlAgRwb29sBHVzZXIECHBvb2xBZGRyCQEHQWRkcmVzcwEJANkEAQUEcG9vbAQIYXNzZXRJZHMJALUJAgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ1rUG9vbEFzc2V0SWRzAhZDYW4ndCBmaW5kIHBvb2wgYXNzZXRzAgEsCgEQY2FsY0NsYWltQW1vdW50cwIDYWNjB2Fzc2V0SWQECyR0MDMyMDUzMjc1CQEPY2FsY0NsYWltQW1vdW50AwUEcG9vbAUHYXNzZXRJZAUEdXNlcgQLY2xhaW1BbW91bnQIBQskdDAzMjA1MzI3NQJfMQQMbGFzdEludGVyZXN0CAULJHQwMzIwNTMyNzUCXzIJAM0IAgUDYWNjCQDMCAIFC2NsYWltQW1vdW50BQNuaWwEDGNsYWltQW1vdW50cwoAAiRsBQhhc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEQY2FsY0NsYWltQW1vdW50cwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8JAJQKAgUIYXNzZXRJZHMFDGNsYWltQW1vdW50cwUBaQEHYWlyRHJvcAAJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAJAQt2YWx1ZU9yRWxzZQIJAQppc1Bvb2xDYWxsAQgFAWkGY2FsbGVyBAskdDAzNDg4MzU2MwkAlAoCCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBAlwbXRBbW91bnQIBQskdDAzNDg4MzU2MwJfMQQKcG10QXNzZXRJZAgFCyR0MDM0ODgzNTYzAl8yBARwb29sCQClCAEIBQFpBmNhbGxlcgQWdG90YWxTaGFyZVRva2Vuc0xvY2tlZAkBGWdldFRvdGFsU2hhcmVUb2tlbnNMb2NrZWQBBQRwb29sBAxsYXN0SW50ZXJlc3QJARhnZXRQb29sVG9rZW5MYXN0SW50ZXJlc3QCBQRwb29sCQENZ2V0U3RyQXNzZXRJZAEFCnBtdEFzc2V0SWQEC2ludGVyZXN0TmV3CQBkAgUMbGFzdEludGVyZXN0CQBrAwUJcG10QW1vdW50BQpzY2FsZVZhbHVlBRZ0b3RhbFNoYXJlVG9rZW5zTG9ja2VkCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRZrTGFzdFBvb2xUb2tlbkludGVyZXN0BQtpbnRlcmVzdE5ldwUDbmlsAWkBEnVwZGF0ZVVzZXJJbnRlcmVzdAEYbmV3VXNlclNoYXJlVG9rZW5zTG9ja2VkCQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUACQELdmFsdWVPckVsc2UCCQEKaXNQb29sQ2FsbAEIBQFpBmNhbGxlcgQIcG9vbEFkZHIIBQFpBmNhbGxlcgQEdXNlcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEBHBvb2wJAKUIAQUIcG9vbEFkZHIECGFzc2V0SWRzCQC1CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQhwb29sQWRkcgUNa1Bvb2xBc3NldElkcwIWQ2FuJ3QgZmluZCBwb29sIGFzc2V0cwIBLAoBJ2NhbGNOZXdVc2VySW50ZXJlc3RBbmRDbGFpbUFtb3VudEV0cmllcwIDYWNjB2Fzc2V0SWQECyR0MDQzMzc0NDA3CQEPY2FsY0NsYWltQW1vdW50AwUEcG9vbAUHYXNzZXRJZAUEdXNlcgQLY2xhaW1BbW91bnQIBQskdDA0MzM3NDQwNwJfMQQMbGFzdEludGVyZXN0CAULJHQwNDMzNzQ0MDcCXzIJAM0IAgUDYWNjCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUEdXNlcgIBXwUEcG9vbAIBXwUHYXNzZXRJZAUTa1VzZXJDbGFpbUF2YWlsYWJsZQULY2xhaW1BbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQR1c2VyAgFfBQRwb29sAgFfBQdhc3NldElkBRFrVXNlckxhc3RJbnRlcmVzdAUMbGFzdEludGVyZXN0BQNuaWwKAAIkbAUIYXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBJ2NhbGNOZXdVc2VySW50ZXJlc3RBbmRDbGFpbUFtb3VudEV0cmllcwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8BaQEFY2xhaW0BBHBvb2wJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAECHBvb2xBZGRyCQEHQWRkcmVzcwEJANkEAQUEcG9vbAQEdXNlcgkApQgBCAUBaQZjYWxsZXIECGFzc2V0SWRzCQC1CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQhwb29sQWRkcgUNa1Bvb2xBc3NldElkcwIWQ2FuJ3QgZmluZCBwb29sIGFzc2V0cwIBLAoBFWNhbGNDbGFpbUFtb3VudEV0cmllcwIDYWNjB2Fzc2V0SWQECyR0MDUwNjA1MDg0BQNhY2MEB2VudHJpZXMIBQskdDA1MDYwNTA4NAJfMQQDc3VtCAULJHQwNTA2MDUwODQCXzIECyR0MDUwOTE1MTYxCQEPY2FsY0NsYWltQW1vdW50AwUEcG9vbAUHYXNzZXRJZAUEdXNlcgQLY2xhaW1BbW91bnQIBQskdDA1MDkxNTE2MQJfMQQMbGFzdEludGVyZXN0CAULJHQwNTA5MTUxNjECXzIJAJQKAgkAzQgCBQdlbnRyaWVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgULY2xhaW1BbW91bnQJANkEAQUHYXNzZXRJZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FBHBvb2wCAV8FB2Fzc2V0SWQFE2tVc2VyQ2xhaW1BdmFpbGFibGUAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FBHBvb2wCAV8FB2Fzc2V0SWQFEWtVc2VyTGFzdEludGVyZXN0BQxsYXN0SW50ZXJlc3QFA25pbAULY2xhaW1BbW91bnQECyR0MDU0NjE1NTQzCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEVY2FsY0NsYWltQW1vdW50RXRyaWVzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwQMY2xhaW1FbnRyaWVzCAULJHQwNTQ2MTU1NDMCXzEECXN1bVRva2VucwgFCyR0MDU0NjE1NTQzAl8yAwkAAAIFCXN1bVRva2VucwAACQACAQIcWW91IGhhdmUgbm8gdG9rZW5zIGZvciBjbGFpbQUMY2xhaW1FbnRyaWVzAWkBCHNodXRkb3duAAMJAQEhAQUGYWN0aXZlCQACAQkArAICAiJEQXBwIGlzIGFscmVhZHkgc3VzcGVuZGVkLiBDYXVzZTogCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMFBmtDYXVzZQIadGhlIGNhdXNlIHdhc24ndCBzcGVjaWZpZWQDCQEBIQEJAQ9jb250YWluc0VsZW1lbnQCCQDMCAIFDGFkbWluUHViS2V5MQkAzAgCBQxhZG1pblB1YktleTIJAMwIAgUMYWRtaW5QdWJLZXkzBQNuaWwIBQFpD2NhbGxlclB1YmxpY0tleQkAAgECIU9ubHkgYWRtaW4gY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgkBB3N1c3BlbmQBAg9QYXVzZWQgYnkgYWRtaW4BaQEIYWN0aXZhdGUAAwUGYWN0aXZlCQACAQIWREFwcCBpcyBhbHJlYWR5IGFjdGl2ZQMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIJAMwIAgUMYWRtaW5QdWJLZXkxCQDMCAIFDGFkbWluUHViS2V5MgkAzAgCBQxhZG1pblB1YktleTMFA25pbAgFAWkPY2FsbGVyUHVibGljS2V5CQACAQIhT25seSBhZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uCQDMCAIJAQxCb29sZWFuRW50cnkCBQdrQWN0aXZlBgkAzAgCCQELRGVsZXRlRW50cnkBBQZrQ2F1c2UFA25pbAECdHgBBnZlcmlmeQAEEmFkbWluUHViS2V5MVNpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFDGFkbWluUHViS2V5MQABAAAEEmFkbWluUHViS2V5MlNpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAEFDGFkbWluUHViS2V5MgABAAAEEmFkbWluUHViS2V5M1NpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAIFDGFkbWluUHViS2V5MwABAAAJAGcCCQBkAgkAZAIFEmFkbWluUHViS2V5MVNpZ25lZAUSYWRtaW5QdWJLZXkyU2lnbmVkBRJhZG1pblB1YktleTNTaWduZWQAAvsjcoQ=",
    "height": 2228919,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2a3MPP5RgimxsNpXpzSALWYkEaVDcP9VFKtPEM73sMoQ
Next: DfKhkihVhFrQmyXj3CapTDXiWZRSKgE2DTXZ1CuMwhWu

Diff: 
Old
New
Differences
47
47
 
48
48
 
let farmingAddr = Address(getBase58FromOracle(kFarmingAddr))
49
49
 
50
-
let active = valueOrElse(getBooleanValue(this, kActive), true)
50
+
let active = valueOrElse(getBoolean(this, kActive), true)
51
51
 
52
52
 
func isActive () = if (active)
53
53
 
    then unit
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
-
        let $t032103280 = calcClaimAmount(pool, assetId, user)
105
-
        let claimAmount = $t032103280._1
106
-
        let lastInterest = $t032103280._2
104
+
        let $t032053275 = calcClaimAmount(pool, assetId, user)
105
+
        let claimAmount = $t032053275._1
106
+
        let lastInterest = $t032053275._2
107
107
 
        (acc :+ [claimAmount])
108
108
 
        }
109
109
 
127
127
 
128
128
 
@Callable(i)
129
129
 
func airDrop () = valueOrElse(isActive(), valueOrElse(isPoolCall(i.caller), {
130
-
    let $t034933568 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
131
-
    let pmtAmount = $t034933568._1
132
-
    let pmtAssetId = $t034933568._2
130
+
    let $t034883563 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
131
+
    let pmtAmount = $t034883563._1
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))
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
-
        let $t043424412 = calcClaimAmount(pool, assetId, user)
150
-
        let claimAmount = $t043424412._1
151
-
        let lastInterest = $t043424412._2
149
+
        let $t043374407 = calcClaimAmount(pool, assetId, user)
150
+
        let claimAmount = $t043374407._1
151
+
        let lastInterest = $t043374407._2
152
152
 
        (acc :+ [IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserClaimAvailable), claimAmount), IntegerEntry((((((user + "_") + pool) + "_") + assetId) + kUserLastInterest), lastInterest)])
153
153
 
        }
154
154
 
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
-
        let $t050655089 = acc
178
-
        let entries = $t050655089._1
179
-
        let sum = $t050655089._2
180
-
        let $t050965166 = calcClaimAmount(pool, assetId, user)
181
-
        let claimAmount = $t050965166._1
182
-
        let lastInterest = $t050965166._2
177
+
        let $t050605084 = acc
178
+
        let entries = $t050605084._1
179
+
        let sum = $t050605084._2
180
+
        let $t050915161 = calcClaimAmount(pool, assetId, user)
181
+
        let claimAmount = $t050915161._1
182
+
        let lastInterest = $t050915161._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
-
    let $t054665548 = {
186
+
    let $t054615543 = {
187
187
 
        let $l = assetIds
188
188
 
        let $s = size($l)
189
189
 
        let $acc0 = $Tuple2(nil, 0)
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
-
    let claimEntries = $t054665548._1
201
-
    let sumTokens = $t054665548._2
200
+
    let claimEntries = $t054615543._1
201
+
    let sumTokens = $t054615543._2
202
202
 
    if ((sumTokens == 0))
203
203
 
        then throw("You have no tokens for claim")
204
204
 
        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
-
let active = valueOrElse(getBooleanValue(this, kActive), true)
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
-
        let $t032103280 = calcClaimAmount(pool, assetId, user)
105
-
        let claimAmount = $t032103280._1
106
-
        let lastInterest = $t032103280._2
104
+
        let $t032053275 = calcClaimAmount(pool, assetId, user)
105
+
        let claimAmount = $t032053275._1
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
-
    let $t034933568 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
131
-
    let pmtAmount = $t034933568._1
132
-
    let pmtAssetId = $t034933568._2
130
+
    let $t034883563 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
131
+
    let pmtAmount = $t034883563._1
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 + 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
-
        let $t043424412 = calcClaimAmount(pool, assetId, user)
150
-
        let claimAmount = $t043424412._1
151
-
        let lastInterest = $t043424412._2
149
+
        let $t043374407 = calcClaimAmount(pool, assetId, user)
150
+
        let claimAmount = $t043374407._1
151
+
        let lastInterest = $t043374407._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
-
        let $t050655089 = acc
178
-
        let entries = $t050655089._1
179
-
        let sum = $t050655089._2
180
-
        let $t050965166 = calcClaimAmount(pool, assetId, user)
181
-
        let claimAmount = $t050965166._1
182
-
        let lastInterest = $t050965166._2
177
+
        let $t050605084 = acc
178
+
        let entries = $t050605084._1
179
+
        let sum = $t050605084._2
180
+
        let $t050915161 = calcClaimAmount(pool, assetId, user)
181
+
        let claimAmount = $t050915161._1
182
+
        let lastInterest = $t050915161._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
-
    let $t054665548 = {
186
+
    let $t054615543 = {
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
-
    let claimEntries = $t054665548._1
201
-
    let sumTokens = $t054665548._2
200
+
    let claimEntries = $t054615543._1
201
+
    let sumTokens = $t054615543._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 
51.60 ms ◑