2023.09.28 11:52 [3840863] smart account 3PJKKT7gsWiPBJj11gkF3Xv7gKt8s2WPdTr > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "CC68qKD4nHprCHp8hdjGoQ4SEEKZ323D5UeZVgmvRVMn",
    "fee": 1800000,
    "feeAssetId": null,
    "timestamp": 1695891173882,
    "version": 1,
    "sender": "3PJKKT7gsWiPBJj11gkF3Xv7gKt8s2WPdTr",
    "senderPublicKey": "FAqqjX7JqvqLh2QGTR3ziyCnSsWSoj9gVo4uPahtmhKr",
    "proofs": [
        "3SeupBoekvBf8AXqH1CbWcccBcoh7hgoctvSTuNaj4FCQgZS63MMjtkWbLD5VEkCk8RY5czE1uASwUoMquWvZv5z"
    ],
    "script": "base64:BgIrCAISABIDCgEIEgASAwoBCBIAEgMKAQgSBQoDCAgBEgQKAggIEgUKAwgIASoBB3Rocm93SWYCCWNvbmRpdGlvbgVlcnJvcgMFCWNvbmRpdGlvbgkAAgEFBWVycm9yBgEId3JpdGVJbnQCA2tleQV2YWx1ZQMJAGYCAAAFBXZhbHVlCQACAQkArAICCQCsAgIJAKwCAgIXd3JpdGluZyBuZWdhdGl2ZSB2YWx1ZSAJAKQDAQUFdmFsdWUCCSBmb3Iga2V5IAUDa2V5CQEMSW50ZWdlckVudHJ5AgUDa2V5BQV2YWx1ZQEIY2hhbmdlQnkCA2tleQV2YWx1ZQkBCHdyaXRlSW50AgUDa2V5CQBkAgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQNrZXkAAAUFdmFsdWUBDGZyYWN0aW9uQ2VpbAMFdmFsdWUJbnVtZXJhdG9yC2Rlbm9taW5hdG9yBARjYW5kCQBrAwUFdmFsdWUFCW51bWVyYXRvcgULZGVub21pbmF0b3IEAUQAs+aTqAsEBWV4YWN0CQAAAgkAagIJAGgCCQBqAgUEY2FuZAUBRAkAagIFC2Rlbm9taW5hdG9yBQFEBQFECQBqAgkAaAIJAGoCBQV2YWx1ZQUBRAkAagIFCW51bWVyYXRvcgUBRAUBRAMFBWV4YWN0BQRjYW5kCQBkAgUEY2FuZAABARB3cml0ZUNvbnN0U3RyaW5nAgNrZXkFdmFsdWUDCQEBIQEJAQlpc0RlZmluZWQBCQCdCAIFBHRoaXMFA2tleQkBC1N0cmluZ0VudHJ5AgUDa2V5BQV2YWx1ZQkAAgEJAKwCAgIVYWxyZWFkeSBpbml0aWFsaXplZDogBQNrZXkAEmNvbmZpZ0FkZHJlc3NTdG9yZQINY29uZmlnQWRkcmVzcwALb3JhY2xlU3RvcmUCDm9yYWNsZV9hZGRyZXNzARJyZXNlcnZlRmFjdG9yU3RvcmUBB2Fzc2V0SWQJAKwCAgUHYXNzZXRJZAIOX1Jlc2VydmVGYWN0b3IACW1haW5TdG9yZQIEbWFpbgANY29uZmlnQWRkcmVzcwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBRJjb25maWdBZGRyZXNzU3RvcmUCI3Byb3RlY3RlZC1yZXNlcnZlOiBubyBjb25maWdBZGRyZXNzAhZpbnZhbGlkIGNvbmZpZyBhZGRyZXNzAQ1yZXNlcnZlRmFjdG9yAQdhc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUNY29uZmlnQWRkcmVzcwkBEnJlc2VydmVGYWN0b3JTdG9yZQEFB2Fzc2V0SWQCEG5vIHJlc2VydmVGYWN0b3IBCmdldEJhbGFuY2UCDmFkZHJlc3NPckFsaWFzB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCYnYFByRtYXRjaDAJAPAHAgUOYWRkcmVzc09yQWxpYXMFAmJ2AwkAAQIFByRtYXRjaDACBFVuaXQEAXUFByRtYXRjaDAICQDvBwEFDmFkZHJlc3NPckFsaWFzCWF2YWlsYWJsZQkAAgECC01hdGNoIGVycm9yAQlvcEFsbG93ZWQCB2Fzc2V0SWQCb3AEByRtYXRjaDAJAPwHBAUNY29uZmlnQWRkcmVzcwIJb3BBbGxvd2VkCQDMCAIFB2Fzc2V0SWQJAMwIAgUCb3AFA25pbAUDbmlsAwkAAQIFByRtYXRjaDACB0Jvb2xlYW4EAWIFByRtYXRjaDADBQFiBgkAAgECC25vdCBhbGxvd2VkCQACAQIhb3BBbGxvd2VkOiB1bmV4cGVjdGVkIHJlc3VsdCB0eXBlAQhtYWluT25seQEBaQMJAQhjb250YWlucwIJARFAZXh0ck5hdGl2ZSgxMDUzKQIFDWNvbmZpZ0FkZHJlc3MCBG1haW4JAKUIAQgFAWkGY2FsbGVyBgkAAgECEG9ubHkgbWFpbiBjYW4gZG8AEm1heWJlT3JhY2xlQWRkcmVzcwQHJG1hdGNoMAkAnQgCBQ1jb25maWdBZGRyZXNzBQtvcmFjbGVTdG9yZQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJAKYIAQUBcwUEdW5pdAELb3JhY2xlUHJpY2UBB2Fzc2V0SWQEByRtYXRjaDAJAPwHBAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCBRJtYXliZU9yYWNsZUFkZHJlc3MCCW5vIG9yYWNsZQIFcHJpY2UJAMwIAgUHYXNzZXRJZAUDbmlsBQNuaWwDCQABAgUHJG1hdGNoMAIDSW50BAFpBQckbWF0Y2gwBQFpCQACAQIPYmFkIG9yYWNsZSBkYXRhAAZIRUlHSFQFBmhlaWdodAAGYXNzZXRzCQELdmFsdWVPckVsc2UCCQCdCAIFDWNvbmZpZ0FkZHJlc3MCGHByb3RlY3RlZF9yZXNlcnZlX2Fzc2V0cwIAAAthc3NldHNBcnJheQMJAAACBQZhc3NldHMCAAUDbmlsCQC8CQIFBmFzc2V0cwIBfAERdG90YWxEZXBvc2l0U3RvcmUBB2Fzc2V0SWQJAKwCAgIMdG90YWxTdXBwbHlfBQdhc3NldElkARB0b3RhbFNoYXJlc1N0b3JlAQdhc3NldElkCQCsAgICDHRvdGFsU2hhcmVzXwUHYXNzZXRJZAEPdXNlclNoYXJlc1N0b3JlAgdhc3NldElkBHVzZXIJAKwCAgkArAICCQCsAgICC3VzZXJTaGFyZXNfBQdhc3NldElkAgFfBQR1c2VyARFoYXNQcm90ZWN0ZWRTdG9yZQEEdXNlcgkArAICAhVwcm90ZWN0ZWRfY29sbGF0ZXJhbF8FBHVzZXIBE3Byb3RlY3RlZEFzc2V0U3RvcmUBBHVzZXIJAKwCAgIQcHJvdGVjdGVkX2Fzc2V0XwUEdXNlcgEMdG90YWxEZXBvc2l0AQdhc3NldElkCQELdmFsdWVPckVsc2UCCQCfCAEJARF0b3RhbERlcG9zaXRTdG9yZQEFB2Fzc2V0SWQAAAELdG90YWxTaGFyZXMBB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEHRvdGFsU2hhcmVzU3RvcmUBBQdhc3NldElkAAABCnVzZXJTaGFyZXMCB2Fzc2V0SWQEdXNlcgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEPdXNlclNoYXJlc1N0b3JlAgUHYXNzZXRJZAUEdXNlcgAAAQt1c2VyRGVwb3NpdAIHYXNzZXRJZAR1c2VyBAJ0cwkBC3RvdGFsU2hhcmVzAQUHYXNzZXRJZAQCdGQJAQx0b3RhbERlcG9zaXQBBQdhc3NldElkBAJ1cwkBCnVzZXJTaGFyZXMCBQdhc3NldElkBQR1c2VyAwkAAAIFAnRzAAAAAAkAawMFAnRkBQJ1cwUCdHMBEWhhc1JlZ3VsYXJEZXBvc2l0AQR1c2VyBAhyZXNlcnZlcwkAvAkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUNY29uZmlnQWRkcmVzcwIQcHJpbWFyeV9yZXNlcnZlcwIkcHJvdGVjdGVkOiBubyByZXNlcnZlcyBmb3VuZCBpbiBtYWluAgF8CgERYXNVc2VyQmFsYW5jZURhdGEBBXZhbHVlBAckbWF0Y2gwBQV2YWx1ZQMJAAECBQckbWF0Y2gwAiIoSW50LCBJbnQsIEludCwgSW50LCBJbnQsIEJvb2xlYW4pBAF4BQckbWF0Y2gwBQF4BAF0BQckbWF0Y2gwCQACAQIid3JvbmcgdHlwZSwgZXhwZWN0ZWQ6IEludDUmQm9vbGVhbgoBBGZvbGQCA2FjYwdyZXNlcnZlBAN1YmQJARFhc1VzZXJCYWxhbmNlRGF0YQEJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQUHcmVzZXJ2ZQILdXNlckJhbGFuY2UJAMwIAgUEdXNlcgUDbmlsBQNuaWwDCQBmAggFA3ViZAJfMQAACQACAQIoY2FuJ3QgaGF2ZSBwcm90ZWN0ZWQgd2hlbiByZWd1bGFyIGV4aXN0cwcKAAIkbAUIcmVzZXJ2ZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBwoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEEZm9sZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMjAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUAQl1c2VyU3RhdGUBBHVzZXIKAQRmb2xkAgNhY2MHYXNzZXRJZAkAzggCBQNhY2MJAMwIAgkAlAoCBQdhc3NldElkCQELdXNlckRlcG9zaXQCBQdhc3NldElkBQR1c2VyBQNuaWwKAAIkbAULYXNzZXRzQXJyYXkKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBGZvbGQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDIwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAECYnABBHVzZXIEC2ZhY3RvcnNCYXNlAOgHCgEQY29sbGF0ZXJhbEZhY3RvcgEHYXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFDWNvbmZpZ0FkZHJlc3MJAKwCAgUHYXNzZXRJZAIRX0NvbGxhdGVyYWxGYWN0b3ICHW5vIENvbGxhdGVyYWxGYWN0b3IgaW4gY29uZmlnCgEFcG93MTABAW4DCQAAAgUBbgAGAMCEPQMJAAACBQFuAAgAgMLXLwkAAgEJAKwCAgIOYmFkIGRlY2ltYWxzOiAJAKQDAQUBbgoBDWFzc2V0RGVjaW1hbHMBB2Fzc2V0SWQDCQAAAgUHYXNzZXRJZAIFV0FWRVMACAgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBCQDZBAEFB2Fzc2V0SWQCCWJhZCBhc3NldAhkZWNpbWFscwoBCmFzc2V0VG9Vc2QCB2Fzc2V0SWQGYW1vdW50CQBrAwUGYW1vdW50CQELb3JhY2xlUHJpY2UBBQdhc3NldElkCQEFcG93MTABCQENYXNzZXREZWNpbWFscwEFB2Fzc2V0SWQKAQRmb2xkAgNhY2MEZGF0YQkAZAIFA2FjYwQLJHQwNTA2MzUwODgFBGRhdGEEB2Fzc2V0SWQIBQskdDA1MDYzNTA4OAJfMQQDYW10CAULJHQwNTA2MzUwODgCXzIJAGsDCQEKYXNzZXRUb1VzZAIFB2Fzc2V0SWQFA2FtdAkBEGNvbGxhdGVyYWxGYWN0b3IBBQdhc3NldElkBQtmYWN0b3JzQmFzZQoAAiRsCQEJdXNlclN0YXRlAQUEdXNlcgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEEZm9sZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMjAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUAQphZHZpc2VVc2VyAQR1c2VyBAtib3Jyb3dQb3dlcgkBAmJwAQUEdXNlcgkArAICCQCsAgICDmJvcnJvd1Bvd2VyID0gCQCkAwEFC2JvcnJvd1Bvd2VyCgEEZm9sZAIDYWNjBHBhaXIJAKwCAgkArAICCQCsAgIJAKwCAgUDYWNjAgIsIAgFBHBhaXICXzECAyA9IAkApAMBCAUEcGFpcgJfMgoAAiRsCQEJdXNlclN0YXRlAQUEdXNlcgoAAiRzCQCQAwEFAiRsCgAFJGFjYzACAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEEZm9sZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMjAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUAQ5zaGFyZXNUb0Ftb3VudAIHYXNzZXRJZAZzaGFyZXMEAnRzCQELdG90YWxTaGFyZXMBBQdhc3NldElkBAJ0ZAkBDHRvdGFsRGVwb3NpdAEFB2Fzc2V0SWQDAwkAAAIFAnRzAAAGCQAAAgUCdGQAAAUGc2hhcmVzCQBrAwUGc2hhcmVzBQJ0ZAUCdHMBDmFtb3VudFRvU2hhcmVzAwdhc3NldElkA2FtdARjZWlsBAJ0cwkBC3RvdGFsU2hhcmVzAQUHYXNzZXRJZAQCdGQJAQx0b3RhbERlcG9zaXQBBQdhc3NldElkAwMJAAACBQJ0cwAABgkAAAIFAnRkAAAFA2FtdAMFBGNlaWwJAQxmcmFjdGlvbkNlaWwDBQNhbXQFAnRzBQJ0ZAkAawMFA2FtdAUCdHMFAnRkAQ92YWxpZGF0ZUFzc2V0SWQBB2Fzc2V0SWQJAQd0aHJvd0lmAgkBASEBCQEIY29udGFpbnMCBQZhc3NldHMFB2Fzc2V0SWQCFWFzc2V0SWQgbm90IHBlcm1pdHRlZAEKYXNzZXRJZFN0cgEDYWlkBAckbWF0Y2gwBQNhaWQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCYnYFByRtYXRjaDAJANgEAQUCYnYDCQABAgUHJG1hdGNoMAIEVW5pdAQBdQUHJG1hdGNoMAIFV0FWRVMJAAIBAgtNYXRjaCBlcnJvcgEMYXNzZXRTdHJUb0lkAQdhc3NldElkAwkAAAIFB2Fzc2V0SWQCBVdBVkVTBQR1bml0CQDZBAEFB2Fzc2V0SWQBDnN0YWtpbmdFbmFibGVkAQdhc3NldElkCQELdmFsdWVPckVsc2UCCQCbCAIFDWNvbmZpZ0FkZHJlc3MJAKwCAgIacHJvdGVjdGVkX3N0YWtpbmdfZW5hYmxlZF8FB2Fzc2V0SWQHAQ5zdGFraW5nQWRkcmVzcwEHYXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ1jb25maWdBZGRyZXNzCQCsAgICGXByb3RlY3RlZF9zdGFraW5nX2NvbmZpZ18FB2Fzc2V0SWQJAKwCAgIXbm8gc3Rha2luZyBhZGRyZXNzIGZvciAFB2Fzc2V0SWQJAKwCAgIqcHJvdGVjdGVkUmVzZXJ2ZTogYmFkIHN0YWtpbmcgYWRkcmVzcyBmb3IgBQdhc3NldElkAQ1zdGFraW5nQWN0aW9uAgdhc3NldElkDWtlZXBBdEJhbGFuY2UEDWFjdHVhbEJhbGFuY2UDCQAAAgUHYXNzZXRJZAIFV0FWRVMICQDvBwEFBHRoaXMJYXZhaWxhYmxlCQDwBwIFBHRoaXMJANkEAQUHYXNzZXRJZAMJAAACBQ1hY3R1YWxCYWxhbmNlBQ1rZWVwQXRCYWxhbmNlBQR1bml0AwkBASEBCQEOc3Rha2luZ0VuYWJsZWQBBQdhc3NldElkBQR1bml0BAJzYQkBDnN0YWtpbmdBZGRyZXNzAQUHYXNzZXRJZAMJAGYCBQ1hY3R1YWxCYWxhbmNlBQ1rZWVwQXRCYWxhbmNlCQD8BwQFAnNhAgNwdXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDGFzc2V0U3RyVG9JZAEFB2Fzc2V0SWQJAGUCBQ1hY3R1YWxCYWxhbmNlBQ1rZWVwQXRCYWxhbmNlBQNuaWwJAPwHBAUCc2ECA2dldAkAzAgCCQBlAgUNa2VlcEF0QmFsYW5jZQUNYWN0dWFsQmFsYW5jZQUDbmlsBQNuaWwBEHdpdGhkcmF3SW50ZXJuYWwEBGZyb20CdG8HYXNzZXRJZAZhbW91bnQEBmNoZWNrcwkBD3ZhbGlkYXRlQXNzZXRJZAEFB2Fzc2V0SWQDCQAAAgUGY2hlY2tzBQZjaGVja3MECnJlYWxTaGFyZXMJAQp1c2VyU2hhcmVzAgUHYXNzZXRJZAUEZnJvbQQLJHQwNzQyNzc3MTEDCQAAAgUGYW1vdW50AP///////////wEECnJlYWxBbW91bnQJAQ5zaGFyZXNUb0Ftb3VudAIFB2Fzc2V0SWQFCnJlYWxTaGFyZXMJAJQKAgUKcmVhbFNoYXJlcwUKcmVhbEFtb3VudAMJAGcCAAAFBmFtb3VudAkAAgECJnByb3RlY3RlZC1yZXNlcnZlOiBub24tcG9zaXRpdmUgYW1vdW50CQCUCgIJAQ5hbW91bnRUb1NoYXJlcwMFB2Fzc2V0SWQFBmFtb3VudAYFBmFtb3VudAQId2RTaGFyZXMIBQskdDA3NDI3NzcxMQJfMQQId2RBbW91bnQIBQskdDA3NDI3NzcxMQJfMgQMbWF5YmVDbGVhblVwAwkAAAIFCnJlYWxTaGFyZXMFCHdkU2hhcmVzCQDMCAIJAQxCb29sZWFuRW50cnkCCQERaGFzUHJvdGVjdGVkU3RvcmUBBQRmcm9tBwkAzAgCCQELRGVsZXRlRW50cnkBCQETcHJvdGVjdGVkQXNzZXRTdG9yZQEFBGZyb20FA25pbAUDbmlsBAdzdGFraW5nCQENc3Rha2luZ0FjdGlvbgIFB2Fzc2V0SWQFCHdkQW1vdW50AwkAAAIFB3N0YWtpbmcFB3N0YWtpbmcJAJQKAgkAzggCBQxtYXliZUNsZWFuVXAJAMwIAgkBCGNoYW5nZUJ5AgkBEXRvdGFsRGVwb3NpdFN0b3JlAQUHYXNzZXRJZAkBAS0BBQh3ZEFtb3VudAkAzAgCCQEIY2hhbmdlQnkCCQEQdG90YWxTaGFyZXNTdG9yZQEFB2Fzc2V0SWQJAQEtAQUId2RTaGFyZXMJAMwIAgkBCGNoYW5nZUJ5AgkBD3VzZXJTaGFyZXNTdG9yZQIFB2Fzc2V0SWQFBGZyb20JAQEtAQUId2RTaGFyZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUCdG8FCHdkQW1vdW50CQEMYXNzZXRTdHJUb0lkAQUHYXNzZXRJZAUDbmlsBQh3ZEFtb3VudAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEOc3VwcGx5SW50ZXJuYWwCBHVzZXIBaQMJARFoYXNSZWd1bGFyRGVwb3NpdAEFBHVzZXIJAAIBAjtwcm90ZWN0ZWQtcmVzZXJ2ZTogY2FuJ3QgaGF2ZSBwcm90ZWN0ZWQgd2hlbiByZWd1bGFyIGV4aXN0cwMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECKnByb3RlY3RlZC1yZXNlcnZlOiBzaW5nbGUgcGF5bWVudCByZXF1aXJlZAQHYXNzZXRJZAkBCmFzc2V0SWRTdHIBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQEBmFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQDCQAAAgUGYW1vdW50AAAFA25pbAQGY2hlY2tzAwkBD3ZhbGlkYXRlQXNzZXRJZAEFB2Fzc2V0SWQJAQlvcEFsbG93ZWQCBQdhc3NldElkAhtzdXBwbHlfcHJvdGVjdGVkX2NvbGxhdGVyYWwHAwkAAAIFBmNoZWNrcwUGY2hlY2tzBA1wcm90ZWN0ZWRGbGFnCQELdmFsdWVPckVsc2UCCQCbCAIFBHRoaXMJARFoYXNQcm90ZWN0ZWRTdG9yZQEFBHVzZXIHBA5wcm90ZWN0ZWRBc3NldAkAnQgCBQR0aGlzCQETcHJvdGVjdGVkQXNzZXRTdG9yZQEFBHVzZXIEC2NvbnNpc3RlbmN5AwUNcHJvdGVjdGVkRmxhZwQHJG1hdGNoMAUOcHJvdGVjdGVkQXNzZXQDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwAwkAAAIFAXMFB2Fzc2V0SWQGCQACAQI7cHJvdGVjdGVkLXJlc2VydmU6IGNhbid0IGhhdmUgbW9yZSB0aGFuIG9uZSBhc3NldCBwcm90ZWN0ZWQJAAIBAiBwcm90ZWN0ZWQtcmVzZXJ2ZTpjbGVhbiB1cCBmaXJzdAQHJG1hdGNoMAUOcHJvdGVjdGVkQXNzZXQDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQACAQIjcHJvdGVjdGVkLXJlc2VydmU6IG1pc2NvbmZpZ3VyYXRpb24GBBBjb25zaXN0ZW5jeUNoZWNrCQEHdGhyb3dJZgIJAQEhAQULY29uc2lzdGVuY3kCDWluY29uc2lzdGVuY3kDCQAAAgUQY29uc2lzdGVuY3lDaGVjawUQY29uc2lzdGVuY3lDaGVjawQJbmV3U2hhcmVzCQEOYW1vdW50VG9TaGFyZXMDBQdhc3NldElkBQZhbW91bnQHBAdzdGFraW5nCQENc3Rha2luZ0FjdGlvbgIFB2Fzc2V0SWQAAAMJAAACBQdzdGFraW5nBQdzdGFraW5nCQDMCAIJAQhjaGFuZ2VCeQIJARF0b3RhbERlcG9zaXRTdG9yZQEFB2Fzc2V0SWQFBmFtb3VudAkAzAgCCQEIY2hhbmdlQnkCCQEQdG90YWxTaGFyZXNTdG9yZQEFB2Fzc2V0SWQFCW5ld1NoYXJlcwkAzAgCCQEIY2hhbmdlQnkCCQEPdXNlclNoYXJlc1N0b3JlAgUHYXNzZXRJZAUEdXNlcgUJbmV3U2hhcmVzCQDMCAIJAQxCb29sZWFuRW50cnkCCQERaGFzUHJvdGVjdGVkU3RvcmUBBQR1c2VyBgkAzAgCCQELU3RyaW5nRW50cnkCCQETcHJvdGVjdGVkQXNzZXRTdG9yZQEFBHVzZXIFB2Fzc2V0SWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkBaQEEYnVybgADCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAgZkZW5pZWQECmJ1cm5BbW91bnQAqLyng6g4BAdidXJuQWRyAiMzUDg3enJVNlVtSnE3d0Vaejg0Rm05UEpYcjl0TEdmRXdQQgQDeHRuAixERzJ4RmtQZER3S1VvQmt6R0FoUXRMcFNHemZYTGlDWVBFemVLSDJBZDI0cAQDYWNjAiMzUDg0ZXZYU1dNY2hZTWE2aGtMTFJtUTR1c0hmNGNOc2pOcAkBEHdpdGhkcmF3SW50ZXJuYWwEBQNhY2MFB2J1cm5BZHIFA3h0bgUKYnVybkFtb3VudAFpAQd1bnN0YWtlAQdhc3NldElkCgEFYXNJbnQBBXZhbHVlBAckbWF0Y2gwBQV2YWx1ZQMJAAECBQckbWF0Y2gwAgNJbnQEA2ludAUHJG1hdGNoMAUDaW50CQACAQIFX3ByOjEDCQEOc3Rha2luZ0VuYWJsZWQBBQdhc3NldElkCQACAQkArAICAipwcm90ZWN0ZWQtcmVzZXJ2ZTogc3Rha2luZyBpcyBlbmFibGVkIGZvciAFB2Fzc2V0SWQEAnNhCQEOc3Rha2luZ0FkZHJlc3MBBQdhc3NldElkBAZzdGFrZWQJAQVhc0ludAEJAPwHBAUCc2ECBGluZm8FA25pbAUDbmlsAwkAAAIFBnN0YWtlZAUGc3Rha2VkBAl1bnN0YWtpbmcJAPwHBAUCc2ECA2dldAkAzAgCBQZzdGFrZWQFA25pbAUDbmlsAwkAAAIFCXVuc3Rha2luZwUJdW5zdGFraW5nCQCUCgIFA25pbAUGc3Rha2VkCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBC2FkZEludGVyZXN0AAQHYXNzZXRJZAkBCmFzc2V0SWRTdHIBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQEBmNoZWNrcwkBD3ZhbGlkYXRlQXNzZXRJZAEFB2Fzc2V0SWQDCQAAAgUGY2hlY2tzBQZjaGVja3MEB3N0YWtpbmcJAQ1zdGFraW5nQWN0aW9uAgUHYXNzZXRJZAAAAwkAAAIFB3N0YWtpbmcFB3N0YWtpbmcEBmFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQJAMwIAgkBCGNoYW5nZUJ5AgkBEXRvdGFsRGVwb3NpdFN0b3JlAQUHYXNzZXRJZAUGYW1vdW50BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQELYm9ycm93UG93ZXIBBHVzZXIJAJQKAgUDbmlsCQECYnABBQR1c2VyAWkBBnN1cHBseQAJAQ5zdXBwbHlJbnRlcm5hbAIJAKUIAQgFAWkGY2FsbGVyBQFpAWkBCXN1cHBseUZvcgEEdXNlcgQGY2hlY2tzCQEIbWFpbk9ubHkBBQFpAwkAAAIFBmNoZWNrcwUGY2hlY2tzCQEOc3VwcGx5SW50ZXJuYWwCBQR1c2VyBQFpCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBC3dpdGhkcmF3Rm9yAwR1c2VyB2Fzc2V0SWQGYW1vdW50BAZjaGVja3MDCQEIbWFpbk9ubHkBBQFpCQEJb3BBbGxvd2VkAgUHYXNzZXRJZAIdd2l0aGRyYXdfcHJvdGVjdGVkX2NvbGxhdGVyYWwHAwkAAAIFBmNoZWNrcwUGY2hlY2tzCQEQd2l0aGRyYXdJbnRlcm5hbAQFBHVzZXIFBHVzZXIFB2Fzc2V0SWQFBmFtb3VudAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ53aXRoZHJhd1RvTWFpbgIEdXNlcgdhc3NldElkBAZjaGVja3MDCQEIbWFpbk9ubHkBBQFpCQEJb3BBbGxvd2VkAgUHYXNzZXRJZAIdY29sbGFwc2VfcHJvdGVjdGVkX2NvbGxhdGVyYWwHAwkAAAIFBmNoZWNrcwUGY2hlY2tzCQEQd2l0aGRyYXdJbnRlcm5hbAQFBHVzZXIJAKUIAQgFAWkGY2FsbGVyBQdhc3NldElkAP///////////wEJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEPd2l0aGRyYXdUb01haW4yAwR1c2VyB2Fzc2V0SWQDYW10BAZjaGVja3MDCQEIbWFpbk9ubHkBBQFpCQEJb3BBbGxvd2VkAgUHYXNzZXRJZAIYd2l0aGRyYXdQcm90ZWN0ZWRUb01haW4yBwMJAAACBQZjaGVja3MFBmNoZWNrcwkBEHdpdGhkcmF3SW50ZXJuYWwEBQR1c2VyCQClCAEIBQFpBmNhbGxlcgUHYXNzZXRJZAUDYW10CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJ0eAEGdmVyaWZ5AAQEQkFTRQDoBwQLcXVvcnVtUmF0aW8JARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQ1jb25maWdBZGRyZXNzAhVwcm9wb3NhbF9xdW9ydW1fcmF0aW8CInByb3Bvc2FsUXVvcnVtUmF0aW8gaXMgbm90IGRlZmluZWQEC3Bhc3NlZFJhdGlvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUNY29uZmlnQWRkcmVzcwIVcHJvcG9zYWxfcGFzc2VkX3JhdGlvAiVwcm9wb3NhbFRocmVzaG9sZFJhdGlvIGlzIG5vdCBkZWZpbmVkBA5nVmlyZXNDb250cmFjdAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ1jb25maWdBZGRyZXNzAhJkaXZpZGVuZHNfY29udHJhY3QCFW5vIGRpdmlkZW5kc19jb250cmFjdAIaaW52YWxpZCBkaXZpZGVuZHNfY29udHJhY3QEDnZvdGluZ0NvbnRyYWN0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFDWNvbmZpZ0FkZHJlc3MCD3ZvdGluZ19jb250cmFjdAISbm8gdm90aW5nX2NvbnRyYWN0AhdpbnZhbGlkIHZvdGluZ19jb250cmFjdAQCaWQJANgEAQgFAnR4AmlkBAh2b3Rlc1llcwkBC3ZhbHVlT3JFbHNlAgkAmggCBQ52b3RpbmdDb250cmFjdAkArAICAg1wcm9wb3NhbF95ZXNfBQJpZAAABAd2b3Rlc05vCQELdmFsdWVPckVsc2UCCQCaCAIFDnZvdGluZ0NvbnRyYWN0CQCsAgICDHByb3Bvc2FsX25vXwUCaWQAAAQOcHJvcG9zYWxIZWlnaHQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQ52b3RpbmdDb250cmFjdAkArAICAhBwcm9wb3NhbF9oZWlnaHRfBQJpZAIXcHJvcG9zYWwgbm90IHJlZ2lzdGVyZWQECmFwcGx5U3RhcnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOdm90aW5nQ29udHJhY3QJAKwCAgIUcHJvcG9zYWxfYXBwbHlzdGFydF8FAmlkAAAECGFwcGx5RW5kCQELdmFsdWVPckVsc2UCCQCaCAIFDnZvdGluZ0NvbnRyYWN0CQCsAgICEnByb3Bvc2FsX2FwcGx5ZW5kXwUCaWQAAAQLdG90YWxHVmlyZXMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOdm90aW5nQ29udHJhY3QJAKwCAgIQcHJvcG9zYWxfZ3ZpcmVzXwUCaWQAAAQHZW5hYmxlZAkBC3ZhbHVlT3JFbHNlAgkAmwgCBQ1jb25maWdBZGRyZXNzAh1vcF9nb3Zlcm5hbmNlX2FwcGx5X3R4X3BhdXNlZAcEB3ZvdGVZZXMFCHZvdGVzWWVzBAZ2b3RlTm8FB3ZvdGVzTm8ECnRvdGFsVm90ZXMJAGQCBQd2b3RlWWVzBQZ2b3RlTm8ECWhhc1F1b3J1bQkAZwIJAGkCCQBoAgUKdG90YWxWb3RlcwUEQkFTRQULdG90YWxHVmlyZXMFC3F1b3J1bVJhdGlvBAloYXNQYXNzZWQJAGcCCQBpAgkAaAIFB3ZvdGVZZXMFBEJBU0UFCnRvdGFsVm90ZXMFC3Bhc3NlZFJhdGlvBAh0b29FYXJseQkAZwIFCmFwcGx5U3RhcnQFBkhFSUdIVAQHdG9vTGF0ZQkAZwIFBkhFSUdIVAUIYXBwbHlFbmQECXRpbWVEZWJ1ZwkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAhFwcm9wb3NhbEhlaWdodCA9IAkApAMBBQ5wcm9wb3NhbEhlaWdodAIPLCBhcHBseVN0YXJ0ID0gCQCkAwEFCmFwcGx5U3RhcnQCDSwgYXBwbHlFbmQgPSAJAKQDAQUIYXBwbHlFbmQCCywgSEVJR0hUID0gCQCkAwEFBkhFSUdIVAQIYnlWb3RpbmcDCQEBIQEFB2VuYWJsZWQJAAIBAit0eCBhcHBsaWNhdGlvbiB0aHJvdyBnb3Zlcm5hbmNlIG5vdCBlbmFibGVkAwUIdG9vRWFybHkJAAIBCQCsAgICLnByb3Bvc2FsIGNhbid0IGJlIGV4ZWN1dGVkIGFzIGl0J3MgdG9vIGVhcmx5OiAFCXRpbWVEZWJ1ZwMFB3Rvb0xhdGUJAAIBCQCsAgICLHByb3Bvc2FsIGNhbid0IGJlIGV4ZWN1dGVkIGFzIGl0J3MgdG9vIGxhdGU6BQl0aW1lRGVidWcDCQEBIQEFCWhhc1F1b3J1bQkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICC25vIHF1b3J1bTogAgx0b3RhbFZvdGVzOiAJAKQDAQUKdG90YWxWb3RlcwIPLCB0b3RhbEdWaXJlczogCQCkAwEFC3RvdGFsR1ZpcmVzAg8sIHF1b3J1bVJhdGlvOiAJAKQDAQULcXVvcnVtUmF0aW8DCQEBIQEFCWhhc1Bhc3NlZAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICF25vIHRocmVzaG9sZCBhY2hpZXZlZDogAgl2b3RlWWVzOiAJAKQDAQUHdm90ZVllcwIKLCB2b3RlTm86IAkApAMBBQZ2b3RlTm8CDywgcGFzc2VkUmF0aW86IAkApAMBBQtwYXNzZWRSYXRpbwYDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5BgUIYnlWb3RpbmelUoMc",
    "chainId": 87,
    "height": 3840863,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6TRefbBkrMwmsneLK8S4ozTwSFtmkkP8S4kaUgSuoyUm
