2023.01.30 12:47 [3493088] smart account 3PDv32ybGuTuhF5XFZh6eKexCBhm5uGgkM9 > SELF 0.00000000 Waves

{ "type": 13, "id": "C8dA5sBXtjndckHLGyaECUpYgdDZntum5um1X7YWg8Yz", "fee": 3500000, "feeAssetId": null, "timestamp": 1675072159326, "version": 2, "chainId": 87, "sender": "3PDv32ybGuTuhF5XFZh6eKexCBhm5uGgkM9", "senderPublicKey": "ALKhqnkEciVeRL86vxmNVskZ8qWxRnCiVvtuvngnr4Aj", "proofs": [ "3oJ3gf39v5puMNU1673XKsetCE23nianAVo94tKpREAUjPCp6YE4qAjD9jNo7b1HCjr32ciiYDnH8PLHPUxUD5i3" ], "script": "base64:BgIuCAISCAoGCAgICAgBEgASABIDCgEEEgASAwoBARIAEgMKAQgSAwoBBBIECgIIAS4AC3VzZG5Bc3NldElkASC2JinDBPXOU5GkDkt1JC9kjFGx+t+vVCm9SNIdKrKq0QANcHV6emxlQXNzZXRJZAEg8Rr+Jf72mTj0aSrE3+ES1keyxsoOujcJr3dtH46i5WMAC3VzZHRBc3NldElkASAelAcTUnahJZX9yGGogl8Qf986Tym7/JpGP1r9Nk+fkQAOdXNkbkFzc2V0SWRTdHICLERHMnhGa1BkRHdLVW9Ca3pHQWhRdExwU0d6ZlhMaUNZUEV6ZUtIMkFkMjRwABBwdXp6bGVBc3NldElkU3RyAixIRUI4UWF3OXhyV3BXczh0SHNpQVRZR0JXREJ0UDJTN2tjUEFMck11NDNBUwAOdXNkdEFzc2V0SWRTdHICLDM0TjlZY0VFVExXbjkzcVlRNjRFc1AxeDg5dFNydUpVNDRSckVNU1hYRVBKABFwYXJlbnRQb29sQWRkcmVzcwkBB0FkZHJlc3MBARoBV5HG6inqeWcP2YTvMnaUs8B1QuQ1g8HTWAANbWFzdGVyQWRkcmVzcwkBB0FkZHJlc3MBARoBV85X8yTRB6SzTv7SuuIorMWQltaK0W0F7gAMbWFzdGVyUHViS2V5ASA7NU1uP5+++FSclkQHgFarL+ITYEXEe/I/F0P0QgUmXQENdHJ5R2V0SW50ZWdlcgEDa2V5BAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEMdHJ5R2V0QmluYXJ5AQNrZXkEByRtYXRjaDAJAJwIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAWIFByRtYXRjaDAFAWIBAAEMdHJ5R2V0U3RyaW5nAQNrZXkEByRtYXRjaDAJAJ0IAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYgUHJG1hdGNoMAUBYgIAAQ5nZXRBc3NldFN0cmluZwEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwCQDYBAEFAWICBVdBVkVTAQ1nZXRBc3NldEJ5dGVzAQphc3NldElkU3RyAwkAAAIFCmFzc2V0SWRTdHICBVdBVkVTBQR1bml0CQDZBAEFCmFzc2V0SWRTdHIBE2FkZEFzc2V0Qnl0ZXNUb0xpc3QCBWFjY3VtBGl0ZW0JAM4IAgUFYWNjdW0JAMwIAgkBDWdldEFzc2V0Qnl0ZXMBBQRpdGVtBQNuaWwBFGFkZEFzc2V0V2VpZ2h0VG9MaXN0AgVhY2N1bQRpdGVtCQDOCAIFBWFjY3VtCQDMCAIJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB3N0YXRpY18JAQ5nZXRBc3NldFN0cmluZwEFBGl0ZW0CB193ZWlnaHQFA25pbAEWYWRkQXNzZXREZWNpbWFsc1RvTGlzdAIFYWNjdW0EaXRlbQkAzggCBQVhY2N1bQkAzAgCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdzdGF0aWNfCQEOZ2V0QXNzZXRTdHJpbmcBBQRpdGVtAglfZGVjaW1hbHMFA25pbAETYWRkQXNzZXRTY2FsZVRvTGlzdAIFYWNjdW0EaXRlbQkAzggCBQVhY2N1bQkAzAgCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdzdGF0aWNfCQEOZ2V0QXNzZXRTdHJpbmcBBQRpdGVtAgZfc2NhbGUFA25pbAEMYWRkSW50VG9MaXN0AgVhY2N1bQRpdGVtCQDOCAIFBWFjY3VtCQDMCAIJAQ1wYXJzZUludFZhbHVlAQUEaXRlbQUDbmlsAAFUCQENdHJ5R2V0SW50ZWdlcgECE3N0YXRpY190b2tlbnNBbW91bnQACGFzc2V0SWRzCgACJGwJALUJAgkBDHRyeUdldFN0cmluZwECD3N0YXRpY190b2tlbklkcwIBLAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQETYWRkQXNzZXRCeXRlc1RvTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgANQXNzZXRzV2VpZ2h0cwoAAiRsBQhhc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEUYWRkQXNzZXRXZWlnaHRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACERlY2ltYWxzCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYyXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARZhZGRBc3NldERlY2ltYWxzVG9MaXN0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYyXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMl8yAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAZTY2FsZXMKAAIkbAUIYXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjNfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBE2FkZEFzc2V0U2NhbGVUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjNfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYzXzICCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoAA0ZlZQkBDXRyeUdldEludGVnZXIBAgpzdGF0aWNfZmVlABVBc3NldHNXZWlnaHRzRGVjaW1hbHMABAAFU2NhbGUAkE4ABlNjYWxlOACAwtcvAAhGZWVTY2FsZQCQTgARUG9vbFRva2VuRGVjaW1hbHMACAAOUG9vbFRva2VuU2NhbGUJAGwGAAoAAAURUG9vbFRva2VuRGVjaW1hbHMAAAAABQZIQUxGVVAADGVhcm5lZEFzc2V0cwUIYXNzZXRJZHMBCmlzU2h1dGRvd24ABAckbWF0Y2gwCQCbCAIJAQdBZGRyZXNzAQEaAVeNeFN6nxXSPZU0i4J5ZNgZ0ycem/I1WqgCC2lzX3NodXRkb3duAwkAAQIFByRtYXRjaDACB0Jvb2xlYW4EAXgFByRtYXRjaDAFAXgHARZnZXRDdXJyZW50VG9rZW5CYWxhbmNlAQl0b2tlblR5cGUEB3Rva2VuSWQJAQ5nZXRBc3NldFN0cmluZwEJAJEDAgUIYXNzZXRJZHMFCXRva2VuVHlwZQkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIHZ2xvYmFsXwUHdG9rZW5JZAIIX2JhbGFuY2UBEGNhbGN1bGF0ZVBJc3N1ZWQCBmFtb3VudAd0b2tlbklkBAdQc3VwcGx5CQENdHJ5R2V0SW50ZWdlcgECF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BAdCYWxhbmNlCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdnbG9iYWxfCQEOZ2V0QXNzZXRTdHJpbmcBBQd0b2tlbklkAghfYmFsYW5jZQkAbgQFBmFtb3VudAUHUHN1cHBseQUHQmFsYW5jZQUERE9XTgENZ2V0TWluUElzc3VlZAEIcGF5bWVudHMKAQdoYW5kbGVyAgVhY2N1bQdjdXJyZW50BAdQSXNzdWVkCQEQY2FsY3VsYXRlUElzc3VlZAIIBQdjdXJyZW50BmFtb3VudAgFB2N1cnJlbnQHYXNzZXRJZAMJAAACBQdQSXNzdWVkAAAJAAIBAiRvbmUgb2YgdGhlIHRva2VucyBhbW91bnRzIGlzIHRvbyBsb3cDAwkAAAIFBWFjY3VtAAAGCQBmAgUFYWNjdW0FB1BJc3N1ZWQFB1BJc3N1ZWQFBWFjY3VtBAltaW5QSXNzZWQKAAIkbAUIcGF5bWVudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoFCW1pblBJc3NlZAESY2FsY3VsYXRlVXNkblZhbHVlBAdhc3NldElkBmFtb3VudAhhQmFsYW5jZRBnaXZlblVzZG5CYWxhbmNlBAp1c2RuSW5Qb29sCQDPCAIFCGFzc2V0SWRzBQt1c2RuQXNzZXRJZAQKdXNkdEluUG9vbAkAzwgCBQhhc3NldElkcwULdXNkdEFzc2V0SWQEC2Fzc2V0V2VpZ2h0CQCRAwIFDUFzc2V0c1dlaWdodHMJAQV2YWx1ZQEJAM8IAgUIYXNzZXRJZHMFB2Fzc2V0SWQDAwkAAAIFCnVzZG5JblBvb2wFBHVuaXQJAAACBQp1c2R0SW5Qb29sBQR1bml0BwQMcHV6emxlV2VpZ2h0CQCRAwIFDUFzc2V0c1dlaWdodHMJAQV2YWx1ZQEJAM8IAgUIYXNzZXRJZHMFDXB1enpsZUFzc2V0SWQEDXB1enpsZUJhbGFuY2UJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB2dsb2JhbF8FEHB1enpsZUFzc2V0SWRTdHICCF9iYWxhbmNlBA5hbW91bnRJblB1enpsZQkAawMFBmFtb3VudAkAaQIFDXB1enpsZUJhbGFuY2UFDHB1enpsZVdlaWdodAkAaQIFCGFCYWxhbmNlBQthc3NldFdlaWdodAQLcHV6emxlUHJpY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFEXBhcmVudFBvb2xBZGRyZXNzAhZnbG9iYWxfbGFzdFB1enpsZVByaWNlCQBrAwkAaAIFDmFtb3VudEluUHV6emxlBQtwdXp6bGVQcmljZQABBQZTY2FsZTgDCQECIT0CBQp1c2R0SW5Qb29sBQR1bml0BAp1c2R0V2VpZ2h0CQCRAwIFDUFzc2V0c1dlaWdodHMJAQV2YWx1ZQEFCnVzZHRJblBvb2wEC3VzZHRCYWxhbmNlCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdnbG9iYWxfBQ51c2R0QXNzZXRJZFN0cgIIX2JhbGFuY2UJAGsDBQZhbW91bnQJAGkCBQt1c2R0QmFsYW5jZQUKdXNkdFdlaWdodAkAaQIFCGFCYWxhbmNlBQthc3NldFdlaWdodAQKdXNkbldlaWdodAkAkQMCBQ1Bc3NldHNXZWlnaHRzCQEFdmFsdWUBCQDPCAIFCGFzc2V0SWRzBQt1c2RuQXNzZXRJZAQLdXNkbkJhbGFuY2UEByRtYXRjaDAFEGdpdmVuVXNkbkJhbGFuY2UDCQABAgUHJG1hdGNoMAIDSW50BAF4BQckbWF0Y2gwBRBnaXZlblVzZG5CYWxhbmNlCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdnbG9iYWxfCQEOZ2V0QXNzZXRTdHJpbmcBBQt1c2RuQXNzZXRJZAIIX2JhbGFuY2UJAGsDBQZhbW91bnQJAGkCCQEFdmFsdWUBBQt1c2RuQmFsYW5jZQUKdXNkbldlaWdodAkAaQIFCGFCYWxhbmNlBQthc3NldFdlaWdodAETY2hlY2tUb2tlbnNWYWxpZGl0eQEIcGF5bWVudHMKAQhoYW5kbGVyMQIFYWNjdW0HcGF5bWVudAkAzggCBQVhY2N1bQkAzAgCCAUHcGF5bWVudAdhc3NldElkBQNuaWwEA2lkcwoAAiRsBQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmNF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIaGFuZGxlcjECBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoDCQAAAgUDaWRzBQNpZHMKAQhoYW5kbGVyMgIFYWNjdW0HYXNzZXRJZAMJAQIhPQIJAM8IAgUDaWRzBQdhc3NldElkBQR1bml0CQBkAgUFYWNjdW0AAQkAAgEJAKwCAgIUYXNzZXQgbm90IGF0dGFjaGVkOiAJAQ5nZXRBc3NldFN0cmluZwEFB2Fzc2V0SWQEBmNoZWNrcwoAAiRsBQhhc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmNV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIaGFuZGxlcjICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjVfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY1XzICCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoDCQAAAgUGY2hlY2tzBQZjaGVja3MGCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuARNoYW5kbGVQb29sVG9rZW5zQWRkBAdQSXNzdWVkCHBheW1lbnRzC3VzZXJBZGRyZXNzCm5lZWRDaGFuZ2UKARVnZXRUb2tlblBheW1lbnRBbW91bnQBB3Rva2VuSWQKAQdoYW5kbGVyAgVhY2N1bQdwYXltZW50AwkAAAIIBQdwYXltZW50B2Fzc2V0SWQFB3Rva2VuSWQIBQdwYXltZW50BmFtb3VudAUFYWNjdW0KAAIkbAUIcGF5bWVudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoKARFoYW5kbGVUb2tlbkNoYW5nZQIFYWNjdW0HdG9rZW5JZAQCQmsJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFB3Rva2VuSWQCCF9iYWxhbmNlBAdQU3VwcGx5CQENdHJ5R2V0SW50ZWdlcgECF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BA10b2tlbkRlY2ltYWxzCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdzdGF0aWNfCQEOZ2V0QXNzZXRTdHJpbmcBBQd0b2tlbklkAgZfc2NhbGUEAkRrCQBuBAkAZQIJAG4ECQBkAgUHUFN1cHBseQUHUElzc3VlZAUNdG9rZW5EZWNpbWFscwUHUFN1cHBseQUHQ0VJTElORwUNdG9rZW5EZWNpbWFscwUCQmsFDXRva2VuRGVjaW1hbHMFB0NFSUxJTkcEDXBheW1lbnRBbW91bnQJARVnZXRUb2tlblBheW1lbnRBbW91bnQBBQd0b2tlbklkBAh0b1JldHVybgkAZQIDCQECIT0CBQ1wYXltZW50QW1vdW50AAAFDXBheW1lbnRBbW91bnQAAAUCRGsEAXQDAwUKbmVlZENoYW5nZQkAZgIFCHRvUmV0dXJuAAAHCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzBQh0b1JldHVybgUHdG9rZW5JZAUDbmlsBQNuaWwJAM4IAgkAzggCBQVhY2N1bQUBdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFB3Rva2VuSWQCCF9iYWxhbmNlCQBkAgUCQmsFAkRrBQNuaWwKAAIkbAUIYXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEWhhbmRsZVRva2VuQ2hhbmdlAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGY0XzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmNF8yAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKARZoYW5kbGVQb29sVG9rZW5zUmVkZWVtAglQUmVkZWVtZWQLdXNlckFkZHJlc3MKARFoYW5kbGVUb2tlblJlZGVlbQIFYWNjdW0HdG9rZW5JZAQCQmsJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFB3Rva2VuSWQCCF9iYWxhbmNlBAdQU3VwcGx5CQENdHJ5R2V0SW50ZWdlcgECF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BA10b2tlbkRlY2ltYWxzCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdzdGF0aWNfCQEOZ2V0QXNzZXRTdHJpbmcBBQd0b2tlbklkAgZfc2NhbGUEBmFtb3VudAkAoAMBCQC9AgQJALgCAgkAtgIBBQZTY2FsZTgJAL0CBAkAtgIBCQBlAgUHUFN1cHBseQUJUFJlZGVlbWVkCQC2AgEFBlNjYWxlOAkAtgIBBQdQU3VwcGx5BQdDRUlMSU5HCQC2AgEFAkJrCQC2AgEFBlNjYWxlOAUERE9XTgkAzggCBQVhY2N1bQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFB3Rva2VuSWQCCF9iYWxhbmNlCQBlAgUCQmsFBmFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQt1c2VyQWRkcmVzcwUGYW1vdW50BQd0b2tlbklkBQNuaWwKAAIkbAUIYXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEWhhbmRsZVRva2VuUmVkZWVtAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGY0XzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmNF8yAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKARJjYWxjdWxhdGVPdXRBbW91bnQFCEFtb3VudEluB2Fzc2V0SW4IYXNzZXRPdXQJQmFsYW5jZUluCkJhbGFuY2VPdXQEB0luZGV4SW4JAQV2YWx1ZQEJAM8IAgUIYXNzZXRJZHMFB2Fzc2V0SW4ECEluZGV4T3V0CQEFdmFsdWUBCQDPCAIFCGFzc2V0SWRzBQhhc3NldE91dAMJAAACBQdJbmRleEluBQhJbmRleE91dAUIQW1vdW50SW4JAG4EBQpCYWxhbmNlT3V0CQBlAgkAaAIFBlNjYWxlOAUGU2NhbGU4CQCgAwEJAHYGCQC9AgQJALYCAQUJQmFsYW5jZUluCQC2AgEJAGgCBQZTY2FsZTgFBlNjYWxlOAkAtgIBCQBkAgUJQmFsYW5jZUluBQhBbW91bnRJbgUGSEFMRlVQABAJALYCAQkAawMJAJEDAgUNQXNzZXRzV2VpZ2h0cwUHSW5kZXhJbgCQTgkAkQMCBQ1Bc3NldHNXZWlnaHRzBQhJbmRleE91dAAEABAFB0NFSUxJTkcJAGgCBQZTY2FsZTgFBlNjYWxlOAUERE9XTgEPZ2V0VG9rZW5CYWxhbmNlAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAXQFByRtYXRjaDAJAPAHAgUEdGhpcwUBdAgJAO8HAQUEdGhpcwlhdmFpbGFibGUBHWNhbGN1bGF0ZUN1cnJlbnRBc3NldEludGVyZXN0BAdhc3NldElkCmFzc2V0SWRTdHIIYUJhbGFuY2UWdG9rZW5FYXJuaW5nc0xhc3RDaGVjawQLdG90YWxTdGFrZWQJAQ10cnlHZXRJbnRlZ2VyAQISZ2xvYmFsX2luZGV4U3Rha2VkBBV0b2tlbkJhbGFuY2VMYXN0Q2hlY2sFFnRva2VuRWFybmluZ3NMYXN0Q2hlY2sEE2N1cnJlbnRCYWxhbmNlRGVsdGEJAGUCCQEPZ2V0VG9rZW5CYWxhbmNlAQUHYXNzZXRJZAUIYUJhbGFuY2UEFGN1cnJlbnRUb2tlbkVhcm5pbmdzAwkAZgIFE2N1cnJlbnRCYWxhbmNlRGVsdGEFFXRva2VuQmFsYW5jZUxhc3RDaGVjawUTY3VycmVudEJhbGFuY2VEZWx0YQUVdG9rZW5CYWxhbmNlTGFzdENoZWNrBAtuZXdFYXJuaW5ncwkAZQIFFGN1cnJlbnRUb2tlbkVhcm5pbmdzBRV0b2tlbkJhbGFuY2VMYXN0Q2hlY2sEC25ld0ludGVyZXN0AwkAAAIFC3RvdGFsU3Rha2VkAAAAAAkAawMFC25ld0Vhcm5pbmdzBQZTY2FsZTgFC3RvdGFsU3Rha2VkBBFsYXN0Q2hlY2tJbnRlcmVzdAkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIRZ2xvYmFsX2xhc3RDaGVja18FCmFzc2V0SWRTdHICCV9pbnRlcmVzdAkAZAIFEWxhc3RDaGVja0ludGVyZXN0BQtuZXdJbnRlcmVzdAELY2xhaW1SZXN1bHQBB2FkZHJlc3MECmFkZHJlc3NTdHIJAKUIAQUHYWRkcmVzcwQMcHV6emxlQW1vdW50CQENdHJ5R2V0SW50ZWdlcgEJAKwCAgUKYWRkcmVzc1N0cgIMX2luZGV4U3Rha2VkCgEHaGFuZGxlcgIFYWNjdW0HYXNzZXRJZAQKYXNzZXRJZFN0cgkBDmdldEFzc2V0U3RyaW5nAQUHYXNzZXRJZAQIYUJhbGFuY2UJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFB2Fzc2V0SWQCCF9iYWxhbmNlBBZ0b2tlbkVhcm5pbmdzTGFzdENoZWNrCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAhFnbG9iYWxfbGFzdENoZWNrXwUKYXNzZXRJZFN0cgIJX2Vhcm5pbmdzBBRjdXJyZW50VG9rZW5JbnRlcmVzdAkBHWNhbGN1bGF0ZUN1cnJlbnRBc3NldEludGVyZXN0BAUHYXNzZXRJZAUKYXNzZXRJZFN0cgUIYUJhbGFuY2UFFnRva2VuRWFybmluZ3NMYXN0Q2hlY2sEFGN1cnJlbnRUb2tlbkVhcm5pbmdzCQCWAwEJAMwIAgUWdG9rZW5FYXJuaW5nc0xhc3RDaGVjawkAzAgCCQBlAgkBD2dldFRva2VuQmFsYW5jZQEFB2Fzc2V0SWQFCGFCYWxhbmNlBQNuaWwEDHJld2FyZEFtb3VudAkAawMFDHB1enpsZUFtb3VudAkAZQIFFGN1cnJlbnRUb2tlbkludGVyZXN0CQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICCQCsAgIFCmFkZHJlc3NTdHICC19sYXN0Q2hlY2tfBQphc3NldElkU3RyAglfaW50ZXJlc3QFBlNjYWxlOAQIdHJhbnNmZXIDCQAAAgUMcmV3YXJkQW1vdW50AAAFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQdhZGRyZXNzBQxyZXdhcmRBbW91bnQFB2Fzc2V0SWQFA25pbAkAlAoCCQDOCAIJAM4IAggFBWFjY3VtAl8xBQh0cmFuc2ZlcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICEWdsb2JhbF9sYXN0Q2hlY2tfBQphc3NldElkU3RyAglfZWFybmluZ3MJAGUCBRRjdXJyZW50VG9rZW5FYXJuaW5ncwUMcmV3YXJkQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIRZ2xvYmFsX2xhc3RDaGVja18FCmFzc2V0SWRTdHICCV9pbnRlcmVzdAUUY3VycmVudFRva2VuSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFCmFkZHJlc3NTdHICC19sYXN0Q2hlY2tfBQphc3NldElkU3RyAglfaW50ZXJlc3QFFGN1cnJlbnRUb2tlbkludGVyZXN0BQNuaWwJAGQCCAUFYWNjdW0CXzIJARJjYWxjdWxhdGVVc2RuVmFsdWUEBQdhc3NldElkBQxyZXdhcmRBbW91bnQFCGFCYWxhbmNlBQR1bml0BAVhY2N1bQoAAiRsBQxlYXJuZWRBc3NldHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAAACgEFJGY0XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdoYW5kbGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGY0XzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmNF8yAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCQCUCgIJAM4IAggFBWFjY3VtAl8xCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCmFkZHJlc3NTdHICE19jbGFpbWVkUmV3YXJkVmFsdWUJAGQCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgUKYWRkcmVzc1N0cgITX2NsYWltZWRSZXdhcmRWYWx1ZQgFBWFjY3VtAl8yCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCmFkZHJlc3NTdHICCl9sYXN0Q2xhaW0IBQlsYXN0QmxvY2sJdGltZXN0YW1wBQNuaWwIBQVhY2N1bQJfMgEQaW5kZXhTdGFrZVJlc3VsdAIKYWRkcmVzc1N0cgZhbW91bnQEAmxpCAkBC2NsYWltUmVzdWx0AQkBEUBleHRyTmF0aXZlKDEwNjIpAQUKYWRkcmVzc1N0cgJfMQkAzggCBQJsaQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQphZGRyZXNzU3RyAgxfaW5kZXhTdGFrZWQJAGQCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgUKYWRkcmVzc1N0cgIMX2luZGV4U3Rha2VkBQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQICEmdsb2JhbF9pbmRleFN0YWtlZAkAZAIJAQ10cnlHZXRJbnRlZ2VyAQISZ2xvYmFsX2luZGV4U3Rha2VkBQZhbW91bnQFA25pbAEDc3VtAgVhY2N1bQFuCQBkAgUFYWNjdW0JAQ1wYXJzZUludFZhbHVlAQUBbgoBaQEHcHJlSW5pdAYLYXNzZXRJZHNTdHIPYXNzZXRXZWlnaHRzU3RyDmJhc2VUb2tlbklkU3RyCnBvb2xEb21haW4JcG9vbE93bmVyA2ZlZQQQcG9vbE93bmVyQWRkcmVzcwkBB0FkZHJlc3MBCQDZBAEFCXBvb2xPd25lcgMJAQppc1NodXRkb3duAAkAAgECE2NvbnRyYWN0IGlzIG9uIHN0b3ADCQECIT0CBQR0aGlzCAUBaQZjYWxsZXIJAAIBAgphZG1pbiBvbmx5AwkAZgIJALECAQUKcG9vbERvbWFpbgANCQACAQIVdG9vIGxhcmdlIHBvb2wgZG9tYWluAwMJAGYCBQNmZWUA9AMGCQBmAgAyBQNmZWUJAAIBAi1mZWUgdmFsdWUgbXVzdCBiZSBiZXR3ZWVuIDUwIGFuZCA1MDAgKDAuNS01JSkDAwMJAAACCQCzCQIFC2Fzc2V0SWRzU3RyBRBwdXp6bGVBc3NldElkU3RyBQR1bml0CQAAAgkAswkCBQthc3NldElkc1N0cgUOdXNkbkFzc2V0SWRTdHIFBHVuaXQHCQAAAgkAswkCBQthc3NldElkc1N0cgUOdXNkdEFzc2V0SWRTdHIFBHVuaXQHCQACAQI2cG9vbCBtdXN0IGhhdmUgVVNEVCwgVVNETiBvciBQVVpaTEUgaW4gdGhlIGNvbXBvc2l0aW9uBA1hc3NldElkc1N0ckxpCQC1CQIFC2Fzc2V0SWRzU3RyAgEsBAphc3NldElkc0xpCgACJGwFDWFzc2V0SWRzU3RyTGkKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBE2FkZEFzc2V0Qnl0ZXNUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoEEWFzc2V0V2VpZ2h0c1N0ckxpCQC1CQIFD2Fzc2V0V2VpZ2h0c1N0cgIBLAQPYXNzZXRXZWlnaHRzU3VtCgACJGwFEWFzc2V0V2VpZ2h0c1N0ckxpCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGY1XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNzdW0CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjVfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY1XzICCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoEC2ZlZUFzc2V0U3RyAwkAAAIJALMJAgULYXNzZXRJZHNTdHIFDnVzZG5Bc3NldElkU3RyBQR1bml0AwkAAAIJALMJAgULYXNzZXRJZHNTdHIFEHB1enpsZUFzc2V0SWRTdHIFBHVuaXQFDnVzZHRBc3NldElkU3RyBRBwdXp6bGVBc3NldElkU3RyBQ51c2RuQXNzZXRJZFN0cgoBE2FkZFRva2VuRGF0YUVudHJpZXMCBWFjY3VtCGFzc2V0TnVtAwkAZwIFCGFzc2V0TnVtCQCQAwEFCmFzc2V0SWRzTGkFBWFjY3VtBA1hc3NldERlY2ltYWxzBAckbWF0Y2gwCQCRAwIFCmFzc2V0SWRzTGkFCGFzc2V0TnVtAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAXgFByRtYXRjaDAICQEFdmFsdWUBCQDsBwEFAXgIZGVjaW1hbHMACAkAzggCBQVhY2N1bQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICB3N0YXRpY18JAJEDAgUNYXNzZXRJZHNTdHJMaQUIYXNzZXROdW0CBl9zY2FsZQkAbAYACgAABQ1hc3NldERlY2ltYWxzAAAAAAUERE9XTgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICB3N0YXRpY18JAJEDAgUNYXNzZXRJZHNTdHJMaQUIYXNzZXROdW0CCV9kZWNpbWFscwUNYXNzZXREZWNpbWFscwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICB3N0YXRpY18JAJEDAgUNYXNzZXRJZHNTdHJMaQUIYXNzZXROdW0CB193ZWlnaHQJAQV2YWx1ZQEJALYJAQkAkQMCBRFhc3NldFdlaWdodHNTdHJMaQUIYXNzZXROdW0FA25pbAMJAQIhPQIFD2Fzc2V0V2VpZ2h0c1N1bQCQTgkAAgECK3N1bSBvZiB0b2tlbiB3ZWlnaHRzIG11c3QgYmUgZXF1YWwgdG8gMTAwMDAJAM4IAgoAAiRsCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFCQDMCAIABgkAzAgCAAcJAMwIAgAICQDMCAIACQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGY2XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARNhZGRUb2tlbkRhdGFFbnRyaWVzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGY2XzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmNl8yAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCQDMCAIJAQtTdHJpbmdFbnRyeQICD3N0YXRpY190b2tlbklkcwULYXNzZXRJZHNTdHIJAMwIAgkBC1N0cmluZ0VudHJ5AgIPc3RhdGljX2ZlZVRva2VuBQtmZWVBc3NldFN0cgkAzAgCCQELU3RyaW5nRW50cnkCAhNzdGF0aWNfdG9rZW5XZWlnaHRzBQ9hc3NldFdlaWdodHNTdHIJAMwIAgkBDEludGVnZXJFbnRyeQICE3N0YXRpY190b2tlbnNBbW91bnQJAJADAQUKYXNzZXRJZHNMaQkAzAgCCQELU3RyaW5nRW50cnkCAhFzdGF0aWNfcG9vbERvbWFpbgUKcG9vbERvbWFpbgkAzAgCCQELU3RyaW5nRW50cnkCAhJzdGF0aWNfYmFzZVRva2VuSWQFDmJhc2VUb2tlbklkU3RyCQDMCAIJAQtTdHJpbmdFbnRyeQICEHN0YXRpY19wb29sT3duZXIFCXBvb2xPd25lcgkAzAgCCQEMSW50ZWdlckVudHJ5AgIKc3RhdGljX2ZlZQUDZmVlBQNuaWwBaQEGZGVJbml0AAMJAQppc1NodXRkb3duAAkAAgECE2NvbnRyYWN0IGlzIG9uIHN0b3ADCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAgphZG1pbiBvbmx5CQDMCAIJAQxJbnRlZ2VyRW50cnkCAhBnbG9iYWxfd2FzSW5pdGVkAAAFA25pbAFpAQRpbml0AAoBC3ByZXBhcmVMaXN0AAoBB2hhbmRsZXICBWFjY3VtAW4JAM4IAgUFYWNjdW0JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgdnbG9iYWxfCQEOZ2V0QXNzZXRTdHJpbmcBCAUBbgdhc3NldElkAghfYmFsYW5jZQgFAW4GYW1vdW50BQNuaWwKAAIkbAgFAWkIcGF5bWVudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoKARljYWxjdWxhdGVQb29sVG9rZW5zQW1vdW50AQhwYXltZW50cwoBB2hhbmRsZXICBWFjY3VtA3BtdAQHYXNzZXRJZAgFA3BtdAdhc3NldElkCgEIaGFuZGxlcjICBWFjY3VtAW4DCQAAAgUBbgUHYXNzZXRJZAkBBXZhbHVlAQkAzwgCBQhhc3NldElkcwUBbgUFYWNjdW0EBVRva2VuCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAABCgEFJGY0XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQhoYW5kbGVyMgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmNF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjRfMgIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgkAawMFBWFjY3VtCQBsBggFA3BtdAZhbW91bnQJAJEDAgUIRGVjaW1hbHMFBVRva2VuCQCRAwIFDUFzc2V0c1dlaWdodHMFBVRva2VuBRVBc3NldHNXZWlnaHRzRGVjaW1hbHMACAUFRkxPT1IFBlNjYWxlOAoAAiRsBQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFDlBvb2xUb2tlblNjYWxlCgEFJGY0XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdoYW5kbGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGY0XzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmNF8yAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAwkBCmlzU2h1dGRvd24ACQACAQITY29udHJhY3QgaXMgb24gc3RvcAMJAGYCCQENdHJ5R2V0SW50ZWdlcgECEGdsb2JhbF93YXNJbml0ZWQAAAkAAgECE3Bvb2wgYWxyZWFkeSBpbml0ZWQEEWluaXRpYWxQb29sVG9rZW5zCQEZY2FsY3VsYXRlUG9vbFRva2Vuc0Ftb3VudAEIBQFpCHBheW1lbnRzAwkAAAIFEWluaXRpYWxQb29sVG9rZW5zAAAJAAIBAjJ5b3UgbmVlZCBhIGJpZ2dlciB0b2tlbnMgYW1vdW50IHRvIGxhdW5jaCB0aGUgcG9vbAQOcG9vbFRva2VuSXNzdWUJAMMIBwkArAICAgNQWiAJAQx0cnlHZXRTdHJpbmcBAhFzdGF0aWNfcG9vbERvbWFpbgIdUHV6emxlIFN3YXA6IHBvb2wgaW5kZXggdG9rZW4FEWluaXRpYWxQb29sVG9rZW5zBRFQb29sVG9rZW5EZWNpbWFscwYFBHVuaXQAAAQLcG9vbFRva2VuSWQJALgIAQUOcG9vbFRva2VuSXNzdWUJAM4IAgkBC3ByZXBhcmVMaXN0AAkAzAgCBQ5wb29sVG9rZW5Jc3N1ZQkAzAgCCQEMSW50ZWdlckVudHJ5AgIXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQFEWluaXRpYWxQb29sVG9rZW5zCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhBnbG9iYWxfd2FzSW5pdGVkAAEJAMwIAgkBC0JpbmFyeUVudHJ5AgITZ2xvYmFsX3Bvb2xUb2tlbl9pZAULcG9vbFRva2VuSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgIWc3RhdGljX3Bvb2xUb2tlbl9pZFN0cgkBDmdldEFzc2V0U3RyaW5nAQULcG9vbFRva2VuSWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkApQgBCAUBaQZjYWxsZXICDF9pbmRleFN0YWtlZAURaW5pdGlhbFBvb2xUb2tlbnMJAMwIAgkBDEludGVnZXJFbnRyeQICEmdsb2JhbF9pbmRleFN0YWtlZAURaW5pdGlhbFBvb2xUb2tlbnMFA25pbAFpAQ1nZW5lcmF0ZUluZGV4AQpuZWVkQ2hhbmdlAwkBCmlzU2h1dGRvd24ACQACAQITY29udHJhY3QgaXMgb24gc3RvcAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMFAVQJAAIBCQCsAgICO3lvdSBuZWVkIHRvIGF0dGFjaCBhbGwgcG9vbCB0b2tlbnMuIGFtb3VudCBvZiBwb29sIHRva2VuczogCQCkAwEFAVQDCQEBIQEJARNjaGVja1Rva2Vuc1ZhbGlkaXR5AQgFAWkIcGF5bWVudHMJAAIBAhV3cm9uZyBhc3NldHMgYXR0YWNoZWQEB1BJc3N1ZWQJAQ1nZXRNaW5QSXNzdWVkAQgFAWkIcGF5bWVudHMEB3JlaXNzdWUJAQdSZWlzc3VlAwkBEUBleHRyTmF0aXZlKDEwNTcpAQITZ2xvYmFsX3Bvb2xUb2tlbl9pZAUHUElzc3VlZAYEBnJlc3VsdAkBE2hhbmRsZVBvb2xUb2tlbnNBZGQEBQdQSXNzdWVkCAUBaQhwYXltZW50cwgFAWkMb3JpZ2luQ2FsbGVyBQpuZWVkQ2hhbmdlCQCUCgIJAM4IAgUGcmVzdWx0CQDMCAIFB3JlaXNzdWUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQdQSXNzdWVkCQEMdHJ5R2V0QmluYXJ5AQITZ2xvYmFsX3Bvb2xUb2tlbl9pZAkAzAgCCQEMSW50ZWdlckVudHJ5AgIXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQJAGQCCQENdHJ5R2V0SW50ZWdlcgECF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BQdQSXNzdWVkBQNuaWwFB1BJc3N1ZWQBaQEKc3Rha2VJbmRleAAECmFkZHJlc3NTdHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAMJAQppc1NodXRkb3duAAkAAgECE2NvbnRyYWN0IGlzIG9uIHN0b3ADCQECIT0CCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQJAQx0cnlHZXRCaW5hcnkBAhNnbG9iYWxfcG9vbFRva2VuX2lkCQACAQIUd3JvbmcgYXNzZXQgYXR0YWNoZWQJARBpbmRleFN0YWtlUmVzdWx0AgUKYWRkcmVzc1N0cggFA3BtdAZhbW91bnQBaQEMdW5zdGFrZUluZGV4AQxwdXp6bGVBbW91bnQECmFkZHJlc3NTdHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBA9wdXp6bGVBdmFpbGFibGUJAQ10cnlHZXRJbnRlZ2VyAQkArAICBQphZGRyZXNzU3RyAgxfaW5kZXhTdGFrZWQDCQEKaXNTaHV0ZG93bgAJAAIBAhNjb250cmFjdCBpcyBvbiBzdG9wAwkAZgIFDHB1enpsZUFtb3VudAUPcHV6emxlQXZhaWxhYmxlCQACAQIleW91IGRvbid0IGhhdmUgaW5kZXggdG9rZW5zIGF2YWlsYWJsZQMJAQppc1NodXRkb3duAAkAAgECE2NvbnRyYWN0IGlzIG9uIHN0b3AJAM4IAggJAQtjbGFpbVJlc3VsdAEIBQFpDG9yaWdpbkNhbGxlcgJfMQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQphZGRyZXNzU3RyAgxfaW5kZXhTdGFrZWQJAGUCBQ9wdXp6bGVBdmFpbGFibGUFDHB1enpsZUFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgISZ2xvYmFsX2luZGV4U3Rha2VkCQBlAgkBDXRyeUdldEludGVnZXIBAhJnbG9iYWxfaW5kZXhTdGFrZWQFDHB1enpsZUFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFDHB1enpsZUFtb3VudAkBEUBleHRyTmF0aXZlKDEwNTcpAQITZ2xvYmFsX3Bvb2xUb2tlbl9pZAUDbmlsAWkBEWNsYWltSW5kZXhSZXdhcmRzAAMJAQppc1NodXRkb3duAAkAAgECE2NvbnRyYWN0IGlzIG9uIHN0b3AJAQtjbGFpbVJlc3VsdAEIBQFpBmNhbGxlcgFpAQ1ldmFsdWF0ZUNsYWltAQR1c2VyCQCUCgIFA25pbAgJAQtjbGFpbVJlc3VsdAEJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBHVzZXICXzIBaQELcmVkZWVtSW5kZXgBDHNlbmRUb09yaWdpbgQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQJAQx0cnlHZXRCaW5hcnkBAhNnbG9iYWxfcG9vbFRva2VuX2lkCQACAQIecGxlYXNlIGF0dGFjaCBwb29sIHNoYXJlIHRva2VuAwkBCmlzU2h1dGRvd24ACQACAQITY29udHJhY3QgaXMgb24gc3RvcAQJUFJlZGVlbWVkCAUDcG10BmFtb3VudAQGcmVzdWx0CQEWaGFuZGxlUG9vbFRva2Vuc1JlZGVlbQIFCVBSZWRlZW1lZAMFDHNlbmRUb09yaWdpbggFAWkMb3JpZ2luQ2FsbGVyCAUBaQZjYWxsZXIJAM4IAgUGcmVzdWx0CQDMCAIJAQRCdXJuAgkBDHRyeUdldEJpbmFyeQECE2dsb2JhbF9wb29sVG9rZW5faWQFCVBSZWRlZW1lZAkAzAgCCQEMSW50ZWdlckVudHJ5AgIXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQJAGUCCQENdHJ5R2V0SW50ZWdlcgECF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BQlQUmVkZWVtZWQFA25pbAFpAQRzd2FwAghhc3NldE91dAdtaW5pbXVtBANwbXQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABCQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAJAAIBAiFwbGVhc2UgYXR0YWNoIGV4YWN0bHkgb25lIHBheW1lbnQECEFtb3VudEluCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQHQXNzZXRJbggFA3BtdAdhc3NldElkBAhBc3NldE91dAkBDWdldEFzc2V0Qnl0ZXMBBQhhc3NldE91dAQOZmVlQXNzZXRPdXRTdHIJAQx0cnlHZXRTdHJpbmcBAg9zdGF0aWNfZmVlVG9rZW4EC2ZlZUFzc2V0T3V0AwkAAAIFDmZlZUFzc2V0T3V0U3RyAgAFC3VzZG5Bc3NldElkCQDZBAEFDmZlZUFzc2V0T3V0U3RyBA5Bc3NldEluQmFsYW5jZQkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIHZ2xvYmFsXwkBDmdldEFzc2V0U3RyaW5nAQUHQXNzZXRJbgIIX2JhbGFuY2UED0Fzc2V0T3V0QmFsYW5jZQkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIHZ2xvYmFsXwUIYXNzZXRPdXQCCF9iYWxhbmNlBAtmZWVBbW91bnRJbgkAawMFCEFtb3VudEluBQNGZWUFCEZlZVNjYWxlBA1jbGVhbkFtb3VudEluCQBlAgUIQW1vdW50SW4FC2ZlZUFtb3VudEluBAlBbW91bnRPdXQJARJjYWxjdWxhdGVPdXRBbW91bnQFBQ1jbGVhbkFtb3VudEluBQdBc3NldEluBQhBc3NldE91dAUOQXNzZXRJbkJhbGFuY2UFD0Fzc2V0T3V0QmFsYW5jZQQQQXNzZXRPdXRCYWxhbmNlMgkAZQIFD0Fzc2V0T3V0QmFsYW5jZQUJQW1vdW50T3V0BA9Bc3NldEluQmFsYW5jZTIJAGQCBQ5Bc3NldEluQmFsYW5jZQUNY2xlYW5BbW91bnRJbgQSZmVlQXNzZXRPdXRCYWxhbmNlAwkAAAIFC2ZlZUFzc2V0T3V0BQdBc3NldEluBQ9Bc3NldEluQmFsYW5jZTIDCQAAAgULZmVlQXNzZXRPdXQFCEFzc2V0T3V0BRBBc3NldE91dEJhbGFuY2UyCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdnbG9iYWxfCQEOZ2V0QXNzZXRTdHJpbmcBBQtmZWVBc3NldE91dAIIX2JhbGFuY2UEDGZlZUFtb3VudE91dAkBEmNhbGN1bGF0ZU91dEFtb3VudAUFC2ZlZUFtb3VudEluBQdBc3NldEluBQtmZWVBc3NldE91dAUOQXNzZXRJbkJhbGFuY2UFEmZlZUFzc2V0T3V0QmFsYW5jZQMJAGYCBQdtaW5pbXVtBQlBbW91bnRPdXQJAAIBCQCsAgICK2Ftb3VudCB0byByZWNpZXZlIGlzIGxvd2VyIHRoYW4gZ2l2ZW4gb25lOiAJAKQDAQUJQW1vdW50T3V0AwkAAAIFCEFzc2V0T3V0BQdBc3NldEluCQACAQIYdGhpcyBzd2FwIGlzIG5vdCBhbGxvd2VkAwkAZgIAAAkAZQIFD0Fzc2V0T3V0QmFsYW5jZQUJQW1vdW50T3V0CQACAQIbY29udHJhY3QgaXMgb3V0IG9mIHJlc2VydmVzAwkBCmlzU2h1dGRvd24ACQACAQITY29udHJhY3QgaXMgb24gc3RvcAQKY3JlYXRvckZlZQkAawMFDGZlZUFtb3VudE91dAABAAoEC3Byb3RvY29sRmVlCQBrAwUMZmVlQW1vdW50T3V0AAQACgQMc3Rha2luZ1RvcFVwAwkAAAIFC2ZlZUFzc2V0T3V0BQt1c2RuQXNzZXRJZAkA/QcECQEHQWRkcmVzcwEBGgFXlGiM+e6iuaqf1vWOvKmPZxqcBvQWKYm7Agt0b3BVcFJld2FyZAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQtmZWVBc3NldE91dAULcHJvdG9jb2xGZWUFA25pbAUEdW5pdAMJAAACBQxzdGFraW5nVG9wVXAFDHN0YWtpbmdUb3BVcAQMbmV3QmFsYW5jZUluCQBlAgUPQXNzZXRJbkJhbGFuY2UyAwkAAAIFB0Fzc2V0SW4FC2ZlZUFzc2V0T3V0BQxmZWVBbW91bnRPdXQAAAQNbmV3QmFsYW5jZU91dAkAZQIFEEFzc2V0T3V0QmFsYW5jZTIDCQAAAgUIQXNzZXRPdXQFC2ZlZUFzc2V0T3V0BQxmZWVBbW91bnRPdXQAAAQSbmV3QmFsYW5jZUZlZUFzc2V0AwMJAQIhPQIFC2ZlZUFzc2V0T3V0BQdBc3NldEluCQECIT0CBQtmZWVBc3NldE91dAUIQXNzZXRPdXQHCQBlAgUSZmVlQXNzZXRPdXRCYWxhbmNlBQxmZWVBbW91bnRPdXQFBHVuaXQEDWFzc2V0SW5DaGFuZ2UJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIHZ2xvYmFsXwkBDmdldEFzc2V0U3RyaW5nAQUHQXNzZXRJbgIIX2JhbGFuY2UFDG5ld0JhbGFuY2VJbgQOYXNzZXRPdXRDaGFuZ2UJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIHZ2xvYmFsXwUIYXNzZXRPdXQCCF9iYWxhbmNlBQ1uZXdCYWxhbmNlT3V0BBFmZWVBc3NldE91dENoYW5nZQMJAQIhPQIFEm5ld0JhbGFuY2VGZWVBc3NldAUEdW5pdAkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgdnbG9iYWxfCQEOZ2V0QXNzZXRTdHJpbmcBBQtmZWVBc3NldE91dAIIX2JhbGFuY2UFEmZlZUFzc2V0T3V0QmFsYW5jZQkBC1N0cmluZ0VudHJ5AgIFaGVsbG8CBXdvcmxkCQCUCgIJAM4IAgkAzAgCBQ5hc3NldE91dENoYW5nZQkAzAgCBQ1hc3NldEluQ2hhbmdlCQDMCAIFEWZlZUFzc2V0T3V0Q2hhbmdlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUJQW1vdW50T3V0BQhBc3NldE91dAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBCQEMdHJ5R2V0U3RyaW5nAQIQc3RhdGljX3Bvb2xPd25lcgUKY3JlYXRvckZlZQULZmVlQXNzZXRPdXQJAMwIAgkBDEludGVnZXJFbnRyeQICFGdsb2JhbF9lYXJuZWRCeU93bmVyCQBkAgkBDXRyeUdldEludGVnZXIBAhRnbG9iYWxfZWFybmVkQnlPd25lcgUKY3JlYXRvckZlZQkAzAgCCQEMSW50ZWdlckVudHJ5AgINZ2xvYmFsX3ZvbHVtZQkAZAIJAQ10cnlHZXRJbnRlZ2VyAQINZ2xvYmFsX3ZvbHVtZQkBEmNhbGN1bGF0ZVVzZG5WYWx1ZQQFB0Fzc2V0SW4FCEFtb3VudEluBQ5Bc3NldEluQmFsYW5jZQUSZmVlQXNzZXRPdXRCYWxhbmNlBQNuaWwDCQAAAgUMc3Rha2luZ1RvcFVwBQR1bml0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQEaAVce4ftAMWuB5uxLVhsFLFGhk27fCbE80sEFC3Byb3RvY29sRmVlBQtmZWVBc3NldE91dAUDbmlsBQNuaWwFCUFtb3VudE91dAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQADCQEKaXNTaHV0ZG93bgAHAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleQYJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFDG1hc3RlclB1YktleV6psVg=", "height": 3493088, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 61rjP9uF9u7Y9RNjnhDmPxvboxLULPrhnb4B3cjobmqo Next: DSoJ3sztsgVb5eHqDiqPAKdw8iTzRtqRwPGZqGdpRR1Y Diff:
OldNewDifferences
1-{-# STDLIB_VERSION 5 #-}
1+{-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let usdnAssetId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
55
66 let puzzleAssetId = base58'HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS'
77
8+let usdtAssetId = base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ'
9+
810 let usdnAssetIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
911
1012 let puzzleAssetIdStr = "HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS"
13+
14+let usdtAssetIdStr = "34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ"
1115
1216 let parentPoolAddress = Address(base58'3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh')
1317
198202
199203 func calculateUsdnValue (assetId,amount,aBalance,givenUsdnBalance) = {
200204 let usdnInPool = indexOf(assetIds, usdnAssetId)
205+ let usdtInPool = indexOf(assetIds, usdtAssetId)
201206 let assetWeight = AssetsWeights[value(indexOf(assetIds, assetId))]
202- if ((usdnInPool == unit))
207+ if (if ((usdnInPool == unit))
208+ then (usdtInPool == unit)
209+ else false)
203210 then {
204211 let puzzleWeight = AssetsWeights[value(indexOf(assetIds, puzzleAssetId))]
205212 let puzzleBalance = tryGetInteger((("global_" + puzzleAssetIdStr) + "_balance"))
207214 let puzzlePrice = getIntegerValue(parentPoolAddress, "global_lastPuzzlePrice")
208215 fraction((amountInPuzzle * puzzlePrice), 1, Scale8)
209216 }
210- else {
211- let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnAssetId))]
212- let usdnBalance = match givenUsdnBalance {
213- case x: Int =>
214- givenUsdnBalance
215- case _ =>
216- tryGetInteger((("global_" + getAssetString(usdnAssetId)) + "_balance"))
217- }
218- fraction(amount, (value(usdnBalance) / usdnWeight), (aBalance / assetWeight))
219- }
217+ else if ((usdtInPool != unit))
218+ then {
219+ let usdtWeight = AssetsWeights[value(usdtInPool)]
220+ let usdtBalance = tryGetInteger((("global_" + usdtAssetIdStr) + "_balance"))
221+ fraction(amount, (usdtBalance / usdtWeight), (aBalance / assetWeight))
222+ }
223+ else {
224+ let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnAssetId))]
225+ let usdnBalance = match givenUsdnBalance {
226+ case x: Int =>
227+ givenUsdnBalance
228+ case _ =>
229+ tryGetInteger((("global_" + getAssetString(usdnAssetId)) + "_balance"))
230+ }
231+ fraction(amount, (value(usdnBalance) / usdnWeight), (aBalance / assetWeight))
232+ }
220233 }
221234
222235
345358 let IndexIn = value(indexOf(assetIds, assetIn))
346359 let IndexOut = value(indexOf(assetIds, assetOut))
347360 if ((IndexIn == IndexOut))
348- then throw("inalid tokens pair")
361+ then AmountIn
349362 else fraction(BalanceOut, ((Scale8 * Scale8) - toInt(pow(fraction(toBigInt(BalanceIn), toBigInt((Scale8 * Scale8)), toBigInt((BalanceIn + AmountIn)), HALFUP), 16, toBigInt(fraction(AssetsWeights[IndexIn], 10000, AssetsWeights[IndexOut])), 4, 16, CEILING))), (Scale8 * Scale8), DOWN)
350363 }
351364
404417
405418 $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
406419 }
407- (accum._1 ++ [IntegerEntry((addressStr + "_claimedRewardValue"), (tryGetInteger((addressStr + "_claimedRewardValue")) + accum._2)), IntegerEntry((addressStr + "_lastClaim"), lastBlock.timestamp)])
420+ $Tuple2((accum._1 ++ [IntegerEntry((addressStr + "_claimedRewardValue"), (tryGetInteger((addressStr + "_claimedRewardValue")) + accum._2)), IntegerEntry((addressStr + "_lastClaim"), lastBlock.timestamp)]), accum._2)
408421 }
409422
410423
411424 func indexStakeResult (addressStr,amount) = {
412- let li = claimResult(addressFromStringValue(addressStr))
425+ let li = claimResult(addressFromStringValue(addressStr))._1
413426 (li ++ [IntegerEntry((addressStr + "_indexStaked"), (tryGetInteger((addressStr + "_indexStaked")) + amount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") + amount))])
414427 }
415428
420433 @Callable(i)
421434 func preInit (assetIdsStr,assetWeightsStr,baseTokenIdStr,poolDomain,poolOwner,fee) = {
422435 let poolOwnerAddress = Address(fromBase58String(poolOwner))
423- if ((this != i.caller))
424- then throw("admin only")
425- else if ((size(poolDomain) > 13))
426- then throw("too large pool domain")
427- else if (if ((fee > 500))
428- then true
429- else (50 > fee))
430- then throw("fee value must be between 50 and 500 (0.5-5%)")
431- else if (if ((indexOf(assetIdsStr, puzzleAssetIdStr) == unit))
432- then (indexOf(assetIdsStr, usdnAssetIdStr) == unit)
433- else false)
434- then throw("pool must have USDN or PUZZLE in the composition")
435- else {
436- let assetIdsStrLi = split(assetIdsStr, ",")
437- let assetIdsLi = {
438- let $l = assetIdsStrLi
439- let $s = size($l)
440- let $acc0 = nil
441- func $f4_1 ($a,$i) = if (($i >= $s))
442- then $a
443- else addAssetBytesToList($a, $l[$i])
444-
445- func $f4_2 ($a,$i) = if (($i >= $s))
446- then $a
447- else throw("List size exceeds 10")
448-
449- $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
450- }
451- let assetWeightsStrLi = split(assetWeightsStr, ",")
452- let assetWeightsSum = {
453- let $l = assetWeightsStrLi
454- let $s = size($l)
455- let $acc0 = 0
456- func $f5_1 ($a,$i) = if (($i >= $s))
457- then $a
458- else sum($a, $l[$i])
459-
460- func $f5_2 ($a,$i) = if (($i >= $s))
461- then $a
462- else throw("List size exceeds 10")
463-
464- $f5_2($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
465- }
466- let feeAssetStr = if ((indexOf(assetIdsStr, usdnAssetIdStr) == unit))
467- then puzzleAssetIdStr
468- else usdnAssetIdStr
469- func addTokenDataEntries (accum,assetNum) = if ((assetNum >= size(assetIdsLi)))
470- then accum
471- else {
472- let assetDecimals = match assetIdsLi[assetNum] {
473- case x: ByteVector =>
474- value(assetInfo(x)).decimals
475- case _ =>
476- 8
477- }
478- (accum ++ [IntegerEntry((("static_" + assetIdsStrLi[assetNum]) + "_scale"), pow(10, 0, assetDecimals, 0, 0, DOWN)), IntegerEntry((("static_" + assetIdsStrLi[assetNum]) + "_decimals"), assetDecimals), IntegerEntry((("static_" + assetIdsStrLi[assetNum]) + "_weight"), value(parseInt(assetWeightsStrLi[assetNum])))])
479- }
480-
481- if ((assetWeightsSum != 10000))
482- then throw("sum of token weights must be equal to 10000")
483- else ({
484- let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
436+ if (isShutdown())
437+ then throw("contract is on stop")
438+ else if ((this != i.caller))
439+ then throw("admin only")
440+ else if ((size(poolDomain) > 13))
441+ then throw("too large pool domain")
442+ else if (if ((fee > 500))
443+ then true
444+ else (50 > fee))
445+ then throw("fee value must be between 50 and 500 (0.5-5%)")
446+ else if (if (if ((indexOf(assetIdsStr, puzzleAssetIdStr) == unit))
447+ then (indexOf(assetIdsStr, usdnAssetIdStr) == unit)
448+ else false)
449+ then (indexOf(assetIdsStr, usdtAssetIdStr) == unit)
450+ else false)
451+ then throw("pool must have USDT, USDN or PUZZLE in the composition")
452+ else {
453+ let assetIdsStrLi = split(assetIdsStr, ",")
454+ let assetIdsLi = {
455+ let $l = assetIdsStrLi
485456 let $s = size($l)
486457 let $acc0 = nil
487- func $f6_1 ($a,$i) = if (($i >= $s))
458+ func $f4_1 ($a,$i) = if (($i >= $s))
488459 then $a
489- else addTokenDataEntries($a, $l[$i])
460+ else addAssetBytesToList($a, $l[$i])
490461
491- func $f6_2 ($a,$i) = if (($i >= $s))
462+ func $f4_2 ($a,$i) = if (($i >= $s))
492463 then $a
493464 else throw("List size exceeds 10")
494465
495- $f6_2($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
496- } ++ [StringEntry("static_tokenIds", assetIdsStr), StringEntry("static_feeToken", feeAssetStr), StringEntry("static_tokenWeights", assetWeightsStr), IntegerEntry("static_tokensAmount", size(assetIdsLi)), StringEntry("static_poolDomain", poolDomain), StringEntry("static_baseTokenId", baseTokenIdStr), StringEntry("static_poolOwner", poolOwner), IntegerEntry("static_fee", fee)])
497- }
466+ $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
467+ }
468+ let assetWeightsStrLi = split(assetWeightsStr, ",")
469+ let assetWeightsSum = {
470+ let $l = assetWeightsStrLi
471+ let $s = size($l)
472+ let $acc0 = 0
473+ func $f5_1 ($a,$i) = if (($i >= $s))
474+ then $a
475+ else sum($a, $l[$i])
476+
477+ func $f5_2 ($a,$i) = if (($i >= $s))
478+ then $a
479+ else throw("List size exceeds 10")
480+
481+ $f5_2($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
482+ }
483+ let feeAssetStr = if ((indexOf(assetIdsStr, usdnAssetIdStr) == unit))
484+ then if ((indexOf(assetIdsStr, puzzleAssetIdStr) == unit))
485+ then usdtAssetIdStr
486+ else puzzleAssetIdStr
487+ else usdnAssetIdStr
488+ func addTokenDataEntries (accum,assetNum) = if ((assetNum >= size(assetIdsLi)))
489+ then accum
490+ else {
491+ let assetDecimals = match assetIdsLi[assetNum] {
492+ case x: ByteVector =>
493+ value(assetInfo(x)).decimals
494+ case _ =>
495+ 8
496+ }
497+ (accum ++ [IntegerEntry((("static_" + assetIdsStrLi[assetNum]) + "_scale"), pow(10, 0, assetDecimals, 0, 0, DOWN)), IntegerEntry((("static_" + assetIdsStrLi[assetNum]) + "_decimals"), assetDecimals), IntegerEntry((("static_" + assetIdsStrLi[assetNum]) + "_weight"), value(parseInt(assetWeightsStrLi[assetNum])))])
498+ }
499+
500+ if ((assetWeightsSum != 10000))
501+ then throw("sum of token weights must be equal to 10000")
502+ else ({
503+ let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
504+ let $s = size($l)
505+ let $acc0 = nil
506+ func $f6_1 ($a,$i) = if (($i >= $s))
507+ then $a
508+ else addTokenDataEntries($a, $l[$i])
509+
510+ func $f6_2 ($a,$i) = if (($i >= $s))
511+ then $a
512+ else throw("List size exceeds 10")
513+
514+ $f6_2($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
515+ } ++ [StringEntry("static_tokenIds", assetIdsStr), StringEntry("static_feeToken", feeAssetStr), StringEntry("static_tokenWeights", assetWeightsStr), IntegerEntry("static_tokensAmount", size(assetIdsLi)), StringEntry("static_poolDomain", poolDomain), StringEntry("static_baseTokenId", baseTokenIdStr), StringEntry("static_poolOwner", poolOwner), IntegerEntry("static_fee", fee)])
516+ }
498517 }
499518
500519
501520
502521 @Callable(i)
503-func deInit () = if ((i.caller != this))
504- then throw("admin only")
505- else [IntegerEntry("global_wasInited", 0)]
522+func deInit () = if (isShutdown())
523+ then throw("contract is on stop")
524+ else if ((i.caller != this))
525+ then throw("admin only")
526+ else [IntegerEntry("global_wasInited", 0)]
506527
507528
508529
563584 $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
564585 }
565586
566- if ((tryGetInteger("global_wasInited") > 0))
567- then throw("pool already inited")
568- else {
569- let initialPoolTokens = calculatePoolTokensAmount(i.payments)
570- if ((initialPoolTokens == 0))
571- then throw("you need a bigger tokens amount to launch the pool")
572- else {
573- let poolTokenIssue = Issue(("PZ " + tryGetString("static_poolDomain")), "Puzzle Swap: pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
574- let poolTokenId = calculateAssetId(poolTokenIssue)
575- (prepareList() ++ [poolTokenIssue, IntegerEntry("global_poolToken_amount", initialPoolTokens), IntegerEntry("global_wasInited", 1), BinaryEntry("global_poolToken_id", poolTokenId), StringEntry("static_poolToken_idStr", getAssetString(poolTokenId)), IntegerEntry((toString(i.caller) + "_indexStaked"), initialPoolTokens), IntegerEntry("global_indexStaked", initialPoolTokens)])
576- }
577- }
587+ if (isShutdown())
588+ then throw("contract is on stop")
589+ else if ((tryGetInteger("global_wasInited") > 0))
590+ then throw("pool already inited")
591+ else {
592+ let initialPoolTokens = calculatePoolTokensAmount(i.payments)
593+ if ((initialPoolTokens == 0))
594+ then throw("you need a bigger tokens amount to launch the pool")
595+ else {
596+ let poolTokenIssue = Issue(("PZ " + tryGetString("static_poolDomain")), "Puzzle Swap: pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
597+ let poolTokenId = calculateAssetId(poolTokenIssue)
598+ (prepareList() ++ [poolTokenIssue, IntegerEntry("global_poolToken_amount", initialPoolTokens), IntegerEntry("global_wasInited", 1), BinaryEntry("global_poolToken_id", poolTokenId), StringEntry("static_poolToken_idStr", getAssetString(poolTokenId)), IntegerEntry((toString(i.caller) + "_indexStaked"), initialPoolTokens), IntegerEntry("global_indexStaked", initialPoolTokens)])
599+ }
600+ }
578601 }
579602
580603
581604
582605 @Callable(i)
583-func generateIndex (needChange) = if ((size(i.payments) != T))
584- then throw(("you need to attach all pool tokens. amount of pool tokens: " + toString(T)))
585- else if (!(checkTokensValidity(i.payments)))
586- then throw("wrong assets attached")
587- else {
588- let PIssued = getMinPIssued(i.payments)
589- let reissue = Reissue(getBinaryValue("global_poolToken_id"), PIssued, true)
590- let result = handlePoolTokensAdd(PIssued, i.payments, i.originCaller, needChange)
591- $Tuple2((result ++ [ScriptTransfer(i.caller, PIssued, tryGetBinary("global_poolToken_id")), reissue, IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") + PIssued))]), PIssued)
592- }
606+func generateIndex (needChange) = if (isShutdown())
607+ then throw("contract is on stop")
608+ else if ((size(i.payments) != T))
609+ then throw(("you need to attach all pool tokens. amount of pool tokens: " + toString(T)))
610+ else if (!(checkTokensValidity(i.payments)))
611+ then throw("wrong assets attached")
612+ else {
613+ let PIssued = getMinPIssued(i.payments)
614+ let reissue = Reissue(getBinaryValue("global_poolToken_id"), PIssued, true)
615+ let result = handlePoolTokensAdd(PIssued, i.payments, i.originCaller, needChange)
616+ $Tuple2((result ++ [reissue, ScriptTransfer(i.caller, PIssued, tryGetBinary("global_poolToken_id")), IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") + PIssued))]), PIssued)
617+ }
593618
594619
595620
597622 func stakeIndex () = {
598623 let addressStr = toString(i.originCaller)
599624 let pmt = i.payments[0]
600- if ((value(pmt.assetId) != tryGetBinary("global_poolToken_id")))
601- then throw("wrong asset attached")
602- else indexStakeResult(addressStr, pmt.amount)
625+ if (isShutdown())
626+ then throw("contract is on stop")
627+ else if ((value(pmt.assetId) != tryGetBinary("global_poolToken_id")))
628+ then throw("wrong asset attached")
629+ else indexStakeResult(addressStr, pmt.amount)
603630 }
604631
605632
608635 func unstakeIndex (puzzleAmount) = {
609636 let addressStr = toString(i.originCaller)
610637 let puzzleAvailable = tryGetInteger((addressStr + "_indexStaked"))
611- if ((puzzleAmount > puzzleAvailable))
612- then throw("you don't have index tokens available")
613- else if (isShutdown())
614- then throw("contract is on stop")
615- else (claimResult(i.originCaller) ++ [IntegerEntry((addressStr + "_indexStaked"), (puzzleAvailable - puzzleAmount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") - puzzleAmount)), ScriptTransfer(i.caller, puzzleAmount, getBinaryValue("global_poolToken_id"))])
638+ if (isShutdown())
639+ then throw("contract is on stop")
640+ else if ((puzzleAmount > puzzleAvailable))
641+ then throw("you don't have index tokens available")
642+ else if (isShutdown())
643+ then throw("contract is on stop")
644+ else (claimResult(i.originCaller)._1 ++ [IntegerEntry((addressStr + "_indexStaked"), (puzzleAvailable - puzzleAmount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") - puzzleAmount)), ScriptTransfer(i.caller, puzzleAmount, getBinaryValue("global_poolToken_id"))])
616645 }
617646
618647
621650 func claimIndexRewards () = if (isShutdown())
622651 then throw("contract is on stop")
623652 else claimResult(i.caller)
653+
654+
655+
656+@Callable(i)
657+func evaluateClaim (user) = $Tuple2(nil, claimResult(addressFromStringValue(user))._2)
624658
625659
626660
643677
644678
645679 @Callable(i)
646-func swap (assetOut,minimum) = if (isShutdown())
647- then throw("contract is on stop")
648- else {
649- let pmt = if ((size(i.payments) == 1))
650- then value(i.payments[0])
651- else throw("please attach exactly one payment")
652- let AmountIn = value(i.payments[0].amount)
653- let AssetIn = pmt.assetId
654- let AssetOut = getAssetBytes(assetOut)
655- let feeAssetOutStr = tryGetString("static_feeToken")
656- let feeAssetOut = if ((feeAssetOutStr == ""))
657- then usdnAssetId
658- else fromBase58String(feeAssetOutStr)
659- let AssetInBalance = tryGetInteger((("global_" + getAssetString(AssetIn)) + "_balance"))
660- let AssetOutBalance = tryGetInteger((("global_" + assetOut) + "_balance"))
661- let feeAmountIn = fraction(AmountIn, Fee, FeeScale)
662- let cleanAmountIn = (AmountIn - feeAmountIn)
663- let AmountOut = calculateOutAmount(cleanAmountIn, AssetIn, AssetOut, AssetInBalance, AssetOutBalance)
664- if ((minimum > AmountOut))
665- then throw(("amount to recieve is lower than given one: " + toString(AmountOut)))
680+func swap (assetOut,minimum) = {
681+ let pmt = if ((size(i.payments) == 1))
682+ then value(i.payments[0])
683+ else throw("please attach exactly one payment")
684+ let AmountIn = value(i.payments[0].amount)
685+ let AssetIn = pmt.assetId
686+ let AssetOut = getAssetBytes(assetOut)
687+ let feeAssetOutStr = tryGetString("static_feeToken")
688+ let feeAssetOut = if ((feeAssetOutStr == ""))
689+ then usdnAssetId
690+ else fromBase58String(feeAssetOutStr)
691+ let AssetInBalance = tryGetInteger((("global_" + getAssetString(AssetIn)) + "_balance"))
692+ let AssetOutBalance = tryGetInteger((("global_" + assetOut) + "_balance"))
693+ let feeAmountIn = fraction(AmountIn, Fee, FeeScale)
694+ let cleanAmountIn = (AmountIn - feeAmountIn)
695+ let AmountOut = calculateOutAmount(cleanAmountIn, AssetIn, AssetOut, AssetInBalance, AssetOutBalance)
696+ let AssetOutBalance2 = (AssetOutBalance - AmountOut)
697+ let AssetInBalance2 = (AssetInBalance + cleanAmountIn)
698+ let feeAssetOutBalance = if ((feeAssetOut == AssetIn))
699+ then AssetInBalance2
700+ else if ((feeAssetOut == AssetOut))
701+ then AssetOutBalance2
702+ else tryGetInteger((("global_" + getAssetString(feeAssetOut)) + "_balance"))
703+ let feeAmountOut = calculateOutAmount(feeAmountIn, AssetIn, feeAssetOut, AssetInBalance, feeAssetOutBalance)
704+ if ((minimum > AmountOut))
705+ then throw(("amount to recieve is lower than given one: " + toString(AmountOut)))
706+ else if ((AssetOut == AssetIn))
707+ then throw("this swap is not allowed")
666708 else if ((0 > (AssetOutBalance - AmountOut)))
667709 then throw("contract is out of reserves")
668- else {
669- let AssetInBalance2 = (AssetInBalance + cleanAmountIn)
670- let AssetOutBalance2 = (AssetOutBalance - AmountOut)
671- let feeAssetOutBalance = if ((AssetIn == feeAssetOut))
672- then AssetInBalance2
673- else if ((feeAssetOut == AssetOut))
674- then AssetOutBalance2
675- else tryGetInteger((("global_" + getAssetString(feeAssetOut)) + "_balance"))
676- let feeAmountOut = if ((AssetIn == feeAssetOut))
677- then feeAmountIn
678- else calculateOutAmount(feeAmountIn, AssetIn, feeAssetOut, AssetInBalance2, feeAssetOutBalance)
679- let newBalanceIn = (AssetInBalance2 + (if ((AssetIn == feeAssetOut))
680- then 0
681- else feeAmountIn))
682- let newBalanceOut = (AssetOutBalance2 - (if ((AssetIn == feeAssetOut))
683- then 0
684- else if ((AssetOut == feeAssetOut))
685- then feeAmountOut
686- else 0))
687- let feeAssetOutChange = if (if ((feeAssetOut != AssetIn))
688- then (feeAssetOut != AssetOut)
689- else false)
690- then [IntegerEntry((("global_" + getAssetString(feeAssetOut)) + "_balance"), (feeAssetOutBalance - feeAmountOut))]
691- else nil
692- let creatorFee = fraction(feeAmountOut, 1, 10)
693- let protocolFee = fraction(feeAmountOut, 4, 10)
694- let stakingTopUp = if ((feeAssetOut == usdnAssetId))
695- then reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(feeAssetOut, protocolFee)])
696- else unit
697- if ((stakingTopUp == stakingTopUp))
698- then {
699- let assetInChange = [IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), newBalanceIn)]
700- let assetOutChange = [IntegerEntry((("global_" + assetOut) + "_balance"), newBalanceOut)]
701- $Tuple2(((((assetOutChange ++ assetInChange) ++ feeAssetOutChange) ++ [ScriptTransfer(i.caller, AmountOut, AssetOut), ScriptTransfer(addressFromStringValue(tryGetString("static_poolOwner")), creatorFee, feeAssetOut), IntegerEntry("global_earnedByOwner", (tryGetInteger("global_earnedByOwner") + creatorFee)), IntegerEntry("global_volume", (tryGetInteger("global_volume") + calculateUsdnValue(AssetIn, AmountIn, AssetInBalance, feeAssetOutBalance)))]) ++ (if ((stakingTopUp == unit))
702- then [Burn(feeAssetOut, protocolFee)]
703- else nil)), AmountOut)
704- }
705- else throw("Strict value is not equal to itself.")
706- }
707- }
710+ else if (isShutdown())
711+ then throw("contract is on stop")
712+ else {
713+ let creatorFee = fraction(feeAmountOut, 1, 10)
714+ let protocolFee = fraction(feeAmountOut, 4, 10)
715+ let stakingTopUp = if ((feeAssetOut == usdnAssetId))
716+ then reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(feeAssetOut, protocolFee)])
717+ else unit
718+ if ((stakingTopUp == stakingTopUp))
719+ then {
720+ let newBalanceIn = (AssetInBalance2 - (if ((AssetIn == feeAssetOut))
721+ then feeAmountOut
722+ else 0))
723+ let newBalanceOut = (AssetOutBalance2 - (if ((AssetOut == feeAssetOut))
724+ then feeAmountOut
725+ else 0))
726+ let newBalanceFeeAsset = if (if ((feeAssetOut != AssetIn))
727+ then (feeAssetOut != AssetOut)
728+ else false)
729+ then (feeAssetOutBalance - feeAmountOut)
730+ else unit
731+ let assetInChange = IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), newBalanceIn)
732+ let assetOutChange = IntegerEntry((("global_" + assetOut) + "_balance"), newBalanceOut)
733+ let feeAssetOutChange = if ((newBalanceFeeAsset != unit))
734+ then IntegerEntry((("global_" + getAssetString(feeAssetOut)) + "_balance"), feeAssetOutBalance)
735+ else StringEntry("hello", "world")
736+ $Tuple2(([assetOutChange, assetInChange, feeAssetOutChange, ScriptTransfer(i.caller, AmountOut, AssetOut), ScriptTransfer(addressFromStringValue(tryGetString("static_poolOwner")), creatorFee, feeAssetOut), IntegerEntry("global_earnedByOwner", (tryGetInteger("global_earnedByOwner") + creatorFee)), IntegerEntry("global_volume", (tryGetInteger("global_volume") + calculateUsdnValue(AssetIn, AmountIn, AssetInBalance, feeAssetOutBalance)))] ++ (if ((stakingTopUp == unit))
737+ then [ScriptTransfer(Address(base58'3P4kBiU4wr2yV1S5gMfu3MdkVvy7kxXHsKe'), protocolFee, feeAssetOut)]
738+ else nil)), AmountOut)
739+ }
740+ else throw("Strict value is not equal to itself.")
741+ }
742+ }
708743
709744
710745 @Verifier(tx)
Full:
OldNewDifferences
1-{-# STDLIB_VERSION 5 #-}
1+{-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let usdnAssetId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
55
66 let puzzleAssetId = base58'HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS'
77
8+let usdtAssetId = base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ'
9+
810 let usdnAssetIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
911
1012 let puzzleAssetIdStr = "HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS"
13+
14+let usdtAssetIdStr = "34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ"
1115
1216 let parentPoolAddress = Address(base58'3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh')
1317
1418 let masterAddress = Address(base58'3PLjwHcz9NEuaTo63NZR9B9okQiKQxZSbmf')
1519
1620 let masterPubKey = base58'4z8CKSYQBKkzx7PBb5uBP1YPa6YAHRNTApW1sQVHT5eU'
1721
1822 func tryGetInteger (key) = match getInteger(this, key) {
1923 case b: Int =>
2024 b
2125 case _ =>
2226 0
2327 }
2428
2529
2630 func tryGetBinary (key) = match getBinary(this, key) {
2731 case b: ByteVector =>
2832 b
2933 case _ =>
3034 base58''
3135 }
3236
3337
3438 func tryGetString (key) = match getString(this, key) {
3539 case b: String =>
3640 b
3741 case _ =>
3842 ""
3943 }
4044
4145
4246 func getAssetString (assetId) = match assetId {
4347 case b: ByteVector =>
4448 toBase58String(b)
4549 case _ =>
4650 "WAVES"
4751 }
4852
4953
5054 func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES"))
5155 then unit
5256 else fromBase58String(assetIdStr)
5357
5458
5559 func addAssetBytesToList (accum,item) = (accum ++ [getAssetBytes(item)])
5660
5761
5862 func addAssetWeightToList (accum,item) = (accum ++ [tryGetInteger((("static_" + getAssetString(item)) + "_weight"))])
5963
6064
6165 func addAssetDecimalsToList (accum,item) = (accum ++ [tryGetInteger((("static_" + getAssetString(item)) + "_decimals"))])
6266
6367
6468 func addAssetScaleToList (accum,item) = (accum ++ [tryGetInteger((("static_" + getAssetString(item)) + "_scale"))])
6569
6670
6771 func addIntToList (accum,item) = (accum ++ [parseIntValue(item)])
6872
6973
7074 let T = tryGetInteger("static_tokensAmount")
7175
7276 let assetIds = {
7377 let $l = split(tryGetString("static_tokenIds"), ",")
7478 let $s = size($l)
7579 let $acc0 = nil
7680 func $f0_1 ($a,$i) = if (($i >= $s))
7781 then $a
7882 else addAssetBytesToList($a, $l[$i])
7983
8084 func $f0_2 ($a,$i) = if (($i >= $s))
8185 then $a
8286 else throw("List size exceeds 10")
8387
8488 $f0_2($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)
8589 }
8690
8791 let AssetsWeights = {
8892 let $l = assetIds
8993 let $s = size($l)
9094 let $acc0 = nil
9195 func $f1_1 ($a,$i) = if (($i >= $s))
9296 then $a
9397 else addAssetWeightToList($a, $l[$i])
9498
9599 func $f1_2 ($a,$i) = if (($i >= $s))
96100 then $a
97101 else throw("List size exceeds 10")
98102
99103 $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
100104 }
101105
102106 let Decimals = {
103107 let $l = assetIds
104108 let $s = size($l)
105109 let $acc0 = nil
106110 func $f2_1 ($a,$i) = if (($i >= $s))
107111 then $a
108112 else addAssetDecimalsToList($a, $l[$i])
109113
110114 func $f2_2 ($a,$i) = if (($i >= $s))
111115 then $a
112116 else throw("List size exceeds 10")
113117
114118 $f2_2($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
115119 }
116120
117121 let Scales = {
118122 let $l = assetIds
119123 let $s = size($l)
120124 let $acc0 = nil
121125 func $f3_1 ($a,$i) = if (($i >= $s))
122126 then $a
123127 else addAssetScaleToList($a, $l[$i])
124128
125129 func $f3_2 ($a,$i) = if (($i >= $s))
126130 then $a
127131 else throw("List size exceeds 10")
128132
129133 $f3_2($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
130134 }
131135
132136 let Fee = tryGetInteger("static_fee")
133137
134138 let AssetsWeightsDecimals = 4
135139
136140 let Scale = 10000
137141
138142 let Scale8 = 100000000
139143
140144 let FeeScale = 10000
141145
142146 let PoolTokenDecimals = 8
143147
144148 let PoolTokenScale = pow(10, 0, PoolTokenDecimals, 0, 0, HALFUP)
145149
146150 let earnedAssets = assetIds
147151
148152 func isShutdown () = match getBoolean(Address(base58'3PEpv9hRFWEEBU22WRnLsw1bH4YGtcU728o'), "is_shutdown") {
149153 case x: Boolean =>
150154 x
151155 case _ =>
152156 false
153157 }
154158
155159
156160 func getCurrentTokenBalance (tokenType) = {
157161 let tokenId = getAssetString(assetIds[tokenType])
158162 tryGetInteger((("global_" + tokenId) + "_balance"))
159163 }
160164
161165
162166 func calculatePIssued (amount,tokenId) = {
163167 let Psupply = tryGetInteger("global_poolToken_amount")
164168 let Balance = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
165169 fraction(amount, Psupply, Balance, DOWN)
166170 }
167171
168172
169173 func getMinPIssued (payments) = {
170174 func handler (accum,current) = {
171175 let PIssued = calculatePIssued(current.amount, current.assetId)
172176 if ((PIssued == 0))
173177 then throw("one of the tokens amounts is too low")
174178 else if (if ((accum == 0))
175179 then true
176180 else (accum > PIssued))
177181 then PIssued
178182 else accum
179183 }
180184
181185 let minPIssed = {
182186 let $l = payments
183187 let $s = size($l)
184188 let $acc0 = 0
185189 func $f4_1 ($a,$i) = if (($i >= $s))
186190 then $a
187191 else handler($a, $l[$i])
188192
189193 func $f4_2 ($a,$i) = if (($i >= $s))
190194 then $a
191195 else throw("List size exceeds 10")
192196
193197 $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
194198 }
195199 minPIssed
196200 }
197201
198202
199203 func calculateUsdnValue (assetId,amount,aBalance,givenUsdnBalance) = {
200204 let usdnInPool = indexOf(assetIds, usdnAssetId)
205+ let usdtInPool = indexOf(assetIds, usdtAssetId)
201206 let assetWeight = AssetsWeights[value(indexOf(assetIds, assetId))]
202- if ((usdnInPool == unit))
207+ if (if ((usdnInPool == unit))
208+ then (usdtInPool == unit)
209+ else false)
203210 then {
204211 let puzzleWeight = AssetsWeights[value(indexOf(assetIds, puzzleAssetId))]
205212 let puzzleBalance = tryGetInteger((("global_" + puzzleAssetIdStr) + "_balance"))
206213 let amountInPuzzle = fraction(amount, (puzzleBalance / puzzleWeight), (aBalance / assetWeight))
207214 let puzzlePrice = getIntegerValue(parentPoolAddress, "global_lastPuzzlePrice")
208215 fraction((amountInPuzzle * puzzlePrice), 1, Scale8)
209216 }
210- else {
211- let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnAssetId))]
212- let usdnBalance = match givenUsdnBalance {
213- case x: Int =>
214- givenUsdnBalance
215- case _ =>
216- tryGetInteger((("global_" + getAssetString(usdnAssetId)) + "_balance"))
217- }
218- fraction(amount, (value(usdnBalance) / usdnWeight), (aBalance / assetWeight))
219- }
217+ else if ((usdtInPool != unit))
218+ then {
219+ let usdtWeight = AssetsWeights[value(usdtInPool)]
220+ let usdtBalance = tryGetInteger((("global_" + usdtAssetIdStr) + "_balance"))
221+ fraction(amount, (usdtBalance / usdtWeight), (aBalance / assetWeight))
222+ }
223+ else {
224+ let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnAssetId))]
225+ let usdnBalance = match givenUsdnBalance {
226+ case x: Int =>
227+ givenUsdnBalance
228+ case _ =>
229+ tryGetInteger((("global_" + getAssetString(usdnAssetId)) + "_balance"))
230+ }
231+ fraction(amount, (value(usdnBalance) / usdnWeight), (aBalance / assetWeight))
232+ }
220233 }
221234
222235
223236 func checkTokensValidity (payments) = {
224237 func handler1 (accum,payment) = (accum ++ [payment.assetId])
225238
226239 let ids = {
227240 let $l = payments
228241 let $s = size($l)
229242 let $acc0 = nil
230243 func $f4_1 ($a,$i) = if (($i >= $s))
231244 then $a
232245 else handler1($a, $l[$i])
233246
234247 func $f4_2 ($a,$i) = if (($i >= $s))
235248 then $a
236249 else throw("List size exceeds 10")
237250
238251 $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
239252 }
240253 if ((ids == ids))
241254 then {
242255 func handler2 (accum,assetId) = if ((indexOf(ids, assetId) != unit))
243256 then (accum + 1)
244257 else throw(("asset not attached: " + getAssetString(assetId)))
245258
246259 let checks = {
247260 let $l = assetIds
248261 let $s = size($l)
249262 let $acc0 = 0
250263 func $f5_1 ($a,$i) = if (($i >= $s))
251264 then $a
252265 else handler2($a, $l[$i])
253266
254267 func $f5_2 ($a,$i) = if (($i >= $s))
255268 then $a
256269 else throw("List size exceeds 10")
257270
258271 $f5_2($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
259272 }
260273 if ((checks == checks))
261274 then true
262275 else throw("Strict value is not equal to itself.")
263276 }
264277 else throw("Strict value is not equal to itself.")
265278 }
266279
267280
268281 func handlePoolTokensAdd (PIssued,payments,userAddress,needChange) = {
269282 func getTokenPaymentAmount (tokenId) = {
270283 func handler (accum,payment) = if ((payment.assetId == tokenId))
271284 then payment.amount
272285 else accum
273286
274287 let $l = payments
275288 let $s = size($l)
276289 let $acc0 = 0
277290 func $f4_1 ($a,$i) = if (($i >= $s))
278291 then $a
279292 else handler($a, $l[$i])
280293
281294 func $f4_2 ($a,$i) = if (($i >= $s))
282295 then $a
283296 else throw("List size exceeds 10")
284297
285298 $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
286299 }
287300
288301 func handleTokenChange (accum,tokenId) = {
289302 let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
290303 let PSupply = tryGetInteger("global_poolToken_amount")
291304 let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
292305 let Dk = fraction((fraction((PSupply + PIssued), tokenDecimals, PSupply, CEILING) - tokenDecimals), Bk, tokenDecimals, CEILING)
293306 let paymentAmount = getTokenPaymentAmount(tokenId)
294307 let toReturn = ((if ((paymentAmount != 0))
295308 then paymentAmount
296309 else 0) - Dk)
297310 let t = if (if (needChange)
298311 then (toReturn > 0)
299312 else false)
300313 then [ScriptTransfer(userAddress, toReturn, tokenId)]
301314 else nil
302315 ((accum ++ t) ++ [IntegerEntry((("global_" + getAssetString(tokenId)) + "_balance"), (Bk + Dk))])
303316 }
304317
305318 let $l = assetIds
306319 let $s = size($l)
307320 let $acc0 = nil
308321 func $f4_1 ($a,$i) = if (($i >= $s))
309322 then $a
310323 else handleTokenChange($a, $l[$i])
311324
312325 func $f4_2 ($a,$i) = if (($i >= $s))
313326 then $a
314327 else throw("List size exceeds 10")
315328
316329 $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
317330 }
318331
319332
320333 func handlePoolTokensRedeem (PRedeemed,userAddress) = {
321334 func handleTokenRedeem (accum,tokenId) = {
322335 let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
323336 let PSupply = tryGetInteger("global_poolToken_amount")
324337 let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
325338 let amount = toInt(fraction((toBigInt(Scale8) - fraction(toBigInt((PSupply - PRedeemed)), toBigInt(Scale8), toBigInt(PSupply), CEILING)), toBigInt(Bk), toBigInt(Scale8), DOWN))
326339 (accum ++ [IntegerEntry((("global_" + getAssetString(tokenId)) + "_balance"), (Bk - amount)), ScriptTransfer(userAddress, amount, tokenId)])
327340 }
328341
329342 let $l = assetIds
330343 let $s = size($l)
331344 let $acc0 = nil
332345 func $f4_1 ($a,$i) = if (($i >= $s))
333346 then $a
334347 else handleTokenRedeem($a, $l[$i])
335348
336349 func $f4_2 ($a,$i) = if (($i >= $s))
337350 then $a
338351 else throw("List size exceeds 10")
339352
340353 $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
341354 }
342355
343356
344357 func calculateOutAmount (AmountIn,assetIn,assetOut,BalanceIn,BalanceOut) = {
345358 let IndexIn = value(indexOf(assetIds, assetIn))
346359 let IndexOut = value(indexOf(assetIds, assetOut))
347360 if ((IndexIn == IndexOut))
348- then throw("inalid tokens pair")
361+ then AmountIn
349362 else fraction(BalanceOut, ((Scale8 * Scale8) - toInt(pow(fraction(toBigInt(BalanceIn), toBigInt((Scale8 * Scale8)), toBigInt((BalanceIn + AmountIn)), HALFUP), 16, toBigInt(fraction(AssetsWeights[IndexIn], 10000, AssetsWeights[IndexOut])), 4, 16, CEILING))), (Scale8 * Scale8), DOWN)
350363 }
351364
352365
353366 func getTokenBalance (assetId) = match assetId {
354367 case t: ByteVector =>
355368 assetBalance(this, t)
356369 case _ =>
357370 wavesBalance(this).available
358371 }
359372
360373
361374 func calculateCurrentAssetInterest (assetId,assetIdStr,aBalance,tokenEarningsLastCheck) = {
362375 let totalStaked = tryGetInteger("global_indexStaked")
363376 let tokenBalanceLastCheck = tokenEarningsLastCheck
364377 let currentBalanceDelta = (getTokenBalance(assetId) - aBalance)
365378 let currentTokenEarnings = if ((currentBalanceDelta > tokenBalanceLastCheck))
366379 then currentBalanceDelta
367380 else tokenBalanceLastCheck
368381 let newEarnings = (currentTokenEarnings - tokenBalanceLastCheck)
369382 let newInterest = if ((totalStaked == 0))
370383 then 0
371384 else fraction(newEarnings, Scale8, totalStaked)
372385 let lastCheckInterest = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_interest"))
373386 (lastCheckInterest + newInterest)
374387 }
375388
376389
377390 func claimResult (address) = {
378391 let addressStr = toString(address)
379392 let puzzleAmount = tryGetInteger((addressStr + "_indexStaked"))
380393 func handler (accum,assetId) = {
381394 let assetIdStr = getAssetString(assetId)
382395 let aBalance = tryGetInteger((("global_" + getAssetString(assetId)) + "_balance"))
383396 let tokenEarningsLastCheck = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_earnings"))
384397 let currentTokenInterest = calculateCurrentAssetInterest(assetId, assetIdStr, aBalance, tokenEarningsLastCheck)
385398 let currentTokenEarnings = max([tokenEarningsLastCheck, (getTokenBalance(assetId) - aBalance)])
386399 let rewardAmount = fraction(puzzleAmount, (currentTokenInterest - tryGetInteger((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"))), Scale8)
387400 let transfer = if ((rewardAmount == 0))
388401 then nil
389402 else [ScriptTransfer(address, rewardAmount, assetId)]
390403 $Tuple2(((accum._1 ++ transfer) ++ [IntegerEntry((("global_lastCheck_" + assetIdStr) + "_earnings"), (currentTokenEarnings - rewardAmount)), IntegerEntry((("global_lastCheck_" + assetIdStr) + "_interest"), currentTokenInterest), IntegerEntry((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"), currentTokenInterest)]), (accum._2 + calculateUsdnValue(assetId, rewardAmount, aBalance, unit)))
391404 }
392405
393406 let accum = {
394407 let $l = earnedAssets
395408 let $s = size($l)
396409 let $acc0 = $Tuple2(nil, 0)
397410 func $f4_1 ($a,$i) = if (($i >= $s))
398411 then $a
399412 else handler($a, $l[$i])
400413
401414 func $f4_2 ($a,$i) = if (($i >= $s))
402415 then $a
403416 else throw("List size exceeds 10")
404417
405418 $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
406419 }
407- (accum._1 ++ [IntegerEntry((addressStr + "_claimedRewardValue"), (tryGetInteger((addressStr + "_claimedRewardValue")) + accum._2)), IntegerEntry((addressStr + "_lastClaim"), lastBlock.timestamp)])
420+ $Tuple2((accum._1 ++ [IntegerEntry((addressStr + "_claimedRewardValue"), (tryGetInteger((addressStr + "_claimedRewardValue")) + accum._2)), IntegerEntry((addressStr + "_lastClaim"), lastBlock.timestamp)]), accum._2)
408421 }
409422
410423
411424 func indexStakeResult (addressStr,amount) = {
412- let li = claimResult(addressFromStringValue(addressStr))
425+ let li = claimResult(addressFromStringValue(addressStr))._1
413426 (li ++ [IntegerEntry((addressStr + "_indexStaked"), (tryGetInteger((addressStr + "_indexStaked")) + amount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") + amount))])
414427 }
415428
416429
417430 func sum (accum,n) = (accum + parseIntValue(n))
418431
419432
420433 @Callable(i)
421434 func preInit (assetIdsStr,assetWeightsStr,baseTokenIdStr,poolDomain,poolOwner,fee) = {
422435 let poolOwnerAddress = Address(fromBase58String(poolOwner))
423- if ((this != i.caller))
424- then throw("admin only")
425- else if ((size(poolDomain) > 13))
426- then throw("too large pool domain")
427- else if (if ((fee > 500))
428- then true
429- else (50 > fee))
430- then throw("fee value must be between 50 and 500 (0.5-5%)")
431- else if (if ((indexOf(assetIdsStr, puzzleAssetIdStr) == unit))
432- then (indexOf(assetIdsStr, usdnAssetIdStr) == unit)
433- else false)
434- then throw("pool must have USDN or PUZZLE in the composition")
435- else {
436- let assetIdsStrLi = split(assetIdsStr, ",")
437- let assetIdsLi = {
438- let $l = assetIdsStrLi
439- let $s = size($l)
440- let $acc0 = nil
441- func $f4_1 ($a,$i) = if (($i >= $s))
442- then $a
443- else addAssetBytesToList($a, $l[$i])
444-
445- func $f4_2 ($a,$i) = if (($i >= $s))
446- then $a
447- else throw("List size exceeds 10")
448-
449- $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
450- }
451- let assetWeightsStrLi = split(assetWeightsStr, ",")
452- let assetWeightsSum = {
453- let $l = assetWeightsStrLi
454- let $s = size($l)
455- let $acc0 = 0
456- func $f5_1 ($a,$i) = if (($i >= $s))
457- then $a
458- else sum($a, $l[$i])
459-
460- func $f5_2 ($a,$i) = if (($i >= $s))
461- then $a
462- else throw("List size exceeds 10")
463-
464- $f5_2($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
465- }
466- let feeAssetStr = if ((indexOf(assetIdsStr, usdnAssetIdStr) == unit))
467- then puzzleAssetIdStr
468- else usdnAssetIdStr
469- func addTokenDataEntries (accum,assetNum) = if ((assetNum >= size(assetIdsLi)))
470- then accum
471- else {
472- let assetDecimals = match assetIdsLi[assetNum] {
473- case x: ByteVector =>
474- value(assetInfo(x)).decimals
475- case _ =>
476- 8
477- }
478- (accum ++ [IntegerEntry((("static_" + assetIdsStrLi[assetNum]) + "_scale"), pow(10, 0, assetDecimals, 0, 0, DOWN)), IntegerEntry((("static_" + assetIdsStrLi[assetNum]) + "_decimals"), assetDecimals), IntegerEntry((("static_" + assetIdsStrLi[assetNum]) + "_weight"), value(parseInt(assetWeightsStrLi[assetNum])))])
479- }
480-
481- if ((assetWeightsSum != 10000))
482- then throw("sum of token weights must be equal to 10000")
483- else ({
484- let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
436+ if (isShutdown())
437+ then throw("contract is on stop")
438+ else if ((this != i.caller))
439+ then throw("admin only")
440+ else if ((size(poolDomain) > 13))
441+ then throw("too large pool domain")
442+ else if (if ((fee > 500))
443+ then true
444+ else (50 > fee))
445+ then throw("fee value must be between 50 and 500 (0.5-5%)")
446+ else if (if (if ((indexOf(assetIdsStr, puzzleAssetIdStr) == unit))
447+ then (indexOf(assetIdsStr, usdnAssetIdStr) == unit)
448+ else false)
449+ then (indexOf(assetIdsStr, usdtAssetIdStr) == unit)
450+ else false)
451+ then throw("pool must have USDT, USDN or PUZZLE in the composition")
452+ else {
453+ let assetIdsStrLi = split(assetIdsStr, ",")
454+ let assetIdsLi = {
455+ let $l = assetIdsStrLi
485456 let $s = size($l)
486457 let $acc0 = nil
487- func $f6_1 ($a,$i) = if (($i >= $s))
458+ func $f4_1 ($a,$i) = if (($i >= $s))
488459 then $a
489- else addTokenDataEntries($a, $l[$i])
460+ else addAssetBytesToList($a, $l[$i])
490461
491- func $f6_2 ($a,$i) = if (($i >= $s))
462+ func $f4_2 ($a,$i) = if (($i >= $s))
492463 then $a
493464 else throw("List size exceeds 10")
494465
495- $f6_2($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
496- } ++ [StringEntry("static_tokenIds", assetIdsStr), StringEntry("static_feeToken", feeAssetStr), StringEntry("static_tokenWeights", assetWeightsStr), IntegerEntry("static_tokensAmount", size(assetIdsLi)), StringEntry("static_poolDomain", poolDomain), StringEntry("static_baseTokenId", baseTokenIdStr), StringEntry("static_poolOwner", poolOwner), IntegerEntry("static_fee", fee)])
497- }
466+ $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
467+ }
468+ let assetWeightsStrLi = split(assetWeightsStr, ",")
469+ let assetWeightsSum = {
470+ let $l = assetWeightsStrLi
471+ let $s = size($l)
472+ let $acc0 = 0
473+ func $f5_1 ($a,$i) = if (($i >= $s))
474+ then $a
475+ else sum($a, $l[$i])
476+
477+ func $f5_2 ($a,$i) = if (($i >= $s))
478+ then $a
479+ else throw("List size exceeds 10")
480+
481+ $f5_2($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
482+ }
483+ let feeAssetStr = if ((indexOf(assetIdsStr, usdnAssetIdStr) == unit))
484+ then if ((indexOf(assetIdsStr, puzzleAssetIdStr) == unit))
485+ then usdtAssetIdStr
486+ else puzzleAssetIdStr
487+ else usdnAssetIdStr
488+ func addTokenDataEntries (accum,assetNum) = if ((assetNum >= size(assetIdsLi)))
489+ then accum
490+ else {
491+ let assetDecimals = match assetIdsLi[assetNum] {
492+ case x: ByteVector =>
493+ value(assetInfo(x)).decimals
494+ case _ =>
495+ 8
496+ }
497+ (accum ++ [IntegerEntry((("static_" + assetIdsStrLi[assetNum]) + "_scale"), pow(10, 0, assetDecimals, 0, 0, DOWN)), IntegerEntry((("static_" + assetIdsStrLi[assetNum]) + "_decimals"), assetDecimals), IntegerEntry((("static_" + assetIdsStrLi[assetNum]) + "_weight"), value(parseInt(assetWeightsStrLi[assetNum])))])
498+ }
499+
500+ if ((assetWeightsSum != 10000))
501+ then throw("sum of token weights must be equal to 10000")
502+ else ({
503+ let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
504+ let $s = size($l)
505+ let $acc0 = nil
506+ func $f6_1 ($a,$i) = if (($i >= $s))
507+ then $a
508+ else addTokenDataEntries($a, $l[$i])
509+
510+ func $f6_2 ($a,$i) = if (($i >= $s))
511+ then $a
512+ else throw("List size exceeds 10")
513+
514+ $f6_2($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
515+ } ++ [StringEntry("static_tokenIds", assetIdsStr), StringEntry("static_feeToken", feeAssetStr), StringEntry("static_tokenWeights", assetWeightsStr), IntegerEntry("static_tokensAmount", size(assetIdsLi)), StringEntry("static_poolDomain", poolDomain), StringEntry("static_baseTokenId", baseTokenIdStr), StringEntry("static_poolOwner", poolOwner), IntegerEntry("static_fee", fee)])
516+ }
498517 }
499518
500519
501520
502521 @Callable(i)
503-func deInit () = if ((i.caller != this))
504- then throw("admin only")
505- else [IntegerEntry("global_wasInited", 0)]
522+func deInit () = if (isShutdown())
523+ then throw("contract is on stop")
524+ else if ((i.caller != this))
525+ then throw("admin only")
526+ else [IntegerEntry("global_wasInited", 0)]
506527
507528
508529
509530 @Callable(i)
510531 func init () = {
511532 func prepareList () = {
512533 func handler (accum,n) = (accum ++ [IntegerEntry((("global_" + getAssetString(n.assetId)) + "_balance"), n.amount)])
513534
514535 let $l = i.payments
515536 let $s = size($l)
516537 let $acc0 = nil
517538 func $f4_1 ($a,$i) = if (($i >= $s))
518539 then $a
519540 else handler($a, $l[$i])
520541
521542 func $f4_2 ($a,$i) = if (($i >= $s))
522543 then $a
523544 else throw("List size exceeds 10")
524545
525546 $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
526547 }
527548
528549 func calculatePoolTokensAmount (payments) = {
529550 func handler (accum,pmt) = {
530551 let assetId = pmt.assetId
531552 func handler2 (accum,n) = if ((n == assetId))
532553 then value(indexOf(assetIds, n))
533554 else accum
534555
535556 let Token = {
536557 let $l = assetIds
537558 let $s = size($l)
538559 let $acc0 = 1
539560 func $f4_1 ($a,$i) = if (($i >= $s))
540561 then $a
541562 else handler2($a, $l[$i])
542563
543564 func $f4_2 ($a,$i) = if (($i >= $s))
544565 then $a
545566 else throw("List size exceeds 10")
546567
547568 $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
548569 }
549570 fraction(accum, pow(pmt.amount, Decimals[Token], AssetsWeights[Token], AssetsWeightsDecimals, 8, FLOOR), Scale8)
550571 }
551572
552573 let $l = payments
553574 let $s = size($l)
554575 let $acc0 = PoolTokenScale
555576 func $f4_1 ($a,$i) = if (($i >= $s))
556577 then $a
557578 else handler($a, $l[$i])
558579
559580 func $f4_2 ($a,$i) = if (($i >= $s))
560581 then $a
561582 else throw("List size exceeds 10")
562583
563584 $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
564585 }
565586
566- if ((tryGetInteger("global_wasInited") > 0))
567- then throw("pool already inited")
568- else {
569- let initialPoolTokens = calculatePoolTokensAmount(i.payments)
570- if ((initialPoolTokens == 0))
571- then throw("you need a bigger tokens amount to launch the pool")
572- else {
573- let poolTokenIssue = Issue(("PZ " + tryGetString("static_poolDomain")), "Puzzle Swap: pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
574- let poolTokenId = calculateAssetId(poolTokenIssue)
575- (prepareList() ++ [poolTokenIssue, IntegerEntry("global_poolToken_amount", initialPoolTokens), IntegerEntry("global_wasInited", 1), BinaryEntry("global_poolToken_id", poolTokenId), StringEntry("static_poolToken_idStr", getAssetString(poolTokenId)), IntegerEntry((toString(i.caller) + "_indexStaked"), initialPoolTokens), IntegerEntry("global_indexStaked", initialPoolTokens)])
576- }
577- }
587+ if (isShutdown())
588+ then throw("contract is on stop")
589+ else if ((tryGetInteger("global_wasInited") > 0))
590+ then throw("pool already inited")
591+ else {
592+ let initialPoolTokens = calculatePoolTokensAmount(i.payments)
593+ if ((initialPoolTokens == 0))
594+ then throw("you need a bigger tokens amount to launch the pool")
595+ else {
596+ let poolTokenIssue = Issue(("PZ " + tryGetString("static_poolDomain")), "Puzzle Swap: pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
597+ let poolTokenId = calculateAssetId(poolTokenIssue)
598+ (prepareList() ++ [poolTokenIssue, IntegerEntry("global_poolToken_amount", initialPoolTokens), IntegerEntry("global_wasInited", 1), BinaryEntry("global_poolToken_id", poolTokenId), StringEntry("static_poolToken_idStr", getAssetString(poolTokenId)), IntegerEntry((toString(i.caller) + "_indexStaked"), initialPoolTokens), IntegerEntry("global_indexStaked", initialPoolTokens)])
599+ }
600+ }
578601 }
579602
580603
581604
582605 @Callable(i)
583-func generateIndex (needChange) = if ((size(i.payments) != T))
584- then throw(("you need to attach all pool tokens. amount of pool tokens: " + toString(T)))
585- else if (!(checkTokensValidity(i.payments)))
586- then throw("wrong assets attached")
587- else {
588- let PIssued = getMinPIssued(i.payments)
589- let reissue = Reissue(getBinaryValue("global_poolToken_id"), PIssued, true)
590- let result = handlePoolTokensAdd(PIssued, i.payments, i.originCaller, needChange)
591- $Tuple2((result ++ [ScriptTransfer(i.caller, PIssued, tryGetBinary("global_poolToken_id")), reissue, IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") + PIssued))]), PIssued)
592- }
606+func generateIndex (needChange) = if (isShutdown())
607+ then throw("contract is on stop")
608+ else if ((size(i.payments) != T))
609+ then throw(("you need to attach all pool tokens. amount of pool tokens: " + toString(T)))
610+ else if (!(checkTokensValidity(i.payments)))
611+ then throw("wrong assets attached")
612+ else {
613+ let PIssued = getMinPIssued(i.payments)
614+ let reissue = Reissue(getBinaryValue("global_poolToken_id"), PIssued, true)
615+ let result = handlePoolTokensAdd(PIssued, i.payments, i.originCaller, needChange)
616+ $Tuple2((result ++ [reissue, ScriptTransfer(i.caller, PIssued, tryGetBinary("global_poolToken_id")), IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") + PIssued))]), PIssued)
617+ }
593618
594619
595620
596621 @Callable(i)
597622 func stakeIndex () = {
598623 let addressStr = toString(i.originCaller)
599624 let pmt = i.payments[0]
600- if ((value(pmt.assetId) != tryGetBinary("global_poolToken_id")))
601- then throw("wrong asset attached")
602- else indexStakeResult(addressStr, pmt.amount)
625+ if (isShutdown())
626+ then throw("contract is on stop")
627+ else if ((value(pmt.assetId) != tryGetBinary("global_poolToken_id")))
628+ then throw("wrong asset attached")
629+ else indexStakeResult(addressStr, pmt.amount)
603630 }
604631
605632
606633
607634 @Callable(i)
608635 func unstakeIndex (puzzleAmount) = {
609636 let addressStr = toString(i.originCaller)
610637 let puzzleAvailable = tryGetInteger((addressStr + "_indexStaked"))
611- if ((puzzleAmount > puzzleAvailable))
612- then throw("you don't have index tokens available")
613- else if (isShutdown())
614- then throw("contract is on stop")
615- else (claimResult(i.originCaller) ++ [IntegerEntry((addressStr + "_indexStaked"), (puzzleAvailable - puzzleAmount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") - puzzleAmount)), ScriptTransfer(i.caller, puzzleAmount, getBinaryValue("global_poolToken_id"))])
638+ if (isShutdown())
639+ then throw("contract is on stop")
640+ else if ((puzzleAmount > puzzleAvailable))
641+ then throw("you don't have index tokens available")
642+ else if (isShutdown())
643+ then throw("contract is on stop")
644+ else (claimResult(i.originCaller)._1 ++ [IntegerEntry((addressStr + "_indexStaked"), (puzzleAvailable - puzzleAmount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") - puzzleAmount)), ScriptTransfer(i.caller, puzzleAmount, getBinaryValue("global_poolToken_id"))])
616645 }
617646
618647
619648
620649 @Callable(i)
621650 func claimIndexRewards () = if (isShutdown())
622651 then throw("contract is on stop")
623652 else claimResult(i.caller)
653+
654+
655+
656+@Callable(i)
657+func evaluateClaim (user) = $Tuple2(nil, claimResult(addressFromStringValue(user))._2)
624658
625659
626660
627661 @Callable(i)
628662 func redeemIndex (sendToOrigin) = {
629663 let pmt = i.payments[0]
630664 if ((pmt.assetId != tryGetBinary("global_poolToken_id")))
631665 then throw("please attach pool share token")
632666 else if (isShutdown())
633667 then throw("contract is on stop")
634668 else {
635669 let PRedeemed = pmt.amount
636670 let result = handlePoolTokensRedeem(PRedeemed, if (sendToOrigin)
637671 then i.originCaller
638672 else i.caller)
639673 (result ++ [Burn(tryGetBinary("global_poolToken_id"), PRedeemed), IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") - PRedeemed))])
640674 }
641675 }
642676
643677
644678
645679 @Callable(i)
646-func swap (assetOut,minimum) = if (isShutdown())
647- then throw("contract is on stop")
648- else {
649- let pmt = if ((size(i.payments) == 1))
650- then value(i.payments[0])
651- else throw("please attach exactly one payment")
652- let AmountIn = value(i.payments[0].amount)
653- let AssetIn = pmt.assetId
654- let AssetOut = getAssetBytes(assetOut)
655- let feeAssetOutStr = tryGetString("static_feeToken")
656- let feeAssetOut = if ((feeAssetOutStr == ""))
657- then usdnAssetId
658- else fromBase58String(feeAssetOutStr)
659- let AssetInBalance = tryGetInteger((("global_" + getAssetString(AssetIn)) + "_balance"))
660- let AssetOutBalance = tryGetInteger((("global_" + assetOut) + "_balance"))
661- let feeAmountIn = fraction(AmountIn, Fee, FeeScale)
662- let cleanAmountIn = (AmountIn - feeAmountIn)
663- let AmountOut = calculateOutAmount(cleanAmountIn, AssetIn, AssetOut, AssetInBalance, AssetOutBalance)
664- if ((minimum > AmountOut))
665- then throw(("amount to recieve is lower than given one: " + toString(AmountOut)))
680+func swap (assetOut,minimum) = {
681+ let pmt = if ((size(i.payments) == 1))
682+ then value(i.payments[0])
683+ else throw("please attach exactly one payment")
684+ let AmountIn = value(i.payments[0].amount)
685+ let AssetIn = pmt.assetId
686+ let AssetOut = getAssetBytes(assetOut)
687+ let feeAssetOutStr = tryGetString("static_feeToken")
688+ let feeAssetOut = if ((feeAssetOutStr == ""))
689+ then usdnAssetId
690+ else fromBase58String(feeAssetOutStr)
691+ let AssetInBalance = tryGetInteger((("global_" + getAssetString(AssetIn)) + "_balance"))
692+ let AssetOutBalance = tryGetInteger((("global_" + assetOut) + "_balance"))
693+ let feeAmountIn = fraction(AmountIn, Fee, FeeScale)
694+ let cleanAmountIn = (AmountIn - feeAmountIn)
695+ let AmountOut = calculateOutAmount(cleanAmountIn, AssetIn, AssetOut, AssetInBalance, AssetOutBalance)
696+ let AssetOutBalance2 = (AssetOutBalance - AmountOut)
697+ let AssetInBalance2 = (AssetInBalance + cleanAmountIn)
698+ let feeAssetOutBalance = if ((feeAssetOut == AssetIn))
699+ then AssetInBalance2
700+ else if ((feeAssetOut == AssetOut))
701+ then AssetOutBalance2
702+ else tryGetInteger((("global_" + getAssetString(feeAssetOut)) + "_balance"))
703+ let feeAmountOut = calculateOutAmount(feeAmountIn, AssetIn, feeAssetOut, AssetInBalance, feeAssetOutBalance)
704+ if ((minimum > AmountOut))
705+ then throw(("amount to recieve is lower than given one: " + toString(AmountOut)))
706+ else if ((AssetOut == AssetIn))
707+ then throw("this swap is not allowed")
666708 else if ((0 > (AssetOutBalance - AmountOut)))
667709 then throw("contract is out of reserves")
668- else {
669- let AssetInBalance2 = (AssetInBalance + cleanAmountIn)
670- let AssetOutBalance2 = (AssetOutBalance - AmountOut)
671- let feeAssetOutBalance = if ((AssetIn == feeAssetOut))
672- then AssetInBalance2
673- else if ((feeAssetOut == AssetOut))
674- then AssetOutBalance2
675- else tryGetInteger((("global_" + getAssetString(feeAssetOut)) + "_balance"))
676- let feeAmountOut = if ((AssetIn == feeAssetOut))
677- then feeAmountIn
678- else calculateOutAmount(feeAmountIn, AssetIn, feeAssetOut, AssetInBalance2, feeAssetOutBalance)
679- let newBalanceIn = (AssetInBalance2 + (if ((AssetIn == feeAssetOut))
680- then 0
681- else feeAmountIn))
682- let newBalanceOut = (AssetOutBalance2 - (if ((AssetIn == feeAssetOut))
683- then 0
684- else if ((AssetOut == feeAssetOut))
685- then feeAmountOut
686- else 0))
687- let feeAssetOutChange = if (if ((feeAssetOut != AssetIn))
688- then (feeAssetOut != AssetOut)
689- else false)
690- then [IntegerEntry((("global_" + getAssetString(feeAssetOut)) + "_balance"), (feeAssetOutBalance - feeAmountOut))]
691- else nil
692- let creatorFee = fraction(feeAmountOut, 1, 10)
693- let protocolFee = fraction(feeAmountOut, 4, 10)
694- let stakingTopUp = if ((feeAssetOut == usdnAssetId))
695- then reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(feeAssetOut, protocolFee)])
696- else unit
697- if ((stakingTopUp == stakingTopUp))
698- then {
699- let assetInChange = [IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), newBalanceIn)]
700- let assetOutChange = [IntegerEntry((("global_" + assetOut) + "_balance"), newBalanceOut)]
701- $Tuple2(((((assetOutChange ++ assetInChange) ++ feeAssetOutChange) ++ [ScriptTransfer(i.caller, AmountOut, AssetOut), ScriptTransfer(addressFromStringValue(tryGetString("static_poolOwner")), creatorFee, feeAssetOut), IntegerEntry("global_earnedByOwner", (tryGetInteger("global_earnedByOwner") + creatorFee)), IntegerEntry("global_volume", (tryGetInteger("global_volume") + calculateUsdnValue(AssetIn, AmountIn, AssetInBalance, feeAssetOutBalance)))]) ++ (if ((stakingTopUp == unit))
702- then [Burn(feeAssetOut, protocolFee)]
703- else nil)), AmountOut)
704- }
705- else throw("Strict value is not equal to itself.")
706- }
707- }
710+ else if (isShutdown())
711+ then throw("contract is on stop")
712+ else {
713+ let creatorFee = fraction(feeAmountOut, 1, 10)
714+ let protocolFee = fraction(feeAmountOut, 4, 10)
715+ let stakingTopUp = if ((feeAssetOut == usdnAssetId))
716+ then reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(feeAssetOut, protocolFee)])
717+ else unit
718+ if ((stakingTopUp == stakingTopUp))
719+ then {
720+ let newBalanceIn = (AssetInBalance2 - (if ((AssetIn == feeAssetOut))
721+ then feeAmountOut
722+ else 0))
723+ let newBalanceOut = (AssetOutBalance2 - (if ((AssetOut == feeAssetOut))
724+ then feeAmountOut
725+ else 0))
726+ let newBalanceFeeAsset = if (if ((feeAssetOut != AssetIn))
727+ then (feeAssetOut != AssetOut)
728+ else false)
729+ then (feeAssetOutBalance - feeAmountOut)
730+ else unit
731+ let assetInChange = IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), newBalanceIn)
732+ let assetOutChange = IntegerEntry((("global_" + assetOut) + "_balance"), newBalanceOut)
733+ let feeAssetOutChange = if ((newBalanceFeeAsset != unit))
734+ then IntegerEntry((("global_" + getAssetString(feeAssetOut)) + "_balance"), feeAssetOutBalance)
735+ else StringEntry("hello", "world")
736+ $Tuple2(([assetOutChange, assetInChange, feeAssetOutChange, ScriptTransfer(i.caller, AmountOut, AssetOut), ScriptTransfer(addressFromStringValue(tryGetString("static_poolOwner")), creatorFee, feeAssetOut), IntegerEntry("global_earnedByOwner", (tryGetInteger("global_earnedByOwner") + creatorFee)), IntegerEntry("global_volume", (tryGetInteger("global_volume") + calculateUsdnValue(AssetIn, AmountIn, AssetInBalance, feeAssetOutBalance)))] ++ (if ((stakingTopUp == unit))
737+ then [ScriptTransfer(Address(base58'3P4kBiU4wr2yV1S5gMfu3MdkVvy7kxXHsKe'), protocolFee, feeAssetOut)]
738+ else nil)), AmountOut)
739+ }
740+ else throw("Strict value is not equal to itself.")
741+ }
742+ }
708743
709744
710745 @Verifier(tx)
711746 func verify () = if (isShutdown())
712747 then false
713748 else if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
714749 then true
715750 else sigVerify(tx.bodyBytes, tx.proofs[0], masterPubKey)
716751

github/deemru/w8io/786bc32 
84.06 ms