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

{ "type": 13, "id": "9t5igZmiijwvegUNW9RKgsHfdKh6rNJvDFAxTnPcvLmV", "fee": 3500000, "feeAssetId": null, "timestamp": 1675072124889, "version": 2, "chainId": 87, "sender": "3PN1eJpdhJyRptcN9iLTarsJBtR2Kb3NXSU", "senderPublicKey": "2V3KEEkK12Ff9bsxFMGbJEAMs3nRFFbb6aVUwdGCjY1m", "proofs": [ "2NvMPvJESp5AvANd4f5oxT6RSP8S5XLb71Trrg5aoTS1Z2TEULuawzQWBJErJ98YybfHGaiWuiWWzGoNHwMt21vo" ], "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: 2qGnHnLhmcczGzVa45JbRP3mFnaNfbzRa8QTt3ySxYSz Next: none Diff:
OldNewDifferences
1-{-# STDLIB_VERSION 5 #-}
1+{-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let poolAdmin = base58'3P8GrGiMz1zuc14CkrdaXK39PqVJu5XvEGC'
5-
64 let usdnAssetId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
75
86 let puzzleAssetId = base58'HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS'
97
8+let usdtAssetId = base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ'
9+
1010 let usdnAssetIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
1111
1212 let puzzleAssetIdStr = "HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS"
13+
14+let usdtAssetIdStr = "34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ"
1315
1416 let parentPoolAddress = Address(base58'3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh')
1517
200202
201203 func calculateUsdnValue (assetId,amount,aBalance,givenUsdnBalance) = {
202204 let usdnInPool = indexOf(assetIds, usdnAssetId)
205+ let usdtInPool = indexOf(assetIds, usdtAssetId)
203206 let assetWeight = AssetsWeights[value(indexOf(assetIds, assetId))]
204- if ((usdnInPool == unit))
207+ if (if ((usdnInPool == unit))
208+ then (usdtInPool == unit)
209+ else false)
205210 then {
206211 let puzzleWeight = AssetsWeights[value(indexOf(assetIds, puzzleAssetId))]
207212 let puzzleBalance = tryGetInteger((("global_" + puzzleAssetIdStr) + "_balance"))
209214 let puzzlePrice = getIntegerValue(parentPoolAddress, "global_lastPuzzlePrice")
210215 fraction((amountInPuzzle * puzzlePrice), 1, Scale8)
211216 }
212- else {
213- let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnAssetId))]
214- let usdnBalance = match givenUsdnBalance {
215- case x: Int =>
216- givenUsdnBalance
217- case _ =>
218- tryGetInteger((("global_" + getAssetString(usdnAssetId)) + "_balance"))
219- }
220- fraction(amount, (value(usdnBalance) / usdnWeight), (aBalance / assetWeight))
221- }
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+ }
222233 }
223234
224235
406417
407418 $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)
408419 }
409- (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)
410421 }
411422
412423
413424 func indexStakeResult (addressStr,amount) = {
414- let li = claimResult(addressFromStringValue(addressStr))
425+ let li = claimResult(addressFromStringValue(addressStr))._1
415426 (li ++ [IntegerEntry((addressStr + "_indexStaked"), (tryGetInteger((addressStr + "_indexStaked")) + amount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") + amount))])
416427 }
417428
422433 @Callable(i)
423434 func preInit (assetIdsStr,assetWeightsStr,baseTokenIdStr,poolDomain,poolOwner,fee) = {
424435 let poolOwnerAddress = Address(fromBase58String(poolOwner))
425- if ((this != i.caller))
426- then throw("admin only")
427- else if ((size(poolDomain) > 13))
428- then throw("too large pool domain")
429- else if (if ((fee > 500))
430- then true
431- else (50 > fee))
432- then throw("fee value must be between 50 and 500 (0.5-5%)")
433- else if (if ((indexOf(assetIdsStr, puzzleAssetIdStr) == unit))
434- then (indexOf(assetIdsStr, usdnAssetIdStr) == unit)
435- else false)
436- then throw("pool must have USDN or PUZZLE in the composition")
437- else {
438- let assetIdsStrLi = split(assetIdsStr, ",")
439- let assetIdsLi = {
440- let $l = assetIdsStrLi
441- let $s = size($l)
442- let $acc0 = nil
443- func $f4_1 ($a,$i) = if (($i >= $s))
444- then $a
445- else addAssetBytesToList($a, $l[$i])
446-
447- func $f4_2 ($a,$i) = if (($i >= $s))
448- then $a
449- else throw("List size exceeds 10")
450-
451- $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)
452- }
453- let assetWeightsStrLi = split(assetWeightsStr, ",")
454- let assetWeightsSum = {
455- let $l = assetWeightsStrLi
456- let $s = size($l)
457- let $acc0 = 0
458- func $f5_1 ($a,$i) = if (($i >= $s))
459- then $a
460- else sum($a, $l[$i])
461-
462- func $f5_2 ($a,$i) = if (($i >= $s))
463- then $a
464- else throw("List size exceeds 10")
465-
466- $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)
467- }
468- let feeAssetStr = if ((indexOf(assetIdsStr, usdnAssetIdStr) == unit))
469- then puzzleAssetIdStr
470- else usdnAssetIdStr
471- func addTokenDataEntries (accum,assetNum) = if ((assetNum >= size(assetIdsLi)))
472- then accum
473- else {
474- let assetDecimals = match assetIdsLi[assetNum] {
475- case x: ByteVector =>
476- value(assetInfo(x)).decimals
477- case _ =>
478- 8
479- }
480- (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])))])
481- }
482-
483- if ((assetWeightsSum != 10000))
484- then throw("sum of token weights must be equal to 10000")
485- else ({
486- 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
487456 let $s = size($l)
488457 let $acc0 = nil
489- func $f6_1 ($a,$i) = if (($i >= $s))
458+ func $f4_1 ($a,$i) = if (($i >= $s))
490459 then $a
491- else addTokenDataEntries($a, $l[$i])
460+ else addAssetBytesToList($a, $l[$i])
492461
493- func $f6_2 ($a,$i) = if (($i >= $s))
462+ func $f4_2 ($a,$i) = if (($i >= $s))
494463 then $a
495464 else throw("List size exceeds 10")
496465
497- $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)
498- } ++ [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)])
499- }
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+ }
500517 }
501518
502519
503520
504521 @Callable(i)
505-func deInit () = if ((i.caller != this))
506- then throw("admin only")
507- else [IntegerEntry("global_wasInited", 0)]
508-
509-
510-
511-@Callable(i)
512-func setLock (unlock) = if ((i.caller == Address(poolAdmin)))
513- then [IntegerEntry("global_isUnlocked", if (unlock)
514- then 1
515- else 0)]
516- else throw("ILO admin only")
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)]
517527
518528
519529
574584 $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)
575585 }
576586
577- if ((tryGetInteger("global_wasInited") > 0))
578- then throw("pool already inited")
579- else {
580- let initialPoolTokens = calculatePoolTokensAmount(i.payments)
581- if ((initialPoolTokens == 0))
582- then throw("you need a bigger tokens amount to launch the pool")
583- else {
584- let poolTokenIssue = Issue(("PZ " + tryGetString("static_poolDomain")), "Puzzle Swap: pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
585- let poolTokenId = calculateAssetId(poolTokenIssue)
586- (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)])
587- }
588- }
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+ }
589601 }
590602
591603
592604
593605 @Callable(i)
594-func generateIndex (needChange) = if ((size(i.payments) != T))
595- then throw(("you need to attach all pool tokens. amount of pool tokens: " + toString(T)))
596- else if (!(checkTokensValidity(i.payments)))
597- then throw("wrong assets attached")
598- else {
599- let PIssued = getMinPIssued(i.payments)
600- let reissue = Reissue(getBinaryValue("global_poolToken_id"), PIssued, true)
601- let result = handlePoolTokensAdd(PIssued, i.payments, i.originCaller, needChange)
602- $Tuple2((result ++ [ScriptTransfer(i.caller, PIssued, tryGetBinary("global_poolToken_id")), reissue, IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") + PIssued))]), PIssued)
603- }
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+ }
604618
605619
606620
608622 func stakeIndex () = {
609623 let addressStr = toString(i.originCaller)
610624 let pmt = i.payments[0]
611- if ((value(pmt.assetId) != tryGetBinary("global_poolToken_id")))
612- then throw("wrong asset attached")
613- 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)
614630 }
615631
616632
619635 func unstakeIndex (puzzleAmount) = {
620636 let addressStr = toString(i.originCaller)
621637 let puzzleAvailable = tryGetInteger((addressStr + "_indexStaked"))
622- if ((puzzleAmount > puzzleAvailable))
623- then throw("you don't have index tokens available")
624- else if (isShutdown())
625- then throw("contract is on stop")
626- 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"))])
627645 }
628646
629647
632650 func claimIndexRewards () = if (isShutdown())
633651 then throw("contract is on stop")
634652 else claimResult(i.caller)
653+
654+
655+
656+@Callable(i)
657+func evaluateClaim (user) = $Tuple2(nil, claimResult(addressFromStringValue(user))._2)
635658
636659
637660
678701 then AssetOutBalance2
679702 else tryGetInteger((("global_" + getAssetString(feeAssetOut)) + "_balance"))
680703 let feeAmountOut = calculateOutAmount(feeAmountIn, AssetIn, feeAssetOut, AssetInBalance, feeAssetOutBalance)
681- if ((tryGetInteger("global_isUnlocked") == 0))
682- then throw("pool is locked")
683- else if ((minimum > AmountOut))
684- then throw(("amount to recieve is lower than given one: " + toString(AmountOut)))
685- else if ((AssetOut == AssetIn))
686- then throw("this swap is not allowed")
687- else if ((0 > (AssetOutBalance - AmountOut)))
688- then throw("contract is out of reserves")
689- else if (isShutdown())
690- then throw("contract is on stop")
691- else {
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 newBalanceIn = (AssetInBalance2 - (if ((AssetIn == feeAssetOut))
700- then feeAmountOut
701- else 0))
702- let newBalanceOut = (AssetOutBalance2 - (if ((AssetOut == feeAssetOut))
703- then feeAmountOut
704- else 0))
705- let newBalanceFeeAsset = if (if ((feeAssetOut != AssetIn))
706- then (feeAssetOut != AssetOut)
707- else false)
708- then (feeAssetOutBalance - feeAmountOut)
709- else unit
710- let assetInChange = IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), newBalanceIn)
711- let assetOutChange = IntegerEntry((("global_" + assetOut) + "_balance"), newBalanceOut)
712- let feeAssetOutChange = if ((newBalanceFeeAsset != unit))
713- then IntegerEntry((("global_" + getAssetString(feeAssetOut)) + "_balance"), feeAssetOutBalance)
714- else StringEntry("hello", "world")
715- $Tuple2(([assetOutChange, assetInChange, feeAssetOutChange, ScriptTransfer(i.caller, AmountOut, AssetOut), IntegerEntry("global_volume", (tryGetInteger("global_volume") + calculateUsdnValue(AssetIn, AmountIn, AssetInBalance, feeAssetOutBalance)))] ++ (if ((stakingTopUp == unit))
716- then [Burn(feeAssetOut, protocolFee)]
717- else nil)), AmountOut)
718- }
719- else throw("Strict value is not equal to itself.")
720- }
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")
708+ else if ((0 > (AssetOutBalance - AmountOut)))
709+ then throw("contract is out of reserves")
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+ }
721742 }
722743
723744
Full:
OldNewDifferences
1-{-# STDLIB_VERSION 5 #-}
1+{-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let poolAdmin = base58'3P8GrGiMz1zuc14CkrdaXK39PqVJu5XvEGC'
5-
64 let usdnAssetId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
75
86 let puzzleAssetId = base58'HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS'
97
8+let usdtAssetId = base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ'
9+
1010 let usdnAssetIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
1111
1212 let puzzleAssetIdStr = "HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS"
13+
14+let usdtAssetIdStr = "34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ"
1315
1416 let parentPoolAddress = Address(base58'3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh')
1517
1618 let masterAddress = Address(base58'3PLjwHcz9NEuaTo63NZR9B9okQiKQxZSbmf')
1719
1820 let masterPubKey = base58'4z8CKSYQBKkzx7PBb5uBP1YPa6YAHRNTApW1sQVHT5eU'
1921
2022 func tryGetInteger (key) = match getInteger(this, key) {
2123 case b: Int =>
2224 b
2325 case _ =>
2426 0
2527 }
2628
2729
2830 func tryGetBinary (key) = match getBinary(this, key) {
2931 case b: ByteVector =>
3032 b
3133 case _ =>
3234 base58''
3335 }
3436
3537
3638 func tryGetString (key) = match getString(this, key) {
3739 case b: String =>
3840 b
3941 case _ =>
4042 ""
4143 }
4244
4345
4446 func getAssetString (assetId) = match assetId {
4547 case b: ByteVector =>
4648 toBase58String(b)
4749 case _ =>
4850 "WAVES"
4951 }
5052
5153
5254 func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES"))
5355 then unit
5456 else fromBase58String(assetIdStr)
5557
5658
5759 func addAssetBytesToList (accum,item) = (accum ++ [getAssetBytes(item)])
5860
5961
6062 func addAssetWeightToList (accum,item) = (accum ++ [tryGetInteger((("static_" + getAssetString(item)) + "_weight"))])
6163
6264
6365 func addAssetDecimalsToList (accum,item) = (accum ++ [tryGetInteger((("static_" + getAssetString(item)) + "_decimals"))])
6466
6567
6668 func addAssetScaleToList (accum,item) = (accum ++ [tryGetInteger((("static_" + getAssetString(item)) + "_scale"))])
6769
6870
6971 func addIntToList (accum,item) = (accum ++ [parseIntValue(item)])
7072
7173
7274 let T = tryGetInteger("static_tokensAmount")
7375
7476 let assetIds = {
7577 let $l = split(tryGetString("static_tokenIds"), ",")
7678 let $s = size($l)
7779 let $acc0 = nil
7880 func $f0_1 ($a,$i) = if (($i >= $s))
7981 then $a
8082 else addAssetBytesToList($a, $l[$i])
8183
8284 func $f0_2 ($a,$i) = if (($i >= $s))
8385 then $a
8486 else throw("List size exceeds 10")
8587
8688 $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)
8789 }
8890
8991 let AssetsWeights = {
9092 let $l = assetIds
9193 let $s = size($l)
9294 let $acc0 = nil
9395 func $f1_1 ($a,$i) = if (($i >= $s))
9496 then $a
9597 else addAssetWeightToList($a, $l[$i])
9698
9799 func $f1_2 ($a,$i) = if (($i >= $s))
98100 then $a
99101 else throw("List size exceeds 10")
100102
101103 $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)
102104 }
103105
104106 let Decimals = {
105107 let $l = assetIds
106108 let $s = size($l)
107109 let $acc0 = nil
108110 func $f2_1 ($a,$i) = if (($i >= $s))
109111 then $a
110112 else addAssetDecimalsToList($a, $l[$i])
111113
112114 func $f2_2 ($a,$i) = if (($i >= $s))
113115 then $a
114116 else throw("List size exceeds 10")
115117
116118 $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)
117119 }
118120
119121 let Scales = {
120122 let $l = assetIds
121123 let $s = size($l)
122124 let $acc0 = nil
123125 func $f3_1 ($a,$i) = if (($i >= $s))
124126 then $a
125127 else addAssetScaleToList($a, $l[$i])
126128
127129 func $f3_2 ($a,$i) = if (($i >= $s))
128130 then $a
129131 else throw("List size exceeds 10")
130132
131133 $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)
132134 }
133135
134136 let Fee = tryGetInteger("static_fee")
135137
136138 let AssetsWeightsDecimals = 4
137139
138140 let Scale = 10000
139141
140142 let Scale8 = 100000000
141143
142144 let FeeScale = 10000
143145
144146 let PoolTokenDecimals = 8
145147
146148 let PoolTokenScale = pow(10, 0, PoolTokenDecimals, 0, 0, HALFUP)
147149
148150 let earnedAssets = assetIds
149151
150152 func isShutdown () = match getBoolean(Address(base58'3PEpv9hRFWEEBU22WRnLsw1bH4YGtcU728o'), "is_shutdown") {
151153 case x: Boolean =>
152154 x
153155 case _ =>
154156 false
155157 }
156158
157159
158160 func getCurrentTokenBalance (tokenType) = {
159161 let tokenId = getAssetString(assetIds[tokenType])
160162 tryGetInteger((("global_" + tokenId) + "_balance"))
161163 }
162164
163165
164166 func calculatePIssued (amount,tokenId) = {
165167 let Psupply = tryGetInteger("global_poolToken_amount")
166168 let Balance = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
167169 fraction(amount, Psupply, Balance, DOWN)
168170 }
169171
170172
171173 func getMinPIssued (payments) = {
172174 func handler (accum,current) = {
173175 let PIssued = calculatePIssued(current.amount, current.assetId)
174176 if ((PIssued == 0))
175177 then throw("one of the tokens amounts is too low")
176178 else if (if ((accum == 0))
177179 then true
178180 else (accum > PIssued))
179181 then PIssued
180182 else accum
181183 }
182184
183185 let minPIssed = {
184186 let $l = payments
185187 let $s = size($l)
186188 let $acc0 = 0
187189 func $f4_1 ($a,$i) = if (($i >= $s))
188190 then $a
189191 else handler($a, $l[$i])
190192
191193 func $f4_2 ($a,$i) = if (($i >= $s))
192194 then $a
193195 else throw("List size exceeds 10")
194196
195197 $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)
196198 }
197199 minPIssed
198200 }
199201
200202
201203 func calculateUsdnValue (assetId,amount,aBalance,givenUsdnBalance) = {
202204 let usdnInPool = indexOf(assetIds, usdnAssetId)
205+ let usdtInPool = indexOf(assetIds, usdtAssetId)
203206 let assetWeight = AssetsWeights[value(indexOf(assetIds, assetId))]
204- if ((usdnInPool == unit))
207+ if (if ((usdnInPool == unit))
208+ then (usdtInPool == unit)
209+ else false)
205210 then {
206211 let puzzleWeight = AssetsWeights[value(indexOf(assetIds, puzzleAssetId))]
207212 let puzzleBalance = tryGetInteger((("global_" + puzzleAssetIdStr) + "_balance"))
208213 let amountInPuzzle = fraction(amount, (puzzleBalance / puzzleWeight), (aBalance / assetWeight))
209214 let puzzlePrice = getIntegerValue(parentPoolAddress, "global_lastPuzzlePrice")
210215 fraction((amountInPuzzle * puzzlePrice), 1, Scale8)
211216 }
212- else {
213- let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnAssetId))]
214- let usdnBalance = match givenUsdnBalance {
215- case x: Int =>
216- givenUsdnBalance
217- case _ =>
218- tryGetInteger((("global_" + getAssetString(usdnAssetId)) + "_balance"))
219- }
220- fraction(amount, (value(usdnBalance) / usdnWeight), (aBalance / assetWeight))
221- }
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+ }
222233 }
223234
224235
225236 func checkTokensValidity (payments) = {
226237 func handler1 (accum,payment) = (accum ++ [payment.assetId])
227238
228239 let ids = {
229240 let $l = payments
230241 let $s = size($l)
231242 let $acc0 = nil
232243 func $f4_1 ($a,$i) = if (($i >= $s))
233244 then $a
234245 else handler1($a, $l[$i])
235246
236247 func $f4_2 ($a,$i) = if (($i >= $s))
237248 then $a
238249 else throw("List size exceeds 10")
239250
240251 $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)
241252 }
242253 if ((ids == ids))
243254 then {
244255 func handler2 (accum,assetId) = if ((indexOf(ids, assetId) != unit))
245256 then (accum + 1)
246257 else throw(("asset not attached: " + getAssetString(assetId)))
247258
248259 let checks = {
249260 let $l = assetIds
250261 let $s = size($l)
251262 let $acc0 = 0
252263 func $f5_1 ($a,$i) = if (($i >= $s))
253264 then $a
254265 else handler2($a, $l[$i])
255266
256267 func $f5_2 ($a,$i) = if (($i >= $s))
257268 then $a
258269 else throw("List size exceeds 10")
259270
260271 $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)
261272 }
262273 if ((checks == checks))
263274 then true
264275 else throw("Strict value is not equal to itself.")
265276 }
266277 else throw("Strict value is not equal to itself.")
267278 }
268279
269280
270281 func handlePoolTokensAdd (PIssued,payments,userAddress,needChange) = {
271282 func getTokenPaymentAmount (tokenId) = {
272283 func handler (accum,payment) = if ((payment.assetId == tokenId))
273284 then payment.amount
274285 else accum
275286
276287 let $l = payments
277288 let $s = size($l)
278289 let $acc0 = 0
279290 func $f4_1 ($a,$i) = if (($i >= $s))
280291 then $a
281292 else handler($a, $l[$i])
282293
283294 func $f4_2 ($a,$i) = if (($i >= $s))
284295 then $a
285296 else throw("List size exceeds 10")
286297
287298 $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)
288299 }
289300
290301 func handleTokenChange (accum,tokenId) = {
291302 let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
292303 let PSupply = tryGetInteger("global_poolToken_amount")
293304 let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
294305 let Dk = fraction((fraction((PSupply + PIssued), tokenDecimals, PSupply, CEILING) - tokenDecimals), Bk, tokenDecimals, CEILING)
295306 let paymentAmount = getTokenPaymentAmount(tokenId)
296307 let toReturn = ((if ((paymentAmount != 0))
297308 then paymentAmount
298309 else 0) - Dk)
299310 let t = if (if (needChange)
300311 then (toReturn > 0)
301312 else false)
302313 then [ScriptTransfer(userAddress, toReturn, tokenId)]
303314 else nil
304315 ((accum ++ t) ++ [IntegerEntry((("global_" + getAssetString(tokenId)) + "_balance"), (Bk + Dk))])
305316 }
306317
307318 let $l = assetIds
308319 let $s = size($l)
309320 let $acc0 = nil
310321 func $f4_1 ($a,$i) = if (($i >= $s))
311322 then $a
312323 else handleTokenChange($a, $l[$i])
313324
314325 func $f4_2 ($a,$i) = if (($i >= $s))
315326 then $a
316327 else throw("List size exceeds 10")
317328
318329 $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)
319330 }
320331
321332
322333 func handlePoolTokensRedeem (PRedeemed,userAddress) = {
323334 func handleTokenRedeem (accum,tokenId) = {
324335 let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
325336 let PSupply = tryGetInteger("global_poolToken_amount")
326337 let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
327338 let amount = toInt(fraction((toBigInt(Scale8) - fraction(toBigInt((PSupply - PRedeemed)), toBigInt(Scale8), toBigInt(PSupply), CEILING)), toBigInt(Bk), toBigInt(Scale8), DOWN))
328339 (accum ++ [IntegerEntry((("global_" + getAssetString(tokenId)) + "_balance"), (Bk - amount)), ScriptTransfer(userAddress, amount, tokenId)])
329340 }
330341
331342 let $l = assetIds
332343 let $s = size($l)
333344 let $acc0 = nil
334345 func $f4_1 ($a,$i) = if (($i >= $s))
335346 then $a
336347 else handleTokenRedeem($a, $l[$i])
337348
338349 func $f4_2 ($a,$i) = if (($i >= $s))
339350 then $a
340351 else throw("List size exceeds 10")
341352
342353 $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)
343354 }
344355
345356
346357 func calculateOutAmount (AmountIn,assetIn,assetOut,BalanceIn,BalanceOut) = {
347358 let IndexIn = value(indexOf(assetIds, assetIn))
348359 let IndexOut = value(indexOf(assetIds, assetOut))
349360 if ((IndexIn == IndexOut))
350361 then AmountIn
351362 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)
352363 }
353364
354365
355366 func getTokenBalance (assetId) = match assetId {
356367 case t: ByteVector =>
357368 assetBalance(this, t)
358369 case _ =>
359370 wavesBalance(this).available
360371 }
361372
362373
363374 func calculateCurrentAssetInterest (assetId,assetIdStr,aBalance,tokenEarningsLastCheck) = {
364375 let totalStaked = tryGetInteger("global_indexStaked")
365376 let tokenBalanceLastCheck = tokenEarningsLastCheck
366377 let currentBalanceDelta = (getTokenBalance(assetId) - aBalance)
367378 let currentTokenEarnings = if ((currentBalanceDelta > tokenBalanceLastCheck))
368379 then currentBalanceDelta
369380 else tokenBalanceLastCheck
370381 let newEarnings = (currentTokenEarnings - tokenBalanceLastCheck)
371382 let newInterest = if ((totalStaked == 0))
372383 then 0
373384 else fraction(newEarnings, Scale8, totalStaked)
374385 let lastCheckInterest = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_interest"))
375386 (lastCheckInterest + newInterest)
376387 }
377388
378389
379390 func claimResult (address) = {
380391 let addressStr = toString(address)
381392 let puzzleAmount = tryGetInteger((addressStr + "_indexStaked"))
382393 func handler (accum,assetId) = {
383394 let assetIdStr = getAssetString(assetId)
384395 let aBalance = tryGetInteger((("global_" + getAssetString(assetId)) + "_balance"))
385396 let tokenEarningsLastCheck = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_earnings"))
386397 let currentTokenInterest = calculateCurrentAssetInterest(assetId, assetIdStr, aBalance, tokenEarningsLastCheck)
387398 let currentTokenEarnings = max([tokenEarningsLastCheck, (getTokenBalance(assetId) - aBalance)])
388399 let rewardAmount = fraction(puzzleAmount, (currentTokenInterest - tryGetInteger((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"))), Scale8)
389400 let transfer = if ((rewardAmount == 0))
390401 then nil
391402 else [ScriptTransfer(address, rewardAmount, assetId)]
392403 $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)))
393404 }
394405
395406 let accum = {
396407 let $l = earnedAssets
397408 let $s = size($l)
398409 let $acc0 = $Tuple2(nil, 0)
399410 func $f4_1 ($a,$i) = if (($i >= $s))
400411 then $a
401412 else handler($a, $l[$i])
402413
403414 func $f4_2 ($a,$i) = if (($i >= $s))
404415 then $a
405416 else throw("List size exceeds 10")
406417
407418 $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)
408419 }
409- (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)
410421 }
411422
412423
413424 func indexStakeResult (addressStr,amount) = {
414- let li = claimResult(addressFromStringValue(addressStr))
425+ let li = claimResult(addressFromStringValue(addressStr))._1
415426 (li ++ [IntegerEntry((addressStr + "_indexStaked"), (tryGetInteger((addressStr + "_indexStaked")) + amount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") + amount))])
416427 }
417428
418429
419430 func sum (accum,n) = (accum + parseIntValue(n))
420431
421432
422433 @Callable(i)
423434 func preInit (assetIdsStr,assetWeightsStr,baseTokenIdStr,poolDomain,poolOwner,fee) = {
424435 let poolOwnerAddress = Address(fromBase58String(poolOwner))
425- if ((this != i.caller))
426- then throw("admin only")
427- else if ((size(poolDomain) > 13))
428- then throw("too large pool domain")
429- else if (if ((fee > 500))
430- then true
431- else (50 > fee))
432- then throw("fee value must be between 50 and 500 (0.5-5%)")
433- else if (if ((indexOf(assetIdsStr, puzzleAssetIdStr) == unit))
434- then (indexOf(assetIdsStr, usdnAssetIdStr) == unit)
435- else false)
436- then throw("pool must have USDN or PUZZLE in the composition")
437- else {
438- let assetIdsStrLi = split(assetIdsStr, ",")
439- let assetIdsLi = {
440- let $l = assetIdsStrLi
441- let $s = size($l)
442- let $acc0 = nil
443- func $f4_1 ($a,$i) = if (($i >= $s))
444- then $a
445- else addAssetBytesToList($a, $l[$i])
446-
447- func $f4_2 ($a,$i) = if (($i >= $s))
448- then $a
449- else throw("List size exceeds 10")
450-
451- $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)
452- }
453- let assetWeightsStrLi = split(assetWeightsStr, ",")
454- let assetWeightsSum = {
455- let $l = assetWeightsStrLi
456- let $s = size($l)
457- let $acc0 = 0
458- func $f5_1 ($a,$i) = if (($i >= $s))
459- then $a
460- else sum($a, $l[$i])
461-
462- func $f5_2 ($a,$i) = if (($i >= $s))
463- then $a
464- else throw("List size exceeds 10")
465-
466- $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)
467- }
468- let feeAssetStr = if ((indexOf(assetIdsStr, usdnAssetIdStr) == unit))
469- then puzzleAssetIdStr
470- else usdnAssetIdStr
471- func addTokenDataEntries (accum,assetNum) = if ((assetNum >= size(assetIdsLi)))
472- then accum
473- else {
474- let assetDecimals = match assetIdsLi[assetNum] {
475- case x: ByteVector =>
476- value(assetInfo(x)).decimals
477- case _ =>
478- 8
479- }
480- (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])))])
481- }
482-
483- if ((assetWeightsSum != 10000))
484- then throw("sum of token weights must be equal to 10000")
485- else ({
486- 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
487456 let $s = size($l)
488457 let $acc0 = nil
489- func $f6_1 ($a,$i) = if (($i >= $s))
458+ func $f4_1 ($a,$i) = if (($i >= $s))
490459 then $a
491- else addTokenDataEntries($a, $l[$i])
460+ else addAssetBytesToList($a, $l[$i])
492461
493- func $f6_2 ($a,$i) = if (($i >= $s))
462+ func $f4_2 ($a,$i) = if (($i >= $s))
494463 then $a
495464 else throw("List size exceeds 10")
496465
497- $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)
498- } ++ [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)])
499- }
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+ }
500517 }
501518
502519
503520
504521 @Callable(i)
505-func deInit () = if ((i.caller != this))
506- then throw("admin only")
507- else [IntegerEntry("global_wasInited", 0)]
508-
509-
510-
511-@Callable(i)
512-func setLock (unlock) = if ((i.caller == Address(poolAdmin)))
513- then [IntegerEntry("global_isUnlocked", if (unlock)
514- then 1
515- else 0)]
516- else throw("ILO admin only")
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)]
517527
518528
519529
520530 @Callable(i)
521531 func init () = {
522532 func prepareList () = {
523533 func handler (accum,n) = (accum ++ [IntegerEntry((("global_" + getAssetString(n.assetId)) + "_balance"), n.amount)])
524534
525535 let $l = i.payments
526536 let $s = size($l)
527537 let $acc0 = nil
528538 func $f4_1 ($a,$i) = if (($i >= $s))
529539 then $a
530540 else handler($a, $l[$i])
531541
532542 func $f4_2 ($a,$i) = if (($i >= $s))
533543 then $a
534544 else throw("List size exceeds 10")
535545
536546 $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)
537547 }
538548
539549 func calculatePoolTokensAmount (payments) = {
540550 func handler (accum,pmt) = {
541551 let assetId = pmt.assetId
542552 func handler2 (accum,n) = if ((n == assetId))
543553 then value(indexOf(assetIds, n))
544554 else accum
545555
546556 let Token = {
547557 let $l = assetIds
548558 let $s = size($l)
549559 let $acc0 = 1
550560 func $f4_1 ($a,$i) = if (($i >= $s))
551561 then $a
552562 else handler2($a, $l[$i])
553563
554564 func $f4_2 ($a,$i) = if (($i >= $s))
555565 then $a
556566 else throw("List size exceeds 10")
557567
558568 $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)
559569 }
560570 fraction(accum, pow(pmt.amount, Decimals[Token], AssetsWeights[Token], AssetsWeightsDecimals, 8, FLOOR), Scale8)
561571 }
562572
563573 let $l = payments
564574 let $s = size($l)
565575 let $acc0 = PoolTokenScale
566576 func $f4_1 ($a,$i) = if (($i >= $s))
567577 then $a
568578 else handler($a, $l[$i])
569579
570580 func $f4_2 ($a,$i) = if (($i >= $s))
571581 then $a
572582 else throw("List size exceeds 10")
573583
574584 $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)
575585 }
576586
577- if ((tryGetInteger("global_wasInited") > 0))
578- then throw("pool already inited")
579- else {
580- let initialPoolTokens = calculatePoolTokensAmount(i.payments)
581- if ((initialPoolTokens == 0))
582- then throw("you need a bigger tokens amount to launch the pool")
583- else {
584- let poolTokenIssue = Issue(("PZ " + tryGetString("static_poolDomain")), "Puzzle Swap: pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
585- let poolTokenId = calculateAssetId(poolTokenIssue)
586- (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)])
587- }
588- }
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+ }
589601 }
590602
591603
592604
593605 @Callable(i)
594-func generateIndex (needChange) = if ((size(i.payments) != T))
595- then throw(("you need to attach all pool tokens. amount of pool tokens: " + toString(T)))
596- else if (!(checkTokensValidity(i.payments)))
597- then throw("wrong assets attached")
598- else {
599- let PIssued = getMinPIssued(i.payments)
600- let reissue = Reissue(getBinaryValue("global_poolToken_id"), PIssued, true)
601- let result = handlePoolTokensAdd(PIssued, i.payments, i.originCaller, needChange)
602- $Tuple2((result ++ [ScriptTransfer(i.caller, PIssued, tryGetBinary("global_poolToken_id")), reissue, IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") + PIssued))]), PIssued)
603- }
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+ }
604618
605619
606620
607621 @Callable(i)
608622 func stakeIndex () = {
609623 let addressStr = toString(i.originCaller)
610624 let pmt = i.payments[0]
611- if ((value(pmt.assetId) != tryGetBinary("global_poolToken_id")))
612- then throw("wrong asset attached")
613- 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)
614630 }
615631
616632
617633
618634 @Callable(i)
619635 func unstakeIndex (puzzleAmount) = {
620636 let addressStr = toString(i.originCaller)
621637 let puzzleAvailable = tryGetInteger((addressStr + "_indexStaked"))
622- if ((puzzleAmount > puzzleAvailable))
623- then throw("you don't have index tokens available")
624- else if (isShutdown())
625- then throw("contract is on stop")
626- 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"))])
627645 }
628646
629647
630648
631649 @Callable(i)
632650 func claimIndexRewards () = if (isShutdown())
633651 then throw("contract is on stop")
634652 else claimResult(i.caller)
653+
654+
655+
656+@Callable(i)
657+func evaluateClaim (user) = $Tuple2(nil, claimResult(addressFromStringValue(user))._2)
635658
636659
637660
638661 @Callable(i)
639662 func redeemIndex (sendToOrigin) = {
640663 let pmt = i.payments[0]
641664 if ((pmt.assetId != tryGetBinary("global_poolToken_id")))
642665 then throw("please attach pool share token")
643666 else if (isShutdown())
644667 then throw("contract is on stop")
645668 else {
646669 let PRedeemed = pmt.amount
647670 let result = handlePoolTokensRedeem(PRedeemed, if (sendToOrigin)
648671 then i.originCaller
649672 else i.caller)
650673 (result ++ [Burn(tryGetBinary("global_poolToken_id"), PRedeemed), IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") - PRedeemed))])
651674 }
652675 }
653676
654677
655678
656679 @Callable(i)
657680 func swap (assetOut,minimum) = {
658681 let pmt = if ((size(i.payments) == 1))
659682 then value(i.payments[0])
660683 else throw("please attach exactly one payment")
661684 let AmountIn = value(i.payments[0].amount)
662685 let AssetIn = pmt.assetId
663686 let AssetOut = getAssetBytes(assetOut)
664687 let feeAssetOutStr = tryGetString("static_feeToken")
665688 let feeAssetOut = if ((feeAssetOutStr == ""))
666689 then usdnAssetId
667690 else fromBase58String(feeAssetOutStr)
668691 let AssetInBalance = tryGetInteger((("global_" + getAssetString(AssetIn)) + "_balance"))
669692 let AssetOutBalance = tryGetInteger((("global_" + assetOut) + "_balance"))
670693 let feeAmountIn = fraction(AmountIn, Fee, FeeScale)
671694 let cleanAmountIn = (AmountIn - feeAmountIn)
672695 let AmountOut = calculateOutAmount(cleanAmountIn, AssetIn, AssetOut, AssetInBalance, AssetOutBalance)
673696 let AssetOutBalance2 = (AssetOutBalance - AmountOut)
674697 let AssetInBalance2 = (AssetInBalance + cleanAmountIn)
675698 let feeAssetOutBalance = if ((feeAssetOut == AssetIn))
676699 then AssetInBalance2
677700 else if ((feeAssetOut == AssetOut))
678701 then AssetOutBalance2
679702 else tryGetInteger((("global_" + getAssetString(feeAssetOut)) + "_balance"))
680703 let feeAmountOut = calculateOutAmount(feeAmountIn, AssetIn, feeAssetOut, AssetInBalance, feeAssetOutBalance)
681- if ((tryGetInteger("global_isUnlocked") == 0))
682- then throw("pool is locked")
683- else if ((minimum > AmountOut))
684- then throw(("amount to recieve is lower than given one: " + toString(AmountOut)))
685- else if ((AssetOut == AssetIn))
686- then throw("this swap is not allowed")
687- else if ((0 > (AssetOutBalance - AmountOut)))
688- then throw("contract is out of reserves")
689- else if (isShutdown())
690- then throw("contract is on stop")
691- else {
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 newBalanceIn = (AssetInBalance2 - (if ((AssetIn == feeAssetOut))
700- then feeAmountOut
701- else 0))
702- let newBalanceOut = (AssetOutBalance2 - (if ((AssetOut == feeAssetOut))
703- then feeAmountOut
704- else 0))
705- let newBalanceFeeAsset = if (if ((feeAssetOut != AssetIn))
706- then (feeAssetOut != AssetOut)
707- else false)
708- then (feeAssetOutBalance - feeAmountOut)
709- else unit
710- let assetInChange = IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), newBalanceIn)
711- let assetOutChange = IntegerEntry((("global_" + assetOut) + "_balance"), newBalanceOut)
712- let feeAssetOutChange = if ((newBalanceFeeAsset != unit))
713- then IntegerEntry((("global_" + getAssetString(feeAssetOut)) + "_balance"), feeAssetOutBalance)
714- else StringEntry("hello", "world")
715- $Tuple2(([assetOutChange, assetInChange, feeAssetOutChange, ScriptTransfer(i.caller, AmountOut, AssetOut), IntegerEntry("global_volume", (tryGetInteger("global_volume") + calculateUsdnValue(AssetIn, AmountIn, AssetInBalance, feeAssetOutBalance)))] ++ (if ((stakingTopUp == unit))
716- then [Burn(feeAssetOut, protocolFee)]
717- else nil)), AmountOut)
718- }
719- else throw("Strict value is not equal to itself.")
720- }
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")
708+ else if ((0 > (AssetOutBalance - AmountOut)))
709+ then throw("contract is out of reserves")
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+ }
721742 }
722743
723744
724745 @Verifier(tx)
725746 func verify () = if (isShutdown())
726747 then false
727748 else if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
728749 then true
729750 else sigVerify(tx.bodyBytes, tx.proofs[0], masterPubKey)
730751

github/deemru/w8io/786bc32 
87.10 ms