Next: 5497hMcd6cr2YZfB8NbawTuTF2y8BtysQTJq55G7jtGr

Diff: 
Old
New
Differences
125
125
 
    }
126
126
 
127
127
 
128
+
func hasRegularDeposit (user) = {
129
+
    let reserves = split_4C(valueOrErrorMessage(getString(configAddress, "primary_reserves"), "protected: no reserves found in main"), "|")
130
+
    func asUserBalanceData (value) =         match value {
131
+
        case x: (Int, Int, Int, Int, Int, Boolean) => 
132
+
            x
133
+
        case t => 
134
+
            throw("wrong type, expected: Int5&Boolean")
135
+
    }
136
+
137
+
    func fold (acc,reserve) =     {
138
+
        let ubd = asUserBalanceData(invoke(addressFromStringValue(reserve), "userBalance", [user], nil))
139
+
        if ((ubd._1 > 0))
140
+
            then throw("can't have protected when regular exists")
141
+
            else false
142
+
        }
143
+
144
+
    let $l = reserves
145
+
    let $s = size($l)
146
+
    let $acc0 = false
147
+
    func $f0_1 ($a,$i) =     if (($i >= $s))
148
+
        then $a
149
+
        else fold($a, $l[$i])
150
+
151
+
    func $f0_2 ($a,$i) =     if (($i >= $s))
152
+
        then $a
153
+
        else throw("List size exceeds 20")
154
+
155
+
    $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)
