2023.12.18 12:11 [3957847] smart account 3PJKKT7gsWiPBJj11gkF3Xv7gKt8s2WPdTr > SELF 0.00000000 Waves

{ "type": 13, "id": "ArLpm2hS5BUKZ7r5s3quosVsNHfQtmwPL1EJwPWwZcjd", "fee": 1800000, "feeAssetId": null, "timestamp": 1702890681137, "version": 1, "sender": "3PJKKT7gsWiPBJj11gkF3Xv7gKt8s2WPdTr", "senderPublicKey": "FAqqjX7JqvqLh2QGTR3ziyCnSsWSoj9gVo4uPahtmhKr", "proofs": [ "2kBDgTV3ReysR2WGk8ckkRb64sYKyq3XMN7ZMD4dqw8mYpLdyNwJBQcqrXvaSyRE68zaqvU5S9ukXiJ7rCsSeu9J" ], "script": "base64:BgIuCAISAwoBCBIDCgEIEgASAwoBCBIAEgMKAQgSBQoDCAgBEgQKAggIEgUKAwgIASoBB3Rocm93SWYCCWNvbmRpdGlvbgVlcnJvcgMFCWNvbmRpdGlvbgkAAgEFBWVycm9yBgEId3JpdGVJbnQCA2tleQV2YWx1ZQMJAGYCAAAFBXZhbHVlCQACAQkArAICCQCsAgIJAKwCAgIXd3JpdGluZyBuZWdhdGl2ZSB2YWx1ZSAJAKQDAQUFdmFsdWUCCSBmb3Iga2V5IAUDa2V5CQEMSW50ZWdlckVudHJ5AgUDa2V5BQV2YWx1ZQEIY2hhbmdlQnkCA2tleQV2YWx1ZQkBCHdyaXRlSW50AgUDa2V5CQBkAgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQNrZXkAAAUFdmFsdWUBDGZyYWN0aW9uQ2VpbAMFdmFsdWUJbnVtZXJhdG9yC2Rlbm9taW5hdG9yBARjYW5kCQBrAwUFdmFsdWUFCW51bWVyYXRvcgULZGVub21pbmF0b3IEAUQAs+aTqAsEBWV4YWN0CQAAAgkAagIJAGgCCQBqAgUEY2FuZAUBRAkAagIFC2Rlbm9taW5hdG9yBQFEBQFECQBqAgkAaAIJAGoCBQV2YWx1ZQUBRAkAagIFCW51bWVyYXRvcgUBRAUBRAMFBWV4YWN0BQRjYW5kCQBkAgUEY2FuZAABARB3cml0ZUNvbnN0U3RyaW5nAgNrZXkFdmFsdWUDCQEBIQEJAQlpc0RlZmluZWQBCQCdCAIFBHRoaXMFA2tleQkBC1N0cmluZ0VudHJ5AgUDa2V5BQV2YWx1ZQkAAgEJAKwCAgIVYWxyZWFkeSBpbml0aWFsaXplZDogBQNrZXkAEmNvbmZpZ0FkZHJlc3NTdG9yZQINY29uZmlnQWRkcmVzcwALb3JhY2xlU3RvcmUCDm9yYWNsZV9hZGRyZXNzARJyZXNlcnZlRmFjdG9yU3RvcmUBB2Fzc2V0SWQJAKwCAgUHYXNzZXRJZAIOX1Jlc2VydmVGYWN0b3IACW1haW5TdG9yZQIEbWFpbgANY29uZmlnQWRkcmVzcwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBRJjb25maWdBZGRyZXNzU3RvcmUCI3Byb3RlY3RlZC1yZXNlcnZlOiBubyBjb25maWdBZGRyZXNzAhZpbnZhbGlkIGNvbmZpZyBhZGRyZXNzAQ1yZXNlcnZlRmFjdG9yAQdhc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUNY29uZmlnQWRkcmVzcwkBEnJlc2VydmVGYWN0b3JTdG9yZQEFB2Fzc2V0SWQCEG5vIHJlc2VydmVGYWN0b3IBCmdldEJhbGFuY2UCDmFkZHJlc3NPckFsaWFzB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCYnYFByRtYXRjaDAJAPAHAgUOYWRkcmVzc09yQWxpYXMFAmJ2AwkAAQIFByRtYXRjaDACBFVuaXQEAXUFByRtYXRjaDAICQDvBwEFDmFkZHJlc3NPckFsaWFzCWF2YWlsYWJsZQkAAgECC01hdGNoIGVycm9yAQlvcEFsbG93ZWQCB2Fzc2V0SWQCb3AEByRtYXRjaDAJAPwHBAUNY29uZmlnQWRkcmVzcwIJb3BBbGxvd2VkCQDMCAIFB2Fzc2V0SWQJAMwIAgUCb3AFA25pbAUDbmlsAwkAAQIFByRtYXRjaDACB0Jvb2xlYW4EAWIFByRtYXRjaDADBQFiBgkAAgECC25vdCBhbGxvd2VkCQACAQIhb3BBbGxvd2VkOiB1bmV4cGVjdGVkIHJlc3VsdCB0eXBlAQhtYWluT25seQEBaQMJAQhjb250YWlucwIJARFAZXh0ck5hdGl2ZSgxMDUzKQIFDWNvbmZpZ0FkZHJlc3MCBG1haW4JAKUIAQgFAWkGY2FsbGVyBgkAAgECEG9ubHkgbWFpbiBjYW4gZG8AEm1heWJlT3JhY2xlQWRkcmVzcwQHJG1hdGNoMAkAnQgCBQ1jb25maWdBZGRyZXNzBQtvcmFjbGVTdG9yZQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJAKYIAQUBcwUEdW5pdAELb3JhY2xlUHJpY2UBB2Fzc2V0SWQEByRtYXRjaDAJAPwHBAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCBRJtYXliZU9yYWNsZUFkZHJlc3MCCW5vIG9yYWNsZQIFcHJpY2UJAMwIAgUHYXNzZXRJZAUDbmlsBQNuaWwDCQABAgUHJG1hdGNoMAIDSW50BAFpBQckbWF0Y2gwBQFpCQACAQIPYmFkIG9yYWNsZSBkYXRhAAZIRUlHSFQFBmhlaWdodAAGYXNzZXRzCQELdmFsdWVPckVsc2UCCQCdCAIFDWNvbmZpZ0FkZHJlc3MCGHByb3RlY3RlZF9yZXNlcnZlX2Fzc2V0cwIAAAthc3NldHNBcnJheQMJAAACBQZhc3NldHMCAAUDbmlsCQC8CQIFBmFzc2V0cwIBfAERdG90YWxEZXBvc2l0U3RvcmUBB2Fzc2V0SWQJAKwCAgIMdG90YWxTdXBwbHlfBQdhc3NldElkARB0b3RhbFNoYXJlc1N0b3JlAQdhc3NldElkCQCsAgICDHRvdGFsU2hhcmVzXwUHYXNzZXRJZAEPdXNlclNoYXJlc1N0b3JlAgdhc3NldElkBHVzZXIJAKwCAgkArAICCQCsAgICC3VzZXJTaGFyZXNfBQdhc3NldElkAgFfBQR1c2VyARFoYXNQcm90ZWN0ZWRTdG9yZQEEdXNlcgkArAICAhVwcm90ZWN0ZWRfY29sbGF0ZXJhbF8FBHVzZXIBE3Byb3RlY3RlZEFzc2V0U3RvcmUBBHVzZXIJAKwCAgIQcHJvdGVjdGVkX2Fzc2V0XwUEdXNlcgEMdG90YWxEZXBvc2l0AQdhc3NldElkCQELdmFsdWVPckVsc2UCCQCfCAEJARF0b3RhbERlcG9zaXRTdG9yZQEFB2Fzc2V0SWQAAAELdG90YWxTaGFyZXMBB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEHRvdGFsU2hhcmVzU3RvcmUBBQdhc3NldElkAAABCnVzZXJTaGFyZXMCB2Fzc2V0SWQEdXNlcgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEPdXNlclNoYXJlc1N0b3JlAgUHYXNzZXRJZAUEdXNlcgAAAQt1c2VyRGVwb3NpdAIHYXNzZXRJZAR1c2VyBAJ0cwkBC3RvdGFsU2hhcmVzAQUHYXNzZXRJZAQCdGQJAQx0b3RhbERlcG9zaXQBBQdhc3NldElkBAJ1cwkBCnVzZXJTaGFyZXMCBQdhc3NldElkBQR1c2VyAwkAAAIFAnRzAAAAAAkAawMFAnRkBQJ1cwUCdHMBEWhhc1JlZ3VsYXJEZXBvc2l0AQR1c2VyBAhyZXNlcnZlcwkAvAkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUNY29uZmlnQWRkcmVzcwIQcHJpbWFyeV9yZXNlcnZlcwIkcHJvdGVjdGVkOiBubyByZXNlcnZlcyBmb3VuZCBpbiBtYWluAgF8CgERYXNVc2VyQmFsYW5jZURhdGEBBXZhbHVlBAckbWF0Y2gwBQV2YWx1ZQMJAAECBQckbWF0Y2gwAiIoSW50LCBJbnQsIEludCwgSW50LCBJbnQsIEJvb2xlYW4pBAF4BQckbWF0Y2gwBQF4BAF0BQckbWF0Y2gwCQACAQIid3JvbmcgdHlwZSwgZXhwZWN0ZWQ6IEludDUmQm9vbGVhbgoBBGZvbGQCA2FjYwdyZXNlcnZlBAN1YmQJARFhc1VzZXJCYWxhbmNlRGF0YQEJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQUHcmVzZXJ2ZQILdXNlckJhbGFuY2UJAMwIAgUEdXNlcgUDbmlsBQNuaWwHCgACJGwFCHJlc2VydmVzCgACJHMJAJADAQUCJGwKAAUkYWNjMAcKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBGZvbGQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDIwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAEJdXNlclN0YXRlAQR1c2VyCgEEZm9sZAIDYWNjB2Fzc2V0SWQJAM4IAgUDYWNjCQDMCAIJAJQKAgUHYXNzZXRJZAkBC3VzZXJEZXBvc2l0AgUHYXNzZXRJZAUEdXNlcgUDbmlsCgACJGwFC2Fzc2V0c0FycmF5CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQRmb2xkAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQBAmJwAQR1c2VyBAtmYWN0b3JzQmFzZQDoBwoBEGNvbGxhdGVyYWxGYWN0b3IBB2Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQ1jb25maWdBZGRyZXNzCQCsAgIFB2Fzc2V0SWQCEV9Db2xsYXRlcmFsRmFjdG9yAh1ubyBDb2xsYXRlcmFsRmFjdG9yIGluIGNvbmZpZwoBBXBvdzEwAQFuAwkAAAIFAW4ABgDAhD0DCQAAAgUBbgAIAIDC1y8JAAIBCQCsAgICDmJhZCBkZWNpbWFsczogCQCkAwEFAW4KAQ1hc3NldERlY2ltYWxzAQdhc3NldElkAwkAAAIFB2Fzc2V0SWQCBVdBVkVTAAgICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQdhc3NldElkAgliYWQgYXNzZXQIZGVjaW1hbHMKAQphc3NldFRvVXNkAgdhc3NldElkBmFtb3VudAkAawMFBmFtb3VudAkBC29yYWNsZVByaWNlAQUHYXNzZXRJZAkBBXBvdzEwAQkBDWFzc2V0RGVjaW1hbHMBBQdhc3NldElkCgEEZm9sZAIDYWNjBGRhdGEJAGQCBQNhY2MECyR0MDUwNzA1MDk1BQRkYXRhBAdhc3NldElkCAULJHQwNTA3MDUwOTUCXzEEA2FtdAgFCyR0MDUwNzA1MDk1Al8yCQBrAwkBCmFzc2V0VG9Vc2QCBQdhc3NldElkBQNhbXQJARBjb2xsYXRlcmFsRmFjdG9yAQUHYXNzZXRJZAULZmFjdG9yc0Jhc2UKAAIkbAkBCXVzZXJTdGF0ZQEFBHVzZXIKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBGZvbGQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDIwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAEKYWR2aXNlVXNlcgEEdXNlcgQLYm9ycm93UG93ZXIJAQJicAEFBHVzZXIJAKwCAgkArAICAg5ib3Jyb3dQb3dlciA9IAkApAMBBQtib3Jyb3dQb3dlcgoBBGZvbGQCA2FjYwRwYWlyCQCsAgIJAKwCAgkArAICCQCsAgIFA2FjYwICLCAIBQRwYWlyAl8xAgMgPSAJAKQDAQgFBHBhaXICXzIKAAIkbAkBCXVzZXJTdGF0ZQEFBHVzZXIKAAIkcwkAkAMBBQIkbAoABSRhY2MwAgAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBGZvbGQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDIwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAEOc2hhcmVzVG9BbW91bnQCB2Fzc2V0SWQGc2hhcmVzBAJ0cwkBC3RvdGFsU2hhcmVzAQUHYXNzZXRJZAQCdGQJAQx0b3RhbERlcG9zaXQBBQdhc3NldElkAwMJAAACBQJ0cwAABgkAAAIFAnRkAAAFBnNoYXJlcwkAawMFBnNoYXJlcwUCdGQFAnRzAQ5hbW91bnRUb1NoYXJlcwMHYXNzZXRJZANhbXQEY2VpbAQCdHMJAQt0b3RhbFNoYXJlcwEFB2Fzc2V0SWQEAnRkCQEMdG90YWxEZXBvc2l0AQUHYXNzZXRJZAMDCQAAAgUCdHMAAAYJAAACBQJ0ZAAABQNhbXQDBQRjZWlsCQEMZnJhY3Rpb25DZWlsAwUDYW10BQJ0cwUCdGQJAGsDBQNhbXQFAnRzBQJ0ZAEPdmFsaWRhdGVBc3NldElkAQdhc3NldElkCQEHdGhyb3dJZgIJAQEhAQkBCGNvbnRhaW5zAgUGYXNzZXRzBQdhc3NldElkAhVhc3NldElkIG5vdCBwZXJtaXR0ZWQBCmFzc2V0SWRTdHIBA2FpZAQHJG1hdGNoMAUDYWlkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAmJ2BQckbWF0Y2gwCQDYBAEFAmJ2AwkAAQIFByRtYXRjaDACBFVuaXQEAXUFByRtYXRjaDACBVdBVkVTCQACAQILTWF0Y2ggZXJyb3IBDGFzc2V0U3RyVG9JZAEHYXNzZXRJZAMJAAACBQdhc3NldElkAgVXQVZFUwUEdW5pdAkA2QQBBQdhc3NldElkAQ5zdGFraW5nRW5hYmxlZAEHYXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkAmwgCBQ1jb25maWdBZGRyZXNzCQCsAgICGnByb3RlY3RlZF9zdGFraW5nX2VuYWJsZWRfBQdhc3NldElkBwEOc3Rha2luZ0FkZHJlc3MBB2Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUNY29uZmlnQWRkcmVzcwkArAICAhlwcm90ZWN0ZWRfc3Rha2luZ19jb25maWdfBQdhc3NldElkCQCsAgICF25vIHN0YWtpbmcgYWRkcmVzcyBmb3IgBQdhc3NldElkCQCsAgICKnByb3RlY3RlZFJlc2VydmU6IGJhZCBzdGFraW5nIGFkZHJlc3MgZm9yIAUHYXNzZXRJZAENc3Rha2luZ0FjdGlvbgIHYXNzZXRJZA1rZWVwQXRCYWxhbmNlBA1hY3R1YWxCYWxhbmNlAwkAAAIFB2Fzc2V0SWQCBVdBVkVTCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkA8AcCBQR0aGlzCQDZBAEFB2Fzc2V0SWQDCQAAAgUNYWN0dWFsQmFsYW5jZQUNa2VlcEF0QmFsYW5jZQUEdW5pdAMJAQEhAQkBDnN0YWtpbmdFbmFibGVkAQUHYXNzZXRJZAUEdW5pdAQCc2EJAQ5zdGFraW5nQWRkcmVzcwEFB2Fzc2V0SWQDCQBmAgUNYWN0dWFsQmFsYW5jZQUNa2VlcEF0QmFsYW5jZQkA/AcEBQJzYQIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQxhc3NldFN0clRvSWQBBQdhc3NldElkCQBlAgUNYWN0dWFsQmFsYW5jZQUNa2VlcEF0QmFsYW5jZQUDbmlsCQD8BwQFAnNhAgNnZXQJAMwIAgkAZQIFDWtlZXBBdEJhbGFuY2UFDWFjdHVhbEJhbGFuY2UFA25pbAUDbmlsARB3aXRoZHJhd0ludGVybmFsBARmcm9tAnRvB2Fzc2V0SWQGYW1vdW50BAZjaGVja3MJAQ92YWxpZGF0ZUFzc2V0SWQBBQdhc3NldElkAwkAAAIFBmNoZWNrcwUGY2hlY2tzBApyZWFsU2hhcmVzCQEKdXNlclNoYXJlcwIFB2Fzc2V0SWQFBGZyb20ECyR0MDc0MzQ3NzE4AwkAAAIFBmFtb3VudAD///////////8BBApyZWFsQW1vdW50CQEOc2hhcmVzVG9BbW91bnQCBQdhc3NldElkBQpyZWFsU2hhcmVzCQCUCgIFCnJlYWxTaGFyZXMFCnJlYWxBbW91bnQDCQBnAgAABQZhbW91bnQJAAIBAiZwcm90ZWN0ZWQtcmVzZXJ2ZTogbm9uLXBvc2l0aXZlIGFtb3VudAkAlAoCCQEOYW1vdW50VG9TaGFyZXMDBQdhc3NldElkBQZhbW91bnQGBQZhbW91bnQECHdkU2hhcmVzCAULJHQwNzQzNDc3MTgCXzEECHdkQW1vdW50CAULJHQwNzQzNDc3MTgCXzIEDG1heWJlQ2xlYW5VcAMJAAACBQpyZWFsU2hhcmVzBQh3ZFNoYXJlcwkAzAgCCQEMQm9vbGVhbkVudHJ5AgkBEWhhc1Byb3RlY3RlZFN0b3JlAQUEZnJvbQcJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBE3Byb3RlY3RlZEFzc2V0U3RvcmUBBQRmcm9tBQNuaWwFA25pbAQHc3Rha2luZwkBDXN0YWtpbmdBY3Rpb24CBQdhc3NldElkBQh3ZEFtb3VudAMJAAACBQdzdGFraW5nBQdzdGFraW5nCQCUCgIJAM4IAgUMbWF5YmVDbGVhblVwCQDMCAIJAQhjaGFuZ2VCeQIJARF0b3RhbERlcG9zaXRTdG9yZQEFB2Fzc2V0SWQJAQEtAQUId2RBbW91bnQJAMwIAgkBCGNoYW5nZUJ5AgkBEHRvdGFsU2hhcmVzU3RvcmUBBQdhc3NldElkCQEBLQEFCHdkU2hhcmVzCQDMCAIJAQhjaGFuZ2VCeQIJAQ91c2VyU2hhcmVzU3RvcmUCBQdhc3NldElkBQRmcm9tCQEBLQEFCHdkU2hhcmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFAnRvBQh3ZEFtb3VudAkBDGFzc2V0U3RyVG9JZAEFB2Fzc2V0SWQFA25pbAUId2RBbW91bnQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BDnN1cHBseUludGVybmFsAgR1c2VyAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAipwcm90ZWN0ZWQtcmVzZXJ2ZTogc2luZ2xlIHBheW1lbnQgcmVxdWlyZWQEB2Fzc2V0SWQJAQphc3NldElkU3RyAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBAZhbW91bnQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AwkAAAIFBmFtb3VudAAABQNuaWwEBmNoZWNrcwMJAQ92YWxpZGF0ZUFzc2V0SWQBBQdhc3NldElkCQEJb3BBbGxvd2VkAgUHYXNzZXRJZAIbc3VwcGx5X3Byb3RlY3RlZF9jb2xsYXRlcmFsBwMJAAACBQZjaGVja3MFBmNoZWNrcwQNcHJvdGVjdGVkRmxhZwkBC3ZhbHVlT3JFbHNlAgkAmwgCBQR0aGlzCQERaGFzUHJvdGVjdGVkU3RvcmUBBQR1c2VyBwQOcHJvdGVjdGVkQXNzZXQJAJ0IAgUEdGhpcwkBE3Byb3RlY3RlZEFzc2V0U3RvcmUBBQR1c2VyBAtjb25zaXN0ZW5jeQMFDXByb3RlY3RlZEZsYWcEByRtYXRjaDAFDnByb3RlY3RlZEFzc2V0AwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAMJAAACBQFzBQdhc3NldElkBgkAAgECO3Byb3RlY3RlZC1yZXNlcnZlOiBjYW4ndCBoYXZlIG1vcmUgdGhhbiBvbmUgYXNzZXQgcHJvdGVjdGVkCQACAQIgcHJvdGVjdGVkLXJlc2VydmU6Y2xlYW4gdXAgZmlyc3QEByRtYXRjaDAFDnByb3RlY3RlZEFzc2V0AwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkAAgECI3Byb3RlY3RlZC1yZXNlcnZlOiBtaXNjb25maWd1cmF0aW9uBgQQY29uc2lzdGVuY3lDaGVjawkBB3Rocm93SWYCCQEBIQEFC2NvbnNpc3RlbmN5Ag1pbmNvbnNpc3RlbmN5AwkAAAIFEGNvbnNpc3RlbmN5Q2hlY2sFEGNvbnNpc3RlbmN5Q2hlY2sECW5ld1NoYXJlcwkBDmFtb3VudFRvU2hhcmVzAwUHYXNzZXRJZAUGYW1vdW50BwQHc3Rha2luZwkBDXN0YWtpbmdBY3Rpb24CBQdhc3NldElkAAADCQAAAgUHc3Rha2luZwUHc3Rha2luZwkAzAgCCQEIY2hhbmdlQnkCCQERdG90YWxEZXBvc2l0U3RvcmUBBQdhc3NldElkBQZhbW91bnQJAMwIAgkBCGNoYW5nZUJ5AgkBEHRvdGFsU2hhcmVzU3RvcmUBBQdhc3NldElkBQluZXdTaGFyZXMJAMwIAgkBCGNoYW5nZUJ5AgkBD3VzZXJTaGFyZXNTdG9yZQIFB2Fzc2V0SWQFBHVzZXIFCW5ld1NoYXJlcwkAzAgCCQEMQm9vbGVhbkVudHJ5AgkBEWhhc1Byb3RlY3RlZFN0b3JlAQUEdXNlcgYJAMwIAgkBC1N0cmluZ0VudHJ5AgkBE3Byb3RlY3RlZEFzc2V0U3RvcmUBBQR1c2VyBQdhc3NldElkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAWkBCmluaXRpYWxpemUBDWNvbmZpZ0FkZHJlc3MJAMwIAgkBEHdyaXRlQ29uc3RTdHJpbmcCBRJjb25maWdBZGRyZXNzU3RvcmUFDWNvbmZpZ0FkZHJlc3MFA25pbAFpAQd1bnN0YWtlAQdhc3NldElkCgEFYXNJbnQBBXZhbHVlBAckbWF0Y2gwBQV2YWx1ZQMJAAECBQckbWF0Y2gwAgNJbnQEA2ludAUHJG1hdGNoMAUDaW50CQACAQIFX3ByOjEDCQEOc3Rha2luZ0VuYWJsZWQBBQdhc3NldElkCQACAQkArAICAipwcm90ZWN0ZWQtcmVzZXJ2ZTogc3Rha2luZyBpcyBlbmFibGVkIGZvciAFB2Fzc2V0SWQEAnNhCQEOc3Rha2luZ0FkZHJlc3MBBQdhc3NldElkBAZzdGFrZWQJAQVhc0ludAEJAPwHBAUCc2ECBGluZm8FA25pbAUDbmlsAwkAAAIFBnN0YWtlZAUGc3Rha2VkBAl1bnN0YWtpbmcJAPwHBAUCc2ECA2dldAkAzAgCBQZzdGFrZWQFA25pbAUDbmlsAwkAAAIFCXVuc3Rha2luZwUJdW5zdGFraW5nCQCUCgIFA25pbAUGc3Rha2VkCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBC2FkZEludGVyZXN0AAQHYXNzZXRJZAkBCmFzc2V0SWRTdHIBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQEBmNoZWNrcwkBD3ZhbGlkYXRlQXNzZXRJZAEFB2Fzc2V0SWQDCQAAAgUGY2hlY2tzBQZjaGVja3MEB3N0YWtpbmcJAQ1zdGFraW5nQWN0aW9uAgUHYXNzZXRJZAAAAwkAAAIFB3N0YWtpbmcFB3N0YWtpbmcEBmFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQJAMwIAgkBCGNoYW5nZUJ5AgkBEXRvdGFsRGVwb3NpdFN0b3JlAQUHYXNzZXRJZAUGYW1vdW50BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQELYm9ycm93UG93ZXIBBHVzZXIJAJQKAgUDbmlsCQECYnABBQR1c2VyAWkBBnN1cHBseQAJAQ5zdXBwbHlJbnRlcm5hbAIJAKUIAQgFAWkGY2FsbGVyBQFpAWkBCXN1cHBseUZvcgEEdXNlcgQGY2hlY2tzCQEIbWFpbk9ubHkBBQFpAwkAAAIFBmNoZWNrcwUGY2hlY2tzCQEOc3VwcGx5SW50ZXJuYWwCBQR1c2VyBQFpCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBC3dpdGhkcmF3Rm9yAwR1c2VyB2Fzc2V0SWQGYW1vdW50BAZjaGVja3MDCQEIbWFpbk9ubHkBBQFpCQEJb3BBbGxvd2VkAgUHYXNzZXRJZAIdd2l0aGRyYXdfcHJvdGVjdGVkX2NvbGxhdGVyYWwHAwkAAAIFBmNoZWNrcwUGY2hlY2tzCQEQd2l0aGRyYXdJbnRlcm5hbAQFBHVzZXIFBHVzZXIFB2Fzc2V0SWQFBmFtb3VudAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ53aXRoZHJhd1RvTWFpbgIEdXNlcgdhc3NldElkBAZjaGVja3MDCQEIbWFpbk9ubHkBBQFpCQEJb3BBbGxvd2VkAgUHYXNzZXRJZAIdY29sbGFwc2VfcHJvdGVjdGVkX2NvbGxhdGVyYWwHAwkAAAIFBmNoZWNrcwUGY2hlY2tzCQEQd2l0aGRyYXdJbnRlcm5hbAQFBHVzZXIJAKUIAQgFAWkGY2FsbGVyBQdhc3NldElkAP///////////wEJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEPd2l0aGRyYXdUb01haW4yAwR1c2VyB2Fzc2V0SWQDYW10BAZjaGVja3MDCQEIbWFpbk9ubHkBBQFpCQEJb3BBbGxvd2VkAgUHYXNzZXRJZAIYd2l0aGRyYXdQcm90ZWN0ZWRUb01haW4yBwMJAAACBQZjaGVja3MFBmNoZWNrcwkBEHdpdGhkcmF3SW50ZXJuYWwEBQR1c2VyCQClCAEIBQFpBmNhbGxlcgUHYXNzZXRJZAUDYW10CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJ0eAEGdmVyaWZ5AAQEQkFTRQDoBwQLcXVvcnVtUmF0aW8JARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQ1jb25maWdBZGRyZXNzAhVwcm9wb3NhbF9xdW9ydW1fcmF0aW8CInByb3Bvc2FsUXVvcnVtUmF0aW8gaXMgbm90IGRlZmluZWQEC3Bhc3NlZFJhdGlvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUNY29uZmlnQWRkcmVzcwIVcHJvcG9zYWxfcGFzc2VkX3JhdGlvAiVwcm9wb3NhbFRocmVzaG9sZFJhdGlvIGlzIG5vdCBkZWZpbmVkBA5nVmlyZXNDb250cmFjdAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ1jb25maWdBZGRyZXNzAhJkaXZpZGVuZHNfY29udHJhY3QCFW5vIGRpdmlkZW5kc19jb250cmFjdAIaaW52YWxpZCBkaXZpZGVuZHNfY29udHJhY3QEDnZvdGluZ0NvbnRyYWN0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFDWNvbmZpZ0FkZHJlc3MCD3ZvdGluZ19jb250cmFjdAISbm8gdm90aW5nX2NvbnRyYWN0AhdpbnZhbGlkIHZvdGluZ19jb250cmFjdAQCaWQJANgEAQgFAnR4AmlkBAh2b3Rlc1llcwkBC3ZhbHVlT3JFbHNlAgkAmggCBQ52b3RpbmdDb250cmFjdAkArAICAg1wcm9wb3NhbF95ZXNfBQJpZAAABAd2b3Rlc05vCQELdmFsdWVPckVsc2UCCQCaCAIFDnZvdGluZ0NvbnRyYWN0CQCsAgICDHByb3Bvc2FsX25vXwUCaWQAAAQOcHJvcG9zYWxIZWlnaHQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQ52b3RpbmdDb250cmFjdAkArAICAhBwcm9wb3NhbF9oZWlnaHRfBQJpZAIXcHJvcG9zYWwgbm90IHJlZ2lzdGVyZWQECmFwcGx5U3RhcnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOdm90aW5nQ29udHJhY3QJAKwCAgIUcHJvcG9zYWxfYXBwbHlzdGFydF8FAmlkAAAECGFwcGx5RW5kCQELdmFsdWVPckVsc2UCCQCaCAIFDnZvdGluZ0NvbnRyYWN0CQCsAgICEnByb3Bvc2FsX2FwcGx5ZW5kXwUCaWQAAAQLdG90YWxHVmlyZXMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOdm90aW5nQ29udHJhY3QJAKwCAgIQcHJvcG9zYWxfZ3ZpcmVzXwUCaWQAAAQHZW5hYmxlZAkBC3ZhbHVlT3JFbHNlAgkAmwgCBQ1jb25maWdBZGRyZXNzAh1vcF9nb3Zlcm5hbmNlX2FwcGx5X3R4X3BhdXNlZAcEB3ZvdGVZZXMFCHZvdGVzWWVzBAZ2b3RlTm8FB3ZvdGVzTm8ECnRvdGFsVm90ZXMJAGQCBQd2b3RlWWVzBQZ2b3RlTm8ECWhhc1F1b3J1bQkAZwIJAGkCCQBoAgUKdG90YWxWb3RlcwUEQkFTRQULdG90YWxHVmlyZXMFC3F1b3J1bVJhdGlvBAloYXNQYXNzZWQJAGcCCQBpAgkAaAIFB3ZvdGVZZXMFBEJBU0UFCnRvdGFsVm90ZXMFC3Bhc3NlZFJhdGlvBAh0b29FYXJseQkAZwIFCmFwcGx5U3RhcnQFBkhFSUdIVAQHdG9vTGF0ZQkAZwIFBkhFSUdIVAUIYXBwbHlFbmQECXRpbWVEZWJ1ZwkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAhFwcm9wb3NhbEhlaWdodCA9IAkApAMBBQ5wcm9wb3NhbEhlaWdodAIPLCBhcHBseVN0YXJ0ID0gCQCkAwEFCmFwcGx5U3RhcnQCDSwgYXBwbHlFbmQgPSAJAKQDAQUIYXBwbHlFbmQCCywgSEVJR0hUID0gCQCkAwEFBkhFSUdIVAQIYnlWb3RpbmcDCQEBIQEFB2VuYWJsZWQJAAIBAit0eCBhcHBsaWNhdGlvbiB0aHJvdyBnb3Zlcm5hbmNlIG5vdCBlbmFibGVkAwUIdG9vRWFybHkJAAIBCQCsAgICLnByb3Bvc2FsIGNhbid0IGJlIGV4ZWN1dGVkIGFzIGl0J3MgdG9vIGVhcmx5OiAFCXRpbWVEZWJ1ZwMFB3Rvb0xhdGUJAAIBCQCsAgICLHByb3Bvc2FsIGNhbid0IGJlIGV4ZWN1dGVkIGFzIGl0J3MgdG9vIGxhdGU6BQl0aW1lRGVidWcDCQEBIQEFCWhhc1F1b3J1bQkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICC25vIHF1b3J1bTogAgx0b3RhbFZvdGVzOiAJAKQDAQUKdG90YWxWb3RlcwIPLCB0b3RhbEdWaXJlczogCQCkAwEFC3RvdGFsR1ZpcmVzAg8sIHF1b3J1bVJhdGlvOiAJAKQDAQULcXVvcnVtUmF0aW8DCQEBIQEFCWhhc1Bhc3NlZAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICF25vIHRocmVzaG9sZCBhY2hpZXZlZDogAgl2b3RlWWVzOiAJAKQDAQUHdm90ZVllcwIKLCB2b3RlTm86IAkApAMBBQZ2b3RlTm8CDywgcGFzc2VkUmF0aW86IAkApAMBBQtwYXNzZWRSYXRpbwYDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5BgUIYnlWb3RpbmcHXjgw", "chainId": 87, "height": 3957847, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: FqvtrVWWXcUcf1ARat6qjZNWUjW44myEpr2Kb28o1Pn Next: none Diff:
OldNewDifferences
431431
432432
433433 @Callable(i)
434-func supplyFor (user) = supplyInternal(user, i)
434+func supplyFor (user) = {
435+ let checks = mainOnly(i)
436+ if ((checks == checks))
437+ then supplyInternal(user, i)
438+ else throw("Strict value is not equal to itself.")
439+ }
435440
436441
437442
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 func throwIf (condition,error) = if (condition)
55 then throw(error)
66 else true
77
88
99 func writeInt (key,value) = if ((0 > value))
1010 then throw(((("writing negative value " + toString(value)) + " for key ") + key))
1111 else IntegerEntry(key, value)
1212
1313
1414 func changeBy (key,value) = writeInt(key, (valueOrElse(getInteger(this, key), 0) + value))
1515
1616
1717 func fractionCeil (value,numerator,denominator) = {
1818 let cand = fraction(value, numerator, denominator)
1919 let D = 3037000499
2020 let exact = ((((cand % D) * (denominator % D)) % D) == (((value % D) * (numerator % D)) % D))
2121 if (exact)
2222 then cand
2323 else (cand + 1)
2424 }
2525
2626
2727 func writeConstString (key,value) = if (!(isDefined(getString(this, key))))
2828 then StringEntry(key, value)
2929 else throw(("already initialized: " + key))
3030
3131
3232 let configAddressStore = "configAddress"
3333
3434 let oracleStore = "oracle_address"
3535
3636 func reserveFactorStore (assetId) = (assetId + "_ReserveFactor")
3737
3838
3939 let mainStore = "main"
4040
4141 let configAddress = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(this, configAddressStore), "protected-reserve: no configAddress")), "invalid config address")
4242
4343 func reserveFactor (assetId) = valueOrErrorMessage(getInteger(configAddress, reserveFactorStore(assetId)), "no reserveFactor")
4444
4545
4646 func getBalance (addressOrAlias,assetId) = match assetId {
4747 case bv: ByteVector =>
4848 assetBalance(addressOrAlias, bv)
4949 case u: Unit =>
5050 wavesBalance(addressOrAlias).available
5151 case _ =>
5252 throw("Match error")
5353 }
5454
5555
5656 func opAllowed (assetId,op) = match invoke(configAddress, "opAllowed", [assetId, op], nil) {
5757 case b: Boolean =>
5858 if (b)
5959 then true
6060 else throw("not allowed")
6161 case _ =>
6262 throw("opAllowed: unexpected result type")
6363 }
6464
6565
6666 func mainOnly (i) = if (contains(getStringValue(configAddress, "main"), toString(i.caller)))
6767 then true
6868 else throw("only main can do")
6969
7070
7171 let maybeOracleAddress = match getString(configAddress, oracleStore) {
7272 case s: String =>
7373 addressFromString(s)
7474 case _ =>
7575 unit
7676 }
7777
7878 func oraclePrice (assetId) = match invoke(valueOrErrorMessage(maybeOracleAddress, "no oracle"), "price", [assetId], nil) {
7979 case i: Int =>
8080 i
8181 case _ =>
8282 throw("bad oracle data")
8383 }
8484
8585
8686 let HEIGHT = height
8787
8888 let assets = valueOrElse(getString(configAddress, "protected_reserve_assets"), "")
8989
9090 let assetsArray = if ((assets == ""))
9191 then nil
9292 else split_4C(assets, "|")
9393
9494 func totalDepositStore (assetId) = ("totalSupply_" + assetId)
9595
9696
9797 func totalSharesStore (assetId) = ("totalShares_" + assetId)
9898
9999
100100 func userSharesStore (assetId,user) = ((("userShares_" + assetId) + "_") + user)
101101
102102
103103 func hasProtectedStore (user) = ("protected_collateral_" + user)
104104
105105
106106 func protectedAssetStore (user) = ("protected_asset_" + user)
107107
108108
109109 func totalDeposit (assetId) = valueOrElse(getInteger(totalDepositStore(assetId)), 0)
110110
111111
112112 func totalShares (assetId) = valueOrElse(getInteger(totalSharesStore(assetId)), 0)
113113
114114
115115 func userShares (assetId,user) = valueOrElse(getInteger(userSharesStore(assetId, user)), 0)
116116
117117
118118 func userDeposit (assetId,user) = {
119119 let ts = totalShares(assetId)
120120 let td = totalDeposit(assetId)
121121 let us = userShares(assetId, user)
122122 if ((ts == 0))
123123 then 0
124124 else fraction(td, us, ts)
125125 }
126126
127127
128128 func hasRegularDeposit (user) = {
129129 let reserves = split_4C(valueOrErrorMessage(getString(configAddress, "primary_reserves"), "protected: no reserves found in main"), "|")
130130 func asUserBalanceData (value) = match value {
131131 case x: (Int, Int, Int, Int, Int, Boolean) =>
132132 x
133133 case t =>
134134 throw("wrong type, expected: Int5&Boolean")
135135 }
136136
137137 func fold (acc,reserve) = {
138138 let ubd = asUserBalanceData(invoke(addressFromStringValue(reserve), "userBalance", [user], nil))
139139 false
140140 }
141141
142142 let $l = reserves
143143 let $s = size($l)
144144 let $acc0 = false
145145 func $f0_1 ($a,$i) = if (($i >= $s))
146146 then $a
147147 else fold($a, $l[$i])
148148
149149 func $f0_2 ($a,$i) = if (($i >= $s))
150150 then $a
151151 else throw("List size exceeds 20")
152152
153153 $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($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), 16), 17), 18), 19), 20)
154154 }
155155
156156
157157 func userState (user) = {
158158 func fold (acc,assetId) = (acc ++ [$Tuple2(assetId, userDeposit(assetId, user))])
159159
160160 let $l = assetsArray
161161 let $s = size($l)
162162 let $acc0 = nil
163163 func $f0_1 ($a,$i) = if (($i >= $s))
164164 then $a
165165 else fold($a, $l[$i])
166166
167167 func $f0_2 ($a,$i) = if (($i >= $s))
168168 then $a
169169 else throw("List size exceeds 20")
170170
171171 $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($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), 16), 17), 18), 19), 20)
172172 }
173173
174174
175175 func bp (user) = {
176176 let factorsBase = 1000
177177 func collateralFactor (assetId) = valueOrErrorMessage(getInteger(configAddress, (assetId + "_CollateralFactor")), "no CollateralFactor in config")
178178
179179 func pow10 (n) = if ((n == 6))
180180 then 1000000
181181 else if ((n == 8))
182182 then 100000000
183183 else throw(("bad decimals: " + toString(n)))
184184
185185 func assetDecimals (assetId) = if ((assetId == "WAVES"))
186186 then 8
187187 else valueOrErrorMessage(assetInfo(fromBase58String(assetId)), "bad asset").decimals
188188
189189 func assetToUsd (assetId,amount) = fraction(amount, oraclePrice(assetId), pow10(assetDecimals(assetId)))
190190
191191 func fold (acc,data) = (acc + {
192192 let $t050705095 = data
193193 let assetId = $t050705095._1
194194 let amt = $t050705095._2
195195 fraction(assetToUsd(assetId, amt), collateralFactor(assetId), factorsBase)
196196 })
197197
198198 let $l = userState(user)
199199 let $s = size($l)
200200 let $acc0 = 0
201201 func $f0_1 ($a,$i) = if (($i >= $s))
202202 then $a
203203 else fold($a, $l[$i])
204204
205205 func $f0_2 ($a,$i) = if (($i >= $s))
206206 then $a
207207 else throw("List size exceeds 20")
208208
209209 $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($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), 16), 17), 18), 19), 20)
210210 }
211211
212212
213213 func adviseUser (user) = {
214214 let borrowPower = bp(user)
215215 (("borrowPower = " + toString(borrowPower)) + {
216216 func fold (acc,pair) = ((((acc + ", ") + pair._1) + " = ") + toString(pair._2))
217217
218218 let $l = userState(user)
219219 let $s = size($l)
220220 let $acc0 = ""
221221 func $f0_1 ($a,$i) = if (($i >= $s))
222222 then $a
223223 else fold($a, $l[$i])
224224
225225 func $f0_2 ($a,$i) = if (($i >= $s))
226226 then $a
227227 else throw("List size exceeds 20")
228228
229229 $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($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), 16), 17), 18), 19), 20)
230230 })
231231 }
232232
233233
234234 func sharesToAmount (assetId,shares) = {
235235 let ts = totalShares(assetId)
236236 let td = totalDeposit(assetId)
237237 if (if ((ts == 0))
238238 then true
239239 else (td == 0))
240240 then shares
241241 else fraction(shares, td, ts)
242242 }
243243
244244
245245 func amountToShares (assetId,amt,ceil) = {
246246 let ts = totalShares(assetId)
247247 let td = totalDeposit(assetId)
248248 if (if ((ts == 0))
249249 then true
250250 else (td == 0))
251251 then amt
252252 else if (ceil)
253253 then fractionCeil(amt, ts, td)
254254 else fraction(amt, ts, td)
255255 }
256256
257257
258258 func validateAssetId (assetId) = throwIf(!(contains(assets, assetId)), "assetId not permitted")
259259
260260
261261 func assetIdStr (aid) = match aid {
262262 case bv: ByteVector =>
263263 toBase58String(bv)
264264 case u: Unit =>
265265 "WAVES"
266266 case _ =>
267267 throw("Match error")
268268 }
269269
270270
271271 func assetStrToId (assetId) = if ((assetId == "WAVES"))
272272 then unit
273273 else fromBase58String(assetId)
274274
275275
276276 func stakingEnabled (assetId) = valueOrElse(getBoolean(configAddress, ("protected_staking_enabled_" + assetId)), false)
277277
278278
279279 func stakingAddress (assetId) = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(configAddress, ("protected_staking_config_" + assetId)), ("no staking address for " + assetId))), ("protectedReserve: bad staking address for " + assetId))
280280
281281
282282 func stakingAction (assetId,keepAtBalance) = {
283283 let actualBalance = if ((assetId == "WAVES"))
284284 then wavesBalance(this).available
285285 else assetBalance(this, fromBase58String(assetId))
286286 if ((actualBalance == keepAtBalance))
287287 then unit
288288 else if (!(stakingEnabled(assetId)))
289289 then unit
290290 else {
291291 let sa = stakingAddress(assetId)
292292 if ((actualBalance > keepAtBalance))
293293 then invoke(sa, "put", nil, [AttachedPayment(assetStrToId(assetId), (actualBalance - keepAtBalance))])
294294 else invoke(sa, "get", [(keepAtBalance - actualBalance)], nil)
295295 }
296296 }
297297
298298
299299 func withdrawInternal (from,to,assetId,amount) = {
300300 let checks = validateAssetId(assetId)
301301 if ((checks == checks))
302302 then {
303303 let realShares = userShares(assetId, from)
304304 let $t074347718 = if ((amount == -1))
305305 then {
306306 let realAmount = sharesToAmount(assetId, realShares)
307307 $Tuple2(realShares, realAmount)
308308 }
309309 else if ((0 >= amount))
310310 then throw("protected-reserve: non-positive amount")
311311 else $Tuple2(amountToShares(assetId, amount, true), amount)
312312 let wdShares = $t074347718._1
313313 let wdAmount = $t074347718._2
314314 let maybeCleanUp = if ((realShares == wdShares))
315315 then [BooleanEntry(hasProtectedStore(from), false), DeleteEntry(protectedAssetStore(from))]
316316 else nil
317317 let staking = stakingAction(assetId, wdAmount)
318318 if ((staking == staking))
319319 then $Tuple2((maybeCleanUp ++ [changeBy(totalDepositStore(assetId), -(wdAmount)), changeBy(totalSharesStore(assetId), -(wdShares)), changeBy(userSharesStore(assetId, from), -(wdShares)), ScriptTransfer(addressFromStringValue(to), wdAmount, assetStrToId(assetId))]), wdAmount)
320320 else throw("Strict value is not equal to itself.")
321321 }
322322 else throw("Strict value is not equal to itself.")
323323 }
324324
325325
326326 func supplyInternal (user,i) = if ((size(i.payments) != 1))
327327 then throw("protected-reserve: single payment required")
328328 else {
329329 let assetId = assetIdStr(i.payments[0].assetId)
330330 let amount = i.payments[0].amount
331331 if ((amount == 0))
332332 then nil
333333 else {
334334 let checks = if (validateAssetId(assetId))
335335 then opAllowed(assetId, "supply_protected_collateral")
336336 else false
337337 if ((checks == checks))
338338 then {
339339 let protectedFlag = valueOrElse(getBoolean(this, hasProtectedStore(user)), false)
340340 let protectedAsset = getString(this, protectedAssetStore(user))
341341 let consistency = if (protectedFlag)
342342 then match protectedAsset {
343343 case s: String =>
344344 if ((s == assetId))
345345 then true
346346 else throw("protected-reserve: can't have more than one asset protected")
347347 case _ =>
348348 throw("protected-reserve:clean up first")
349349 }
350350 else match protectedAsset {
351351 case s: String =>
352352 throw("protected-reserve: misconfiguration")
353353 case _ =>
354354 true
355355 }
356356 let consistencyCheck = throwIf(!(consistency), "inconsistency")
357357 if ((consistencyCheck == consistencyCheck))
358358 then {
359359 let newShares = amountToShares(assetId, amount, false)
360360 let staking = stakingAction(assetId, 0)
361361 if ((staking == staking))
362362 then [changeBy(totalDepositStore(assetId), amount), changeBy(totalSharesStore(assetId), newShares), changeBy(userSharesStore(assetId, user), newShares), BooleanEntry(hasProtectedStore(user), true), StringEntry(protectedAssetStore(user), assetId)]
363363 else throw("Strict value is not equal to itself.")
364364 }
365365 else throw("Strict value is not equal to itself.")
366366 }
367367 else throw("Strict value is not equal to itself.")
368368 }
369369 }
370370
371371
372372 @Callable(i)
373373 func initialize (configAddress) = [writeConstString(configAddressStore, configAddress)]
374374
375375
376376
377377 @Callable(i)
378378 func unstake (assetId) = {
379379 func asInt (value) = match value {
380380 case int: Int =>
381381 int
382382 case _ =>
383383 throw("_pr:1")
384384 }
385385
386386 if (stakingEnabled(assetId))
387387 then throw(("protected-reserve: staking is enabled for " + assetId))
388388 else {
389389 let sa = stakingAddress(assetId)
390390 let staked = asInt(invoke(sa, "info", nil, nil))
391391 if ((staked == staked))
392392 then {
393393 let unstaking = invoke(sa, "get", [staked], nil)
394394 if ((unstaking == unstaking))
395395 then $Tuple2(nil, staked)
396396 else throw("Strict value is not equal to itself.")
397397 }
398398 else throw("Strict value is not equal to itself.")
399399 }
400400 }
401401
402402
403403
404404 @Callable(i)
405405 func addInterest () = {
406406 let assetId = assetIdStr(i.payments[0].assetId)
407407 let checks = validateAssetId(assetId)
408408 if ((checks == checks))
409409 then {
410410 let staking = stakingAction(assetId, 0)
411411 if ((staking == staking))
412412 then {
413413 let amount = i.payments[0].amount
414414 [changeBy(totalDepositStore(assetId), amount)]
415415 }
416416 else throw("Strict value is not equal to itself.")
417417 }
418418 else throw("Strict value is not equal to itself.")
419419 }
420420
421421
422422
423423 @Callable(i)
424424 func borrowPower (user) = $Tuple2(nil, bp(user))
425425
426426
427427
428428 @Callable(i)
429429 func supply () = supplyInternal(toString(i.caller), i)
430430
431431
432432
433433 @Callable(i)
434-func supplyFor (user) = supplyInternal(user, i)
434+func supplyFor (user) = {
435+ let checks = mainOnly(i)
436+ if ((checks == checks))
437+ then supplyInternal(user, i)
438+ else throw("Strict value is not equal to itself.")
439+ }
435440
436441
437442
438443 @Callable(i)
439444 func withdrawFor (user,assetId,amount) = {
440445 let checks = if (mainOnly(i))
441446 then opAllowed(assetId, "withdraw_protected_collateral")
442447 else false
443448 if ((checks == checks))
444449 then withdrawInternal(user, user, assetId, amount)
445450 else throw("Strict value is not equal to itself.")
446451 }
447452
448453
449454
450455 @Callable(i)
451456 func withdrawToMain (user,assetId) = {
452457 let checks = if (mainOnly(i))
453458 then opAllowed(assetId, "collapse_protected_collateral")
454459 else false
455460 if ((checks == checks))
456461 then withdrawInternal(user, toString(i.caller), assetId, -1)
457462 else throw("Strict value is not equal to itself.")
458463 }
459464
460465
461466
462467 @Callable(i)
463468 func withdrawToMain2 (user,assetId,amt) = {
464469 let checks = if (mainOnly(i))
465470 then opAllowed(assetId, "withdrawProtectedToMain2")
466471 else false
467472 if ((checks == checks))
468473 then withdrawInternal(user, toString(i.caller), assetId, amt)
469474 else throw("Strict value is not equal to itself.")
470475 }
471476
472477
473478 @Verifier(tx)
474479 func verify () = {
475480 let BASE = 1000
476481 let quorumRatio = valueOrErrorMessage(getInteger(configAddress, "proposal_quorum_ratio"), "proposalQuorumRatio is not defined")
477482 let passedRatio = valueOrErrorMessage(getInteger(configAddress, "proposal_passed_ratio"), "proposalThresholdRatio is not defined")
478483 let gViresContract = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(configAddress, "dividends_contract"), "no dividends_contract")), "invalid dividends_contract")
479484 let votingContract = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(configAddress, "voting_contract"), "no voting_contract")), "invalid voting_contract")
480485 let id = toBase58String(tx.id)
481486 let votesYes = valueOrElse(getInteger(votingContract, ("proposal_yes_" + id)), 0)
482487 let votesNo = valueOrElse(getInteger(votingContract, ("proposal_no_" + id)), 0)
483488 let proposalHeight = valueOrErrorMessage(getInteger(votingContract, ("proposal_height_" + id)), "proposal not registered")
484489 let applyStart = valueOrElse(getInteger(votingContract, ("proposal_applystart_" + id)), 0)
485490 let applyEnd = valueOrElse(getInteger(votingContract, ("proposal_applyend_" + id)), 0)
486491 let totalGVires = valueOrElse(getInteger(votingContract, ("proposal_gvires_" + id)), 0)
487492 let enabled = valueOrElse(getBoolean(configAddress, "op_governance_apply_tx_paused"), false)
488493 let voteYes = votesYes
489494 let voteNo = votesNo
490495 let totalVotes = (voteYes + voteNo)
491496 let hasQuorum = (((totalVotes * BASE) / totalGVires) >= quorumRatio)
492497 let hasPassed = (((voteYes * BASE) / totalVotes) >= passedRatio)
493498 let tooEarly = (applyStart >= HEIGHT)
494499 let tooLate = (HEIGHT >= applyEnd)
495500 let timeDebug = ((((((("proposalHeight = " + toString(proposalHeight)) + ", applyStart = ") + toString(applyStart)) + ", applyEnd = ") + toString(applyEnd)) + ", HEIGHT = ") + toString(HEIGHT))
496501 let byVoting = if (!(enabled))
497502 then throw("tx application throw governance not enabled")
498503 else if (tooEarly)
499504 then throw(("proposal can't be executed as it's too early: " + timeDebug))
500505 else if (tooLate)
501506 then throw(("proposal can't be executed as it's too late:" + timeDebug))
502507 else if (!(hasQuorum))
503508 then throw((((((("no quorum: " + "totalVotes: ") + toString(totalVotes)) + ", totalGVires: ") + toString(totalGVires)) + ", quorumRatio: ") + toString(quorumRatio)))
504509 else if (!(hasPassed))
505510 then throw((((((("no threshold achieved: " + "voteYes: ") + toString(voteYes)) + ", voteNo: ") + toString(voteNo)) + ", passedRatio: ") + toString(passedRatio)))
506511 else true
507512 if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
508513 then true
509514 else byVoting
510515 }
511516

github/deemru/w8io/786bc32 
43.26 ms