tx · Ej5mXpi8bmLQ8jkfvvxwTSaZ9LkQi4nqSUtVocHjGMfE

3MpMuGN8rW9EpPwzETAQz88Pe9TQhSwiriq:  -0.16000000 Waves

2023.07.31 15:24 [2690055] smart account 3MpMuGN8rW9EpPwzETAQz88Pe9TQhSwiriq > SELF 0.00000000 Waves

{ "type": 13, "id": "Ej5mXpi8bmLQ8jkfvvxwTSaZ9LkQi4nqSUtVocHjGMfE", "fee": 16000000, "feeAssetId": null, "timestamp": 1690806218192, "version": 2, "chainId": 84, "sender": "3MpMuGN8rW9EpPwzETAQz88Pe9TQhSwiriq", "senderPublicKey": "57SkjQUEwC1ayCqLbXLuzBqifK6B6SR6rfxtGsbAo3zW", "proofs": [ "4Etp4civJHTYPSdUykKSz2PM32GtAQHf9q65A6afM2ED8fNxkB9hainyEXxDaU5QspAY9o4BLz8xXSz54RqKxTKU" ], "script": "base64:BgIkCAISAwoBARIDCgEBEgASAwoBCBIDCgEBEgMKAQgSABIDCgEIMgAMY29udHJhY3RGaWxlAhFsMm1wX3N0YWtpbmcucmlkZQADU0VQAgJfXwAGc2NhbGU4AIDC1y8AB3NjYWxlMTgAgICQu7rWrfANAA1zY2FsZTE4QmlnSW50CQC2AgEFB3NjYWxlMTgAEkFERFJFU1NfQllURVNfU0laRQAaAA1CTE9DS1NfSU5fREFZAKALAQh0aHJvd0VycgEDbXNnCQACAQkArAICCQCsAgIFDGNvbnRyYWN0RmlsZQICOiAFA21zZwAKa2V5QXNzZXRJZAkAuQkCCQDMCAICAiVzCQDMCAICB2Fzc2V0SWQFA25pbAUDU0VQABNrZXlFbWlzc2lvblBlckJsb2NrCQC5CQIJAMwIAgICJXMJAMwIAgIQZW1pc3Npb25QZXJCbG9jawUDbmlsBQNTRVAAGWtleUVtaXNzaW9uUGVyaW9kSW5CbG9ja3MJALkJAgkAzAgCAgIlcwkAzAgCAhZlbWlzc2lvblBlcmlvZEluQmxvY2tzBQNuaWwFA1NFUAANa2V5U3RhcnRCbG9jawkAuQkCCQDMCAICAiVzCQDMCAICCnN0YXJ0QmxvY2sFA25pbAUDU0VQABBrZXlUb3RhbExwQW1vdW50CQC5CQIJAMwIAgICJXMJAMwIAgINdG90YWxMcEFtb3VudAUDbmlsBQNTRVAAE2tleVRvdGFsQXNzZXRBbW91bnQJALkJAgkAzAgCAgIlcwkAzAgCAhB0b3RhbEFzc2V0QW1vdW50BQNuaWwFA1NFUAEPa2V5VXNlckxwQW1vdW50AQt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBCVzJXMJAMwIAgIMdXNlckxwQW1vdW50CQDMCAIFC3VzZXJBZGRyZXNzBQNuaWwFA1NFUAEaa2V5VXNlclRvdGFsQXNzZXRXaXRoZHJhd24BC3VzZXJBZGRyZXNzCQC5CQIJAMwIAgIEJXMlcwkAzAgCAhN0b3RhbEFzc2V0V2l0aGRyYXduCQDMCAIFC3VzZXJBZGRyZXNzBQNuaWwFA1NFUAEXa2V5VXNlclRvdGFsQXNzZXRTdGFrZWQBC3VzZXJBZGRyZXNzCQC5CQIJAMwIAgIEJXMlcwkAzAgCAhB0b3RhbEFzc2V0U3Rha2VkCQDMCAIFC3VzZXJBZGRyZXNzBQNuaWwFA1NFUAEKa2V5SGlzdG9yeQMEdHlwZQt1c2VyQWRkcmVzcwR0eElkCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFBHR5cGUJAMwIAgULdXNlckFkZHJlc3MJAMwIAgkA2AQBBQR0eElkBQNuaWwFA1NFUAENZm9ybWF0SGlzdG9yeQQLdG90YWxQcm9maXQFcHJpY2UQdG90YWxBc3NldEFtb3VudA10b3RhbExwQW1vdW50CQC5CQIJAMwIAgIEJWQlZAkAzAgCCQCkAwEFC3RvdGFsUHJvZml0CQDMCAIJAKYDAQUFcHJpY2UJAMwIAgkApAMBBRB0b3RhbEFzc2V0QW1vdW50CQDMCAIJAKQDAQUNdG90YWxMcEFtb3VudAUDbmlsBQNTRVAADXRvdGFsTHBBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUQa2V5VG90YWxMcEFtb3VudAAAABB0b3RhbEFzc2V0QW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFE2tleVRvdGFsQXNzZXRBbW91bnQAAAANYXNzZXRJZFN0cmluZwkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzBQprZXlBc3NldElkAgVXQVZFUwAMYXNzZXRJZEJ5dGVzAwkAAAIFDWFzc2V0SWRTdHJpbmcCBVdBVkVTBQR1bml0CQDZBAEFDWFzc2V0SWRTdHJpbmcAFmVtaXNzaW9uUGVyaW9kSW5CbG9ja3MJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUZa2V5RW1pc3Npb25QZXJpb2RJbkJsb2NrcwUNQkxPQ0tTX0lOX0RBWQARZW1pc3Npb25QZXJQZXJpb2QJAGgCCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFE2tleUVtaXNzaW9uUGVyQmxvY2sAAAUWZW1pc3Npb25QZXJpb2RJbkJsb2NrcwAPQURNSU5fTElTVF9TSVpFAAUABlFVT1JVTQADABFUWElEX0JZVEVTX0xFTkdUSAAgARhrZXlBbGxvd2VkVHhJZFZvdGVQcmVmaXgBBHR4SWQJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIJYWxsb3dUeElkCQDMCAIFBHR4SWQFA25pbAUDU0VQARBrZXlGdWxsQWRtaW5Wb3RlAgZwcmVmaXgMYWRtaW5BZGRyZXNzCQC5CQIJAMwIAgUGcHJlZml4CQDMCAIFDGFkbWluQWRkcmVzcwUDbmlsBQNTRVABE2tleUFkbWluQWRkcmVzc0xpc3QACQC5CQIJAMwIAgICJXMJAMwIAgIQYWRtaW5BZGRyZXNzTGlzdAUDbmlsBQNTRVABDmtleUFsbG93ZWRUeElkAAkAuQkCCQDMCAICAiVzCQDMCAICBHR4SWQFA25pbAUDU0VQAQxnZXRBZG1pblZvdGUCBnByZWZpeAVhZG1pbgQHdm90ZUtleQkBEGtleUZ1bGxBZG1pblZvdGUCBQZwcmVmaXgFBWFkbWluCQELdmFsdWVPckVsc2UCCQCfCAEFB3ZvdGVLZXkAAAENZ2V0QWRtaW5zTGlzdAAEByRtYXRjaDAJAJ0IAgUEdGhpcwkBE2tleUFkbWluQWRkcmVzc0xpc3QAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkAtQkCBQFzBQNTRVAFA25pbAENaXNJbkFkbWluTGlzdAEHYWRkcmVzcwkBD2NvbnRhaW5zRWxlbWVudAIJAQ1nZXRBZG1pbnNMaXN0AAUHYWRkcmVzcwESZ2VuVm90ZXNLZXlzSGVscGVyAgFhDGFkbWluQWRkcmVzcwQLJHQwMzA0NTMwNjkFAWEEBnJlc3VsdAgFCyR0MDMwNDUzMDY5Al8xBAZwcmVmaXgIBQskdDAzMDQ1MzA2OQJfMgkAlAoCCQDNCAIFBnJlc3VsdAkBEGtleUZ1bGxBZG1pblZvdGUCBQZwcmVmaXgFDGFkbWluQWRkcmVzcwUGcHJlZml4AQxnZW5Wb3Rlc0tleXMBCWtleVByZWZpeAQJYWRtaW5MaXN0CQETa2V5QWRtaW5BZGRyZXNzTGlzdAAECyR0MDMyMTYzMzAwCgACJGwJAQ1nZXRBZG1pbnNMaXN0AAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsBQlrZXlQcmVmaXgKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEmdlblZvdGVzS2V5c0hlbHBlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUEBnJlc3VsdAgFCyR0MDMyMTYzMzAwAl8xBAZwcmVmaXgIBQskdDAzMjE2MzMwMAJfMgUGcmVzdWx0ARBjb3VudFZvdGVzSGVscGVyAgZyZXN1bHQHdm90ZUtleQkAZAIFBnJlc3VsdAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQd2b3RlS2V5AAABCmNvdW50Vm90ZXMBBnByZWZpeAQFdm90ZXMJAQxnZW5Wb3Rlc0tleXMBBQZwcmVmaXgKAAIkbAUFdm90ZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEGNvdW50Vm90ZXNIZWxwZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFARBjbGVhclZvdGVzSGVscGVyAgZyZXN1bHQDa2V5CQDNCAIFBnJlc3VsdAkBC0RlbGV0ZUVudHJ5AQUDa2V5ARNnZXRDbGVhclZvdGVFbnRyaWVzAQZwcmVmaXgEBXZvdGVzCQEMZ2VuVm90ZXNLZXlzAQUGcHJlZml4CgACJGwFBXZvdGVzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARBjbGVhclZvdGVzSGVscGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQEMdm90ZUlOVEVSTkFMBBNjYWxsZXJBZGRyZXNzU3RyaW5nCWtleVByZWZpeAhtaW5Wb3Rlcwp2b3RlUmVzdWx0BAd2b3RlS2V5CQEQa2V5RnVsbEFkbWluVm90ZQIFCWtleVByZWZpeAUTY2FsbGVyQWRkcmVzc1N0cmluZwQQYWRtaW5DdXJyZW50Vm90ZQkBDGdldEFkbWluVm90ZQIFCWtleVByZWZpeAUTY2FsbGVyQWRkcmVzc1N0cmluZwQDZXJyAwkBASEBCQENaXNJbkFkbWluTGlzdAEFE2NhbGxlckFkZHJlc3NTdHJpbmcJAQh0aHJvd0VycgEJAKwCAgkArAICAglBZGRyZXNzOiAFE2NhbGxlckFkZHJlc3NTdHJpbmcCEiBub3QgaW4gQWRtaW4gbGlzdAMJAAACBRBhZG1pbkN1cnJlbnRWb3RlAAEJAQh0aHJvd0VycgEJAKwCAgUHdm90ZUtleQISIHlvdSBhbHJlYWR5IHZvdGVkBQR1bml0AwkAAAIFA2VycgUDZXJyBAV2b3RlcwkBCmNvdW50Vm90ZXMBBQlrZXlQcmVmaXgDCQBnAgkAZAIFBXZvdGVzAAEFCG1pblZvdGVzBBBjbGVhclZvdGVFbnRyaWVzCQETZ2V0Q2xlYXJWb3RlRW50cmllcwEFCWtleVByZWZpeAkAzggCBRBjbGVhclZvdGVFbnRyaWVzBQp2b3RlUmVzdWx0CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd2b3RlS2V5AAEFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEYY2FsY1RvdGFsUHJvZml0Rm9ySGVpZ2h0AQFoBApzdGFydEJsb2NrCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFDWtleVN0YXJ0QmxvY2sAAAQLc3RhcnRQZXJpb2QJAGsDBQpzdGFydEJsb2NrAAEFFmVtaXNzaW9uUGVyaW9kSW5CbG9ja3MEDmVsYXBzZWRQZXJpb2RzCQBlAgkAaQIFAWgFFmVtaXNzaW9uUGVyaW9kSW5CbG9ja3MFC3N0YXJ0UGVyaW9kCQCWAwEJAMwIAgAACQDMCAIJAGgCBRFlbWlzc2lvblBlclBlcmlvZAUOZWxhcHNlZFBlcmlvZHMFA25pbAEPY2FsY1RvdGFsUHJvZml0AAkBGGNhbGNUb3RhbFByb2ZpdEZvckhlaWdodAEFBmhlaWdodAErZ2V0VG90YWxBc3NldEFtb3VudFdpdGhQcm9maXRPck1heEF2YWlsYWJsZQAEGnRvdGFsQXNzZXRBbW91bnRXaXRoUHJvZml0CQBkAgUQdG90YWxBc3NldEFtb3VudAkBD2NhbGNUb3RhbFByb2ZpdAAEC3RvdGFsQW1vdW50BAckbWF0Y2gwBQxhc3NldElkQnl0ZXMDCQABAgUHJG1hdGNoMAIEVW5pdAQBdQUHJG1hdGNoMAkAlwMBCQDMCAIFGnRvdGFsQXNzZXRBbW91bnRXaXRoUHJvZml0CQDMCAIICQDvBwEFBHRoaXMJYXZhaWxhYmxlBQNuaWwDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQBYgUHJG1hdGNoMAkAlwMBCQDMCAIFGnRvdGFsQXNzZXRBbW91bnRXaXRoUHJvZml0CQDMCAIJAPAHAgUEdGhpcwUBYgUDbmlsCQACAQILTWF0Y2ggZXJyb3IDCQAAAgUNdG90YWxMcEFtb3VudAAAAAAFC3RvdGFsQW1vdW50AQ9nZXRDdXJyZW50UHJpY2UAAwkBAiE9AgUNdG90YWxMcEFtb3VudAAACQC8AgMJALYCAQkBK2dldFRvdGFsQXNzZXRBbW91bnRXaXRoUHJvZml0T3JNYXhBdmFpbGFibGUABQ1zY2FsZTE4QmlnSW50CQC2AgEFDXRvdGFsTHBBbW91bnQFDXNjYWxlMThCaWdJbnQBD2dldFVzZXJMcEFtb3VudAELdXNlckFkZHJlc3MJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkBD2tleVVzZXJMcEFtb3VudAEFC3VzZXJBZGRyZXNzAAABIGdldFVzZXJBdmFpbGFibGVBc3NldHNUb1dpdGhkcmF3AQt1c2VyQWRkcmVzcwQMdXNlckxwQW1vdW50CQEPZ2V0VXNlckxwQW1vdW50AQULdXNlckFkZHJlc3MEHHVzZXJBdmFpbGFibGVBc3NldFRvV2l0aGRyYXcJAKADAQkAvAIDCQC2AgEFDHVzZXJMcEFtb3VudAkBD2dldEN1cnJlbnRQcmljZQAFDXNjYWxlMThCaWdJbnQEHHJvdW5kZWRMcEFtb3VudEZyb21BdmFpbGFibGUJAKADAQkAvAIDCQC2AgEFHHVzZXJBdmFpbGFibGVBc3NldFRvV2l0aGRyYXcFDXNjYWxlMThCaWdJbnQJAQ9nZXRDdXJyZW50UHJpY2UABCByb3VuZGVkQXNzZXRzQXZhaWxhYmxlVG9XaXRoZHJhdwkAoAMBCQC8AgMJALYCAQUccm91bmRlZExwQW1vdW50RnJvbUF2YWlsYWJsZQkBD2dldEN1cnJlbnRQcmljZQAFDXNjYWxlMThCaWdJbnQJAJYDAQkAzAgCAAAJAMwIAgkAlwMBCQDMCAIFHHVzZXJBdmFpbGFibGVBc3NldFRvV2l0aGRyYXcJAMwIAgUccm91bmRlZExwQW1vdW50RnJvbUF2YWlsYWJsZQUDbmlsBQNuaWwBD2dldFN0YWtlQWN0aW9ucwIBaQt1c2VyQWRkcmVzcwQGY2hlY2tzCQDMCAIDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABBgkBCHRocm93RXJyAQIYc2hvdWxkIGluY2x1ZGUgMSBwYXltZW50CQDMCAIDCQAAAggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQxhc3NldElkQnl0ZXMGCQEIdGhyb3dFcnIBCQCsAgICFXBheW1lbnQgc2hvdWxkIGJlIGluIAUNYXNzZXRJZFN0cmluZwkAzAgCAwkAZgIICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AAAGAidwYXltZW50IGFtb3VudCBzaG91bGQgYmUgZ3JlYXRlciB0aGFuIDAFA25pbAMJAAACBQZjaGVja3MFBmNoZWNrcwQNcGF5bWVudEFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQED3BheW1lbnRMcEFtb3VudAkAoAMBCQC8AgMJALYCAQUNcGF5bWVudEFtb3VudAUNc2NhbGUxOEJpZ0ludAkBD2dldEN1cnJlbnRQcmljZQAEDHVzZXJMcEFtb3VudAkBD2dldFVzZXJMcEFtb3VudAEFC3VzZXJBZGRyZXNzBBV1c2VyVG90YWxTdGFrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkBF2tleVVzZXJUb3RhbEFzc2V0U3Rha2VkAQULdXNlckFkZHJlc3MAAAQQbmV3VG90YWxMcEFtb3VudAkAZAIFDXRvdGFsTHBBbW91bnQFD3BheW1lbnRMcEFtb3VudAQTbmV3VG90YWxBc3NldEFtb3VudAkAZAIFEHRvdGFsQXNzZXRBbW91bnQFDXBheW1lbnRBbW91bnQED25ld1VzZXJMcEFtb3VudAkAZAIFDHVzZXJMcEFtb3VudAUPcGF5bWVudExwQW1vdW50BBhuZXdVc2VyVG90YWxTdGFrZWRBbW91bnQJAGQCBRV1c2VyVG90YWxTdGFrZWRBbW91bnQFDXBheW1lbnRBbW91bnQEF3VwZGF0ZVN0YXJ0SGVpZ2h0QWN0aW9uAwkAAAIFDXRvdGFsTHBBbW91bnQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgUNa2V5U3RhcnRCbG9jawUGaGVpZ2h0BQNuaWwFA25pbAkAzggCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQprZXlIaXN0b3J5AwIFc3Rha2UFC3VzZXJBZGRyZXNzCAUBaQ10cmFuc2FjdGlvbklkCQENZm9ybWF0SGlzdG9yeQQJAQ9jYWxjVG90YWxQcm9maXQACQEPZ2V0Q3VycmVudFByaWNlAAUNdG90YWxMcEFtb3VudAUQdG90YWxBc3NldEFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUQa2V5VG90YWxMcEFtb3VudAUQbmV3VG90YWxMcEFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUTa2V5VG90YWxBc3NldEFtb3VudAUTbmV3VG90YWxBc3NldEFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBD2tleVVzZXJMcEFtb3VudAEFC3VzZXJBZGRyZXNzBQ9uZXdVc2VyTHBBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJARdrZXlVc2VyVG90YWxBc3NldFN0YWtlZAEFC3VzZXJBZGRyZXNzBRhuZXdVc2VyVG90YWxTdGFrZWRBbW91bnQFA25pbAUXdXBkYXRlU3RhcnRIZWlnaHRBY3Rpb24JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BEmdldFdpdGhkcmF3QWN0aW9ucwIBaRVscEFzc2V0V2l0aGRyYXdBbW91bnQEC3VzZXJBZGRyZXNzCQClCAEIBQFpBmNhbGxlcgQMdXNlckxwQW1vdW50CQEPZ2V0VXNlckxwQW1vdW50AQULdXNlckFkZHJlc3MEBWNoZWNrCQDMCAIDCQBmAgUVbHBBc3NldFdpdGhkcmF3QW1vdW50AAAGCQEIdGhyb3dFcnIBAh9MUCBhbW91bnQgc2hvdWxkIGJlIG1vcmUgdGhhbiAwCQDMCAIDCQBnAgUMdXNlckxwQW1vdW50BRVscEFzc2V0V2l0aGRyYXdBbW91bnQGCQEIdGhyb3dFcnIBCQCsAgIJAKwCAgIoY2Fubm90IHdpdGhkcmF3IG1vcmUgdGhhbiBhdmFpbGFibGUgTFAgKAkApAMBBQx1c2VyTHBBbW91bnQCASkFA25pbAMJAAACBQVjaGVjawUFY2hlY2sED25ld1VzZXJMcEFtb3VudAkAZQIFDHVzZXJMcEFtb3VudAUVbHBBc3NldFdpdGhkcmF3QW1vdW50BBN3aXRoZHJhd0Fzc2V0QW1vdW50CQCgAwEJALwCAwkAtgIBBRVscEFzc2V0V2l0aGRyYXdBbW91bnQJAQ9nZXRDdXJyZW50UHJpY2UABQ1zY2FsZTE4QmlnSW50BBBuZXdUb3RhbExwQW1vdW50CQBlAgUNdG90YWxMcEFtb3VudAUVbHBBc3NldFdpdGhkcmF3QW1vdW50BBNuZXdUb3RhbEFzc2V0QW1vdW50CQCgAwEJALwCAwkAtgIBBRBuZXdUb3RhbExwQW1vdW50CQEPZ2V0Q3VycmVudFByaWNlAAUNc2NhbGUxOEJpZ0ludAQXdXNlclRvdGFsQXNzZXRXaXRoZHJhd24JAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkBGmtleVVzZXJUb3RhbEFzc2V0V2l0aGRyYXduAQULdXNlckFkZHJlc3MAAAQabmV3VXNlclRvdGFsQXNzZXRXaXRoZHJhd24JAGQCBRd1c2VyVG90YWxBc3NldFdpdGhkcmF3bgUTd2l0aGRyYXdBc3NldEFtb3VudAkAzAgCCQELU3RyaW5nRW50cnkCCQEKa2V5SGlzdG9yeQMCCHdpdGhkcmF3BQt1c2VyQWRkcmVzcwgFAWkNdHJhbnNhY3Rpb25JZAkBDWZvcm1hdEhpc3RvcnkECQEPY2FsY1RvdGFsUHJvZml0AAkBD2dldEN1cnJlbnRQcmljZQAFDXRvdGFsTHBBbW91bnQFEHRvdGFsQXNzZXRBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFEGtleVRvdGFsTHBBbW91bnQFEG5ld1RvdGFsTHBBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFE2tleVRvdGFsQXNzZXRBbW91bnQFE25ld1RvdGFsQXNzZXRBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAQ9rZXlVc2VyTHBBbW91bnQBBQt1c2VyQWRkcmVzcwUPbmV3VXNlckxwQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEaa2V5VXNlclRvdGFsQXNzZXRXaXRoZHJhd24BBQt1c2VyQWRkcmVzcwUabmV3VXNlclRvdGFsQXNzZXRXaXRoZHJhd24JAMwIAgkBDEludGVnZXJFbnRyeQIFDWtleVN0YXJ0QmxvY2sFBmhlaWdodAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFE3dpdGhkcmF3QXNzZXRBbW91bnQFDGFzc2V0SWRCeXRlcwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCAFpARNzZXRFbWlzc2lvblBlckJsb2NrARBlbWlzc2lvblBlckJsb2NrBAVjaGVjawkAzAgCAwkAAAIIBQFpBmNhbGxlcgUEdGhpcwYJAQh0aHJvd0VycgECEXBlcm1pc3Npb24gZGVuaWVkBQNuaWwDCQAAAgUFY2hlY2sFBWNoZWNrCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRNrZXlUb3RhbEFzc2V0QW1vdW50CQErZ2V0VG90YWxBc3NldEFtb3VudFdpdGhQcm9maXRPck1heEF2YWlsYWJsZQAJAMwIAgkBDEludGVnZXJFbnRyeQIFDWtleVN0YXJ0QmxvY2sFBmhlaWdodAkAzAgCCQEMSW50ZWdlckVudHJ5AgUTa2V5RW1pc3Npb25QZXJCbG9jawkAlgMBCQDMCAIAAAkAzAgCBRBlbWlzc2lvblBlckJsb2NrBQNuaWwFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARlzZXRFbWlzc2lvblBlcmlvZEluQmxvY2tzAQFwBAVjaGVjawkAzAgCAwkAZgIFAXAAAAYJAQh0aHJvd0VycgECKGVtaXNzaW9uIHBlcmlvZCBzaG91bGQgYmUgZ3JlYXRlciB0aGFuIDAJAMwIAgMJAAACCAUBaQZjYWxsZXIFBHRoaXMGCQEIdGhyb3dFcnIBAhFwZXJtaXNzaW9uIGRlbmllZAUDbmlsAwkAAAIFBWNoZWNrBQVjaGVjawkAzAgCCQEMSW50ZWdlckVudHJ5AgUTa2V5VG90YWxBc3NldEFtb3VudAkBK2dldFRvdGFsQXNzZXRBbW91bnRXaXRoUHJvZml0T3JNYXhBdmFpbGFibGUACQDMCAIJAQxJbnRlZ2VyRW50cnkCBQ1rZXlTdGFydEJsb2NrBQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIFGWtleUVtaXNzaW9uUGVyaW9kSW5CbG9ja3MFAXAFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQVzdGFrZQAJAQ9nZXRTdGFrZUFjdGlvbnMCBQFpCQClCAEIBQFpBmNhbGxlcgFpAQhzdGFrZUZvcgELdXNlckFkZHJlc3MEBWNoZWNrCQDMCAIDCQAAAgkAyAEBCQDZBAEFC3VzZXJBZGRyZXNzBRJBRERSRVNTX0JZVEVTX1NJWkUGCQEIdGhyb3dFcnIBAhRhZGRyZXNzIGlzIG5vdCB2YWxpZAUDbmlsAwkAAAIFBWNoZWNrBQVjaGVjawkBD2dldFN0YWtlQWN0aW9ucwIFAWkFC3VzZXJBZGRyZXNzCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCHdpdGhkcmF3ARN3aXRoZHJhd0Fzc2V0QW1vdW50BAt1c2VyQWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEDHVzZXJMcEFtb3VudAkBD2dldFVzZXJMcEFtb3VudAEFC3VzZXJBZGRyZXNzBBJscEFtb3VudFRvV2l0aGRyYXcJAKADAQkAvAIDCQC2AgEFE3dpdGhkcmF3QXNzZXRBbW91bnQFDXNjYWxlMThCaWdJbnQJAQ9nZXRDdXJyZW50UHJpY2UABBx1c2VyQXZhaWxhYmxlQXNzZXRUb1dpdGhkcmF3CQEgZ2V0VXNlckF2YWlsYWJsZUFzc2V0c1RvV2l0aGRyYXcBBQt1c2VyQWRkcmVzcwQWbWluV2l0aGRyYXdBc3NldEFtb3VudAkAoAMBCQC9AgQJAQ9nZXRDdXJyZW50UHJpY2UACQC2AgEAAQUNc2NhbGUxOEJpZ0ludAUHQ0VJTElORwQFY2hlY2sJAMwIAgMJAGYCBRN3aXRoZHJhd0Fzc2V0QW1vdW50AAAGCQEIdGhyb3dFcnIBAiV3aXRoZHJhdyBhbW91bnQgc2hvdWxkIGJlIG1vcmUgdGhhbiAwCQDMCAIDCQBnAgUcdXNlckF2YWlsYWJsZUFzc2V0VG9XaXRoZHJhdwUTd2l0aGRyYXdBc3NldEFtb3VudAYJAQh0aHJvd0VycgEJAKwCAgkArAICAiVjYW5ub3Qgd2l0aGRyYXcgbW9yZSB0aGFuIGF2YWlsYWJsZSAoCQCkAwEFHHVzZXJBdmFpbGFibGVBc3NldFRvV2l0aGRyYXcCASkJAMwIAgMJAGcCBRN3aXRoZHJhd0Fzc2V0QW1vdW50BRZtaW5XaXRoZHJhd0Fzc2V0QW1vdW50BgkBCHRocm93RXJyAQkArAICCQCsAgICJHdpdGhkcmF3IGFtb3VudCBpcyB0b28gc21hbGwuIE1pbjogKAkApAMBBRZtaW5XaXRoZHJhd0Fzc2V0QW1vdW50AgEpBQNuaWwDCQAAAgUFY2hlY2sFBWNoZWNrCQESZ2V0V2l0aGRyYXdBY3Rpb25zAgUBaQUSbHBBbW91bnRUb1dpdGhkcmF3CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBFWdldFVzZXJBc3NldHNSRUFET05MWQELdXNlckFkZHJlc3MEDHVzZXJMcEFtb3VudAkBD2dldFVzZXJMcEFtb3VudAEFC3VzZXJBZGRyZXNzBBx1c2VyQXZhaWxhYmxlQXNzZXRUb1dpdGhkcmF3CQEgZ2V0VXNlckF2YWlsYWJsZUFzc2V0c1RvV2l0aGRyYXcBBQt1c2VyQWRkcmVzcwQVdXNlclRvdGFsU3Rha2VkQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJARdrZXlVc2VyVG90YWxBc3NldFN0YWtlZAEFC3VzZXJBZGRyZXNzAAAEF3VzZXJUb3RhbEFzc2V0V2l0aGRyYXduCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJARprZXlVc2VyVG90YWxBc3NldFdpdGhkcmF3bgEFC3VzZXJBZGRyZXNzAAAJAJQKAgUDbmlsCQCXCgUFDHVzZXJMcEFtb3VudAUcdXNlckF2YWlsYWJsZUFzc2V0VG9XaXRoZHJhdwkBD2dldEN1cnJlbnRQcmljZQAFFXVzZXJUb3RhbFN0YWtlZEFtb3VudAUXdXNlclRvdGFsQXNzZXRXaXRoZHJhd24BaQEWZ2V0VG90YWxBc3NldHNSRUFET05MWQAJAJQKAgUDbmlsCQCVCgMFDXRvdGFsTHBBbW91bnQJAStnZXRUb3RhbEFzc2V0QW1vdW50V2l0aFByb2ZpdE9yTWF4QXZhaWxhYmxlAAkBD2dldEN1cnJlbnRQcmljZQABaQELdm90ZUZvclR4SWQBBHR4SWQEE2NhbGxlckFkZHJlc3NTdHJpbmcJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQJa2V5UHJlZml4CQEYa2V5QWxsb3dlZFR4SWRWb3RlUHJlZml4AQUEdHhJZAQGcmVzdWx0CQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ5rZXlBbGxvd2VkVHhJZAAFBHR4SWQFA25pbAQRYWxsb3dlZFR4SWRPcHRpb24JAJ0IAgUEdGhpcwkBDmtleUFsbG93ZWRUeElkAAQDZXJyCQDMCAIDCQAAAgkAyAEBCQDZBAEFBHR4SWQFEVRYSURfQllURVNfTEVOR1RIBgkBCHRocm93RXJyAQkArAICBQR0eElkAhIgaXMgbm90IHZhbGlkIHR4SWQJAMwIAgMDCQAAAgURYWxsb3dlZFR4SWRPcHRpb24FBHVuaXQGCQECIT0CCQEFdmFsdWUBBRFhbGxvd2VkVHhJZE9wdGlvbgUEdHhJZAYJAQh0aHJvd0VycgEJAKwCAgUEdHhJZAITIGlzIGFscmVhZHkgYWxsb3dlZAUDbmlsAwkAAAIFA2VycgUDZXJyCQEMdm90ZUlOVEVSTkFMBAUTY2FsbGVyQWRkcmVzc1N0cmluZwUJa2V5UHJlZml4BQZRVU9SVU0FBnJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAECGJ5QWRtaW5zCQAAAggFAnR4AmlkCQDZBAEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleUFsbG93ZWRUeElkAAIABAdieU93bmVyAwkAZwIJAJADAQkBDWdldEFkbWluc0xpc3QABQZRVU9SVU0HCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5AwUIYnlBZG1pbnMGBQdieU93bmVyRoGTgQ==", "height": 2690055, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: GNgVpsstBv7bavKTgTETGZYsy6cQaeSpTNXBXTYkAZgf Next: 7vWYwan9jcdEdRYtSZsqJWFF7WB9HV4sY8WE5PbwmLuB Diff:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let contractFile = "mpt_staking.ride"
4+let contractFile = "l2mp_staking.ride"
55
66 let SEP = "__"
77
88 let scale8 = 100000000
9+
10+let scale18 = 1000000000000000000
11+
12+let scale18BigInt = toBigInt(scale18)
913
1014 let ADDRESS_BYTES_SIZE = 26
1115
3539 func keyUserTotalAssetStaked (userAddress) = makeString(["%s%s", "totalAssetStaked", userAddress], SEP)
3640
3741
42+func keyHistory (type,userAddress,txId) = makeString(["%s%s%s", type, userAddress, toBase58String(txId)], SEP)
43+
44+
45+func formatHistory (totalProfit,price,totalAssetAmount,totalLpAmount) = makeString(["%d%d", toString(totalProfit), toString(price), toString(totalAssetAmount), toString(totalLpAmount)], SEP)
46+
47+
3848 let totalLpAmount = valueOrElse(getInteger(this, keyTotalLpAmount), 0)
3949
4050 let totalAssetAmount = valueOrElse(getInteger(this, keyTotalAssetAmount), 0)
4858 let emissionPeriodInBlocks = valueOrElse(getInteger(this, keyEmissionPeriodInBlocks), BLOCKS_IN_DAY)
4959
5060 let emissionPerPeriod = (valueOrElse(getInteger(this, keyEmissionPerBlock), 0) * emissionPeriodInBlocks)
51-
52-let heightInPeriods = fraction(height, 1, emissionPeriodInBlocks)
5361
5462 let ADMIN_LIST_SIZE = 5
5563
8795
8896
8997 func genVotesKeysHelper (a,adminAddress) = {
90- let $t026382662 = a
91- let result = $t026382662._1
92- let prefix = $t026382662._2
98+ let $t030453069 = a
99+ let result = $t030453069._1
100+ let prefix = $t030453069._2
93101 $Tuple2((result :+ keyFullAdminVote(prefix, adminAddress)), prefix)
94102 }
95103
96104
97105 func genVotesKeys (keyPrefix) = {
98106 let adminList = keyAdminAddressList()
99- let $t028092893 = {
107+ let $t032163300 = {
100108 let $l = getAdminsList()
101109 let $s = size($l)
102110 let $acc0 = $Tuple2(nil, keyPrefix)
110118
111119 $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
112120 }
113- let result = $t028092893._1
114- let prefix = $t028092893._2
121+ let result = $t032163300._1
122+ let prefix = $t032163300._2
115123 result
116124 }
117125
178186 }
179187
180188
181-func calcTotalProfit () = {
189+func calcTotalProfitForHeight (h) = {
182190 let startBlock = valueOrElse(getInteger(this, keyStartBlock), 0)
183191 let startPeriod = fraction(startBlock, 1, emissionPeriodInBlocks)
184- let elapsedPeriods = (heightInPeriods - startPeriod)
192+ let elapsedPeriods = ((h / emissionPeriodInBlocks) - startPeriod)
185193 max([0, (emissionPerPeriod * elapsedPeriods)])
186194 }
195+
196+
197+func calcTotalProfit () = calcTotalProfitForHeight(height)
187198
188199
189200 func getTotalAssetAmountWithProfitOrMaxAvailable () = {
203214
204215
205216 func getCurrentPrice () = if ((totalLpAmount != 0))
206- then fraction(getTotalAssetAmountWithProfitOrMaxAvailable(), scale8, totalLpAmount)
207- else (1 * scale8)
217+ then fraction(toBigInt(getTotalAssetAmountWithProfitOrMaxAvailable()), scale18BigInt, toBigInt(totalLpAmount))
218+ else scale18BigInt
208219
209220
210221 func getUserLpAmount (userAddress) = valueOrElse(getInteger(this, keyUserLpAmount(userAddress)), 0)
212223
213224 func getUserAvailableAssetsToWithdraw (userAddress) = {
214225 let userLpAmount = getUserLpAmount(userAddress)
215- let userAvailableAssetToWithdraw = fraction(userLpAmount, getCurrentPrice(), scale8)
216- if ((getCurrentPrice() > (userAvailableAssetToWithdraw * scale8)))
217- then 0
218- else userAvailableAssetToWithdraw
226+ let userAvailableAssetToWithdraw = toInt(fraction(toBigInt(userLpAmount), getCurrentPrice(), scale18BigInt))
227+ let roundedLpAmountFromAvailable = toInt(fraction(toBigInt(userAvailableAssetToWithdraw), scale18BigInt, getCurrentPrice()))
228+ let roundedAssetsAvailableToWithdraw = toInt(fraction(toBigInt(roundedLpAmountFromAvailable), getCurrentPrice(), scale18BigInt))
229+ max([0, min([userAvailableAssetToWithdraw, roundedLpAmountFromAvailable])])
219230 }
220231
221232
230241 if ((checks == checks))
231242 then {
232243 let paymentAmount = i.payments[0].amount
233- let paymentLpAmount = fraction(paymentAmount, scale8, getCurrentPrice())
244+ let paymentLpAmount = toInt(fraction(toBigInt(paymentAmount), scale18BigInt, getCurrentPrice()))
234245 let userLpAmount = getUserLpAmount(userAddress)
235246 let userTotalStakedAmount = valueOrElse(getInteger(this, keyUserTotalAssetStaked(userAddress)), 0)
236247 let newTotalLpAmount = (totalLpAmount + paymentLpAmount)
240251 let updateStartHeightAction = if ((totalLpAmount == 0))
241252 then [IntegerEntry(keyStartBlock, height)]
242253 else nil
243- ([IntegerEntry(keyTotalLpAmount, newTotalLpAmount), IntegerEntry(keyTotalAssetAmount, newTotalAssetAmount), IntegerEntry(keyUserLpAmount(userAddress), newUserLpAmount), IntegerEntry(keyUserTotalAssetStaked(userAddress), newUserTotalStakedAmount)] ++ updateStartHeightAction)
254+ ([StringEntry(keyHistory("stake", userAddress, i.transactionId), formatHistory(calcTotalProfit(), getCurrentPrice(), totalLpAmount, totalAssetAmount)), IntegerEntry(keyTotalLpAmount, newTotalLpAmount), IntegerEntry(keyTotalAssetAmount, newTotalAssetAmount), IntegerEntry(keyUserLpAmount(userAddress), newUserLpAmount), IntegerEntry(keyUserTotalAssetStaked(userAddress), newUserTotalStakedAmount)] ++ updateStartHeightAction)
244255 }
245256 else throw("Strict value is not equal to itself.")
246257 }
257268 if ((check == check))
258269 then {
259270 let newUserLpAmount = (userLpAmount - lpAssetWithdrawAmount)
260- let withdrawAssetAmount = fraction(lpAssetWithdrawAmount, getCurrentPrice(), scale8)
271+ let withdrawAssetAmount = toInt(fraction(toBigInt(lpAssetWithdrawAmount), getCurrentPrice(), scale18BigInt))
261272 let newTotalLpAmount = (totalLpAmount - lpAssetWithdrawAmount)
262- let newTotalAssetAmount = fraction(newTotalLpAmount, getCurrentPrice(), scale8)
273+ let newTotalAssetAmount = toInt(fraction(toBigInt(newTotalLpAmount), getCurrentPrice(), scale18BigInt))
263274 let userTotalAssetWithdrawn = valueOrElse(getInteger(this, keyUserTotalAssetWithdrawn(userAddress)), 0)
264275 let newUserTotalAssetWithdrawn = (userTotalAssetWithdrawn + withdrawAssetAmount)
265-[IntegerEntry(keyTotalLpAmount, newTotalLpAmount), IntegerEntry(keyTotalAssetAmount, newTotalAssetAmount), IntegerEntry(keyUserLpAmount(userAddress), newUserLpAmount), IntegerEntry(keyUserTotalAssetWithdrawn(userAddress), newUserTotalAssetWithdrawn), IntegerEntry(keyStartBlock, height), ScriptTransfer(i.caller, withdrawAssetAmount, assetIdBytes)]
276+[StringEntry(keyHistory("withdraw", userAddress, i.transactionId), formatHistory(calcTotalProfit(), getCurrentPrice(), totalLpAmount, totalAssetAmount)), IntegerEntry(keyTotalLpAmount, newTotalLpAmount), IntegerEntry(keyTotalAssetAmount, newTotalAssetAmount), IntegerEntry(keyUserLpAmount(userAddress), newUserLpAmount), IntegerEntry(keyUserTotalAssetWithdrawn(userAddress), newUserTotalAssetWithdrawn), IntegerEntry(keyStartBlock, height), ScriptTransfer(i.caller, withdrawAssetAmount, assetIdBytes)]
266277 }
267278 else throw("Strict value is not equal to itself.")
268279 }
275286 else throwErr("permission denied")]
276287 if ((check == check))
277288 then [IntegerEntry(keyTotalAssetAmount, getTotalAssetAmountWithProfitOrMaxAvailable()), IntegerEntry(keyStartBlock, height), IntegerEntry(keyEmissionPerBlock, max([0, emissionPerBlock]))]
289+ else throw("Strict value is not equal to itself.")
290+ }
291+
292+
293+
294+@Callable(i)
295+func setEmissionPeriodInBlocks (p) = {
296+ let check = [if ((p > 0))
297+ then true
298+ else throwErr("emission period should be greater than 0"), if ((i.caller == this))
299+ then true
300+ else throwErr("permission denied")]
301+ if ((check == check))
302+ then [IntegerEntry(keyTotalAssetAmount, getTotalAssetAmountWithProfitOrMaxAvailable()), IntegerEntry(keyStartBlock, height), IntegerEntry(keyEmissionPeriodInBlocks, p)]
278303 else throw("Strict value is not equal to itself.")
279304 }
280305
301326 func withdraw (withdrawAssetAmount) = {
302327 let userAddress = toString(i.caller)
303328 let userLpAmount = getUserLpAmount(userAddress)
304- let lpAmountToWithdraw = fraction(withdrawAssetAmount, scale8, getCurrentPrice())
329+ let lpAmountToWithdraw = toInt(fraction(toBigInt(withdrawAssetAmount), scale18BigInt, getCurrentPrice()))
305330 let userAvailableAssetToWithdraw = getUserAvailableAssetsToWithdraw(userAddress)
306- let minWithdrawAssetAmount = fraction(getCurrentPrice(), 1, scale8, CEILING)
331+ let minWithdrawAssetAmount = toInt(fraction(getCurrentPrice(), toBigInt(1), scale18BigInt, CEILING))
307332 let check = [if ((withdrawAssetAmount > 0))
308333 then true
309334 else throwErr("withdraw amount should be more than 0"), if ((userAvailableAssetToWithdraw >= withdrawAssetAmount))
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let contractFile = "mpt_staking.ride"
4+let contractFile = "l2mp_staking.ride"
55
66 let SEP = "__"
77
88 let scale8 = 100000000
9+
10+let scale18 = 1000000000000000000
11+
12+let scale18BigInt = toBigInt(scale18)
913
1014 let ADDRESS_BYTES_SIZE = 26
1115
1216 let BLOCKS_IN_DAY = 1440
1317
1418 func throwErr (msg) = throw(((contractFile + ": ") + msg))
1519
1620
1721 let keyAssetId = makeString(["%s", "assetId"], SEP)
1822
1923 let keyEmissionPerBlock = makeString(["%s", "emissionPerBlock"], SEP)
2024
2125 let keyEmissionPeriodInBlocks = makeString(["%s", "emissionPeriodInBlocks"], SEP)
2226
2327 let keyStartBlock = makeString(["%s", "startBlock"], SEP)
2428
2529 let keyTotalLpAmount = makeString(["%s", "totalLpAmount"], SEP)
2630
2731 let keyTotalAssetAmount = makeString(["%s", "totalAssetAmount"], SEP)
2832
2933 func keyUserLpAmount (userAddress) = makeString(["%s%s", "userLpAmount", userAddress], SEP)
3034
3135
3236 func keyUserTotalAssetWithdrawn (userAddress) = makeString(["%s%s", "totalAssetWithdrawn", userAddress], SEP)
3337
3438
3539 func keyUserTotalAssetStaked (userAddress) = makeString(["%s%s", "totalAssetStaked", userAddress], SEP)
3640
3741
42+func keyHistory (type,userAddress,txId) = makeString(["%s%s%s", type, userAddress, toBase58String(txId)], SEP)
43+
44+
45+func formatHistory (totalProfit,price,totalAssetAmount,totalLpAmount) = makeString(["%d%d", toString(totalProfit), toString(price), toString(totalAssetAmount), toString(totalLpAmount)], SEP)
46+
47+
3848 let totalLpAmount = valueOrElse(getInteger(this, keyTotalLpAmount), 0)
3949
4050 let totalAssetAmount = valueOrElse(getInteger(this, keyTotalAssetAmount), 0)
4151
4252 let assetIdString = valueOrElse(getString(this, keyAssetId), "WAVES")
4353
4454 let assetIdBytes = if ((assetIdString == "WAVES"))
4555 then unit
4656 else fromBase58String(assetIdString)
4757
4858 let emissionPeriodInBlocks = valueOrElse(getInteger(this, keyEmissionPeriodInBlocks), BLOCKS_IN_DAY)
4959
5060 let emissionPerPeriod = (valueOrElse(getInteger(this, keyEmissionPerBlock), 0) * emissionPeriodInBlocks)
51-
52-let heightInPeriods = fraction(height, 1, emissionPeriodInBlocks)
5361
5462 let ADMIN_LIST_SIZE = 5
5563
5664 let QUORUM = 3
5765
5866 let TXID_BYTES_LENGTH = 32
5967
6068 func keyAllowedTxIdVotePrefix (txId) = makeString(["%s%s%s", "allowTxId", txId], SEP)
6169
6270
6371 func keyFullAdminVote (prefix,adminAddress) = makeString([prefix, adminAddress], SEP)
6472
6573
6674 func keyAdminAddressList () = makeString(["%s", "adminAddressList"], SEP)
6775
6876
6977 func keyAllowedTxId () = makeString(["%s", "txId"], SEP)
7078
7179
7280 func getAdminVote (prefix,admin) = {
7381 let voteKey = keyFullAdminVote(prefix, admin)
7482 valueOrElse(getInteger(voteKey), 0)
7583 }
7684
7785
7886 func getAdminsList () = match getString(this, keyAdminAddressList()) {
7987 case s: String =>
8088 split(s, SEP)
8189 case _ =>
8290 nil
8391 }
8492
8593
8694 func isInAdminList (address) = containsElement(getAdminsList(), address)
8795
8896
8997 func genVotesKeysHelper (a,adminAddress) = {
90- let $t026382662 = a
91- let result = $t026382662._1
92- let prefix = $t026382662._2
98+ let $t030453069 = a
99+ let result = $t030453069._1
100+ let prefix = $t030453069._2
93101 $Tuple2((result :+ keyFullAdminVote(prefix, adminAddress)), prefix)
94102 }
95103
96104
97105 func genVotesKeys (keyPrefix) = {
98106 let adminList = keyAdminAddressList()
99- let $t028092893 = {
107+ let $t032163300 = {
100108 let $l = getAdminsList()
101109 let $s = size($l)
102110 let $acc0 = $Tuple2(nil, keyPrefix)
103111 func $f0_1 ($a,$i) = if (($i >= $s))
104112 then $a
105113 else genVotesKeysHelper($a, $l[$i])
106114
107115 func $f0_2 ($a,$i) = if (($i >= $s))
108116 then $a
109117 else throw("List size exceeds 5")
110118
111119 $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
112120 }
113- let result = $t028092893._1
114- let prefix = $t028092893._2
121+ let result = $t032163300._1
122+ let prefix = $t032163300._2
115123 result
116124 }
117125
118126
119127 func countVotesHelper (result,voteKey) = (result + valueOrElse(getInteger(voteKey), 0))
120128
121129
122130 func countVotes (prefix) = {
123131 let votes = genVotesKeys(prefix)
124132 let $l = votes
125133 let $s = size($l)
126134 let $acc0 = 0
127135 func $f0_1 ($a,$i) = if (($i >= $s))
128136 then $a
129137 else countVotesHelper($a, $l[$i])
130138
131139 func $f0_2 ($a,$i) = if (($i >= $s))
132140 then $a
133141 else throw("List size exceeds 5")
134142
135143 $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
136144 }
137145
138146
139147 func clearVotesHelper (result,key) = (result :+ DeleteEntry(key))
140148
141149
142150 func getClearVoteEntries (prefix) = {
143151 let votes = genVotesKeys(prefix)
144152 let $l = votes
145153 let $s = size($l)
146154 let $acc0 = nil
147155 func $f0_1 ($a,$i) = if (($i >= $s))
148156 then $a
149157 else clearVotesHelper($a, $l[$i])
150158
151159 func $f0_2 ($a,$i) = if (($i >= $s))
152160 then $a
153161 else throw("List size exceeds 5")
154162
155163 $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
156164 }
157165
158166
159167 func voteINTERNAL (callerAddressString,keyPrefix,minVotes,voteResult) = {
160168 let voteKey = keyFullAdminVote(keyPrefix, callerAddressString)
161169 let adminCurrentVote = getAdminVote(keyPrefix, callerAddressString)
162170 let err = if (!(isInAdminList(callerAddressString)))
163171 then throwErr((("Address: " + callerAddressString) + " not in Admin list"))
164172 else if ((adminCurrentVote == 1))
165173 then throwErr((voteKey + " you already voted"))
166174 else unit
167175 if ((err == err))
168176 then {
169177 let votes = countVotes(keyPrefix)
170178 if (((votes + 1) >= minVotes))
171179 then {
172180 let clearVoteEntries = getClearVoteEntries(keyPrefix)
173181 (clearVoteEntries ++ voteResult)
174182 }
175183 else [IntegerEntry(voteKey, 1)]
176184 }
177185 else throw("Strict value is not equal to itself.")
178186 }
179187
180188
181-func calcTotalProfit () = {
189+func calcTotalProfitForHeight (h) = {
182190 let startBlock = valueOrElse(getInteger(this, keyStartBlock), 0)
183191 let startPeriod = fraction(startBlock, 1, emissionPeriodInBlocks)
184- let elapsedPeriods = (heightInPeriods - startPeriod)
192+ let elapsedPeriods = ((h / emissionPeriodInBlocks) - startPeriod)
185193 max([0, (emissionPerPeriod * elapsedPeriods)])
186194 }
195+
196+
197+func calcTotalProfit () = calcTotalProfitForHeight(height)
187198
188199
189200 func getTotalAssetAmountWithProfitOrMaxAvailable () = {
190201 let totalAssetAmountWithProfit = (totalAssetAmount + calcTotalProfit())
191202 let totalAmount = match assetIdBytes {
192203 case u: Unit =>
193204 min([totalAssetAmountWithProfit, wavesBalance(this).available])
194205 case b: ByteVector =>
195206 min([totalAssetAmountWithProfit, assetBalance(this, b)])
196207 case _ =>
197208 throw("Match error")
198209 }
199210 if ((totalLpAmount == 0))
200211 then 0
201212 else totalAmount
202213 }
203214
204215
205216 func getCurrentPrice () = if ((totalLpAmount != 0))
206- then fraction(getTotalAssetAmountWithProfitOrMaxAvailable(), scale8, totalLpAmount)
207- else (1 * scale8)
217+ then fraction(toBigInt(getTotalAssetAmountWithProfitOrMaxAvailable()), scale18BigInt, toBigInt(totalLpAmount))
218+ else scale18BigInt
208219
209220
210221 func getUserLpAmount (userAddress) = valueOrElse(getInteger(this, keyUserLpAmount(userAddress)), 0)
211222
212223
213224 func getUserAvailableAssetsToWithdraw (userAddress) = {
214225 let userLpAmount = getUserLpAmount(userAddress)
215- let userAvailableAssetToWithdraw = fraction(userLpAmount, getCurrentPrice(), scale8)
216- if ((getCurrentPrice() > (userAvailableAssetToWithdraw * scale8)))
217- then 0
218- else userAvailableAssetToWithdraw
226+ let userAvailableAssetToWithdraw = toInt(fraction(toBigInt(userLpAmount), getCurrentPrice(), scale18BigInt))
227+ let roundedLpAmountFromAvailable = toInt(fraction(toBigInt(userAvailableAssetToWithdraw), scale18BigInt, getCurrentPrice()))
228+ let roundedAssetsAvailableToWithdraw = toInt(fraction(toBigInt(roundedLpAmountFromAvailable), getCurrentPrice(), scale18BigInt))
229+ max([0, min([userAvailableAssetToWithdraw, roundedLpAmountFromAvailable])])
219230 }
220231
221232
222233 func getStakeActions (i,userAddress) = {
223234 let checks = [if ((size(i.payments) == 1))
224235 then true
225236 else throwErr("should include 1 payment"), if ((i.payments[0].assetId == assetIdBytes))
226237 then true
227238 else throwErr(("payment should be in " + assetIdString)), if ((i.payments[0].amount > 0))
228239 then true
229240 else "payment amount should be greater than 0"]
230241 if ((checks == checks))
231242 then {
232243 let paymentAmount = i.payments[0].amount
233- let paymentLpAmount = fraction(paymentAmount, scale8, getCurrentPrice())
244+ let paymentLpAmount = toInt(fraction(toBigInt(paymentAmount), scale18BigInt, getCurrentPrice()))
234245 let userLpAmount = getUserLpAmount(userAddress)
235246 let userTotalStakedAmount = valueOrElse(getInteger(this, keyUserTotalAssetStaked(userAddress)), 0)
236247 let newTotalLpAmount = (totalLpAmount + paymentLpAmount)
237248 let newTotalAssetAmount = (totalAssetAmount + paymentAmount)
238249 let newUserLpAmount = (userLpAmount + paymentLpAmount)
239250 let newUserTotalStakedAmount = (userTotalStakedAmount + paymentAmount)
240251 let updateStartHeightAction = if ((totalLpAmount == 0))
241252 then [IntegerEntry(keyStartBlock, height)]
242253 else nil
243- ([IntegerEntry(keyTotalLpAmount, newTotalLpAmount), IntegerEntry(keyTotalAssetAmount, newTotalAssetAmount), IntegerEntry(keyUserLpAmount(userAddress), newUserLpAmount), IntegerEntry(keyUserTotalAssetStaked(userAddress), newUserTotalStakedAmount)] ++ updateStartHeightAction)
254+ ([StringEntry(keyHistory("stake", userAddress, i.transactionId), formatHistory(calcTotalProfit(), getCurrentPrice(), totalLpAmount, totalAssetAmount)), IntegerEntry(keyTotalLpAmount, newTotalLpAmount), IntegerEntry(keyTotalAssetAmount, newTotalAssetAmount), IntegerEntry(keyUserLpAmount(userAddress), newUserLpAmount), IntegerEntry(keyUserTotalAssetStaked(userAddress), newUserTotalStakedAmount)] ++ updateStartHeightAction)
244255 }
245256 else throw("Strict value is not equal to itself.")
246257 }
247258
248259
249260 func getWithdrawActions (i,lpAssetWithdrawAmount) = {
250261 let userAddress = toString(i.caller)
251262 let userLpAmount = getUserLpAmount(userAddress)
252263 let check = [if ((lpAssetWithdrawAmount > 0))
253264 then true
254265 else throwErr("LP amount should be more than 0"), if ((userLpAmount >= lpAssetWithdrawAmount))
255266 then true
256267 else throwErr((("cannot withdraw more than available LP (" + toString(userLpAmount)) + ")"))]
257268 if ((check == check))
258269 then {
259270 let newUserLpAmount = (userLpAmount - lpAssetWithdrawAmount)
260- let withdrawAssetAmount = fraction(lpAssetWithdrawAmount, getCurrentPrice(), scale8)
271+ let withdrawAssetAmount = toInt(fraction(toBigInt(lpAssetWithdrawAmount), getCurrentPrice(), scale18BigInt))
261272 let newTotalLpAmount = (totalLpAmount - lpAssetWithdrawAmount)
262- let newTotalAssetAmount = fraction(newTotalLpAmount, getCurrentPrice(), scale8)
273+ let newTotalAssetAmount = toInt(fraction(toBigInt(newTotalLpAmount), getCurrentPrice(), scale18BigInt))
263274 let userTotalAssetWithdrawn = valueOrElse(getInteger(this, keyUserTotalAssetWithdrawn(userAddress)), 0)
264275 let newUserTotalAssetWithdrawn = (userTotalAssetWithdrawn + withdrawAssetAmount)
265-[IntegerEntry(keyTotalLpAmount, newTotalLpAmount), IntegerEntry(keyTotalAssetAmount, newTotalAssetAmount), IntegerEntry(keyUserLpAmount(userAddress), newUserLpAmount), IntegerEntry(keyUserTotalAssetWithdrawn(userAddress), newUserTotalAssetWithdrawn), IntegerEntry(keyStartBlock, height), ScriptTransfer(i.caller, withdrawAssetAmount, assetIdBytes)]
276+[StringEntry(keyHistory("withdraw", userAddress, i.transactionId), formatHistory(calcTotalProfit(), getCurrentPrice(), totalLpAmount, totalAssetAmount)), IntegerEntry(keyTotalLpAmount, newTotalLpAmount), IntegerEntry(keyTotalAssetAmount, newTotalAssetAmount), IntegerEntry(keyUserLpAmount(userAddress), newUserLpAmount), IntegerEntry(keyUserTotalAssetWithdrawn(userAddress), newUserTotalAssetWithdrawn), IntegerEntry(keyStartBlock, height), ScriptTransfer(i.caller, withdrawAssetAmount, assetIdBytes)]
266277 }
267278 else throw("Strict value is not equal to itself.")
268279 }
269280
270281
271282 @Callable(i)
272283 func setEmissionPerBlock (emissionPerBlock) = {
273284 let check = [if ((i.caller == this))
274285 then true
275286 else throwErr("permission denied")]
276287 if ((check == check))
277288 then [IntegerEntry(keyTotalAssetAmount, getTotalAssetAmountWithProfitOrMaxAvailable()), IntegerEntry(keyStartBlock, height), IntegerEntry(keyEmissionPerBlock, max([0, emissionPerBlock]))]
289+ else throw("Strict value is not equal to itself.")
290+ }
291+
292+
293+
294+@Callable(i)
295+func setEmissionPeriodInBlocks (p) = {
296+ let check = [if ((p > 0))
297+ then true
298+ else throwErr("emission period should be greater than 0"), if ((i.caller == this))
299+ then true
300+ else throwErr("permission denied")]
301+ if ((check == check))
302+ then [IntegerEntry(keyTotalAssetAmount, getTotalAssetAmountWithProfitOrMaxAvailable()), IntegerEntry(keyStartBlock, height), IntegerEntry(keyEmissionPeriodInBlocks, p)]
278303 else throw("Strict value is not equal to itself.")
279304 }
280305
281306
282307
283308 @Callable(i)
284309 func stake () = getStakeActions(i, toString(i.caller))
285310
286311
287312
288313 @Callable(i)
289314 func stakeFor (userAddress) = {
290315 let check = [if ((size(fromBase58String(userAddress)) == ADDRESS_BYTES_SIZE))
291316 then true
292317 else throwErr("address is not valid")]
293318 if ((check == check))
294319 then getStakeActions(i, userAddress)
295320 else throw("Strict value is not equal to itself.")
296321 }
297322
298323
299324
300325 @Callable(i)
301326 func withdraw (withdrawAssetAmount) = {
302327 let userAddress = toString(i.caller)
303328 let userLpAmount = getUserLpAmount(userAddress)
304- let lpAmountToWithdraw = fraction(withdrawAssetAmount, scale8, getCurrentPrice())
329+ let lpAmountToWithdraw = toInt(fraction(toBigInt(withdrawAssetAmount), scale18BigInt, getCurrentPrice()))
305330 let userAvailableAssetToWithdraw = getUserAvailableAssetsToWithdraw(userAddress)
306- let minWithdrawAssetAmount = fraction(getCurrentPrice(), 1, scale8, CEILING)
331+ let minWithdrawAssetAmount = toInt(fraction(getCurrentPrice(), toBigInt(1), scale18BigInt, CEILING))
307332 let check = [if ((withdrawAssetAmount > 0))
308333 then true
309334 else throwErr("withdraw amount should be more than 0"), if ((userAvailableAssetToWithdraw >= withdrawAssetAmount))
310335 then true
311336 else throwErr((("cannot withdraw more than available (" + toString(userAvailableAssetToWithdraw)) + ")")), if ((withdrawAssetAmount >= minWithdrawAssetAmount))
312337 then true
313338 else throwErr((("withdraw amount is too small. Min: (" + toString(minWithdrawAssetAmount)) + ")"))]
314339 if ((check == check))
315340 then getWithdrawActions(i, lpAmountToWithdraw)
316341 else throw("Strict value is not equal to itself.")
317342 }
318343
319344
320345
321346 @Callable(i)
322347 func getUserAssetsREADONLY (userAddress) = {
323348 let userLpAmount = getUserLpAmount(userAddress)
324349 let userAvailableAssetToWithdraw = getUserAvailableAssetsToWithdraw(userAddress)
325350 let userTotalStakedAmount = valueOrElse(getInteger(this, keyUserTotalAssetStaked(userAddress)), 0)
326351 let userTotalAssetWithdrawn = valueOrElse(getInteger(this, keyUserTotalAssetWithdrawn(userAddress)), 0)
327352 $Tuple2(nil, $Tuple5(userLpAmount, userAvailableAssetToWithdraw, getCurrentPrice(), userTotalStakedAmount, userTotalAssetWithdrawn))
328353 }
329354
330355
331356
332357 @Callable(i)
333358 func getTotalAssetsREADONLY () = $Tuple2(nil, $Tuple3(totalLpAmount, getTotalAssetAmountWithProfitOrMaxAvailable(), getCurrentPrice()))
334359
335360
336361
337362 @Callable(i)
338363 func voteForTxId (txId) = {
339364 let callerAddressString = toBase58String(i.caller.bytes)
340365 let keyPrefix = keyAllowedTxIdVotePrefix(txId)
341366 let result = [StringEntry(keyAllowedTxId(), txId)]
342367 let allowedTxIdOption = getString(this, keyAllowedTxId())
343368 let err = [if ((size(fromBase58String(txId)) == TXID_BYTES_LENGTH))
344369 then true
345370 else throwErr((txId + " is not valid txId")), if (if ((allowedTxIdOption == unit))
346371 then true
347372 else (value(allowedTxIdOption) != txId))
348373 then true
349374 else throwErr((txId + " is already allowed"))]
350375 if ((err == err))
351376 then voteINTERNAL(callerAddressString, keyPrefix, QUORUM, result)
352377 else throw("Strict value is not equal to itself.")
353378 }
354379
355380
356381 @Verifier(tx)
357382 func verify () = {
358383 let byAdmins = (tx.id == fromBase58String(valueOrElse(getString(this, keyAllowedTxId()), "")))
359384 let byOwner = if ((size(getAdminsList()) >= QUORUM))
360385 then false
361386 else sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
362387 if (byAdmins)
363388 then true
364389 else byOwner
365390 }
366391

github/deemru/w8io/3ef1775 
122.18 ms