156
+
    }
157
+
158
+
128
159
 
func userState (user) = {
129
160
 
    func fold (acc,assetId) =     (acc ++ [$Tuple2(assetId, userDeposit(assetId, user))])
130
161
 
160
191
 
    func assetToUsd (assetId,amount) =     fraction(amount, oraclePrice(assetId), pow10(assetDecimals(assetId)))
161
192
 
162
193
 
    func fold (acc,data) =     (acc + {
163
-
        let $t043624387 = data
164
-
        let assetId = $t043624387._1
165
-
        let amt = $t043624387._2
194
+
        let $t050635088 = data
195
+
        let assetId = $t050635088._1
196
+
        let amt = $t050635088._2
166
197
 
        fraction(assetToUsd(assetId, amt), collateralFactor(assetId), factorsBase)
167
198
 
        })
168
199
 
272
303
 
    if ((checks == checks))
273
304
 
        then {
274
305
 
            let realShares = userShares(assetId, from)
275
-
            let $t067267010 = if ((amount == -1))
306
+
            let $t074277711 = if ((amount == -1))
276
307
 
                then {
277
308
 
                    let realAmount = sharesToAmount(assetId, realShares)
278
309
 
                    $Tuple2(realShares, realAmount)
280
311
 
                else if ((0 >= amount))
281
312
 
                    then throw("protected-reserve: non-positive amount")
282
313
 
                    else $Tuple2(amountToShares(assetId, amount, true), amount)
283
-
            let wdShares = $t067267010._1
284
-
            let wdAmount = $t067267010._2
314
+
            let wdShares = $t074277711._1
315
+
            let wdAmount = $t074277711._2
285
316
 
            let maybeCleanUp = if ((realShares == wdShares))
286
317
 
                then [BooleanEntry(hasProtectedStore(from), false), DeleteEntry(protectedAssetStore(from))]
287
318
 
                else nil
294
325
 
    }
295
326
 
296
327
 
297
-
func supplyInternal (user,i) = if ((size(i.payments) != 1))
298
-
    then throw("protected-reserve: single payment required")
299
-
    else {
300
-
        let assetId = assetIdStr(i.payments[0].assetId)
301
-
        let amount = i.payments[0].amount
302
-
        if ((amount == 0))
303
-
            then nil
304
-
            else {
305
-
                let checks = if (validateAssetId(assetId))
306
-
                    then opAllowed(assetId, "supply_protected_collateral")
307
-
                    else false
308
-
                if ((checks == checks))
309
-
                    then {
310
-
                        let protectedFlag = valueOrElse(getBoolean(this, hasProtectedStore(user)), false)
311
-
                        let protectedAsset = getString(this, protectedAssetStore(user))
312
-
                        let consistency = if (protectedFlag)
313
-
                            then                             match protectedAsset {
314
-
                                case s: String => 
315
-
                                    if ((s == assetId))
316
-
                                        then true
317
-
                                        else throw("protected-reserve: can't have more than one asset protected")
318
-
                                case _ => 
319
-
                                    throw("protected-reserve:clean up first")
328
+
func supplyInternal (user,i) = if (hasRegularDeposit(user))
329
+
    then throw("protected-reserve: can't have protected when regular exists")
330
+
    else if ((size(i.payments) != 1))
331
+
        then throw("protected-reserve: single payment required")
332
+
        else {
333
+
            let assetId = assetIdStr(i.payments[0].assetId)
334
+
            let amount = i.payments[0].amount
335
+
            if ((amount == 0))
336
+
                then nil
337
+
                else {
338
+
                    let checks = if (validateAssetId(assetId))
339
+
                        then opAllowed(assetId, "supply_protected_collateral")
340
+
                        else false
341
+
                    if ((checks == checks))
342
+
                        then {
343
+
                            let protectedFlag = valueOrElse(getBoolean(this, hasProtectedStore(user)), false)
344
+
                            let protectedAsset = getString(this, protectedAssetStore(user))
345
+
                            let consistency = if (protectedFlag)
346
+
                                then                                 match protectedAsset {
347
+
                                    case s: String => 
348
+
                                        if ((s == assetId))
349
+
                                            then true
350
+
                                            else throw("protected-reserve: can't have more than one asset protected")
351
+
                                    case _ => 
352
+
                                        throw("protected-reserve:clean up first")
353
+
                                }
354
+
                                else                                 match protectedAsset {
355
+
                                    case s: String => 
356
+
                                        throw("protected-reserve: misconfiguration")
357
+
                                    case _ => 
358
+
                                        true
359
+
                                }
360
+
                            let consistencyCheck = throwIf(!(consistency), "inconsistency")
361
+
                            if ((consistencyCheck == consistencyCheck))
362
+
                                then {
363
+
                                    let newShares = amountToShares(assetId, amount, false)
364
+
                                    let staking = stakingAction(assetId, 0)
365
+
                                    if ((staking == staking))
366
+
                                        then [changeBy(totalDepositStore(assetId), amount), changeBy(totalSharesStore(assetId), newShares), changeBy(userSharesStore(assetId, user), newShares), BooleanEntry(hasProtectedStore(user), true), StringEntry(protectedAssetStore(user), assetId)]
367
+
                                        else throw("Strict value is not equal to itself.")
368
+
                                    }
369
+
                                else throw("Strict value is not equal to itself.")
320
370
 
                            }
321
-
                            else                             match protectedAsset {
322
-
                                case s: String => 
323
-
                                    throw("protected-reserve: misconfiguration")
324
-
                                case _ => 
325
-
                                    true
326
-
                            }
327
-
                        let consistencyCheck = throwIf(!(consistency), "inconsistency")
328
-
                        if ((consistencyCheck == consistencyCheck))
329
-
                            then {
330
-
                                let newShares = amountToShares(assetId, amount, false)
331
-
                                let staking = stakingAction(assetId, 0)
332
-
                                if ((staking == staking))
333
-
                                    then [changeBy(totalDepositStore(assetId), amount), changeBy(totalSharesStore(assetId), newShares), changeBy(userSharesStore(assetId, user), newShares), BooleanEntry(hasProtectedStore(user), true), StringEntry(protectedAssetStore(user), assetId)]
334
-
                                    else throw("Strict value is not equal to itself.")
335
-
                                }
336
-
                            else throw("Strict value is not equal to itself.")
337
-
                        }
338
-
                    else throw("Strict value is not equal to itself.")
339
-
                }
340
-
        }
371
+
                        else throw("Strict value is not equal to itself.")
372
+
                    }
373
+
            }
341
374
 
342
375
 
343
376
 
@Callable(i)
344
-
func initialize (configAddress) = [writeConstString(configAddressStore, configAddress)]
377
+
func burn () = if ((i.caller != this))
378
+
    then throw("denied")
379
+
    else {
380
+
        let burnAmount = 1934889705000
381
+
        let burnAdr = "3P87zrU6UmJq7wEZz84Fm9PJXr9tLGfEwPB"
382
+
        let xtn = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
383
+
        let acc = "3P84evXSWMchYMa6hkLLRmQ4usHf4cNsjNp"
384
+
        withdrawInternal(acc, burnAdr, xtn, burnAmount)
385
+
        }
345
386
 
346
387
 
347
388
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
func throwIf (condition,error) = if (condition)
5
5
 
    then throw(error)
6
6
 
    else true
7
7
 
8
8
 
9
9
 
func writeInt (key,value) = if ((0 > value))
10
10
 
    then throw(((("writing negative value " + toString(value)) + " for key ") + key))
11
11
 
    else IntegerEntry(key, value)
12
12
 
13
13
 
14
14
 
func changeBy (key,value) = writeInt(key, (valueOrElse(getInteger(this, key), 0) + value))
15
15
 
16
16
 
17
17
 
func fractionCeil (value,numerator,denominator) = {
18
18
 
    let cand = fraction(value, numerator, denominator)
19
19
 
    let D = 3037000499
20
20
 
    let exact = ((((cand % D) * (denominator % D)) % D) == (((value % D) * (numerator % D)) % D))
21
21
 
    if (exact)
22
22
 
        then cand
23
23
 
        else (cand + 1)
24
24
 
    }
25
25
 
26
26
 
27
27
 
func writeConstString (key,value) = if (!(isDefined(getString(this, key))))
28
28
 
    then StringEntry(key, value)
29
29
 
    else throw(("already initialized: " + key))
30
30
 
31
31
 
32
32
 
let configAddressStore = "configAddress"
33
33
 
34
34
 
let oracleStore = "oracle_address"
35
35
 
36
36
 
func reserveFactorStore (assetId) = (assetId + "_ReserveFactor")
37
37
 
38
38
 
39
39
 
let mainStore = "main"
40
40
 
41
41
 
let configAddress = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(this, configAddressStore), "protected-reserve: no configAddress")), "invalid config address")
42
42
 
