tx · 3dW5bVsBrhBwTXmoRHdhpAohCFfcybc7hFDEdbUEkpaH

3PCq2VqxGMmEyB8gLoUi8KuV9tYSD3VMC74:  -0.03500000 Waves

2023.01.30 12:42 [3493082] smart account 3PCq2VqxGMmEyB8gLoUi8KuV9tYSD3VMC74 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3dW5bVsBrhBwTXmoRHdhpAohCFfcybc7hFDEdbUEkpaH",
    "fee": 3500000,
    "feeAssetId": null,
    "timestamp": 1675071798432,
    "version": 2,
    "chainId": 87,
    "sender": "3PCq2VqxGMmEyB8gLoUi8KuV9tYSD3VMC74",
    "senderPublicKey": "AgEaeJWmKzbxoJ1uBK5S4nbSdPPPeYKWktd6MhFM2MGY",
    "proofs": [
        "4PW26mK3YeNWnAzAVpNbWXto3mpxZqPnjX7HQvp5xEMoMrYRz5YJ9cV1nuAU8pL94rN5Fk8GQQwPA893JcMnXKWi"
    ],
    "script": "base64:BgIuCAISCAoGCAgICAgBEgASABIDCgEEEgASAwoBARIAEgMKAQgSAwoBBBIECgIIAS4AC3VzZG5Bc3NldElkASC2JinDBPXOU5GkDkt1JC9kjFGx+t+vVCm9SNIdKrKq0QANcHV6emxlQXNzZXRJZAEg8Rr+Jf72mTj0aSrE3+ES1keyxsoOujcJr3dtH46i5WMAC3VzZHRBc3NldElkASAelAcTUnahJZX9yGGogl8Qf986Tym7/JpGP1r9Nk+fkQAOdXNkbkFzc2V0SWRTdHICLERHMnhGa1BkRHdLVW9Ca3pHQWhRdExwU0d6ZlhMaUNZUEV6ZUtIMkFkMjRwABBwdXp6bGVBc3NldElkU3RyAixIRUI4UWF3OXhyV3BXczh0SHNpQVRZR0JXREJ0UDJTN2tjUEFMck11NDNBUwAOdXNkdEFzc2V0SWRTdHICLDM0TjlZY0VFVExXbjkzcVlRNjRFc1AxeDg5dFNydUpVNDRSckVNU1hYRVBKABFwYXJlbnRQb29sQWRkcmVzcwkBB0FkZHJlc3MBARoBV5HG6inqeWcP2YTvMnaUs8B1QuQ1g8HTWAANbWFzdGVyQWRkcmVzcwkBB0FkZHJlc3MBARoBV85X8yTRB6SzTv7SuuIorMWQltaK0W0F7gAMbWFzdGVyUHViS2V5ASA7NU1uP5+++FSclkQHgFarL+ITYEXEe/I/F0P0QgUmXQENdHJ5R2V0SW50ZWdlcgEDa2V5BAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEMdHJ5R2V0QmluYXJ5AQNrZXkEByRtYXRjaDAJAJwIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAWIFByRtYXRjaDAFAWIBAAEMdHJ5R2V0U3RyaW5nAQNrZXkEByRtYXRjaDAJAJ0IAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYgUHJG1hdGNoMAUBYgIAAQ5nZXRBc3NldFN0cmluZwEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwCQDYBAEFAWICBVdBVkVTAQ1nZXRBc3NldEJ5dGVzAQphc3NldElkU3RyAwkAAAIFCmFzc2V0SWRTdHICBVdBVkVTBQR1bml0CQDZBAEFCmFzc2V0SWRTdHIBE2FkZEFzc2V0Qnl0ZXNUb0xpc3QCBWFjY3VtBGl0ZW0JAM4IAgUFYWNjdW0JAMwIAgkBDWdldEFzc2V0Qnl0ZXMBBQRpdGVtBQNuaWwBFGFkZEFzc2V0V2VpZ2h0VG9MaXN0AgVhY2N1bQRpdGVtCQDOCAIFBWFjY3VtCQDMCAIJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB3N0YXRpY18JAQ5nZXRBc3NldFN0cmluZwEFBGl0ZW0CB193ZWlnaHQFA25pbAEWYWRkQXNzZXREZWNpbWFsc1RvTGlzdAIFYWNjdW0EaXRlbQkAzggCBQVhY2N1bQkAzAgCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdzdGF0aWNfCQEOZ2V0QXNzZXRTdHJpbmcBBQRpdGVtAglfZGVjaW1hbHMFA25pbAETYWRkQXNzZXRTY2FsZVRvTGlzdAIFYWNjdW0EaXRlbQkAzggCBQVhY2N1bQkAzAgCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdzdGF0aWNfCQEOZ2V0QXNzZXRTdHJpbmcBBQRpdGVtAgZfc2NhbGUFA25pbAEMYWRkSW50VG9MaXN0AgVhY2N1bQRpdGVtCQDOCAIFBWFjY3VtCQDMCAIJAQ1wYXJzZUludFZhbHVlAQUEaXRlbQUDbmlsAAFUCQENdHJ5R2V0SW50ZWdlcgECE3N0YXRpY190b2tlbnNBbW91bnQACGFzc2V0SWRzCgACJGwJALUJAgkBDHRyeUdldFN0cmluZwECD3N0YXRpY190b2tlbklkcwIBLAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQETYWRkQXNzZXRCeXRlc1RvTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgANQXNzZXRzV2VpZ2h0cwoAAiRsBQhhc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEUYWRkQXNzZXRXZWlnaHRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACERlY2ltYWxzCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYyXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARZhZGRBc3NldERlY2ltYWxzVG9MaXN0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYyXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMl8yAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAZTY2FsZXMKAAIkbAUIYXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjNfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBE2FkZEFzc2V0U2NhbGVUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjNfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYzXzICCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECCQEFJGYzXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoAA0ZlZQkBDXRyeUdldEludGVnZXIBAgpzdGF0aWNfZmVlABVBc3NldHNXZWlnaHRzRGVjaW1hbHMABAAFU2NhbGUAkE4ABlNjYWxlOACAwtcvAAhGZWVTY2FsZQCQTgARUG9vbFRva2VuRGVjaW1hbHMACAAOUG9vbFRva2VuU2NhbGUJAGwGAAoAAAURUG9vbFRva2VuRGVjaW1hbHMAAAAABQZIQUxGVVAADGVhcm5lZEFzc2V0cwUIYXNzZXRJZHMBCmlzU2h1dGRvd24ABAckbWF0Y2gwCQCbCAIJAQdBZGRyZXNzAQEaAVeNeFN6nxXSPZU0i4J5ZNgZ0ycem/I1WqgCC2lzX3NodXRkb3duAwkAAQIFByRtYXRjaDACB0Jvb2xlYW4EAXgFByRtYXRjaDAFAXgHARZnZXRDdXJyZW50VG9rZW5CYWxhbmNlAQl0b2tlblR5cGUEB3Rva2VuSWQJAQ5nZXRBc3NldFN0cmluZwEJAJEDAgUIYXNzZXRJZHMFCXRva2VuVHlwZQkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIHZ2xvYmFsXwUHdG9rZW5JZAIIX2JhbGFuY2UBEGNhbGN1bGF0ZVBJc3N1ZWQCBmFtb3VudAd0b2tlbklkBAdQc3VwcGx5CQENdHJ5R2V0SW50ZWdlcgECF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BAdCYWxhbmNlCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdnbG9iYWxfCQEOZ2V0QXNzZXRTdHJpbmcBBQd0b2tlbklkAghfYmFsYW5jZQkAbgQFBmFtb3VudAUHUHN1cHBseQUHQmFsYW5jZQUERE9XTgENZ2V0TWluUElzc3VlZAEIcGF5bWVudHMKAQdoYW5kbGVyAgVhY2N1bQdjdXJyZW50BAdQSXNzdWVkCQEQY2FsY3VsYXRlUElzc3VlZAIIBQdjdXJyZW50BmFtb3VudAgFB2N1cnJlbnQHYXNzZXRJZAMJAAACBQdQSXNzdWVkAAAJAAIBAiRvbmUgb2YgdGhlIHRva2VucyBhbW91bnRzIGlzIHRvbyBsb3cDAwkAAAIFBWFjY3VtAAAGCQBmAgUFYWNjdW0FB1BJc3N1ZWQFB1BJc3N1ZWQFBWFjY3VtBAltaW5QSXNzZWQKAAIkbAUIcGF5bWVudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoFCW1pblBJc3NlZAESY2FsY3VsYXRlVXNkblZhbHVlBAdhc3NldElkBmFtb3VudAhhQmFsYW5jZRBnaXZlblVzZG5CYWxhbmNlBAp1c2RuSW5Qb29sCQDPCAIFCGFzc2V0SWRzBQt1c2RuQXNzZXRJZAQKdXNkdEluUG9vbAkAzwgCBQhhc3NldElkcwULdXNkdEFzc2V0SWQEC2Fzc2V0V2VpZ2h0CQCRAwIFDUFzc2V0c1dlaWdodHMJAQV2YWx1ZQEJAM8IAgUIYXNzZXRJZHMFB2Fzc2V0SWQDAwkAAAIFCnVzZG5JblBvb2wFBHVuaXQJAAACBQp1c2R0SW5Qb29sBQR1bml0BwQMcHV6emxlV2VpZ2h0CQCRAwIFDUFzc2V0c1dlaWdodHMJAQV2YWx1ZQEJAM8IAgUIYXNzZXRJZHMFDXB1enpsZUFzc2V0SWQEDXB1enpsZUJhbGFuY2UJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB2dsb2JhbF8FEHB1enpsZUFzc2V0SWRTdHICCF9iYWxhbmNlBA5hbW91bnRJblB1enpsZQkAawMFBmFtb3VudAkAaQIFDXB1enpsZUJhbGFuY2UFDHB1enpsZVdlaWdodAkAaQIFCGFCYWxhbmNlBQthc3NldFdlaWdodAQLcHV6emxlUHJpY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFEXBhcmVudFBvb2xBZGRyZXNzAhZnbG9iYWxfbGFzdFB1enpsZVByaWNlCQBrAwkAaAIFDmFtb3VudEluUHV6emxlBQtwdXp6bGVQcmljZQABBQZTY2FsZTgDCQECIT0CBQp1c2R0SW5Qb29sBQR1bml0BAp1c2R0V2VpZ2h0CQCRAwIFDUFzc2V0c1dlaWdodHMJAQV2YWx1ZQEFCnVzZHRJblBvb2wEC3VzZHRCYWxhbmNlCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdnbG9iYWxfBQ51c2R0QXNzZXRJZFN0cgIIX2JhbGFuY2UJAGsDBQZhbW91bnQJAGkCBQt1c2R0QmFsYW5jZQUKdXNkdFdlaWdodAkAaQIFCGFCYWxhbmNlBQthc3NldFdlaWdodAQKdXNkbldlaWdodAkAkQMCBQ1Bc3NldHNXZWlnaHRzCQEFdmFsdWUBCQDPCAIFCGFzc2V0SWRzBQt1c2RuQXNzZXRJZAQLdXNkbkJhbGFuY2UEByRtYXRjaDAFEGdpdmVuVXNkbkJhbGFuY2UDCQABAgUHJG1hdGNoMAIDSW50BAF4BQckbWF0Y2gwBRBnaXZlblVzZG5CYWxhbmNlCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdnbG9iYWxfCQEOZ2V0QXNzZXRTdHJpbmcBBQt1c2RuQXNzZXRJZAIIX2JhbGFuY2UJAGsDBQZhbW91bnQJAGkCCQEFdmFsdWUBBQt1c2RuQmFsYW5jZQUKdXNkbldlaWdodAkAaQIFCGFCYWxhbmNlBQthc3NldFdlaWdodAETY2hlY2tUb2tlbnNWYWxpZGl0eQEIcGF5bWVudHMKAQhoYW5kbGVyMQIFYWNjdW0HcGF5bWVudAkAzggCBQVhY2N1bQkAzAgCCAUHcGF5bWVudAdhc3NldElkBQNuaWwEA2lkcwoAAiRsBQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmNF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIaGFuZGxlcjECBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoDCQAAAgUDaWRzBQNpZHMKAQhoYW5kbGVyMgIFYWNjdW0HYXNzZXRJZAMJAQIhPQIJAM8IAgUDaWRzBQdhc3NldElkBQR1bml0CQBkAgUFYWNjdW0AAQkAAgEJAKwCAgIUYXNzZXQgbm90IGF0dGFjaGVkOiAJAQ5nZXRBc3NldFN0cmluZwEFB2Fzc2V0SWQEBmNoZWNrcwoAAiRsBQhhc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmNV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIaGFuZGxlcjICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjVfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY1XzICCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoDCQAAAgUGY2hlY2tzBQZjaGVja3MGCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuARNoYW5kbGVQb29sVG9rZW5zQWRkBAdQSXNzdWVkCHBheW1lbnRzC3VzZXJBZGRyZXNzCm5lZWRDaGFuZ2UKARVnZXRUb2tlblBheW1lbnRBbW91bnQBB3Rva2VuSWQKAQdoYW5kbGVyAgVhY2N1bQdwYXltZW50AwkAAAIIBQdwYXltZW50B2Fzc2V0SWQFB3Rva2VuSWQIBQdwYXltZW50BmFtb3VudAUFYWNjdW0KAAIkbAUIcGF5bWVudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoKARFoYW5kbGVUb2tlbkNoYW5nZQIFYWNjdW0HdG9rZW5JZAQCQmsJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFB3Rva2VuSWQCCF9iYWxhbmNlBAdQU3VwcGx5CQENdHJ5R2V0SW50ZWdlcgECF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BA10b2tlbkRlY2ltYWxzCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdzdGF0aWNfCQEOZ2V0QXNzZXRTdHJpbmcBBQd0b2tlbklkAgZfc2NhbGUEAkRrCQBuBAkAZQIJAG4ECQBkAgUHUFN1cHBseQUHUElzc3VlZAUNdG9rZW5EZWNpbWFscwUHUFN1cHBseQUHQ0VJTElORwUNdG9rZW5EZWNpbWFscwUCQmsFDXRva2VuRGVjaW1hbHMFB0NFSUxJTkcEDXBheW1lbnRBbW91bnQJARVnZXRUb2tlblBheW1lbnRBbW91bnQBBQd0b2tlbklkBAh0b1JldHVybgkAZQIDCQECIT0CBQ1wYXltZW50QW1vdW50AAAFDXBheW1lbnRBbW91bnQAAAUCRGsEAXQDAwUKbmVlZENoYW5nZQkAZgIFCHRvUmV0dXJuAAAHCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzBQh0b1JldHVybgUHdG9rZW5JZAUDbmlsBQNuaWwJAM4IAgkAzggCBQVhY2N1bQUBdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFB3Rva2VuSWQCCF9iYWxhbmNlCQBkAgUCQmsFAkRrBQNuaWwKAAIkbAUIYXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEWhhbmRsZVRva2VuQ2hhbmdlAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGY0XzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmNF8yAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKARZoYW5kbGVQb29sVG9rZW5zUmVkZWVtAglQUmVkZWVtZWQLdXNlckFkZHJlc3MKARFoYW5kbGVUb2tlblJlZGVlbQIFYWNjdW0HdG9rZW5JZAQCQmsJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFB3Rva2VuSWQCCF9iYWxhbmNlBAdQU3VwcGx5CQENdHJ5R2V0SW50ZWdlcgECF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BA10b2tlbkRlY2ltYWxzCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdzdGF0aWNfCQEOZ2V0QXNzZXRTdHJpbmcBBQd0b2tlbklkAgZfc2NhbGUEBmFtb3VudAkAoAMBCQC9AgQJALgCAgkAtgIBBQZTY2FsZTgJAL0CBAkAtgIBCQBlAgUHUFN1cHBseQUJUFJlZGVlbWVkCQC2AgEFBlNjYWxlOAkAtgIBBQdQU3VwcGx5BQdDRUlMSU5HCQC2AgEFAkJrCQC2AgEFBlNjYWxlOAUERE9XTgkAzggCBQVhY2N1bQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFB3Rva2VuSWQCCF9iYWxhbmNlCQBlAgUCQmsFBmFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQt1c2VyQWRkcmVzcwUGYW1vdW50BQd0b2tlbklkBQNuaWwKAAIkbAUIYXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEWhhbmRsZVRva2VuUmVkZWVtAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGY0XzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmNF8yAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKARJjYWxjdWxhdGVPdXRBbW91bnQFCEFtb3VudEluB2Fzc2V0SW4IYXNzZXRPdXQJQmFsYW5jZUluCkJhbGFuY2VPdXQEB0luZGV4SW4JAQV2YWx1ZQEJAM8IAgUIYXNzZXRJZHMFB2Fzc2V0SW4ECEluZGV4T3V0CQEFdmFsdWUBCQDPCAIFCGFzc2V0SWRzBQhhc3NldE91dAMJAAACBQdJbmRleEluBQhJbmRleE91dAUIQW1vdW50SW4JAG4EBQpCYWxhbmNlT3V0CQBlAgkAaAIFBlNjYWxlOAUGU2NhbGU4CQCgAwEJAHYGCQC9AgQJALYCAQUJQmFsYW5jZUluCQC2AgEJAGgCBQZTY2FsZTgFBlNjYWxlOAkAtgIBCQBkAgUJQmFsYW5jZUluBQhBbW91bnRJbgUGSEFMRlVQABAJALYCAQkAawMJAJEDAgUNQXNzZXRzV2VpZ2h0cwUHSW5kZXhJbgCQTgkAkQMCBQ1Bc3NldHNXZWlnaHRzBQhJbmRleE91dAAEABAFB0NFSUxJTkcJAGgCBQZTY2FsZTgFBlNjYWxlOAUERE9XTgEPZ2V0VG9rZW5CYWxhbmNlAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAXQFByRtYXRjaDAJAPAHAgUEdGhpcwUBdAgJAO8HAQUEdGhpcwlhdmFpbGFibGUBHWNhbGN1bGF0ZUN1cnJlbnRBc3NldEludGVyZXN0BAdhc3NldElkCmFzc2V0SWRTdHIIYUJhbGFuY2UWdG9rZW5FYXJuaW5nc0xhc3RDaGVjawQLdG90YWxTdGFrZWQJAQ10cnlHZXRJbnRlZ2VyAQISZ2xvYmFsX2luZGV4U3Rha2VkBBV0b2tlbkJhbGFuY2VMYXN0Q2hlY2sFFnRva2VuRWFybmluZ3NMYXN0Q2hlY2sEE2N1cnJlbnRCYWxhbmNlRGVsdGEJAGUCCQEPZ2V0VG9rZW5CYWxhbmNlAQUHYXNzZXRJZAUIYUJhbGFuY2UEFGN1cnJlbnRUb2tlbkVhcm5pbmdzAwkAZgIFE2N1cnJlbnRCYWxhbmNlRGVsdGEFFXRva2VuQmFsYW5jZUxhc3RDaGVjawUTY3VycmVudEJhbGFuY2VEZWx0YQUVdG9rZW5CYWxhbmNlTGFzdENoZWNrBAtuZXdFYXJuaW5ncwkAZQIFFGN1cnJlbnRUb2tlbkVhcm5pbmdzBRV0b2tlbkJhbGFuY2VMYXN0Q2hlY2sEC25ld0ludGVyZXN0AwkAAAIFC3RvdGFsU3Rha2VkAAAAAAkAawMFC25ld0Vhcm5pbmdzBQZTY2FsZTgFC3RvdGFsU3Rha2VkBBFsYXN0Q2hlY2tJbnRlcmVzdAkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIRZ2xvYmFsX2xhc3RDaGVja18FCmFzc2V0SWRTdHICCV9pbnRlcmVzdAkAZAIFEWxhc3RDaGVja0ludGVyZXN0BQtuZXdJbnRlcmVzdAELY2xhaW1SZXN1bHQBB2FkZHJlc3MECmFkZHJlc3NTdHIJAKUIAQUHYWRkcmVzcwQMcHV6emxlQW1vdW50CQENdHJ5R2V0SW50ZWdlcgEJAKwCAgUKYWRkcmVzc1N0cgIMX2luZGV4U3Rha2VkCgEHaGFuZGxlcgIFYWNjdW0HYXNzZXRJZAQKYXNzZXRJZFN0cgkBDmdldEFzc2V0U3RyaW5nAQUHYXNzZXRJZAQIYUJhbGFuY2UJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFB2Fzc2V0SWQCCF9iYWxhbmNlBBZ0b2tlbkVhcm5pbmdzTGFzdENoZWNrCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAhFnbG9iYWxfbGFzdENoZWNrXwUKYXNzZXRJZFN0cgIJX2Vhcm5pbmdzBBRjdXJyZW50VG9rZW5JbnRlcmVzdAkBHWNhbGN1bGF0ZUN1cnJlbnRBc3NldEludGVyZXN0BAUHYXNzZXRJZAUKYXNzZXRJZFN0cgUIYUJhbGFuY2UFFnRva2VuRWFybmluZ3NMYXN0Q2hlY2sEFGN1cnJlbnRUb2tlbkVhcm5pbmdzCQCWAwEJAMwIAgUWdG9rZW5FYXJuaW5nc0xhc3RDaGVjawkAzAgCCQBlAgkBD2dldFRva2VuQmFsYW5jZQEFB2Fzc2V0SWQFCGFCYWxhbmNlBQNuaWwEDHJld2FyZEFtb3VudAkAawMFDHB1enpsZUFtb3VudAkAZQIFFGN1cnJlbnRUb2tlbkludGVyZXN0CQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICCQCsAgIFCmFkZHJlc3NTdHICC19sYXN0Q2hlY2tfBQphc3NldElkU3RyAglfaW50ZXJlc3QFBlNjYWxlOAQIdHJhbnNmZXIDCQAAAgUMcmV3YXJkQW1vdW50AAAFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQdhZGRyZXNzBQxyZXdhcmRBbW91bnQFB2Fzc2V0SWQFA25pbAkAlAoCCQDOCAIJAM4IAggFBWFjY3VtAl8xBQh0cmFuc2ZlcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICEWdsb2JhbF9sYXN0Q2hlY2tfBQphc3NldElkU3RyAglfZWFybmluZ3MJAGUCBRRjdXJyZW50VG9rZW5FYXJuaW5ncwUMcmV3YXJkQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIRZ2xvYmFsX2xhc3RDaGVja18FCmFzc2V0SWRTdHICCV9pbnRlcmVzdAUUY3VycmVudFRva2VuSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFCmFkZHJlc3NTdHICC19sYXN0Q2hlY2tfBQphc3NldElkU3RyAglfaW50ZXJlc3QFFGN1cnJlbnRUb2tlbkludGVyZXN0BQNuaWwJAGQCCAUFYWNjdW0CXzIJARJjYWxjdWxhdGVVc2RuVmFsdWUEBQdhc3NldElkBQxyZXdhcmRBbW91bnQFCGFCYWxhbmNlBQR1bml0BAVhY2N1bQoAAiRsBQxlYXJuZWRBc3NldHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAAACgEFJGY0XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdoYW5kbGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGY0XzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmNF8yAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCQCUCgIJAM4IAggFBWFjY3VtAl8xCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCmFkZHJlc3NTdHICE19jbGFpbWVkUmV3YXJkVmFsdWUJAGQCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgUKYWRkcmVzc1N0cgITX2NsYWltZWRSZXdhcmRWYWx1ZQgFBWFjY3VtAl8yCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCmFkZHJlc3NTdHICCl9sYXN0Q2xhaW0IBQlsYXN0QmxvY2sJdGltZXN0YW1wBQNuaWwIBQVhY2N1bQJfMgEQaW5kZXhTdGFrZVJlc3VsdAIKYWRkcmVzc1N0cgZhbW91bnQEAmxpCAkBC2NsYWltUmVzdWx0AQkBEUBleHRyTmF0aXZlKDEwNjIpAQUKYWRkcmVzc1N0cgJfMQkAzggCBQJsaQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQphZGRyZXNzU3RyAgxfaW5kZXhTdGFrZWQJAGQCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgUKYWRkcmVzc1N0cgIMX2luZGV4U3Rha2VkBQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQICEmdsb2JhbF9pbmRleFN0YWtlZAkAZAIJAQ10cnlHZXRJbnRlZ2VyAQISZ2xvYmFsX2luZGV4U3Rha2VkBQZhbW91bnQFA25pbAEDc3VtAgVhY2N1bQFuCQBkAgUFYWNjdW0JAQ1wYXJzZUludFZhbHVlAQUBbgoBaQEHcHJlSW5pdAYLYXNzZXRJZHNTdHIPYXNzZXRXZWlnaHRzU3RyDmJhc2VUb2tlbklkU3RyCnBvb2xEb21haW4JcG9vbE93bmVyA2ZlZQQQcG9vbE93bmVyQWRkcmVzcwkBB0FkZHJlc3MBCQDZBAEFCXBvb2xPd25lcgMJAQppc1NodXRkb3duAAkAAgECE2NvbnRyYWN0IGlzIG9uIHN0b3ADCQECIT0CBQR0aGlzCAUBaQZjYWxsZXIJAAIBAgphZG1pbiBvbmx5AwkAZgIJALECAQUKcG9vbERvbWFpbgANCQACAQIVdG9vIGxhcmdlIHBvb2wgZG9tYWluAwMJAGYCBQNmZWUA9AMGCQBmAgAyBQNmZWUJAAIBAi1mZWUgdmFsdWUgbXVzdCBiZSBiZXR3ZWVuIDUwIGFuZCA1MDAgKDAuNS01JSkDAwMJAAACCQCzCQIFC2Fzc2V0SWRzU3RyBRBwdXp6bGVBc3NldElkU3RyBQR1bml0CQAAAgkAswkCBQthc3NldElkc1N0cgUOdXNkbkFzc2V0SWRTdHIFBHVuaXQHCQAAAgkAswkCBQthc3NldElkc1N0cgUOdXNkdEFzc2V0SWRTdHIFBHVuaXQHCQACAQI2cG9vbCBtdXN0IGhhdmUgVVNEVCwgVVNETiBvciBQVVpaTEUgaW4gdGhlIGNvbXBvc2l0aW9uBA1hc3NldElkc1N0ckxpCQC1CQIFC2Fzc2V0SWRzU3RyAgEsBAphc3NldElkc0xpCgACJGwFDWFzc2V0SWRzU3RyTGkKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBE2FkZEFzc2V0Qnl0ZXNUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoEEWFzc2V0V2VpZ2h0c1N0ckxpCQC1CQIFD2Fzc2V0V2VpZ2h0c1N0cgIBLAQPYXNzZXRXZWlnaHRzU3VtCgACJGwFEWFzc2V0V2VpZ2h0c1N0ckxpCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGY1XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNzdW0CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjVfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY1XzICCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoEC2ZlZUFzc2V0U3RyAwkAAAIJALMJAgULYXNzZXRJZHNTdHIFDnVzZG5Bc3NldElkU3RyBQR1bml0AwkAAAIJALMJAgULYXNzZXRJZHNTdHIFEHB1enpsZUFzc2V0SWRTdHIFBHVuaXQFDnVzZHRBc3NldElkU3RyBRBwdXp6bGVBc3NldElkU3RyBQ51c2RuQXNzZXRJZFN0cgoBE2FkZFRva2VuRGF0YUVudHJpZXMCBWFjY3VtCGFzc2V0TnVtAwkAZwIFCGFzc2V0TnVtCQCQAwEFCmFzc2V0SWRzTGkFBWFjY3VtBA1hc3NldERlY2ltYWxzBAckbWF0Y2gwCQCRAwIFCmFzc2V0SWRzTGkFCGFzc2V0TnVtAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAXgFByRtYXRjaDAICQEFdmFsdWUBCQDsBwEFAXgIZGVjaW1hbHMACAkAzggCBQVhY2N1bQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICB3N0YXRpY18JAJEDAgUNYXNzZXRJZHNTdHJMaQUIYXNzZXROdW0CBl9zY2FsZQkAbAYACgAABQ1hc3NldERlY2ltYWxzAAAAAAUERE9XTgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICB3N0YXRpY18JAJEDAgUNYXNzZXRJZHNTdHJMaQUIYXNzZXROdW0CCV9kZWNpbWFscwUNYXNzZXREZWNpbWFscwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICB3N0YXRpY18JAJEDAgUNYXNzZXRJZHNTdHJMaQUIYXNzZXROdW0CB193ZWlnaHQJAQV2YWx1ZQEJALYJAQkAkQMCBRFhc3NldFdlaWdodHNTdHJMaQUIYXNzZXROdW0FA25pbAMJAQIhPQIFD2Fzc2V0V2VpZ2h0c1N1bQCQTgkAAgECK3N1bSBvZiB0b2tlbiB3ZWlnaHRzIG11c3QgYmUgZXF1YWwgdG8gMTAwMDAJAM4IAgoAAiRsCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFCQDMCAIABgkAzAgCAAcJAMwIAgAICQDMCAIACQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGY2XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARNhZGRUb2tlbkRhdGFFbnRyaWVzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGY2XzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmNl8yAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCQDMCAIJAQtTdHJpbmdFbnRyeQICD3N0YXRpY190b2tlbklkcwULYXNzZXRJZHNTdHIJAMwIAgkBC1N0cmluZ0VudHJ5AgIPc3RhdGljX2ZlZVRva2VuBQtmZWVBc3NldFN0cgkAzAgCCQELU3RyaW5nRW50cnkCAhNzdGF0aWNfdG9rZW5XZWlnaHRzBQ9hc3NldFdlaWdodHNTdHIJAMwIAgkBDEludGVnZXJFbnRyeQICE3N0YXRpY190b2tlbnNBbW91bnQJAJADAQUKYXNzZXRJZHNMaQkAzAgCCQELU3RyaW5nRW50cnkCAhFzdGF0aWNfcG9vbERvbWFpbgUKcG9vbERvbWFpbgkAzAgCCQELU3RyaW5nRW50cnkCAhJzdGF0aWNfYmFzZVRva2VuSWQFDmJhc2VUb2tlbklkU3RyCQDMCAIJAQtTdHJpbmdFbnRyeQICEHN0YXRpY19wb29sT3duZXIFCXBvb2xPd25lcgkAzAgCCQEMSW50ZWdlckVudHJ5AgIKc3RhdGljX2ZlZQUDZmVlBQNuaWwBaQEGZGVJbml0AAMJAQppc1NodXRkb3duAAkAAgECE2NvbnRyYWN0IGlzIG9uIHN0b3ADCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAgphZG1pbiBvbmx5CQDMCAIJAQxJbnRlZ2VyRW50cnkCAhBnbG9iYWxfd2FzSW5pdGVkAAAFA25pbAFpAQRpbml0AAoBC3ByZXBhcmVMaXN0AAoBB2hhbmRsZXICBWFjY3VtAW4JAM4IAgUFYWNjdW0JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgdnbG9iYWxfCQEOZ2V0QXNzZXRTdHJpbmcBCAUBbgdhc3NldElkAghfYmFsYW5jZQgFAW4GYW1vdW50BQNuaWwKAAIkbAgFAWkIcGF5bWVudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoKARljYWxjdWxhdGVQb29sVG9rZW5zQW1vdW50AQhwYXltZW50cwoBB2hhbmRsZXICBWFjY3VtA3BtdAQHYXNzZXRJZAgFA3BtdAdhc3NldElkCgEIaGFuZGxlcjICBWFjY3VtAW4DCQAAAgUBbgUHYXNzZXRJZAkBBXZhbHVlAQkAzwgCBQhhc3NldElkcwUBbgUFYWNjdW0EBVRva2VuCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAABCgEFJGY0XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQhoYW5kbGVyMgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmNF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjRfMgIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgkAawMFBWFjY3VtCQBsBggFA3BtdAZhbW91bnQJAJEDAgUIRGVjaW1hbHMFBVRva2VuCQCRAwIFDUFzc2V0c1dlaWdodHMFBVRva2VuBRVBc3NldHNXZWlnaHRzRGVjaW1hbHMACAUFRkxPT1IFBlNjYWxlOAoAAiRsBQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFDlBvb2xUb2tlblNjYWxlCgEFJGY0XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdoYW5kbGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGY0XzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmNF8yAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAwkBCmlzU2h1dGRvd24ACQACAQITY29udHJhY3QgaXMgb24gc3RvcAMJAGYCCQENdHJ5R2V0SW50ZWdlcgECEGdsb2JhbF93YXNJbml0ZWQAAAkAAgECE3Bvb2wgYWxyZWFkeSBpbml0ZWQEEWluaXRpYWxQb29sVG9rZW5zCQEZY2FsY3VsYXRlUG9vbFRva2Vuc0Ftb3VudAEIBQFpCHBheW1lbnRzAwkAAAIFEWluaXRpYWxQb29sVG9rZW5zAAAJAAIBAjJ5b3UgbmVlZCBhIGJpZ2dlciB0b2tlbnMgYW1vdW50IHRvIGxhdW5jaCB0aGUgcG9vbAQOcG9vbFRva2VuSXNzdWUJAMMIBwkArAICAgNQWiAJAQx0cnlHZXRTdHJpbmcBAhFzdGF0aWNfcG9vbERvbWFpbgIdUHV6emxlIFN3YXA6IHBvb2wgaW5kZXggdG9rZW4FEWluaXRpYWxQb29sVG9rZW5zBRFQb29sVG9rZW5EZWNpbWFscwYFBHVuaXQAAAQLcG9vbFRva2VuSWQJALgIAQUOcG9vbFRva2VuSXNzdWUJAM4IAgkBC3ByZXBhcmVMaXN0AAkAzAgCBQ5wb29sVG9rZW5Jc3N1ZQkAzAgCCQEMSW50ZWdlckVudHJ5AgIXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQFEWluaXRpYWxQb29sVG9rZW5zCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhBnbG9iYWxfd2FzSW5pdGVkAAEJAMwIAgkBC0JpbmFyeUVudHJ5AgITZ2xvYmFsX3Bvb2xUb2tlbl9pZAULcG9vbFRva2VuSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgIWc3RhdGljX3Bvb2xUb2tlbl9pZFN0cgkBDmdldEFzc2V0U3RyaW5nAQULcG9vbFRva2VuSWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkApQgBCAUBaQZjYWxsZXICDF9pbmRleFN0YWtlZAURaW5pdGlhbFBvb2xUb2tlbnMJAMwIAgkBDEludGVnZXJFbnRyeQICEmdsb2JhbF9pbmRleFN0YWtlZAURaW5pdGlhbFBvb2xUb2tlbnMFA25pbAFpAQ1nZW5lcmF0ZUluZGV4AQpuZWVkQ2hhbmdlAwkBCmlzU2h1dGRvd24ACQACAQITY29udHJhY3QgaXMgb24gc3RvcAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMFAVQJAAIBCQCsAgICO3lvdSBuZWVkIHRvIGF0dGFjaCBhbGwgcG9vbCB0b2tlbnMuIGFtb3VudCBvZiBwb29sIHRva2VuczogCQCkAwEFAVQDCQEBIQEJARNjaGVja1Rva2Vuc1ZhbGlkaXR5AQgFAWkIcGF5bWVudHMJAAIBAhV3cm9uZyBhc3NldHMgYXR0YWNoZWQEB1BJc3N1ZWQJAQ1nZXRNaW5QSXNzdWVkAQgFAWkIcGF5bWVudHMEB3JlaXNzdWUJAQdSZWlzc3VlAwkBEUBleHRyTmF0aXZlKDEwNTcpAQITZ2xvYmFsX3Bvb2xUb2tlbl9pZAUHUElzc3VlZAYEBnJlc3VsdAkBE2hhbmRsZVBvb2xUb2tlbnNBZGQEBQdQSXNzdWVkCAUBaQhwYXltZW50cwgFAWkMb3JpZ2luQ2FsbGVyBQpuZWVkQ2hhbmdlCQCUCgIJAM4IAgUGcmVzdWx0CQDMCAIFB3JlaXNzdWUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQdQSXNzdWVkCQEMdHJ5R2V0QmluYXJ5AQITZ2xvYmFsX3Bvb2xUb2tlbl9pZAkAzAgCCQEMSW50ZWdlckVudHJ5AgIXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQJAGQCCQENdHJ5R2V0SW50ZWdlcgECF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BQdQSXNzdWVkBQNuaWwFB1BJc3N1ZWQBaQEKc3Rha2VJbmRleAAECmFkZHJlc3NTdHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAMJAQppc1NodXRkb3duAAkAAgECE2NvbnRyYWN0IGlzIG9uIHN0b3ADCQECIT0CCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQJAQx0cnlHZXRCaW5hcnkBAhNnbG9iYWxfcG9vbFRva2VuX2lkCQACAQIUd3JvbmcgYXNzZXQgYXR0YWNoZWQJARBpbmRleFN0YWtlUmVzdWx0AgUKYWRkcmVzc1N0cggFA3BtdAZhbW91bnQBaQEMdW5zdGFrZUluZGV4AQxwdXp6bGVBbW91bnQECmFkZHJlc3NTdHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBA9wdXp6bGVBdmFpbGFibGUJAQ10cnlHZXRJbnRlZ2VyAQkArAICBQphZGRyZXNzU3RyAgxfaW5kZXhTdGFrZWQDCQEKaXNTaHV0ZG93bgAJAAIBAhNjb250cmFjdCBpcyBvbiBzdG9wAwkAZgIFDHB1enpsZUFtb3VudAUPcHV6emxlQXZhaWxhYmxlCQACAQIleW91IGRvbid0IGhhdmUgaW5kZXggdG9rZW5zIGF2YWlsYWJsZQMJAQppc1NodXRkb3duAAkAAgECE2NvbnRyYWN0IGlzIG9uIHN0b3AJAM4IAggJAQtjbGFpbVJlc3VsdAEIBQFpDG9yaWdpbkNhbGxlcgJfMQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQphZGRyZXNzU3RyAgxfaW5kZXhTdGFrZWQJAGUCBQ9wdXp6bGVBdmFpbGFibGUFDHB1enpsZUFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgISZ2xvYmFsX2luZGV4U3Rha2VkCQBlAgkBDXRyeUdldEludGVnZXIBAhJnbG9iYWxfaW5kZXhTdGFrZWQFDHB1enpsZUFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFDHB1enpsZUFtb3VudAkBEUBleHRyTmF0aXZlKDEwNTcpAQITZ2xvYmFsX3Bvb2xUb2tlbl9pZAUDbmlsAWkBEWNsYWltSW5kZXhSZXdhcmRzAAMJAQppc1NodXRkb3duAAkAAgECE2NvbnRyYWN0IGlzIG9uIHN0b3AJAQtjbGFpbVJlc3VsdAEIBQFpBmNhbGxlcgFpAQ1ldmFsdWF0ZUNsYWltAQR1c2VyCQCUCgIFA25pbAgJAQtjbGFpbVJlc3VsdAEJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBHVzZXICXzIBaQELcmVkZWVtSW5kZXgBDHNlbmRUb09yaWdpbgQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQJAQx0cnlHZXRCaW5hcnkBAhNnbG9iYWxfcG9vbFRva2VuX2lkCQACAQIecGxlYXNlIGF0dGFjaCBwb29sIHNoYXJlIHRva2VuAwkBCmlzU2h1dGRvd24ACQACAQITY29udHJhY3QgaXMgb24gc3RvcAQJUFJlZGVlbWVkCAUDcG10BmFtb3VudAQGcmVzdWx0CQEWaGFuZGxlUG9vbFRva2Vuc1JlZGVlbQIFCVBSZWRlZW1lZAMFDHNlbmRUb09yaWdpbggFAWkMb3JpZ2luQ2FsbGVyCAUBaQZjYWxsZXIJAM4IAgUGcmVzdWx0CQDMCAIJAQRCdXJuAgkBDHRyeUdldEJpbmFyeQECE2dsb2JhbF9wb29sVG9rZW5faWQFCVBSZWRlZW1lZAkAzAgCCQEMSW50ZWdlckVudHJ5AgIXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQJAGUCCQENdHJ5R2V0SW50ZWdlcgECF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BQlQUmVkZWVtZWQFA25pbAFpAQRzd2FwAghhc3NldE91dAdtaW5pbXVtBANwbXQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABCQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAJAAIBAiFwbGVhc2UgYXR0YWNoIGV4YWN0bHkgb25lIHBheW1lbnQECEFtb3VudEluCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQHQXNzZXRJbggFA3BtdAdhc3NldElkBAhBc3NldE91dAkBDWdldEFzc2V0Qnl0ZXMBBQhhc3NldE91dAQOZmVlQXNzZXRPdXRTdHIJAQx0cnlHZXRTdHJpbmcBAg9zdGF0aWNfZmVlVG9rZW4EC2ZlZUFzc2V0T3V0AwkAAAIFDmZlZUFzc2V0T3V0U3RyAgAFC3VzZG5Bc3NldElkCQDZBAEFDmZlZUFzc2V0T3V0U3RyBA5Bc3NldEluQmFsYW5jZQkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIHZ2xvYmFsXwkBDmdldEFzc2V0U3RyaW5nAQUHQXNzZXRJbgIIX2JhbGFuY2UED0Fzc2V0T3V0QmFsYW5jZQkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIHZ2xvYmFsXwUIYXNzZXRPdXQCCF9iYWxhbmNlBAtmZWVBbW91bnRJbgkAawMFCEFtb3VudEluBQNGZWUFCEZlZVNjYWxlBA1jbGVhbkFtb3VudEluCQBlAgUIQW1vdW50SW4FC2ZlZUFtb3VudEluBAlBbW91bnRPdXQJARJjYWxjdWxhdGVPdXRBbW91bnQFBQ1jbGVhbkFtb3VudEluBQdBc3NldEluBQhBc3NldE91dAUOQXNzZXRJbkJhbGFuY2UFD0Fzc2V0T3V0QmFsYW5jZQQQQXNzZXRPdXRCYWxhbmNlMgkAZQIFD0Fzc2V0T3V0QmFsYW5jZQUJQW1vdW50T3V0BA9Bc3NldEluQmFsYW5jZTIJAGQCBQ5Bc3NldEluQmFsYW5jZQUNY2xlYW5BbW91bnRJbgQSZmVlQXNzZXRPdXRCYWxhbmNlAwkAAAIFC2ZlZUFzc2V0T3V0BQdBc3NldEluBQ9Bc3NldEluQmFsYW5jZTIDCQAAAgULZmVlQXNzZXRPdXQFCEFzc2V0T3V0BRBBc3NldE91dEJhbGFuY2UyCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdnbG9iYWxfCQEOZ2V0QXNzZXRTdHJpbmcBBQtmZWVBc3NldE91dAIIX2JhbGFuY2UEDGZlZUFtb3VudE91dAkBEmNhbGN1bGF0ZU91dEFtb3VudAUFC2ZlZUFtb3VudEluBQdBc3NldEluBQtmZWVBc3NldE91dAUOQXNzZXRJbkJhbGFuY2UFEmZlZUFzc2V0T3V0QmFsYW5jZQMJAGYCBQdtaW5pbXVtBQlBbW91bnRPdXQJAAIBCQCsAgICK2Ftb3VudCB0byByZWNpZXZlIGlzIGxvd2VyIHRoYW4gZ2l2ZW4gb25lOiAJAKQDAQUJQW1vdW50T3V0AwkAAAIFCEFzc2V0T3V0BQdBc3NldEluCQACAQIYdGhpcyBzd2FwIGlzIG5vdCBhbGxvd2VkAwkAZgIAAAkAZQIFD0Fzc2V0T3V0QmFsYW5jZQUJQW1vdW50T3V0CQACAQIbY29udHJhY3QgaXMgb3V0IG9mIHJlc2VydmVzAwkBCmlzU2h1dGRvd24ACQACAQITY29udHJhY3QgaXMgb24gc3RvcAQKY3JlYXRvckZlZQkAawMFDGZlZUFtb3VudE91dAABAAoEC3Byb3RvY29sRmVlCQBrAwUMZmVlQW1vdW50T3V0AAQACgQMc3Rha2luZ1RvcFVwAwkAAAIFC2ZlZUFzc2V0T3V0BQt1c2RuQXNzZXRJZAkA/QcECQEHQWRkcmVzcwEBGgFXlGiM+e6iuaqf1vWOvKmPZxqcBvQWKYm7Agt0b3BVcFJld2FyZAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQtmZWVBc3NldE91dAULcHJvdG9jb2xGZWUFA25pbAUEdW5pdAMJAAACBQxzdGFraW5nVG9wVXAFDHN0YWtpbmdUb3BVcAQMbmV3QmFsYW5jZUluCQBlAgUPQXNzZXRJbkJhbGFuY2UyAwkAAAIFB0Fzc2V0SW4FC2ZlZUFzc2V0T3V0BQxmZWVBbW91bnRPdXQAAAQNbmV3QmFsYW5jZU91dAkAZQIFEEFzc2V0T3V0QmFsYW5jZTIDCQAAAgUIQXNzZXRPdXQFC2ZlZUFzc2V0T3V0BQxmZWVBbW91bnRPdXQAAAQSbmV3QmFsYW5jZUZlZUFzc2V0AwMJAQIhPQIFC2ZlZUFzc2V0T3V0BQdBc3NldEluCQECIT0CBQtmZWVBc3NldE91dAUIQXNzZXRPdXQHCQBlAgUSZmVlQXNzZXRPdXRCYWxhbmNlBQxmZWVBbW91bnRPdXQFBHVuaXQEDWFzc2V0SW5DaGFuZ2UJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIHZ2xvYmFsXwkBDmdldEFzc2V0U3RyaW5nAQUHQXNzZXRJbgIIX2JhbGFuY2UFDG5ld0JhbGFuY2VJbgQOYXNzZXRPdXRDaGFuZ2UJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIHZ2xvYmFsXwUIYXNzZXRPdXQCCF9iYWxhbmNlBQ1uZXdCYWxhbmNlT3V0BBFmZWVBc3NldE91dENoYW5nZQMJAQIhPQIFEm5ld0JhbGFuY2VGZWVBc3NldAUEdW5pdAkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgdnbG9iYWxfCQEOZ2V0QXNzZXRTdHJpbmcBBQtmZWVBc3NldE91dAIIX2JhbGFuY2UFEmZlZUFzc2V0T3V0QmFsYW5jZQkBC1N0cmluZ0VudHJ5AgIFaGVsbG8CBXdvcmxkCQCUCgIJAM4IAgkAzAgCBQ5hc3NldE91dENoYW5nZQkAzAgCBQ1hc3NldEluQ2hhbmdlCQDMCAIFEWZlZUFzc2V0T3V0Q2hhbmdlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUJQW1vdW50T3V0BQhBc3NldE91dAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBCQEMdHJ5R2V0U3RyaW5nAQIQc3RhdGljX3Bvb2xPd25lcgUKY3JlYXRvckZlZQULZmVlQXNzZXRPdXQJAMwIAgkBDEludGVnZXJFbnRyeQICFGdsb2JhbF9lYXJuZWRCeU93bmVyCQBkAgkBDXRyeUdldEludGVnZXIBAhRnbG9iYWxfZWFybmVkQnlPd25lcgUKY3JlYXRvckZlZQkAzAgCCQEMSW50ZWdlckVudHJ5AgINZ2xvYmFsX3ZvbHVtZQkAZAIJAQ10cnlHZXRJbnRlZ2VyAQINZ2xvYmFsX3ZvbHVtZQkBEmNhbGN1bGF0ZVVzZG5WYWx1ZQQFB0Fzc2V0SW4FCEFtb3VudEluBQ5Bc3NldEluQmFsYW5jZQUSZmVlQXNzZXRPdXRCYWxhbmNlBQNuaWwDCQAAAgUMc3Rha2luZ1RvcFVwBQR1bml0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQEaAVce4ftAMWuB5uxLVhsFLFGhk27fCbE80sEFC3Byb3RvY29sRmVlBQtmZWVBc3NldE91dAUDbmlsBQNuaWwFCUFtb3VudE91dAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQADCQEKaXNTaHV0ZG93bgAHAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleQYJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFDG1hc3RlclB1YktleV6psVg=",
    "height": 3493082,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: AXTYajLRqwfNvR6nuS6v5Sf7hjL7Y9fmAbAEqZybjqXj