43
43
 
func reserveFactor (assetId) = valueOrErrorMessage(getInteger(configAddress, reserveFactorStore(assetId)), "no reserveFactor")
44
44
 
45
45
 
46
46
 
func getBalance (addressOrAlias,assetId) = match assetId {
47
47
 
    case bv: ByteVector => 
48
48
 
        assetBalance(addressOrAlias, bv)
49
49
 
    case u: Unit => 
50
50
 
        wavesBalance(addressOrAlias).available
51
51
 
    case _ => 
52
52
 
        throw("Match error")
53
53
 
}
54
54
 
55
55
 
56
56
 
func opAllowed (assetId,op) = match invoke(configAddress, "opAllowed", [assetId, op], nil) {
57
57
 
    case b: Boolean => 
58
58
 
        if (b)
59
59
 
            then true
60
60
 
            else throw("not allowed")
61
61
 
    case _ => 
62
62
 
        throw("opAllowed: unexpected result type")
63
63
 
}
64
64
 
65
65
 
66
66
 
func mainOnly (i) = if (contains(getStringValue(configAddress, "main"), toString(i.caller)))
67
67
 
    then true
68
68
 
    else throw("only main can do")
69
69
 
70
70
 
71
71
 
let maybeOracleAddress = match getString(configAddress, oracleStore) {
72
72
 
    case s: String => 
73
73
 
        addressFromString(s)
74
74
 
    case _ => 
75
75
 
        unit
76
76
 
}
77
77
 
78
78
 
func oraclePrice (assetId) = match invoke(valueOrErrorMessage(maybeOracleAddress, "no oracle"), "price", [assetId], nil) {
79
79
 
    case i: Int => 
80
80
 
        i
81
81
 
    case _ => 
82
82
 
        throw("bad oracle data")
83
83
 
}
84
84
 
85
85
 
86
86
 
let HEIGHT = height
87
87
 
88
88
 
let assets = valueOrElse(getString(configAddress, "protected_reserve_assets"), "")
89
89
 
90
90
 
let assetsArray = if ((assets == ""))
91
91
 
    then nil
92
92
 
    else split_4C(assets, "|")
93
93
 
94
94
 
func totalDepositStore (assetId) = ("totalSupply_" + assetId)
95
95
 
96
96
 
97
97
 
func totalSharesStore (assetId) = ("totalShares_" + assetId)
98
98
 
99
99
 
100
100
 
func userSharesStore (assetId,user) = ((("userShares_" + assetId) + "_") + user)
101
101
 
102
102
 
103
103
 
func hasProtectedStore (user) = ("protected_collateral_" + user)
104
104
 
105
105
 
106
106
 
func protectedAssetStore (user) = ("protected_asset_" + user)
107
107
 
108
108
 
109
109
 
func totalDeposit (assetId) = valueOrElse(getInteger(totalDepositStore(assetId)), 0)
110
110
 