Next: none

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'
7+
8+let usdtAssetId = base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ'
9+
10+let usdnAssetIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
11+
12+let puzzleAssetIdStr = "HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS"
13+
14+let usdtAssetIdStr = "34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ"
15+
16+let parentPoolAddress = Address(base58'3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh')
717 
818 let masterAddress = Address(base58'3PLjwHcz9NEuaTo63NZR9B9okQiKQxZSbmf')
919 
191201 
192202 
193203 func calculateUsdnValue (assetId,amount,aBalance,givenUsdnBalance) = {
194-    let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnAssetId))]
204+    let usdnInPool = indexOf(assetIds, usdnAssetId)
205+    let usdtInPool = indexOf(assetIds, usdtAssetId)
195206     let assetWeight = AssetsWeights[value(indexOf(assetIds, assetId))]
196-    let usdnBalance =     match givenUsdnBalance {
197-        case x: Int => 
198-            givenUsdnBalance
199-        case _ => 
200-            tryGetInteger((("global_" + getAssetString(usdnAssetId)) + "_balance"))
201-    }
202-    fraction(amount, (value(usdnBalance) / usdnWeight), (aBalance / assetWeight))
207+    if (if ((usdnInPool == unit))
208+        then (usdtInPool == unit)
209+        else false)
210+        then {
211+            let puzzleWeight = AssetsWeights[value(indexOf(assetIds, puzzleAssetId))]
212+            let puzzleBalance = tryGetInteger((("global_" + puzzleAssetIdStr) + "_balance"))
213+            let amountInPuzzle = fraction(amount, (puzzleBalance / puzzleWeight), (aBalance / assetWeight))
214+            let puzzlePrice = getIntegerValue(parentPoolAddress, "global_lastPuzzlePrice")
215+            fraction((amountInPuzzle * puzzlePrice), 1, Scale8)
216+            }
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+                }
203233     }
204234 
205235 
387417 
388418         $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)
389419         }
390-    (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)
391421     }
392422 
393423 
394424 func indexStakeResult (addressStr,amount) = {
395-    let li = claimResult(addressFromStringValue(addressStr))
425+    let li = claimResult(addressFromStringValue(addressStr))._1
396426     (li ++ [IntegerEntry((addressStr + "_indexStaked"), (tryGetInteger((addressStr + "_indexStaked")) + amount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") + amount))])
397427     }
398428 
403433 @Callable(i)
404434 func preInit (assetIdsStr,assetWeightsStr,baseTokenIdStr,poolDomain,poolOwner,fee) = {
405435     let poolOwnerAddress = Address(fromBase58String(poolOwner))
406-    if ((this != i.caller))
407-        then throw("admin only")
408-        else if ((size(poolDomain) > 13))
409-            then throw("too large pool domain")
410-            else if (if ((fee > 500))
411-                then true
412-                else (50 > fee))
413-                then throw("fee value must be between 50 and 500 (0.5-5%)")
414-                else {
415-                    let assetIdsStrLi = split(assetIdsStr, ",")
416-                    let assetIdsLi = {
417-                        let $l = assetIdsStrLi
418-                        let $s = size($l)
419-                        let $acc0 = nil
420-                        func $f4_1 ($a,$i) =                         if (($i >= $s))
421-                            then $a
422-                            else addAssetBytesToList($a, $l[$i])
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
456+                                let $s = size($l)
457+                                let $acc0 = nil
458+                                func $f4_1 ($a,$i) =                                 if (($i >= $s))
459+                                    then $a
460+                                    else addAssetBytesToList($a, $l[$i])
423461 
424-                        func $f4_2 ($a,$i) =                         if (($i >= $s))
425-                            then $a
426-                            else throw("List size exceeds 10")
462+                                func $f4_2 ($a,$i) =                                 if (($i >= $s))
463+                                    then $a
464+                                    else throw("List size exceeds 10")
427465 
428-                        $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)
429-                        }
430-                    let assetWeightsStrLi = split(assetWeightsStr, ",")
431-                    let assetWeightsSum = {
432-                        let $l = assetWeightsStrLi
433-                        let $s = size($l)
434-                        let $acc0 = 0
435-                        func $f5_1 ($a,$i) =                         if (($i >= $s))
436-                            then $a
437-                            else sum($a, $l[$i])
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])
438476 
439-                        func $f5_2 ($a,$i) =                         if (($i >= $s))
440-                            then $a
441-                            else throw("List size exceeds 10")
477+                                func $f5_2 ($a,$i) =                                 if (($i >= $s))
478+                                    then $a
479+                                    else throw("List size exceeds 10")
442480 
443-                        $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)
444-                        }
445-                    func addTokenDataEntries (accum,assetNum) =                     if ((assetNum >= size(assetIdsLi)))
446-                        then accum
447-                        else {
448-                            let assetDecimals =                             match assetIdsLi[assetNum] {
449-                                case x: ByteVector => 
450-                                    value(assetInfo(x)).decimals
451-                                case _ => 
452-                                    8
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)])
453516                             }
454-                            (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])))])
455-                            }
456-
457-                    if ((assetWeightsSum != 10000))
458-                        then throw("sum of token weights must be equal to 10000")
459-                        else ({
460-                            let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
461-                            let $s = size($l)
462-                            let $acc0 = nil
463-                            func $f6_1 ($a,$i) =                             if (($i >= $s))
464-                                then $a
465-                                else addTokenDataEntries($a, $l[$i])
466-
467-                            func $f6_2 ($a,$i) =                             if (($i >= $s))
468-                                then $a
469-                                else throw("List size exceeds 10")
470-
471-                            $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)
472-                            } ++ [StringEntry("static_tokenIds", assetIdsStr), 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)])
473-                    }
474517     }
475518 
476519 
477520 
478521 @Callable(i)
479-func deInit () = if ((i.caller != this))
480-    then throw("admin only")
481-    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)]
482527 
483528 
484529 
539584         $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)
540585         }
541586 
542-    if ((tryGetInteger("global_wasInited") > 0))
543-        then throw("pool already inited")
544-        else {
545-            let initialPoolTokens = calculatePoolTokensAmount(i.payments)
546-            if ((initialPoolTokens == 0))
547-                then throw("you need a bigger tokens amount to launch the pool")
548-                else {
549-                    let poolTokenIssue = Issue(("PZ " + tryGetString("static_poolDomain")), "Puzzle Swap: pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
550-                    let poolTokenId = calculateAssetId(poolTokenIssue)
551-                    (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)])
552-                    }
553-            }
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+                }
554601     }
555602 
556603 
557604 
558605 @Callable(i)
559-func generateIndex (needChange) = if ((size(i.payments) != T))
560-    then throw(("you need to attach all pool tokens. amount of pool tokens: " + toString(T)))
561-    else if (!(checkTokensValidity(i.payments)))
562-        then throw("wrong assets attached")
563-        else {
564-            let PIssued = getMinPIssued(i.payments)
565-            let reissue = Reissue(getBinaryValue("global_poolToken_id"), PIssued, true)
566-            let result = handlePoolTokensAdd(PIssued, i.payments, i.originCaller, needChange)
567-            $Tuple2((result ++ [ScriptTransfer(i.caller, PIssued, tryGetBinary("global_poolToken_id")), reissue, IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") + PIssued))]), PIssued)
568-            }
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+                }
569618 
570619 
571620 
573622 func stakeIndex () = {
574623     let addressStr = toString(i.originCaller)
575624     let pmt = i.payments[0]
576-    if ((value(pmt.assetId) != tryGetBinary("global_poolToken_id")))
577-        then throw("wrong asset attached")
578-        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)
579630     }
580631 
581632 
584635 func unstakeIndex (puzzleAmount) = {
585636     let addressStr = toString(i.originCaller)
586637     let puzzleAvailable = tryGetInteger((addressStr + "_indexStaked"))
587-    if ((puzzleAmount > puzzleAvailable))
588-        then throw("you don't have index tokens available")
589-        else if (isShutdown())
590-            then throw("contract is on stop")
591-            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"))])
592645     }
593646 
594647 
597650 func claimIndexRewards () = if (isShutdown())
598651     then throw("contract is on stop")
599652     else claimResult(i.caller)
653+
654+
655+
656+@Callable(i)
657+func evaluateClaim (user) = $Tuple2(nil, claimResult(addressFromStringValue(user))._2)
600658 
601659 
602660 
626684     let AmountIn = value(i.payments[0].amount)
627685     let AssetIn = pmt.assetId
628686     let AssetOut = getAssetBytes(assetOut)
629-    let feeAssetIn = AssetIn
630-    let feeAssetOut = usdnAssetId
687+    let feeAssetOutStr = tryGetString("static_feeToken")
688+    let feeAssetOut = if ((feeAssetOutStr == ""))
689+        then usdnAssetId
690+        else fromBase58String(feeAssetOutStr)
631691     let AssetInBalance = tryGetInteger((("global_" + getAssetString(AssetIn)) + "_balance"))
632692     let AssetOutBalance = tryGetInteger((("global_" + assetOut) + "_balance"))
633-    let feeAssetOutBalance = tryGetInteger((("global_" + getAssetString(feeAssetOut)) + "_balance"))
634693     let feeAmountIn = fraction(AmountIn, Fee, FeeScale)
635694     let cleanAmountIn = (AmountIn - feeAmountIn)
636695     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"))
637703     let feeAmountOut = calculateOutAmount(feeAmountIn, AssetIn, feeAssetOut, AssetInBalance, feeAssetOutBalance)
638704     if ((minimum > AmountOut))
639705         then throw(("amount to recieve is lower than given one: " + toString(AmountOut)))
646712                     else {
647713                         let creatorFee = fraction(feeAmountOut, 1, 10)
648714                         let protocolFee = fraction(feeAmountOut, 4, 10)
649-                        let stakingTopUp = reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(feeAssetOut, protocolFee)])
715+                        let stakingTopUp = if ((feeAssetOut == usdnAssetId))
716+                            then reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(feeAssetOut, protocolFee)])
717+                            else unit
650718                         if ((stakingTopUp == stakingTopUp))
651719                             then {
652-                                let newBalanceIn = ((AssetInBalance + AmountIn) - (if ((AssetIn == feeAssetOut))
720+                                let newBalanceIn = (AssetInBalance2 - (if ((AssetIn == feeAssetOut))
653721                                     then feeAmountOut
654722                                     else 0))
655-                                let newBalanceOut = ((AssetOutBalance - AmountOut) - (if ((AssetOut == feeAssetOut))
723+                                let newBalanceOut = (AssetOutBalance2 - (if ((AssetOut == feeAssetOut))
656724                                     then feeAmountOut
657725                                     else 0))
658726                                 let newBalanceFeeAsset = if (if ((feeAssetOut != AssetIn))
665733                                 let feeAssetOutChange = if ((newBalanceFeeAsset != unit))
666734                                     then IntegerEntry((("global_" + getAssetString(feeAssetOut)) + "_balance"), feeAssetOutBalance)
667735                                     else StringEntry("hello", "world")
668-                                $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)))], AmountOut)
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)
669739                                 }
670740                             else throw("Strict value is not equal to itself.")
671741                         }

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'
7+
8+let usdtAssetId = base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ'
9+
10+let usdnAssetIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
11+
12+let puzzleAssetIdStr = "HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS"
13+
14+let usdtAssetIdStr = "34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ"
15+
16+let parentPoolAddress = Address(base58'3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh')
717 
818 let masterAddress = Address(base58'3PLjwHcz9NEuaTo63NZR9B9okQiKQxZSbmf')
919 
1020 let masterPubKey = base58'4z8CKSYQBKkzx7PBb5uBP1YPa6YAHRNTApW1sQVHT5eU'
1121 
1222 func tryGetInteger (key) = match getInteger(this, key) {
1323     case b: Int => 
1424         b
1525     case _ => 
1626         0
1727 }
1828 
1929 
2030 func tryGetBinary (key) = match getBinary(this, key) {
2131     case b: ByteVector => 
2232         b
2333     case _ => 
2434         base58''
2535 }
2636 
2737 
2838 func tryGetString (key) = match getString(this, key) {
2939     case b: String => 
3040         b
3141     case _ => 
3242         ""
3343 }
3444 
3545 
3646 func getAssetString (assetId) = match assetId {
3747     case b: ByteVector => 
3848         toBase58String(b)
3949     case _ => 
4050         "WAVES"
4151 }
4252 
4353 
4454 func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES"))
4555     then unit
4656     else fromBase58String(assetIdStr)
4757 
4858 
4959 func addAssetBytesToList (accum,item) = (accum ++ [getAssetBytes(item)])
5060 
5161 
5262 func addAssetWeightToList (accum,item) = (accum ++ [tryGetInteger((("static_" + getAssetString(item)) + "_weight"))])
5363 
5464 
5565 func addAssetDecimalsToList (accum,item) = (accum ++ [tryGetInteger((("static_" + getAssetString(item)) + "_decimals"))])
5666 
5767 
5868 func addAssetScaleToList (accum,item) = (accum ++ [tryGetInteger((("static_" + getAssetString(item)) + "_scale"))])
5969 
6070 
6171 func addIntToList (accum,item) = (accum ++ [parseIntValue(item)])
6272 
6373 
6474 let T = tryGetInteger("static_tokensAmount")
6575 
6676 let assetIds = {
6777     let $l = split(tryGetString("static_tokenIds"), ",")
6878     let $s = size($l)
6979     let $acc0 = nil
7080     func $f0_1 ($a,$i) =     if (($i >= $s))
7181         then $a
7282         else addAssetBytesToList($a, $l[$i])
7383 
7484     func $f0_2 ($a,$i) =     if (($i >= $s))
7585         then $a
7686         else throw("List size exceeds 10")
7787 
7888     $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)
7989     }
8090 
8191 let AssetsWeights = {
8292     let $l = assetIds
8393     let $s = size($l)
8494     let $acc0 = nil
8595     func $f1_1 ($a,$i) =     if (($i >= $s))
8696         then $a
8797         else addAssetWeightToList($a, $l[$i])
8898 
8999     func $f1_2 ($a,$i) =     if (($i >= $s))
90100         then $a
91101         else throw("List size exceeds 10")
92102 
93103     $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)
94104     }
95105 
96106 let Decimals = {
97107     let $l = assetIds
98108     let $s = size($l)
99109     let $acc0 = nil
100110     func $f2_1 ($a,$i) =     if (($i >= $s))
101111         then $a
102112         else addAssetDecimalsToList($a, $l[$i])
103113 
104114     func $f2_2 ($a,$i) =     if (($i >= $s))
105115         then $a
106116         else throw("List size exceeds 10")
107117 
108118     $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)
109119     }
110120 
111121 let Scales = {
112122     let $l = assetIds
113123     let $s = size($l)
114124     let $acc0 = nil
115125     func $f3_1 ($a,$i) =     if (($i >= $s))
116126         then $a
117127         else addAssetScaleToList($a, $l[$i])
118128 
119129     func $f3_2 ($a,$i) =     if (($i >= $s))
120130         then $a
121131         else throw("List size exceeds 10")
122132 
123133     $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)
124134     }
125135 
126136 let Fee = tryGetInteger("static_fee")
127137 
128138 let AssetsWeightsDecimals = 4
129139 
130140 let Scale = 10000
131141 
132142 let Scale8 = 100000000
133143 
134144 let FeeScale = 10000
135145 
136146 let PoolTokenDecimals = 8
137147 
138148 let PoolTokenScale = pow(10, 0, PoolTokenDecimals, 0, 0, HALFUP)
139149 
140150 let earnedAssets = assetIds
141151 
142152 func isShutdown () = match getBoolean(Address(base58'3PEpv9hRFWEEBU22WRnLsw1bH4YGtcU728o'), "is_shutdown") {
143153     case x: Boolean => 
144154         x
145155     case _ => 
146156         false
147157 }
148158 
149159 
150160 func getCurrentTokenBalance (tokenType) = {
151161     let tokenId = getAssetString(assetIds[tokenType])
152162     tryGetInteger((("global_" + tokenId) + "_balance"))
153163     }
154164 
155165 
156166 func calculatePIssued (amount,tokenId) = {
157167     let Psupply = tryGetInteger("global_poolToken_amount")
158168     let Balance = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
159169     fraction(amount, Psupply, Balance, DOWN)
160170     }
161171 
162172 
163173 func getMinPIssued (payments) = {
164174     func handler (accum,current) =     {
165175         let PIssued = calculatePIssued(current.amount, current.assetId)
166176         if ((PIssued == 0))
167177             then throw("one of the tokens amounts is too low")
168178             else if (if ((accum == 0))
169179                 then true
170180                 else (accum > PIssued))
171181                 then PIssued
172182                 else accum
173183         }
174184 
175185     let minPIssed = {
176186         let $l = payments
177187         let $s = size($l)
178188         let $acc0 = 0
179189         func $f4_1 ($a,$i) =         if (($i >= $s))
180190             then $a
181191             else handler($a, $l[$i])
182192 
183193         func $f4_2 ($a,$i) =         if (($i >= $s))
184194             then $a
185195             else throw("List size exceeds 10")
186196 
187197         $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)
188198         }
189199     minPIssed
190200     }
191201 
192202 
193203 func calculateUsdnValue (assetId,amount,aBalance,givenUsdnBalance) = {
194-    let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnAssetId))]
204+    let usdnInPool = indexOf(assetIds, usdnAssetId)
205+    let usdtInPool = indexOf(assetIds, usdtAssetId)
195206     let assetWeight = AssetsWeights[value(indexOf(assetIds, assetId))]
196-    let usdnBalance =     match givenUsdnBalance {
197-        case x: Int => 
198-            givenUsdnBalance
199-        case _ => 
200-            tryGetInteger((("global_" + getAssetString(usdnAssetId)) + "_balance"))
201-    }
202-    fraction(amount, (value(usdnBalance) / usdnWeight), (aBalance / assetWeight))
207+    if (if ((usdnInPool == unit))
208+        then (usdtInPool == unit)
209+        else false)
210+        then {
211+            let puzzleWeight = AssetsWeights[value(indexOf(assetIds, puzzleAssetId))]
212+            let puzzleBalance = tryGetInteger((("global_" + puzzleAssetIdStr) + "_balance"))
213+            let amountInPuzzle = fraction(amount, (puzzleBalance / puzzleWeight), (aBalance / assetWeight))
214+            let puzzlePrice = getIntegerValue(parentPoolAddress, "global_lastPuzzlePrice")
215+            fraction((amountInPuzzle * puzzlePrice), 1, Scale8)
216+            }
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+                }
203233     }
204234 
205235 
206236 func checkTokensValidity (payments) = {
207237     func handler1 (accum,payment) =     (accum ++ [payment.assetId])
208238 
209239     let ids = {
210240         let $l = payments
211241         let $s = size($l)
212242         let $acc0 = nil
213243         func $f4_1 ($a,$i) =         if (($i >= $s))
214244             then $a
215245             else handler1($a, $l[$i])
216246 
217247         func $f4_2 ($a,$i) =         if (($i >= $s))
218248             then $a
219249             else throw("List size exceeds 10")
220250 
221251         $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)
222252         }
223253     if ((ids == ids))
224254         then {
225255             func handler2 (accum,assetId) =             if ((indexOf(ids, assetId) != unit))
226256                 then (accum + 1)
227257                 else throw(("asset not attached: " + getAssetString(assetId)))
228258 
229259             let checks = {
230260                 let $l = assetIds
231261                 let $s = size($l)
232262                 let $acc0 = 0
233263                 func $f5_1 ($a,$i) =                 if (($i >= $s))
234264                     then $a
235265                     else handler2($a, $l[$i])
236266 
237267                 func $f5_2 ($a,$i) =                 if (($i >= $s))
238268                     then $a
239269                     else throw("List size exceeds 10")
240270 
241271                 $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)
242272                 }
243273             if ((checks == checks))
244274                 then true
245275                 else throw("Strict value is not equal to itself.")
246276             }
247277         else throw("Strict value is not equal to itself.")
248278     }
249279 
250280 
251281 func handlePoolTokensAdd (PIssued,payments,userAddress,needChange) = {
252282     func getTokenPaymentAmount (tokenId) =     {
253283         func handler (accum,payment) =         if ((payment.assetId == tokenId))
254284             then payment.amount
255285             else accum
256286 
257287         let $l = payments
258288         let $s = size($l)
259289         let $acc0 = 0
260290         func $f4_1 ($a,$i) =         if (($i >= $s))
261291             then $a
262292             else handler($a, $l[$i])
263293 
264294         func $f4_2 ($a,$i) =         if (($i >= $s))
265295             then $a
266296             else throw("List size exceeds 10")
267297 
268298         $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)
269299         }
270300 
271301     func handleTokenChange (accum,tokenId) =     {
272302         let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
273303         let PSupply = tryGetInteger("global_poolToken_amount")
274304         let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
275305         let Dk = fraction((fraction((PSupply + PIssued), tokenDecimals, PSupply, CEILING) - tokenDecimals), Bk, tokenDecimals, CEILING)
276306         let paymentAmount = getTokenPaymentAmount(tokenId)
277307         let toReturn = ((if ((paymentAmount != 0))
278308             then paymentAmount
279309             else 0) - Dk)
280310         let t = if (if (needChange)
281311             then (toReturn > 0)
282312             else false)
283313             then [ScriptTransfer(userAddress, toReturn, tokenId)]
284314             else nil
285315         ((accum ++ t) ++ [IntegerEntry((("global_" + getAssetString(tokenId)) + "_balance"), (Bk + Dk))])
286316         }
287317 
288318     let $l = assetIds
289319     let $s = size($l)
290320     let $acc0 = nil
291321     func $f4_1 ($a,$i) =     if (($i >= $s))
292322         then $a
293323         else handleTokenChange($a, $l[$i])
294324 
295325     func $f4_2 ($a,$i) =     if (($i >= $s))
296326         then $a
297327         else throw("List size exceeds 10")
298328 
299329     $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)
300330     }
301331 
302332 
303333 func handlePoolTokensRedeem (PRedeemed,userAddress) = {
304334     func handleTokenRedeem (accum,tokenId) =     {
305335         let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
306336         let PSupply = tryGetInteger("global_poolToken_amount")
307337         let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
308338         let amount = toInt(fraction((toBigInt(Scale8) - fraction(toBigInt((PSupply - PRedeemed)), toBigInt(Scale8), toBigInt(PSupply), CEILING)), toBigInt(Bk), toBigInt(Scale8), DOWN))
309339         (accum ++ [IntegerEntry((("global_" + getAssetString(tokenId)) + "_balance"), (Bk - amount)), ScriptTransfer(userAddress, amount, tokenId)])
310340         }
311341 
312342     let $l = assetIds
313343     let $s = size($l)
314344     let $acc0 = nil
315345     func $f4_1 ($a,$i) =     if (($i >= $s))
316346         then $a
317347         else handleTokenRedeem($a, $l[$i])
318348 
319349     func $f4_2 ($a,$i) =     if (($i >= $s))
320350         then $a
321351         else throw("List size exceeds 10")
322352 
323353     $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)
324354     }
325355 
326356 
327357 func calculateOutAmount (AmountIn,assetIn,assetOut,BalanceIn,BalanceOut) = {
328358     let IndexIn = value(indexOf(assetIds, assetIn))
329359     let IndexOut = value(indexOf(assetIds, assetOut))
330360     if ((IndexIn == IndexOut))
331361         then AmountIn
332362         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)
333363     }
334364 
335365 
336366 func getTokenBalance (assetId) = match assetId {
337367     case t: ByteVector => 
338368         assetBalance(this, t)
339369     case _ => 
340370         wavesBalance(this).available
341371 }
342372 
343373 
344374 func calculateCurrentAssetInterest (assetId,assetIdStr,aBalance,tokenEarningsLastCheck) = {
345375     let totalStaked = tryGetInteger("global_indexStaked")
346376     let tokenBalanceLastCheck = tokenEarningsLastCheck
347377     let currentBalanceDelta = (getTokenBalance(assetId) - aBalance)
348378     let currentTokenEarnings = if ((currentBalanceDelta > tokenBalanceLastCheck))
349379         then currentBalanceDelta
350380         else tokenBalanceLastCheck
351381     let newEarnings = (currentTokenEarnings - tokenBalanceLastCheck)
352382     let newInterest = if ((totalStaked == 0))
353383         then 0
354384         else fraction(newEarnings, Scale8, totalStaked)
355385     let lastCheckInterest = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_interest"))
356386     (lastCheckInterest + newInterest)
357387     }
358388 
359389 
360390 func claimResult (address) = {
361391     let addressStr = toString(address)
362392     let puzzleAmount = tryGetInteger((addressStr + "_indexStaked"))
363393     func handler (accum,assetId) =     {
364394         let assetIdStr = getAssetString(assetId)
365395         let aBalance = tryGetInteger((("global_" + getAssetString(assetId)) + "_balance"))
366396         let tokenEarningsLastCheck = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_earnings"))
367397         let currentTokenInterest = calculateCurrentAssetInterest(assetId, assetIdStr, aBalance, tokenEarningsLastCheck)
368398         let currentTokenEarnings = max([tokenEarningsLastCheck, (getTokenBalance(assetId) - aBalance)])
369399         let rewardAmount = fraction(puzzleAmount, (currentTokenInterest - tryGetInteger((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"))), Scale8)
370400         let transfer = if ((rewardAmount == 0))
371401             then nil
372402             else [ScriptTransfer(address, rewardAmount, assetId)]
373403         $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)))
374404         }
375405 
376406     let accum = {
377407         let $l = earnedAssets
378408         let $s = size($l)
379409         let $acc0 = $Tuple2(nil, 0)
380410         func $f4_1 ($a,$i) =         if (($i >= $s))
381411             then $a
382412             else handler($a, $l[$i])
383413 
384414         func $f4_2 ($a,$i) =         if (($i >= $s))
385415             then $a
386416             else throw("List size exceeds 10")
387417 
388418         $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)
389419         }
390-    (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)
391421     }
392422 
393423 
394424 func indexStakeResult (addressStr,amount) = {
395-    let li = claimResult(addressFromStringValue(addressStr))
425+    let li = claimResult(addressFromStringValue(addressStr))._1
396426     (li ++ [IntegerEntry((addressStr + "_indexStaked"), (tryGetInteger((addressStr + "_indexStaked")) + amount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") + amount))])
397427     }
398428 
399429 
400430 func sum (accum,n) = (accum + parseIntValue(n))
401431 
402432 
403433 @Callable(i)
404434 func preInit (assetIdsStr,assetWeightsStr,baseTokenIdStr,poolDomain,poolOwner,fee) = {
405435     let poolOwnerAddress = Address(fromBase58String(poolOwner))
406-    if ((this != i.caller))
407-        then throw("admin only")
408-        else if ((size(poolDomain) > 13))
409-            then throw("too large pool domain")
410-            else if (if ((fee > 500))
411-                then true
412-                else (50 > fee))
413-                then throw("fee value must be between 50 and 500 (0.5-5%)")
414-                else {
415-                    let assetIdsStrLi = split(assetIdsStr, ",")
416-                    let assetIdsLi = {
417-                        let $l = assetIdsStrLi
418-                        let $s = size($l)
419-                        let $acc0 = nil
420-                        func $f4_1 ($a,$i) =                         if (($i >= $s))
421-                            then $a
422-                            else addAssetBytesToList($a, $l[$i])
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
456+                                let $s = size($l)
457+                                let $acc0 = nil
458+                                func $f4_1 ($a,$i) =                                 if (($i >= $s))
459+                                    then $a
460+                                    else addAssetBytesToList($a, $l[$i])
423461 
424-                        func $f4_2 ($a,$i) =                         if (($i >= $s))
425-                            then $a
426-                            else throw("List size exceeds 10")
462+                                func $f4_2 ($a,$i) =                                 if (($i >= $s))
463+                                    then $a
464+                                    else throw("List size exceeds 10")
427465 
428-                        $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)
429-                        }
430-                    let assetWeightsStrLi = split(assetWeightsStr, ",")
431-                    let assetWeightsSum = {
432-                        let $l = assetWeightsStrLi
433-                        let $s = size($l)
434-                        let $acc0 = 0
435-                        func $f5_1 ($a,$i) =                         if (($i >= $s))
436-                            then $a
437-                            else sum($a, $l[$i])
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])
438476 
439-                        func $f5_2 ($a,$i) =                         if (($i >= $s))
440-                            then $a
441-                            else throw("List size exceeds 10")
477+                                func $f5_2 ($a,$i) =                                 if (($i >= $s))
478+                                    then $a
479+                                    else throw("List size exceeds 10")
442480 
443-                        $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)
444-                        }
445-                    func addTokenDataEntries (accum,assetNum) =                     if ((assetNum >= size(assetIdsLi)))
446-                        then accum
447-                        else {
448-                            let assetDecimals =                             match assetIdsLi[assetNum] {
449-                                case x: ByteVector => 
450-                                    value(assetInfo(x)).decimals
451-                                case _ => 
452-                                    8
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)])
453516                             }
454-                            (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])))])
455-                            }
456-
457-                    if ((assetWeightsSum != 10000))
458-                        then throw("sum of token weights must be equal to 10000")
459-                        else ({
460-                            let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
461-                            let $s = size($l)
462-                            let $acc0 = nil
463-                            func $f6_1 ($a,$i) =                             if (($i >= $s))
464-                                then $a
465-                                else addTokenDataEntries($a, $l[$i])
466-
467-                            func $f6_2 ($a,$i) =                             if (($i >= $s))
468-                                then $a
469-                                else throw("List size exceeds 10")
470-
471-                            $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)
472-                            } ++ [StringEntry("static_tokenIds", assetIdsStr), 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)])
473-                    }
474517     }
475518 
476519 
477520 
478521 @Callable(i)
479-func deInit () = if ((i.caller != this))
480-    then throw("admin only")
481-    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)]
482527 
483528 
484529 
485530 @Callable(i)
486531 func init () = {
487532     func prepareList () =     {
488533         func handler (accum,n) =         (accum ++ [IntegerEntry((("global_" + getAssetString(n.assetId)) + "_balance"), n.amount)])
489534 
490535         let $l = i.payments
491536         let $s = size($l)
492537         let $acc0 = nil
493538         func $f4_1 ($a,$i) =         if (($i >= $s))
494539             then $a
495540             else handler($a, $l[$i])
496541 
497542         func $f4_2 ($a,$i) =         if (($i >= $s))
498543             then $a
499544             else throw("List size exceeds 10")
500545 
501546         $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)
502547         }
503548 
504549     func calculatePoolTokensAmount (payments) =     {
505550         func handler (accum,pmt) =         {
506551             let assetId = pmt.assetId
507552             func handler2 (accum,n) =             if ((n == assetId))
508553                 then value(indexOf(assetIds, n))
509554                 else accum
510555 
511556             let Token = {
512557                 let $l = assetIds
513558                 let $s = size($l)
514559                 let $acc0 = 1
515560                 func $f4_1 ($a,$i) =                 if (($i >= $s))
516561                     then $a
517562                     else handler2($a, $l[$i])
518563 
519564                 func $f4_2 ($a,$i) =                 if (($i >= $s))
520565                     then $a
521566                     else throw("List size exceeds 10")
522567 
523568                 $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)
524569                 }
525570             fraction(accum, pow(pmt.amount, Decimals[Token], AssetsWeights[Token], AssetsWeightsDecimals, 8, FLOOR), Scale8)
526571             }
527572 
528573         let $l = payments
529574         let $s = size($l)
530575         let $acc0 = PoolTokenScale
531576         func $f4_1 ($a,$i) =         if (($i >= $s))
532577             then $a
533578             else handler($a, $l[$i])
534579 
535580         func $f4_2 ($a,$i) =         if (($i >= $s))
536581             then $a
537582             else throw("List size exceeds 10")
538583 
539584         $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)
540585         }
541586 
542-    if ((tryGetInteger("global_wasInited") > 0))
543-        then throw("pool already inited")
544-        else {
545-            let initialPoolTokens = calculatePoolTokensAmount(i.payments)
546-            if ((initialPoolTokens == 0))
547-                then throw("you need a bigger tokens amount to launch the pool")
548-                else {
549-                    let poolTokenIssue = Issue(("PZ " + tryGetString("static_poolDomain")), "Puzzle Swap: pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
550-                    let poolTokenId = calculateAssetId(poolTokenIssue)
551-                    (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)])
552-                    }
553-            }
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+                }
554601     }
555602 
556603 
557604 
558605 @Callable(i)
559-func generateIndex (needChange) = if ((size(i.payments) != T))
560-    then throw(("you need to attach all pool tokens. amount of pool tokens: " + toString(T)))
561-    else if (!(checkTokensValidity(i.payments)))
562-        then throw("wrong assets attached")
563-        else {
564-            let PIssued = getMinPIssued(i.payments)
565-            let reissue = Reissue(getBinaryValue("global_poolToken_id"), PIssued, true)
566-            let result = handlePoolTokensAdd(PIssued, i.payments, i.originCaller, needChange)
567-            $Tuple2((result ++ [ScriptTransfer(i.caller, PIssued, tryGetBinary("global_poolToken_id")), reissue, IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") + PIssued))]), PIssued)
568-            }
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+                }
569618 
570619 
571620 
572621 @Callable(i)
573622 func stakeIndex () = {
574623     let addressStr = toString(i.originCaller)
575624     let pmt = i.payments[0]
576-    if ((value(pmt.assetId) != tryGetBinary("global_poolToken_id")))
577-        then throw("wrong asset attached")
578-        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)
579630     }
580631 
581632 
582633 
583634 @Callable(i)
584635 func unstakeIndex (puzzleAmount) = {
585636     let addressStr = toString(i.originCaller)
586637     let puzzleAvailable = tryGetInteger((addressStr + "_indexStaked"))
587-    if ((puzzleAmount > puzzleAvailable))
588-        then throw("you don't have index tokens available")
589-        else if (isShutdown())
590-            then throw("contract is on stop")
591-            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"))])
592645     }
593646 
594647 
595648 
596649 @Callable(i)
597650 func claimIndexRewards () = if (isShutdown())
598651     then throw("contract is on stop")
599652     else claimResult(i.caller)
653+
654+
655+
656+@Callable(i)
657+func evaluateClaim (user) = $Tuple2(nil, claimResult(addressFromStringValue(user))._2)
600658 
601659 
602660 
603661 @Callable(i)
604662 func redeemIndex (sendToOrigin) = {
605663     let pmt = i.payments[0]
606664     if ((pmt.assetId != tryGetBinary("global_poolToken_id")))
607665         then throw("please attach pool share token")
608666         else if (isShutdown())
609667             then throw("contract is on stop")
610668             else {
611669                 let PRedeemed = pmt.amount
612670                 let result = handlePoolTokensRedeem(PRedeemed, if (sendToOrigin)
613671                     then i.originCaller
614672                     else i.caller)
615673                 (result ++ [Burn(tryGetBinary("global_poolToken_id"), PRedeemed), IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") - PRedeemed))])
616674                 }
617675     }
618676 
619677 
620678 
621679 @Callable(i)
622680 func swap (assetOut,minimum) = {
623681     let pmt = if ((size(i.payments) == 1))
624682         then value(i.payments[0])
625683         else throw("please attach exactly one payment")
626684     let AmountIn = value(i.payments[0].amount)
627685     let AssetIn = pmt.assetId
628686     let AssetOut = getAssetBytes(assetOut)
629-    let feeAssetIn = AssetIn
630-    let feeAssetOut = usdnAssetId
687+    let feeAssetOutStr = tryGetString("static_feeToken")
688+    let feeAssetOut = if ((feeAssetOutStr == ""))
689+        then usdnAssetId
690+        else fromBase58String(feeAssetOutStr)
631691     let AssetInBalance = tryGetInteger((("global_" + getAssetString(AssetIn)) + "_balance"))
632692     let AssetOutBalance = tryGetInteger((("global_" + assetOut) + "_balance"))
633-    let feeAssetOutBalance = tryGetInteger((("global_" + getAssetString(feeAssetOut)) + "_balance"))
634693     let feeAmountIn = fraction(AmountIn, Fee, FeeScale)
635694     let cleanAmountIn = (AmountIn - feeAmountIn)
636695     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"))
637703     let feeAmountOut = calculateOutAmount(feeAmountIn, AssetIn, feeAssetOut, AssetInBalance, feeAssetOutBalance)
638704     if ((minimum > AmountOut))
639705         then throw(("amount to recieve is lower than given one: " + toString(AmountOut)))
640706         else if ((AssetOut == AssetIn))
641707             then throw("this swap is not allowed")
642708             else if ((0 > (AssetOutBalance - AmountOut)))
643709                 then throw("contract is out of reserves")
644710                 else if (isShutdown())
645711                     then throw("contract is on stop")
646712                     else {
647713                         let creatorFee = fraction(feeAmountOut, 1, 10)
648714                         let protocolFee = fraction(feeAmountOut, 4, 10)
649-                        let stakingTopUp = reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(feeAssetOut, protocolFee)])
715+                        let stakingTopUp = if ((feeAssetOut == usdnAssetId))
716+                            then reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(feeAssetOut, protocolFee)])
717+                            else unit
650718                         if ((stakingTopUp == stakingTopUp))
651719                             then {
652-                                let newBalanceIn = ((AssetInBalance + AmountIn) - (if ((AssetIn == feeAssetOut))
720+                                let newBalanceIn = (AssetInBalance2 - (if ((AssetIn == feeAssetOut))
653721                                     then feeAmountOut
654722                                     else 0))
655-                                let newBalanceOut = ((AssetOutBalance - AmountOut) - (if ((AssetOut == feeAssetOut))
723+                                let newBalanceOut = (AssetOutBalance2 - (if ((AssetOut == feeAssetOut))
656724                                     then feeAmountOut
657725                                     else 0))
658726                                 let newBalanceFeeAsset = if (if ((feeAssetOut != AssetIn))
659727                                     then (feeAssetOut != AssetOut)
660728                                     else false)
661729                                     then (feeAssetOutBalance - feeAmountOut)
662730                                     else unit
663731                                 let assetInChange = IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), newBalanceIn)
664732                                 let assetOutChange = IntegerEntry((("global_" + assetOut) + "_balance"), newBalanceOut)
665733                                 let feeAssetOutChange = if ((newBalanceFeeAsset != unit))
666734                                     then IntegerEntry((("global_" + getAssetString(feeAssetOut)) + "_balance"), feeAssetOutBalance)
667735                                     else StringEntry("hello", "world")
668-                                $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)))], AmountOut)
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)
669739                                 }
670740                             else throw("Strict value is not equal to itself.")
671741                         }
672742     }
673743 
674744 
675745 @Verifier(tx)
676746 func verify () = if (isShutdown())
677747     then false
678748     else if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
679749         then true
680750         else sigVerify(tx.bodyBytes, tx.proofs[0], masterPubKey)
681751 
github/deemru/w8io/6500d08 
100.27 ms ◑