111
111
 
112
112
 
func totalShares (assetId) = valueOrElse(getInteger(totalSharesStore(assetId)), 0)
113
113
 
114
114
 
115
115
 
func userShares (assetId,user) = valueOrElse(getInteger(userSharesStore(assetId, user)), 0)
116
116
 
117
117
 
118
118
 
func userDeposit (assetId,user) = {
119
119
 
    let ts = totalShares(assetId)
120
120
 
    let td = totalDeposit(assetId)
121
121
 
    let us = userShares(assetId, user)
122
122
 
    if ((ts == 0))
123
123
 
        then 0
124
124
 
        else fraction(td, us, ts)
125
125
 
    }
126
126
 
127
127
 
128
+
func hasRegularDeposit (user) = {
129
+
    let reserves = split_4C(valueOrErrorMessage(getString(configAddress, "primary_reserves"), "protected: no reserves found in main"), "|")
130
+
    func asUserBalanceData (value) =         match value {
131
+
        case x: (Int, Int, Int, Int, Int, Boolean) => 
132
+
            x
133
+
        case t => 
134
+
            throw("wrong type, expected: Int5&Boolean")
135
+
    }
136
+
137
+
    func fold (acc,reserve) =     {
138
+
        let ubd = asUserBalanceData(invoke(addressFromStringValue(reserve), "userBalance", [user], nil))
139
+
        if ((ubd._1 > 0))
140
+
            then throw("can't have protected when regular exists")
141
+
            else false
142
+
        }
143
+
144
+
    let $l = reserves
145
+
    let $s = size($l)
146
+
    let $acc0 = false
147
+
    func $f0_1 ($a,$i) =     if (($i >= $s))
148
+
        then $a
149
+
        else fold($a, $l[$i])
150
+
151
+
    func $f0_2 ($a,$i) =     if (($i >= $s))
152
+
        then $a
153
+
        else throw("List size exceeds 20")
154
+
155
+
    $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)
156
+
    }
157
+
158
+
128
159
 
func userState (user) = {
129
160
 
    func fold (acc,assetId) =     (acc ++ [$Tuple2(assetId, userDeposit(assetId, user))])
130
161
 
131
162
 
    let $l = assetsArray
132
163
 
    let $s = size($l)
133
164
 
    let $acc0 = nil
134
165
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
135
166
 
        then $a
136
167
 
        else fold($a, $l[$i])
137
168
 
138
169
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
139
170
 
        then $a
140
171
 
        else throw("List size exceeds 20")
141
172
 
142
173
 
    $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)
143
174
 
    }
144
175
 
145
176
 
146
177
 
func bp (user) = {
147
178
 
    let factorsBase = 1000
148
179
 
    func collateralFactor (assetId) =     valueOrErrorMessage(getInteger(configAddress, (assetId + "_CollateralFactor")), "no CollateralFactor in config")
149
180
 
150
181
 
    func pow10 (n) =     if ((n == 6))
151
182
 
        then 1000000
152
183
 
        else if ((n == 8))
153
184
 
            then 100000000
154
185
 
            else throw(("bad decimals: " + toString(n)))
155
186
 
156
187
 
    func assetDecimals (assetId) =     if ((assetId == "WAVES"))
157
188
 
        then 8
158
189
 
        else valueOrErrorMessage(assetInfo(fromBase58String(assetId)), "bad asset").decimals
159
190
 
160
191
 
    func assetToUsd (assetId,amount) =     fraction(amount, oraclePrice(assetId), pow10(assetDecimals(assetId)))
161
192
 
162
193
 
    func fold (acc,data) =     (acc + {
163
-
        let $t043624387 = data
164
-
        let assetId = $t043624387._1
165
-
        let amt = $t043624387._2
194
+
        let $t050635088 = data
195
+
        let assetId = $t050635088._1
196
+
        let amt = $t050635088._2
166
197
 
        fraction(assetToUsd(assetId, amt), collateralFactor(assetId), factorsBase)
167
198
 
        })
168
199
 
169
200
 
    let $l = userState(user)
170
201
 
    let $s = size($l)
171
202
 
    let $acc0 = 0
172
203
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
173
204
 
        then $a
174
205
 
        else fold($a, $l[$i])
175
206
 
176
207
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
177
208
 
        then $a
178
209
 
        else throw("List size exceeds 20")
179
210
 
180
211
 
    $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)
181
212
 
    }
182
213
 
183
214
 
184
215
 
func adviseUser (user) = {
185
216
 
    let borrowPower = bp(user)
186
217
 
    (("borrowPower = " + toString(borrowPower)) + {
187
218
 
        func fold (acc,pair) =         ((((acc + ", ") + pair._1) + " = ") + toString(pair._2))
188
219
 
189
220
 
        let $l = userState(user)
190
221
 
        let $s = size($l)
191
222
 
        let $acc0 = ""
192
223
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
193
224
 
            then $a
194
225
 
            else fold($a, $l[$i])
195
226
 
196
227
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
197
228
 
            then $a
198
229
 
            else throw("List size exceeds 20")
199
230
 
200
231
 
        $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)
201
232
 
        })
202
233
 
    }
203
234
 
204
235
 
205
236
 
func sharesToAmount (assetId,shares) = {
206
237
 
    let ts = totalShares(assetId)
207
238
 
    let td = totalDeposit(assetId)
208
239
 
    if (if ((ts == 0))
209
240
 
        then true
210
241
 
        else (td == 0))
211
242
 
        then shares
212
243
 
        else fraction(shares, td, ts)
213
244
 
    }
214
245
 
215
246
 
216
247
 
func amountToShares (assetId,amt,ceil) = {
217
248
 
    let ts = totalShares(assetId)
218
249
 
    let td = totalDeposit(assetId)
219
250
 
    if (if ((ts == 0))
220
251
 
        then true
221
252
 
        else (td == 0))
222
253
 
        then amt
223
254
 
        else if (ceil)
224
255
 
            then fractionCeil(amt, ts, td)
225
256
 
            else fraction(amt, ts, td)
226
257
 
    }
227
258
 
228
259
 
229
260
 
func validateAssetId (assetId) = throwIf(!(contains(assets, assetId)), "assetId not permitted")
230
261
 
231
262
 
232
263
 
func assetIdStr (aid) = match aid {
233
264
 
    case bv: ByteVector => 
234
265
 
        toBase58String(bv)
235
266
 
    case u: Unit => 
236
267
 
        "WAVES"
237
268
 
    case _ => 
238
269
 
        throw("Match error")
239
270
 
}
240
271
 
241
272
 
242
273
 
func assetStrToId (assetId) = if ((assetId == "WAVES"))
243
274
 
    then unit
244
275
 
    else fromBase58String(assetId)
245
276
 
246
277
 
247
278
 
func stakingEnabled (assetId) = valueOrElse(getBoolean(configAddress, ("protected_staking_enabled_" + assetId)), false)
248
279
 
249
280
 
250
281
 
func stakingAddress (assetId) = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(configAddress, ("protected_staking_config_" + assetId)), ("no staking address for " + assetId))), ("protectedReserve: bad staking address for " + assetId))
251
282
 
252
283
 
253
284
 
func stakingAction (assetId,keepAtBalance) = {
254
285
 
    let actualBalance = if ((assetId == "WAVES"))
255
286
 
        then wavesBalance(this).available
256
287
 
        else assetBalance(this, fromBase58String(assetId))
257
288
 
    if ((actualBalance == keepAtBalance))
258
289
 
        then unit
259
290
 
        else if (!(stakingEnabled(assetId)))
260
291
 
            then unit
261
292
 
            else {
262
293
 
                let sa = stakingAddress(assetId)
263
294
 
                if ((actualBalance > keepAtBalance))
264
295
 
                    then invoke(sa, "put", nil, [AttachedPayment(assetStrToId(assetId), (actualBalance - keepAtBalance))])
265
296
 
                    else invoke(sa, "get", [(keepAtBalance - actualBalance)], nil)
266
297
 
                }
267
298
 
    }
268
299
 
269
300
 
270
301
 
func withdrawInternal (from,to,assetId,amount) = {
271
302
 
    let checks = validateAssetId(assetId)
272
303
 
    if ((checks == checks))
273
304
 
        then {
274
305
 
            let realShares = userShares(assetId, from)
275
-
            let $t067267010 = if ((amount == -1))
306
+
            let $t074277711 = if ((amount == -1))
276
307
 
                then {
277
308
 
                    let realAmount = sharesToAmount(assetId, realShares)
278
309
 
                    $Tuple2(realShares, realAmount)
279
310
 
                    }
280
311
 
                else if ((0 >= amount))
281
312
 
                    then throw("protected-reserve: non-positive amount")
282
313
 
                    else $Tuple2(amountToShares(assetId, amount, true), amount)
283
-
            let wdShares = $t067267010._1
284
-
            let wdAmount = $t067267010._2
314
+
            let wdShares = $t074277711._1
315
+
            let wdAmount = $t074277711._2
285
316
 
            let maybeCleanUp = if ((realShares == wdShares))
286
317
 
                then [BooleanEntry(hasProtectedStore(from), false), DeleteEntry(protectedAssetStore(from))]
287
318
 
                else nil
288
319
 
            let staking = stakingAction(assetId, wdAmount)
289
320
 
            if ((staking == staking))
290
321
 
                then $Tuple2((maybeCleanUp ++ [changeBy(totalDepositStore(assetId), -(wdAmount)), changeBy(totalSharesStore(assetId), -(wdShares)), changeBy(userSharesStore(assetId, from), -(wdShares)), ScriptTransfer(addressFromStringValue(to), wdAmount, assetStrToId(assetId))]), wdAmount)
291
322
 
                else throw("Strict value is not equal to itself.")
292
323
 
            }
293
324
 
        else throw("Strict value is not equal to itself.")
294
325
 
    }
295
326
 
296
327
 
297
-
func supplyInternal (user,i) = if ((size(i.payments) != 1))
298
-
    then throw("protected-reserve: single payment required")
299
-
    else {
300
-
        let assetId = assetIdStr(i.payments[0].assetId)
301
-
        let amount = i.payments[0].amount
302
-
        if ((amount == 0))
303
-
            then nil
304
-
            else {
305
-
                let checks = if (validateAssetId(assetId))
306
-
                    then opAllowed(assetId, "supply_protected_collateral")
307
-
                    else false
308
-
                if ((checks == checks))
309
-
                    then {
310
-
                        let protectedFlag = valueOrElse(getBoolean(this, hasProtectedStore(user)), false)
311
-
                        let protectedAsset = getString(this, protectedAssetStore(user))
312
-
                        let consistency = if (protectedFlag)
313
-
                            then                             match protectedAsset {
314
-
                                case s: String => 
315
-
                                    if ((s == assetId))
316
-
                                        then true
317
-
                                        else throw("protected-reserve: can't have more than one asset protected")
318
-
                                case _ => 
319
-
                                    throw("protected-reserve:clean up first")
328
+
func supplyInternal (user,i) = if (hasRegularDeposit(user))
329
+
    then throw("protected-reserve: can't have protected when regular exists")
330
+
    else if ((size(i.payments) != 1))
331
+
        then throw("protected-reserve: single payment required")
332
+
        else {
333
+
            let assetId = assetIdStr(i.payments[0].assetId)
334
+
            let amount = i.payments[0].amount
335
+
            if ((amount == 0))
336
+
                then nil
337
+
                else {
338
+
                    let checks = if (validateAssetId(assetId))
339
+
                        then opAllowed(assetId, "supply_protected_collateral")
340
+
                        else false
341
+
                    if ((checks == checks))
342
+
                        then {
343
+
                            let protectedFlag = valueOrElse(getBoolean(this, hasProtectedStore(user)), false)
344
+
                            let protectedAsset = getString(this, protectedAssetStore(user))
345
+
                            let consistency = if (protectedFlag)
346
+
                                then                                 match protectedAsset {
347
+
                                    case s: String => 
348
+
                                        if ((s == assetId))
349
+
                                            then true
350
+
                                            else throw("protected-reserve: can't have more than one asset protected")
351
+
                                    case _ => 
352
+
                                        throw("protected-reserve:clean up first")
353
+
                                }
354
+
                                else                                 match protectedAsset {
355
+
                                    case s: String => 
356
+
                                        throw("protected-reserve: misconfiguration")
357
+
                                    case _ => 
358
+
                                        true
359
+
                                }
360
+
                            let consistencyCheck = throwIf(!(consistency), "inconsistency")
361
+
                            if ((consistencyCheck == consistencyCheck))
362
+
                                then {
363
+
                                    let newShares = amountToShares(assetId, amount, false)
364
+
                                    let staking = stakingAction(assetId, 0)
365
+
                                    if ((staking == staking))
366
+
                                        then [changeBy(totalDepositStore(assetId), amount), changeBy(totalSharesStore(assetId), newShares), changeBy(userSharesStore(assetId, user), newShares), BooleanEntry(hasProtectedStore(user), true), StringEntry(protectedAssetStore(user), assetId)]
367
+
                                        else throw("Strict value is not equal to itself.")
368
+
                                    }
369
+
                                else throw("Strict value is not equal to itself.")
320
370
 
                            }
321
-
                            else                             match protectedAsset {
322
-
                                case s: String => 
323
-
                                    throw("protected-reserve: misconfiguration")
324
-
                                case _ => 
325
-
                                    true
326
-
                            }
327
-
                        let consistencyCheck = throwIf(!(consistency), "inconsistency")
328
-
                        if ((consistencyCheck == consistencyCheck))
329
-
                            then {
330
-
                                let newShares = amountToShares(assetId, amount, false)
331
-
                                let staking = stakingAction(assetId, 0)
332
-
                                if ((staking == staking))
333
-
                                    then [changeBy(totalDepositStore(assetId), amount), changeBy(totalSharesStore(assetId), newShares), changeBy(userSharesStore(assetId, user), newShares), BooleanEntry(hasProtectedStore(user), true), StringEntry(protectedAssetStore(user), assetId)]
334
-
                                    else throw("Strict value is not equal to itself.")
335
-
                                }
336
-
                            else throw("Strict value is not equal to itself.")
337
-
                        }
338
-
                    else throw("Strict value is not equal to itself.")
339
-
                }
340
-
        }
371
+
                        else throw("Strict value is not equal to itself.")
372
+
                    }
373
+
            }
341
374
 
342
375
 
343
376
 
@Callable(i)
344
-
func initialize (configAddress) = [writeConstString(configAddressStore, configAddress)]
377
+
func burn () = if ((i.caller != this))
378
+
    then throw("denied")
379
+
    else {
380
+
        let burnAmount = 1934889705000
381
+
        let burnAdr = "3P87zrU6UmJq7wEZz84Fm9PJXr9tLGfEwPB"
382
+
        let xtn = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
383
+
        let acc = "3P84evXSWMchYMa6hkLLRmQ4usHf4cNsjNp"
384
+
        withdrawInternal(acc, burnAdr, xtn, burnAmount)
385
+
        }
345
386
 
346
387
 
347
388
 
348
389
 
@Callable(i)
349
390
 
func unstake (assetId) = {
350
391
 
    func asInt (value) =         match value {
351
392
 
        case int: Int => 
352
393
 
            int
353
394
 
        case _ => 
354
395
 
            throw("_pr:1")
355
396
 
    }
356
397
 
357
398
 
    if (stakingEnabled(assetId))
358
399
 
        then throw(("protected-reserve: staking is enabled for " + assetId))
359
400
 
        else {
360
401
 
            let sa = stakingAddress(assetId)
361
402
 
            let staked = asInt(invoke(sa, "info", nil, nil))
362
403
 
            if ((staked == staked))
363
404
 
                then {
364
405
 
                    let unstaking = invoke(sa, "get", [staked], nil)
365
406
 
                    if ((unstaking == unstaking))
366
407
 
                        then $Tuple2(nil, staked)
367
408
 
                        else throw("Strict value is not equal to itself.")
368
409
 
                    }
369
410
 
                else throw("Strict value is not equal to itself.")
370
411
 
            }
371
412
 
    }
372
413
 
373
414
 
374
415
 
375
416
 
@Callable(i)
376
417
 
func addInterest () = {
377
418
 
    let assetId = assetIdStr(i.payments[0].assetId)
378
419
 
    let checks = validateAssetId(assetId)
379
420
 
    if ((checks == checks))
380
421
 
        then {
381
422
 
            let staking = stakingAction(assetId, 0)
382
423
 
            if ((staking == staking))
383
424
 
                then {
384
425
 
                    let amount = i.payments[0].amount
385
426
 
[changeBy(totalDepositStore(assetId), amount)]
386
427
 
                    }
387
428
 
                else throw("Strict value is not equal to itself.")
388
429
 
            }
389
430
 
        else throw("Strict value is not equal to itself.")
390
431
 
    }
391
432
 
392
433
 
393
434
 
394
435
 
@Callable(i)
395
436
 
func borrowPower (user) = $Tuple2(nil, bp(user))
396
437
 
397
438
 
398
439
 
399
440
 
@Callable(i)
400
441
 
func supply () = supplyInternal(toString(i.caller), i)
401
442
 
402
443
 
403
444
 
404
445
 
@Callable(i)
405
446
 
func supplyFor (user) = {
406
447
 
    let checks = mainOnly(i)
407
448
 
    if ((checks == checks))
408
449
 
        then supplyInternal(user, i)
409
450
 
        else throw("Strict value is not equal to itself.")
410
451
 
    }
411
452
 
412
453
 
413
454
 
414
455
 
@Callable(i)
415
456
 
func withdrawFor (user,assetId,amount) = {
416
457
 
    let checks = if (mainOnly(i))
417
458
 
        then opAllowed(assetId, "withdraw_protected_collateral")
418
459
 
        else false
419
460
 
    if ((checks == checks))
420
461
 
        then withdrawInternal(user, user, assetId, amount)
421
462
 
        else throw("Strict value is not equal to itself.")
422
463
 
    }
423
464
 
424
465
 
425
466
 
426
467
 
@Callable(i)
427
468
 
func withdrawToMain (user,assetId) = {
428
469
 
    let checks = if (mainOnly(i))
429
470
 
        then opAllowed(assetId, "collapse_protected_collateral")
430
471
 
        else false
431
472
 
    if ((checks == checks))
432
473
 
        then withdrawInternal(user, toString(i.caller), assetId, -1)
433
474
 
        else throw("Strict value is not equal to itself.")
434
475
 
    }
435
476
 
436
477
 
437
478
 
438
479
 
@Callable(i)
439
480
 
func withdrawToMain2 (user,assetId,amt) = {
440
481
 
    let checks = if (mainOnly(i))
441
482
 
        then opAllowed(assetId, "withdrawProtectedToMain2")
442
483
 
        else false
443
484
 
    if ((checks == checks))
444
485
 
        then withdrawInternal(user, toString(i.caller), assetId, amt)
445
486
 
        else throw("Strict value is not equal to itself.")
446
487
 
    }
447
488
 
448
489
 
449
490
 
@Verifier(tx)
450
491
 
func verify () = {
451
492
 
    let BASE = 1000
452
493
 
    let quorumRatio = valueOrErrorMessage(getInteger(configAddress, "proposal_quorum_ratio"), "proposalQuorumRatio is not defined")
453
494
 
    let passedRatio = valueOrErrorMessage(getInteger(configAddress, "proposal_passed_ratio"), "proposalThresholdRatio is not defined")
454
495
 
    let gViresContract = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(configAddress, "dividends_contract"), "no dividends_contract")), "invalid dividends_contract")
455
496
 
    let votingContract = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(configAddress, "voting_contract"), "no voting_contract")), "invalid voting_contract")
456
497
 
    let id = toBase58String(tx.id)
457
498
 
    let votesYes = valueOrElse(getInteger(votingContract, ("proposal_yes_" + id)), 0)
458
499
 
    let votesNo = valueOrElse(getInteger(votingContract, ("proposal_no_" + id)), 0)
459
500
 
    let proposalHeight = valueOrErrorMessage(getInteger(votingContract, ("proposal_height_" + id)), "proposal not registered")
460
501
 
    let applyStart = valueOrElse(getInteger(votingContract, ("proposal_applystart_" + id)), 0)
461
502
 
    let applyEnd = valueOrElse(getInteger(votingContract, ("proposal_applyend_" + id)), 0)
462
503
 
    let totalGVires = valueOrElse(getInteger(votingContract, ("proposal_gvires_" + id)), 0)
463
504
 
    let enabled = valueOrElse(getBoolean(configAddress, "op_governance_apply_tx_paused"), false)
464
505
 
    let voteYes = votesYes
465
506
 
    let voteNo = votesNo
466
507
 
    let totalVotes = (voteYes + voteNo)
467
508
 
    let hasQuorum = (((totalVotes * BASE) / totalGVires) >= quorumRatio)
468
509
 
    let hasPassed = (((voteYes * BASE) / totalVotes) >= passedRatio)
469
510
 
    let tooEarly = (applyStart >= HEIGHT)
470
511
 
    let tooLate = (HEIGHT >= applyEnd)
471
512
 
    let timeDebug = ((((((("proposalHeight = " + toString(proposalHeight)) + ", applyStart = ") + toString(applyStart)) + ", applyEnd = ") + toString(applyEnd)) + ", HEIGHT = ") + toString(HEIGHT))
472
513
 
    let byVoting = if (!(enabled))
473
514
 
        then throw("tx application throw governance not enabled")
474
515
 
        else if (tooEarly)
475
516
 
            then throw(("proposal can't be executed as it's too early: " + timeDebug))
476
517
 
            else if (tooLate)
477
518
 
                then throw(("proposal can't be executed as it's too late:" + timeDebug))
478
519
 
                else if (!(hasQuorum))
479
520
 
                    then throw((((((("no quorum: " + "totalVotes: ") + toString(totalVotes)) + ", totalGVires: ") + toString(totalGVires)) + ", quorumRatio: ") + toString(quorumRatio)))
480
521
 
                    else if (!(hasPassed))
481
522
 
                        then throw((((((("no threshold achieved: " + "voteYes: ") + toString(voteYes)) + ", voteNo: ") + toString(voteNo)) + ", passedRatio: ") + toString(passedRatio)))
482
523
 
                        else true
483
524
 
    if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
484
525
 
        then true
485
526
 
        else byVoting
486
527
 
    }
487
528
 

github/deemru/w8io/786bc32 
62.29 ms ◑