tx · 85KozyrhNUPToRVEs9Hrh7iRvroUzXyr7JZeETzYHuAe

3Mwb8GE6NHaDxJTby35u2sNAEmDQMWYupCn:  -0.02700000 Waves

2023.06.27 16:37 [2641139] smart account 3Mwb8GE6NHaDxJTby35u2sNAEmDQMWYupCn > SELF 0.00000000 Waves

{ "type": 13, "id": "85KozyrhNUPToRVEs9Hrh7iRvroUzXyr7JZeETzYHuAe", "fee": 2700000, "feeAssetId": null, "timestamp": 1687873051499, "version": 2, "chainId": 84, "sender": "3Mwb8GE6NHaDxJTby35u2sNAEmDQMWYupCn", "senderPublicKey": "6oJuynzr7rKRYRDWhDrENciDLidQuVGfe82pK7hr5nev", "proofs": [ "vhgThEGff2gvwetuHrt24BbH82YTmWmEsuNyMKNwReaNB5DqbTHAswuTgF5Z5iZMk5zgZnaFxipVd8gSsXeyH3A" ], "script": "base64:BgIuCAISCAoGCAgICAgBEgASABIDCgEEEgASAwoBARIAEgMKAQgSAwoBBBIECgIIATAAC3VzZG5Bc3NldElkASC2JinDBPXOU5GkDkt1JC9kjFGx+t+vVCm9SNIdKrKq0QANcHV6emxlQXNzZXRJZAEg8Rr+Jf72mTj0aSrE3+ES1keyxsoOujcJr3dtH46i5WMAC3VzZHRBc3NldElkASAelAcTUnahJZX9yGGogl8Qf986Tym7/JpGP1r9Nk+fkQAOdXNkdFBwdEFzc2V0SWQBIITaerIIAz9O0bvKju6Lk7zJgt0LXfoHlqjUI/moD/+5AA51c2RuQXNzZXRJZFN0cgIsREcyeEZrUGREd0tVb0JrekdBaFF0THBTR3pmWExpQ1lQRXplS0gyQWQyNHAAEHB1enpsZUFzc2V0SWRTdHICLEhFQjhRYXc5eHJXcFdzOHRIc2lBVFlHQldEQnRQMlM3a2NQQUxyTXU0M0FTAA51c2R0QXNzZXRJZFN0cgIsMzROOVljRUVUTFduOTNxWVE2NEVzUDF4ODl0U3J1SlU0NFJyRU1TWFhFUEoAEXVzZHRQcHRBc3NldElkU3RyAiw5d2MzTFhOQTRURUJzWHlLdG9MRTltcmJERDdXTUhYdlhyQ2padmFiTEFzaQARcGFyZW50UG9vbEFkZHJlc3MJAQdBZGRyZXNzAQEaAVeRxuop6nlnD9mE7zJ2lLPAdULkNYPB01gADW1hc3RlckFkZHJlc3MJAQdBZGRyZXNzAQEaAVfOV/Mk0Qeks07+0rriKKzFkJbWitFtBe4ADG1hc3RlclB1YktleQEgOzVNbj+fvvhUnJZEB4BWqy/iE2BFxHvyPxdD9EIFJl0BDXRyeUdldEludGVnZXIBA2tleQQHJG1hdGNoMAkAmggCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABDHRyeUdldEJpbmFyeQEDa2V5BAckbWF0Y2gwCQCcCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwBQFiAQABDHRyeUdldFN0cmluZwEDa2V5BAckbWF0Y2gwCQCdCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWIFByRtYXRjaDAFAWICAAEOZ2V0QXNzZXRTdHJpbmcBB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQBYgUHJG1hdGNoMAkA2AQBBQFiAgVXQVZFUwENZ2V0QXNzZXRCeXRlcwEKYXNzZXRJZFN0cgMJAAACBQphc3NldElkU3RyAgVXQVZFUwUEdW5pdAkA2QQBBQphc3NldElkU3RyARNhZGRBc3NldEJ5dGVzVG9MaXN0AgVhY2N1bQRpdGVtCQDNCAIFBWFjY3VtCQENZ2V0QXNzZXRCeXRlcwEFBGl0ZW0BFGFkZEFzc2V0V2VpZ2h0VG9MaXN0AgVhY2N1bQRpdGVtCQDNCAIFBWFjY3VtCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdzdGF0aWNfCQEOZ2V0QXNzZXRTdHJpbmcBBQRpdGVtAgdfd2VpZ2h0ARZhZGRBc3NldERlY2ltYWxzVG9MaXN0AgVhY2N1bQRpdGVtCQDNCAIFBWFjY3VtCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdzdGF0aWNfCQEOZ2V0QXNzZXRTdHJpbmcBBQRpdGVtAglfZGVjaW1hbHMBE2FkZEFzc2V0U2NhbGVUb0xpc3QCBWFjY3VtBGl0ZW0JAM0IAgUFYWNjdW0JAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB3N0YXRpY18JAQ5nZXRBc3NldFN0cmluZwEFBGl0ZW0CBl9zY2FsZQEMYWRkSW50VG9MaXN0AgVhY2N1bQRpdGVtCQDNCAIFBWFjY3VtCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0AAVQJAQ10cnlHZXRJbnRlZ2VyAQITc3RhdGljX3Rva2Vuc0Ftb3VudAAIYXNzZXRJZHMKAAIkbAkAtQkCCQEMdHJ5R2V0U3RyaW5nAQIPc3RhdGljX3Rva2VuSWRzAgEsCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARNhZGRBc3NldEJ5dGVzVG9MaXN0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAA1Bc3NldHNXZWlnaHRzCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARRhZGRBc3NldFdlaWdodFRvTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgAIRGVjaW1hbHMKAAIkbAUIYXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjJfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBFmFkZEFzc2V0RGVjaW1hbHNUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjJfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYyXzICCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoABlNjYWxlcwoAAiRsBQhhc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmM18xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQETYWRkQXNzZXRTY2FsZVRvTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmM18yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjNfMgIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgADRmVlCQENdHJ5R2V0SW50ZWdlcgECCnN0YXRpY19mZWUAFUFzc2V0c1dlaWdodHNEZWNpbWFscwAEAAVTY2FsZQCQTgAGU2NhbGU4AIDC1y8ACEZlZVNjYWxlAJBOABFQb29sVG9rZW5EZWNpbWFscwAIAA5Qb29sVG9rZW5TY2FsZQkAbAYACgAABRFQb29sVG9rZW5EZWNpbWFscwAAAAAFBkhBTEZVUAAMZWFybmVkQXNzZXRzBQhhc3NldElkcwEKaXNTaHV0ZG93bgAEByRtYXRjaDAJAJsIAgkBB0FkZHJlc3MBARoBV414U3qfFdI9lTSLgnlk2BnTJx6b8jVaqAILaXNfc2h1dGRvd24DCQABAgUHJG1hdGNoMAIHQm9vbGVhbgQBeAUHJG1hdGNoMAUBeAcBFmdldEN1cnJlbnRUb2tlbkJhbGFuY2UBCXRva2VuVHlwZQQHdG9rZW5JZAkBDmdldEFzc2V0U3RyaW5nAQkAkQMCBQhhc3NldElkcwUJdG9rZW5UeXBlCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdnbG9iYWxfBQd0b2tlbklkAghfYmFsYW5jZQEQY2FsY3VsYXRlUElzc3VlZAIGYW1vdW50B3Rva2VuSWQEB1BzdXBwbHkJAQ10cnlHZXRJbnRlZ2VyAQIXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQEB0JhbGFuY2UJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFB3Rva2VuSWQCCF9iYWxhbmNlCQBuBAUGYW1vdW50BQdQc3VwcGx5BQdCYWxhbmNlBQRET1dOAQ1nZXRNaW5QSXNzdWVkAQhwYXltZW50cwoBB2hhbmRsZXICBWFjY3VtB2N1cnJlbnQEB1BJc3N1ZWQJARBjYWxjdWxhdGVQSXNzdWVkAggFB2N1cnJlbnQGYW1vdW50CAUHY3VycmVudAdhc3NldElkAwkAAAIFB1BJc3N1ZWQAAAkAAgECJG9uZSBvZiB0aGUgdG9rZW5zIGFtb3VudHMgaXMgdG9vIGxvdwMDCQAAAgUFYWNjdW0AAAYJAGYCBQVhY2N1bQUHUElzc3VlZAUHUElzc3VlZAUFYWNjdW0KAAIkbAUIcGF5bWVudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoBEmNhbGN1bGF0ZVVzZG5WYWx1ZQQHYXNzZXRJZAZhbW91bnQIYUJhbGFuY2UQZ2l2ZW5Vc2RuQmFsYW5jZQQKdXNkbkluUG9vbAkAzwgCBQhhc3NldElkcwULdXNkbkFzc2V0SWQEDHB1enpsZUluUG9vbAkAzwgCBQhhc3NldElkcwUNcHV6emxlQXNzZXRJZAQKdXNkdEluUG9vbAkAzwgCBQhhc3NldElkcwULdXNkdEFzc2V0SWQEC3dhdmVzSW5Qb29sCQDPCAIFCGFzc2V0SWRzBQR1bml0BAthc3NldFdlaWdodAkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIHc3RhdGljXwkBDmdldEFzc2V0U3RyaW5nAQUHYXNzZXRJZAIHX3dlaWdodAQLZmVlQXNzZXRTdHIJAQx0cnlHZXRTdHJpbmcBAg9zdGF0aWNfZmVlVG9rZW4DCQAAAgULZmVlQXNzZXRTdHIFEHB1enpsZUFzc2V0SWRTdHIEDHB1enpsZVdlaWdodAkAkQMCBQ1Bc3NldHNXZWlnaHRzCQEFdmFsdWUBCQDPCAIFCGFzc2V0SWRzBQ1wdXp6bGVBc3NldElkBA1wdXp6bGVCYWxhbmNlCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdnbG9iYWxfBRBwdXp6bGVBc3NldElkU3RyAghfYmFsYW5jZQQOYW1vdW50SW5QdXp6bGUJAGsDBQZhbW91bnQJAGkCBQ1wdXp6bGVCYWxhbmNlBQxwdXp6bGVXZWlnaHQJAGkCBQhhQmFsYW5jZQULYXNzZXRXZWlnaHQEC3B1enpsZVByaWNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBRFwYXJlbnRQb29sQWRkcmVzcwIWZ2xvYmFsX2xhc3RQdXp6bGVQcmljZQkAawMJAGgCBQ5hbW91bnRJblB1enpsZQULcHV6emxlUHJpY2UAAQUGU2NhbGU4AwkAAAIFC2ZlZUFzc2V0U3RyBQ51c2R0QXNzZXRJZFN0cgQKdXNkdFdlaWdodAkAkQMCBQ1Bc3NldHNXZWlnaHRzCQEFdmFsdWUBBQp1c2R0SW5Qb29sBAt1c2R0QmFsYW5jZQkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIHZ2xvYmFsXwUOdXNkdEFzc2V0SWRTdHICCF9iYWxhbmNlCQBrAwUGYW1vdW50CQBpAgULdXNkdEJhbGFuY2UFCnVzZHRXZWlnaHQJAGkCBQhhQmFsYW5jZQULYXNzZXRXZWlnaHQDCQAAAgULZmVlQXNzZXRTdHIFDnVzZG5Bc3NldElkU3RyBAp1c2RuV2VpZ2h0CQCRAwIFDUFzc2V0c1dlaWdodHMJAQV2YWx1ZQEJAM8IAgUIYXNzZXRJZHMFC3VzZG5Bc3NldElkBAt1c2RuQmFsYW5jZQQHJG1hdGNoMAUQZ2l2ZW5Vc2RuQmFsYW5jZQMJAAECBQckbWF0Y2gwAgNJbnQEAXgFByRtYXRjaDAFEGdpdmVuVXNkbkJhbGFuY2UJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFC3VzZG5Bc3NldElkAghfYmFsYW5jZQkAawMFBmFtb3VudAkAaQIJAQV2YWx1ZQEFC3VzZG5CYWxhbmNlBQp1c2RuV2VpZ2h0CQBpAgUIYUJhbGFuY2UFC2Fzc2V0V2VpZ2h0BAt3YXZlc1dlaWdodAC4FwQId0JhbGFuY2UJAGkCCQENdHJ5R2V0SW50ZWdlcgECFGdsb2JhbF9XQVZFU19iYWxhbmNlADIJAGsDBQZhbW91bnQJAGkCBQh3QmFsYW5jZQULd2F2ZXNXZWlnaHQJAGkCBQhhQmFsYW5jZQULYXNzZXRXZWlnaHQBE2NoZWNrVG9rZW5zVmFsaWRpdHkBCHBheW1lbnRzCgEIaGFuZGxlcjECBWFjY3VtB3BheW1lbnQJAM0IAgUFYWNjdW0IBQdwYXltZW50B2Fzc2V0SWQEA2lkcwoAAiRsBQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmNF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIaGFuZGxlcjECBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoDCQAAAgUDaWRzBQNpZHMKAQhoYW5kbGVyMgIFYWNjdW0HYXNzZXRJZAMJAQIhPQIJAM8IAgUDaWRzBQdhc3NldElkBQR1bml0CQBkAgUFYWNjdW0AAQkAAgEJAKwCAgIUYXNzZXQgbm90IGF0dGFjaGVkOiAJAQ5nZXRBc3NldFN0cmluZwEFB2Fzc2V0SWQEBmNoZWNrcwoAAiRsBQhhc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmNV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIaGFuZGxlcjICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjVfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY1XzICCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECCQEFJGY1XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoDCQAAAgUGY2hlY2tzBQZjaGVja3MGCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuARNoYW5kbGVQb29sVG9rZW5zQWRkBAdQSXNzdWVkCHBheW1lbnRzC3VzZXJBZGRyZXNzCm5lZWRDaGFuZ2UKARVnZXRUb2tlblBheW1lbnRBbW91bnQBB3Rva2VuSWQKAQdoYW5kbGVyAgVhY2N1bQdwYXltZW50AwkAAAIIBQdwYXltZW50B2Fzc2V0SWQFB3Rva2VuSWQIBQdwYXltZW50BmFtb3VudAUFYWNjdW0KAAIkbAUIcGF5bWVudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoKARFoYW5kbGVUb2tlbkNoYW5nZQIFYWNjdW0HdG9rZW5JZAQCQmsJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFB3Rva2VuSWQCCF9iYWxhbmNlBAdQU3VwcGx5CQENdHJ5R2V0SW50ZWdlcgECF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BA10b2tlbkRlY2ltYWxzCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdzdGF0aWNfCQEOZ2V0QXNzZXRTdHJpbmcBBQd0b2tlbklkAgZfc2NhbGUEAkRrCQBuBAkAZQIJAG4ECQBkAgUHUFN1cHBseQUHUElzc3VlZAUNdG9rZW5EZWNpbWFscwUHUFN1cHBseQUHQ0VJTElORwUNdG9rZW5EZWNpbWFscwUCQmsFDXRva2VuRGVjaW1hbHMFB0NFSUxJTkcEDXBheW1lbnRBbW91bnQJARVnZXRUb2tlblBheW1lbnRBbW91bnQBBQd0b2tlbklkBAh0b1JldHVybgkAZQIDCQECIT0CBQ1wYXltZW50QW1vdW50AAAFDXBheW1lbnRBbW91bnQAAAUCRGsEAXQDAwUKbmVlZENoYW5nZQkAZgIFCHRvUmV0dXJuAAAHCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzBQh0b1JldHVybgUHdG9rZW5JZAUDbmlsBQNuaWwJAM0IAgkAzggCBQVhY2N1bQUBdAkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgdnbG9iYWxfCQEOZ2V0QXNzZXRTdHJpbmcBBQd0b2tlbklkAghfYmFsYW5jZQkAZAIFAkJrBQJEawoAAiRsBQhhc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmNF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQERaGFuZGxlVG9rZW5DaGFuZ2UCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoBFmhhbmRsZVBvb2xUb2tlbnNSZWRlZW0CCVBSZWRlZW1lZAt1c2VyQWRkcmVzcwoBEWhhbmRsZVRva2VuUmVkZWVtAgVhY2N1bQd0b2tlbklkBAJCawkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIHZ2xvYmFsXwkBDmdldEFzc2V0U3RyaW5nAQUHdG9rZW5JZAIIX2JhbGFuY2UEB1BTdXBwbHkJAQ10cnlHZXRJbnRlZ2VyAQIXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQEDXRva2VuRGVjaW1hbHMJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB3N0YXRpY18JAQ5nZXRBc3NldFN0cmluZwEFB3Rva2VuSWQCBl9zY2FsZQQGYW1vdW50CQCgAwEJAL0CBAkAuAICCQC2AgEFBlNjYWxlOAkAvQIECQC2AgEJAGUCBQdQU3VwcGx5BQlQUmVkZWVtZWQJALYCAQUGU2NhbGU4CQC2AgEFB1BTdXBwbHkFB0NFSUxJTkcJALYCAQUCQmsJALYCAQUGU2NhbGU4BQRET1dOCQDNCAIJAM0IAgUFYWNjdW0JAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIHZ2xvYmFsXwkBDmdldEFzc2V0U3RyaW5nAQUHdG9rZW5JZAIIX2JhbGFuY2UJAGUCBQJCawUGYW1vdW50CQEOU2NyaXB0VHJhbnNmZXIDBQt1c2VyQWRkcmVzcwUGYW1vdW50BQd0b2tlbklkCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGY0XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARFoYW5kbGVUb2tlblJlZGVlbQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmNF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjRfMgIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgESY2FsY3VsYXRlT3V0QW1vdW50BQhBbW91bnRJbgdhc3NldEluCGFzc2V0T3V0CUJhbGFuY2VJbgpCYWxhbmNlT3V0BAdJbmRleEluCQEFdmFsdWUBCQDPCAIFCGFzc2V0SWRzBQdhc3NldEluBAhJbmRleE91dAkBBXZhbHVlAQkAzwgCBQhhc3NldElkcwUIYXNzZXRPdXQDCQAAAgUHSW5kZXhJbgUISW5kZXhPdXQJAAIBAhF3cm9uZyB0b2tlbnMgcGFpcgkAbgQFCkJhbGFuY2VPdXQJAGUCCQBoAgUGU2NhbGU4BQZTY2FsZTgJAKADAQkAdgYJAL0CBAkAtgIBBQlCYWxhbmNlSW4JALYCAQkAaAIFBlNjYWxlOAUGU2NhbGU4CQC2AgEJAGQCBQlCYWxhbmNlSW4FCEFtb3VudEluBQZIQUxGVVAAEAkAtgIBCQBrAwkAkQMCBQ1Bc3NldHNXZWlnaHRzBQdJbmRleEluAJBOCQCRAwIFDUFzc2V0c1dlaWdodHMFCEluZGV4T3V0AAQAEAUHQ0VJTElORwkAaAIFBlNjYWxlOAUGU2NhbGU4BQRET1dOAQ9nZXRUb2tlbkJhbGFuY2UBB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQBdAUHJG1hdGNoMAkA8AcCBQR0aGlzBQF0CAkA7wcBBQR0aGlzCWF2YWlsYWJsZQEdY2FsY3VsYXRlQ3VycmVudEFzc2V0SW50ZXJlc3QEB2Fzc2V0SWQKYXNzZXRJZFN0cghhQmFsYW5jZRZ0b2tlbkVhcm5pbmdzTGFzdENoZWNrBAt0b3RhbFN0YWtlZAkBDXRyeUdldEludGVnZXIBAhJnbG9iYWxfaW5kZXhTdGFrZWQEFXRva2VuQmFsYW5jZUxhc3RDaGVjawUWdG9rZW5FYXJuaW5nc0xhc3RDaGVjawQTY3VycmVudEJhbGFuY2VEZWx0YQkAZQIJAQ9nZXRUb2tlbkJhbGFuY2UBBQdhc3NldElkBQhhQmFsYW5jZQQUY3VycmVudFRva2VuRWFybmluZ3MDCQBmAgUTY3VycmVudEJhbGFuY2VEZWx0YQUVdG9rZW5CYWxhbmNlTGFzdENoZWNrBRNjdXJyZW50QmFsYW5jZURlbHRhBRV0b2tlbkJhbGFuY2VMYXN0Q2hlY2sEC25ld0Vhcm5pbmdzCQBlAgUUY3VycmVudFRva2VuRWFybmluZ3MFFXRva2VuQmFsYW5jZUxhc3RDaGVjawQLbmV3SW50ZXJlc3QDCQAAAgULdG90YWxTdGFrZWQAAAAACQBrAwULbmV3RWFybmluZ3MFBlNjYWxlOAULdG90YWxTdGFrZWQEEWxhc3RDaGVja0ludGVyZXN0CQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAhFnbG9iYWxfbGFzdENoZWNrXwUKYXNzZXRJZFN0cgIJX2ludGVyZXN0CQBkAgURbGFzdENoZWNrSW50ZXJlc3QFC25ld0ludGVyZXN0AQtjbGFpbVJlc3VsdAEHYWRkcmVzcwQKYWRkcmVzc1N0cgkApQgBBQdhZGRyZXNzBAxwdXp6bGVBbW91bnQJAQ10cnlHZXRJbnRlZ2VyAQkArAICBQphZGRyZXNzU3RyAgxfaW5kZXhTdGFrZWQKAQdoYW5kbGVyAgVhY2N1bQdhc3NldElkBAphc3NldElkU3RyCQEOZ2V0QXNzZXRTdHJpbmcBBQdhc3NldElkBAhhQmFsYW5jZQkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIHZ2xvYmFsXwkBDmdldEFzc2V0U3RyaW5nAQUHYXNzZXRJZAIIX2JhbGFuY2UEFnRva2VuRWFybmluZ3NMYXN0Q2hlY2sJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICEWdsb2JhbF9sYXN0Q2hlY2tfBQphc3NldElkU3RyAglfZWFybmluZ3MEFGN1cnJlbnRUb2tlbkludGVyZXN0CQEdY2FsY3VsYXRlQ3VycmVudEFzc2V0SW50ZXJlc3QEBQdhc3NldElkBQphc3NldElkU3RyBQhhQmFsYW5jZQUWdG9rZW5FYXJuaW5nc0xhc3RDaGVjawQUY3VycmVudFRva2VuRWFybmluZ3MJAJYDAQkAzAgCBRZ0b2tlbkVhcm5pbmdzTGFzdENoZWNrCQDMCAIJAGUCCQEPZ2V0VG9rZW5CYWxhbmNlAQUHYXNzZXRJZAUIYUJhbGFuY2UFA25pbAQMcmV3YXJkQW1vdW50CQBrAwUMcHV6emxlQW1vdW50CQBlAgUUY3VycmVudFRva2VuSW50ZXJlc3QJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgIJAKwCAgUKYWRkcmVzc1N0cgILX2xhc3RDaGVja18FCmFzc2V0SWRTdHICCV9pbnRlcmVzdAUGU2NhbGU4BAh0cmFuc2ZlcgMJAAACBQxyZXdhcmRBbW91bnQAAAUDbmlsCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFB2FkZHJlc3MFDHJld2FyZEFtb3VudAUHYXNzZXRJZAUDbmlsCQCUCgIJAM4IAgkAzggCCAUFYWNjdW0CXzEFCHRyYW5zZmVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIRZ2xvYmFsX2xhc3RDaGVja18FCmFzc2V0SWRTdHICCV9lYXJuaW5ncwkAZQIFFGN1cnJlbnRUb2tlbkVhcm5pbmdzBQxyZXdhcmRBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAhFnbG9iYWxfbGFzdENoZWNrXwUKYXNzZXRJZFN0cgIJX2ludGVyZXN0BRRjdXJyZW50VG9rZW5JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUKYWRkcmVzc1N0cgILX2xhc3RDaGVja18FCmFzc2V0SWRTdHICCV9pbnRlcmVzdAUUY3VycmVudFRva2VuSW50ZXJlc3QFA25pbAkAZAIIBQVhY2N1bQJfMgkBEmNhbGN1bGF0ZVVzZG5WYWx1ZQQFB2Fzc2V0SWQFDHJld2FyZEFtb3VudAUIYUJhbGFuY2UFBHVuaXQEBWFjY3VtCgACJGwFDGVhcm5lZEFzc2V0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAAAKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoJAJQKAgkAzggCCAUFYWNjdW0CXzEJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUKYWRkcmVzc1N0cgITX2NsYWltZWRSZXdhcmRWYWx1ZQkAZAIJAQ10cnlHZXRJbnRlZ2VyAQkArAICBQphZGRyZXNzU3RyAhNfY2xhaW1lZFJld2FyZFZhbHVlCAUFYWNjdW0CXzIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUKYWRkcmVzc1N0cgIKX2xhc3RDbGFpbQgFCWxhc3RCbG9jawl0aW1lc3RhbXAFA25pbAgFBWFjY3VtAl8yARBpbmRleFN0YWtlUmVzdWx0AgphZGRyZXNzU3RyBmFtb3VudAQCbGkICQELY2xhaW1SZXN1bHQBCQERQGV4dHJOYXRpdmUoMTA2MikBBQphZGRyZXNzU3RyAl8xCQDOCAIFAmxpCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCmFkZHJlc3NTdHICDF9pbmRleFN0YWtlZAkAZAIJAQ10cnlHZXRJbnRlZ2VyAQkArAICBQphZGRyZXNzU3RyAgxfaW5kZXhTdGFrZWQFBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgISZ2xvYmFsX2luZGV4U3Rha2VkCQBkAgkBDXRyeUdldEludGVnZXIBAhJnbG9iYWxfaW5kZXhTdGFrZWQFBmFtb3VudAUDbmlsAQNzdW0CBWFjY3VtAW4JAGQCBQVhY2N1bQkBDXBhcnNlSW50VmFsdWUBBQFuCgFpAQdwcmVJbml0Bgthc3NldElkc1N0cg9hc3NldFdlaWdodHNTdHIOYmFzZVRva2VuSWRTdHIKcG9vbERvbWFpbglwb29sT3duZXIDZmVlBBBwb29sT3duZXJBZGRyZXNzCQEHQWRkcmVzcwEJANkEAQUJcG9vbE93bmVyAwkBCmlzU2h1dGRvd24ACQACAQITY29udHJhY3QgaXMgb24gc3RvcAMJAQIhPQIFBHRoaXMIBQFpBmNhbGxlcgkAAgECCmFkbWluIG9ubHkDCQBmAgkAsQIBBQpwb29sRG9tYWluAA0JAAIBAhV0b28gbGFyZ2UgcG9vbCBkb21haW4DAwkAZgIAMgUDZmVlBgkAZgIFA2ZlZQD0AwkAAgECLWZlZSB2YWx1ZSBtdXN0IGJlIGJldHdlZW4gNTAgYW5kIDUwMCAoMC41LTUlKQMDAwMDCQAAAgkAswkCBQthc3NldElkc1N0cgUQcHV6emxlQXNzZXRJZFN0cgUEdW5pdAkAAAIJALMJAgULYXNzZXRJZHNTdHIFDnVzZG5Bc3NldElkU3RyBQR1bml0BwkAAAIJALMJAgULYXNzZXRJZHNTdHIFDnVzZHRBc3NldElkU3RyBQR1bml0BwkAAAIJALMJAgULYXNzZXRJZHNTdHICBVdBVkVTBQR1bml0BwkAAAIJALMJAgULYXNzZXRJZHNTdHIFEXVzZHRQcHRBc3NldElkU3RyBQR1bml0BwkAAgECS3Bvb2wgbXVzdCBoYXZlIFVTRFQtV1hHLCBVU0RULVBQVCwgVVNETiwgV0FWRVMgb3IgUFVaWkxFIGluIHRoZSBjb21wb3NpdGlvbgQNYXNzZXRJZHNTdHJMaQkAtQkCBQthc3NldElkc1N0cgIBLAQKYXNzZXRJZHNMaQoAAiRsBQ1hc3NldElkc1N0ckxpCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGY0XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARNhZGRBc3NldEJ5dGVzVG9MaXN0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGY0XzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmNF8yAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKBBFhc3NldFdlaWdodHNTdHJMaQkAtQkCBQ9hc3NldFdlaWdodHNTdHICASwED2Fzc2V0V2VpZ2h0c1N1bQoAAiRsBRFhc3NldFdlaWdodHNTdHJMaQoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmNV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEDc3VtAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGY1XzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmNV8yAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKBAtmZWVBc3NldFN0cgMJAQIhPQIJALMJAgULYXNzZXRJZHNTdHIFDnVzZG5Bc3NldElkU3RyBQR1bml0BQ51c2RuQXNzZXRJZFN0cgMJAQIhPQIJALMJAgULYXNzZXRJZHNTdHICBVdBVkVTBQR1bml0AgVXQVZFUwMJAQIhPQIJALMJAgULYXNzZXRJZHNTdHIFDnVzZHRBc3NldElkU3RyBQR1bml0BQ51c2R0QXNzZXRJZFN0cgMJAQIhPQIJALMJAgULYXNzZXRJZHNTdHIFEHB1enpsZUFzc2V0SWRTdHIFBHVuaXQFEHB1enpsZUFzc2V0SWRTdHIFEXVzZHRQcHRBc3NldElkU3RyCgETYWRkVG9rZW5EYXRhRW50cmllcwIFYWNjdW0IYXNzZXROdW0DCQBnAgUIYXNzZXROdW0JAJADAQUKYXNzZXRJZHNMaQUFYWNjdW0EDWFzc2V0RGVjaW1hbHMEByRtYXRjaDAJAJEDAgUKYXNzZXRJZHNMaQUIYXNzZXROdW0DCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQBeAUHJG1hdGNoMAgJAQV2YWx1ZQEJAOwHAQUBeAhkZWNpbWFscwAICQDOCAIFBWFjY3VtCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIHc3RhdGljXwkAkQMCBQ1hc3NldElkc1N0ckxpBQhhc3NldE51bQIGX3NjYWxlCQBsBgAKAAAFDWFzc2V0RGVjaW1hbHMAAAAABQRET1dOCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIHc3RhdGljXwkAkQMCBQ1hc3NldElkc1N0ckxpBQhhc3NldE51bQIJX2RlY2ltYWxzBQ1hc3NldERlY2ltYWxzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIHc3RhdGljXwkAkQMCBQ1hc3NldElkc1N0ckxpBQhhc3NldE51bQIHX3dlaWdodAkBBXZhbHVlAQkAtgkBCQCRAwIFEWFzc2V0V2VpZ2h0c1N0ckxpBQhhc3NldE51bQUDbmlsAwkBAiE9AgUPYXNzZXRXZWlnaHRzU3VtAJBOCQACAQIrc3VtIG9mIHRva2VuIHdlaWdodHMgbXVzdCBiZSBlcXVhbCB0byAxMDAwMAkAzggCCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUJAMwIAgAGCQDMCAIABwkAzAgCAAgJAMwIAgAJBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjZfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBE2FkZFRva2VuRGF0YUVudHJpZXMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjZfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY2XzICCQEFJGY2XzECCQEFJGY2XzECCQEFJGY2XzECCQEFJGY2XzECCQEFJGY2XzECCQEFJGY2XzECCQEFJGY2XzECCQEFJGY2XzECCQEFJGY2XzECCQEFJGY2XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoJAMwIAgkBC1N0cmluZ0VudHJ5AgIPc3RhdGljX3Rva2VuSWRzBQthc3NldElkc1N0cgkAzAgCCQELU3RyaW5nRW50cnkCAg9zdGF0aWNfZmVlVG9rZW4FC2ZlZUFzc2V0U3RyCQDMCAIJAQtTdHJpbmdFbnRyeQICE3N0YXRpY190b2tlbldlaWdodHMFD2Fzc2V0V2VpZ2h0c1N0cgkAzAgCCQEMSW50ZWdlckVudHJ5AgITc3RhdGljX3Rva2Vuc0Ftb3VudAkAkAMBBQphc3NldElkc0xpCQDMCAIJAQtTdHJpbmdFbnRyeQICEXN0YXRpY19wb29sRG9tYWluBQpwb29sRG9tYWluCQDMCAIJAQtTdHJpbmdFbnRyeQICEnN0YXRpY19iYXNlVG9rZW5JZAUOYmFzZVRva2VuSWRTdHIJAMwIAgkBC1N0cmluZ0VudHJ5AgIQc3RhdGljX3Bvb2xPd25lcgUJcG9vbE93bmVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgpzdGF0aWNfZmVlBQNmZWUFA25pbAFpAQZkZUluaXQAAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIKYWRtaW4gb25seQkAzAgCCQEMSW50ZWdlckVudHJ5AgIQZ2xvYmFsX3dhc0luaXRlZAAABQNuaWwBaQEEaW5pdAAKAQtwcmVwYXJlTGlzdAAKAQdoYW5kbGVyAgVhY2N1bQFuCQDNCAIFBWFjY3VtCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEIBQFuB2Fzc2V0SWQCCF9iYWxhbmNlCAUBbgZhbW91bnQKAAIkbAgFAWkIcGF5bWVudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGY0XzICCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECCQEFJGY0XzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoKARljYWxjdWxhdGVQb29sVG9rZW5zQW1vdW50AQhwYXltZW50cwoBB2hhbmRsZXICBWFjY3VtA3BtdAQHYXNzZXRJZAgFA3BtdAdhc3NldElkCgEIaGFuZGxlcjICBWFjY3VtAW4DCQAAAgUBbgUHYXNzZXRJZAkBBXZhbHVlAQkAzwgCBQhhc3NldElkcwUBbgUFYWNjdW0EBVRva2VuCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAABCgEFJGY0XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQhoYW5kbGVyMgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmNF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjRfMgIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgkAawMFBWFjY3VtCQBsBggFA3BtdAZhbW91bnQJAJEDAgUIRGVjaW1hbHMFBVRva2VuCQCRAwIFDUFzc2V0c1dlaWdodHMFBVRva2VuBRVBc3NldHNXZWlnaHRzRGVjaW1hbHMACAUFRkxPT1IFBlNjYWxlOAoAAiRsBQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFDlBvb2xUb2tlblNjYWxlCgEFJGY0XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdoYW5kbGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGY0XzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmNF8yAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAwkBCmlzU2h1dGRvd24ACQACAQITY29udHJhY3QgaXMgb24gc3RvcAMJAGYCCQENdHJ5R2V0SW50ZWdlcgECEGdsb2JhbF93YXNJbml0ZWQAAAkAAgECE3Bvb2wgYWxyZWFkeSBpbml0ZWQEEWluaXRpYWxQb29sVG9rZW5zCQEZY2FsY3VsYXRlUG9vbFRva2Vuc0Ftb3VudAEIBQFpCHBheW1lbnRzAwkAAAIFEWluaXRpYWxQb29sVG9rZW5zAAAJAAIBAjJ5b3UgbmVlZCBhIGJpZ2dlciB0b2tlbnMgYW1vdW50IHRvIGxhdW5jaCB0aGUgcG9vbAQOcG9vbFRva2VuSXNzdWUJAMMIBwkArAICAgNQWiAJAQx0cnlHZXRTdHJpbmcBAhFzdGF0aWNfcG9vbERvbWFpbgIdUHV6emxlIFN3YXA6IHBvb2wgaW5kZXggdG9rZW4FEWluaXRpYWxQb29sVG9rZW5zBRFQb29sVG9rZW5EZWNpbWFscwYFBHVuaXQAAAQLcG9vbFRva2VuSWQJALgIAQUOcG9vbFRva2VuSXNzdWUJAM4IAgkBC3ByZXBhcmVMaXN0AAkAzAgCBQ5wb29sVG9rZW5Jc3N1ZQkAzAgCCQEMSW50ZWdlckVudHJ5AgIXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQFEWluaXRpYWxQb29sVG9rZW5zCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhBnbG9iYWxfd2FzSW5pdGVkAAEJAMwIAgkBC0JpbmFyeUVudHJ5AgITZ2xvYmFsX3Bvb2xUb2tlbl9pZAULcG9vbFRva2VuSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgIWc3RhdGljX3Bvb2xUb2tlbl9pZFN0cgkBDmdldEFzc2V0U3RyaW5nAQULcG9vbFRva2VuSWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkApQgBCAUBaQZjYWxsZXICDF9pbmRleFN0YWtlZAURaW5pdGlhbFBvb2xUb2tlbnMJAMwIAgkBDEludGVnZXJFbnRyeQICEmdsb2JhbF9pbmRleFN0YWtlZAURaW5pdGlhbFBvb2xUb2tlbnMFA25pbAFpAQ1nZW5lcmF0ZUluZGV4AQpuZWVkQ2hhbmdlAwkBCmlzU2h1dGRvd24ACQACAQITY29udHJhY3QgaXMgb24gc3RvcAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMFAVQJAAIBCQCsAgICO3lvdSBuZWVkIHRvIGF0dGFjaCBhbGwgcG9vbCB0b2tlbnMuIGFtb3VudCBvZiBwb29sIHRva2VuczogCQCkAwEFAVQDCQEBIQEJARNjaGVja1Rva2Vuc1ZhbGlkaXR5AQgFAWkIcGF5bWVudHMJAAIBAhV3cm9uZyBhc3NldHMgYXR0YWNoZWQEB1BJc3N1ZWQJAQ1nZXRNaW5QSXNzdWVkAQgFAWkIcGF5bWVudHMEB3JlaXNzdWUJAQdSZWlzc3VlAwkBEUBleHRyTmF0aXZlKDEwNTcpAQITZ2xvYmFsX3Bvb2xUb2tlbl9pZAUHUElzc3VlZAYEBnJlc3VsdAkBE2hhbmRsZVBvb2xUb2tlbnNBZGQEBQdQSXNzdWVkCAUBaQhwYXltZW50cwgFAWkMb3JpZ2luQ2FsbGVyBQpuZWVkQ2hhbmdlCQCUCgIJAM4IAgUGcmVzdWx0CQDMCAIFB3JlaXNzdWUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQdQSXNzdWVkCQEMdHJ5R2V0QmluYXJ5AQITZ2xvYmFsX3Bvb2xUb2tlbl9pZAkAzAgCCQEMSW50ZWdlckVudHJ5AgIXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQJAGQCCQENdHJ5R2V0SW50ZWdlcgECF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BQdQSXNzdWVkBQNuaWwFB1BJc3N1ZWQBaQEKc3Rha2VJbmRleAAECmFkZHJlc3NTdHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAMJAQppc1NodXRkb3duAAkAAgECE2NvbnRyYWN0IGlzIG9uIHN0b3ADCQECIT0CCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQJAQx0cnlHZXRCaW5hcnkBAhNnbG9iYWxfcG9vbFRva2VuX2lkCQACAQIUd3JvbmcgYXNzZXQgYXR0YWNoZWQJARBpbmRleFN0YWtlUmVzdWx0AgUKYWRkcmVzc1N0cggFA3BtdAZhbW91bnQBaQEMdW5zdGFrZUluZGV4AQxwdXp6bGVBbW91bnQECmFkZHJlc3NTdHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBA9wdXp6bGVBdmFpbGFibGUJAQ10cnlHZXRJbnRlZ2VyAQkArAICBQphZGRyZXNzU3RyAgxfaW5kZXhTdGFrZWQDCQEKaXNTaHV0ZG93bgAJAAIBAhNjb250cmFjdCBpcyBvbiBzdG9wAwkAZgIFDHB1enpsZUFtb3VudAUPcHV6emxlQXZhaWxhYmxlCQACAQIleW91IGRvbid0IGhhdmUgaW5kZXggdG9rZW5zIGF2YWlsYWJsZQkAzggCCAkBC2NsYWltUmVzdWx0AQgFAWkMb3JpZ2luQ2FsbGVyAl8xCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCmFkZHJlc3NTdHICDF9pbmRleFN0YWtlZAkAZQIFD3B1enpsZUF2YWlsYWJsZQUMcHV6emxlQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCAhJnbG9iYWxfaW5kZXhTdGFrZWQJAGUCCQENdHJ5R2V0SW50ZWdlcgECEmdsb2JhbF9pbmRleFN0YWtlZAUMcHV6emxlQW1vdW50CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUMcHV6emxlQW1vdW50CQERQGV4dHJOYXRpdmUoMTA1NykBAhNnbG9iYWxfcG9vbFRva2VuX2lkBQNuaWwBaQERY2xhaW1JbmRleFJld2FyZHMAAwkBCmlzU2h1dGRvd24ACQACAQITY29udHJhY3QgaXMgb24gc3RvcAkBC2NsYWltUmVzdWx0AQgFAWkGY2FsbGVyAWkBDWV2YWx1YXRlQ2xhaW0BBHVzZXIJAJQKAgUDbmlsCAkBC2NsYWltUmVzdWx0AQkBEUBleHRyTmF0aXZlKDEwNjIpAQUEdXNlcgJfMgFpAQtyZWRlZW1JbmRleAEMc2VuZFRvT3JpZ2luBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQNwbXQHYXNzZXRJZAkBDHRyeUdldEJpbmFyeQECE2dsb2JhbF9wb29sVG9rZW5faWQJAAIBAh5wbGVhc2UgYXR0YWNoIHBvb2wgc2hhcmUgdG9rZW4DCQEKaXNTaHV0ZG93bgAJAAIBAhNjb250cmFjdCBpcyBvbiBzdG9wBAlQUmVkZWVtZWQIBQNwbXQGYW1vdW50BAZyZXN1bHQJARZoYW5kbGVQb29sVG9rZW5zUmVkZWVtAgUJUFJlZGVlbWVkAwUMc2VuZFRvT3JpZ2luCAUBaQxvcmlnaW5DYWxsZXIIBQFpBmNhbGxlcgkAzggCBQZyZXN1bHQJAMwIAgkBBEJ1cm4CCQEMdHJ5R2V0QmluYXJ5AQITZ2xvYmFsX3Bvb2xUb2tlbl9pZAUJUFJlZGVlbWVkCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhdnbG9iYWxfcG9vbFRva2VuX2Ftb3VudAkAZQIJAQ10cnlHZXRJbnRlZ2VyAQIXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQFCVBSZWRlZW1lZAUDbmlsAWkBBHN3YXACCGFzc2V0T3V0B21pbmltdW0EA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgECIXBsZWFzZSBhdHRhY2ggZXhhY3RseSBvbmUgcGF5bWVudAQIQW1vdW50SW4JAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAdBc3NldEluCAUDcG10B2Fzc2V0SWQECEFzc2V0T3V0CQENZ2V0QXNzZXRCeXRlcwEFCGFzc2V0T3V0BA5mZWVBc3NldE91dFN0cgkBDHRyeUdldFN0cmluZwECD3N0YXRpY19mZWVUb2tlbgQLZmVlQXNzZXRPdXQDCQAAAgUOZmVlQXNzZXRPdXRTdHICAAULdXNkbkFzc2V0SWQJAQ1nZXRBc3NldEJ5dGVzAQUOZmVlQXNzZXRPdXRTdHIEDkFzc2V0SW5CYWxhbmNlCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdnbG9iYWxfCQEOZ2V0QXNzZXRTdHJpbmcBBQdBc3NldEluAghfYmFsYW5jZQQPQXNzZXRPdXRCYWxhbmNlCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgdnbG9iYWxfBQhhc3NldE91dAIIX2JhbGFuY2UEC2ZlZUFtb3VudEluCQBrAwUIQW1vdW50SW4FA0ZlZQUIRmVlU2NhbGUEDWNsZWFuQW1vdW50SW4JAGUCBQhBbW91bnRJbgULZmVlQW1vdW50SW4ECUFtb3VudE91dAkBEmNhbGN1bGF0ZU91dEFtb3VudAUFDWNsZWFuQW1vdW50SW4FB0Fzc2V0SW4FCEFzc2V0T3V0BQ5Bc3NldEluQmFsYW5jZQUPQXNzZXRPdXRCYWxhbmNlBBBBc3NldE91dEJhbGFuY2UyCQBlAgUPQXNzZXRPdXRCYWxhbmNlBQlBbW91bnRPdXQED0Fzc2V0SW5CYWxhbmNlMgkAZAIFDkFzc2V0SW5CYWxhbmNlBQ1jbGVhbkFtb3VudEluBBJmZWVBc3NldE91dEJhbGFuY2UDCQAAAgULZmVlQXNzZXRPdXQFB0Fzc2V0SW4FD0Fzc2V0SW5CYWxhbmNlMgMJAAACBQtmZWVBc3NldE91dAUIQXNzZXRPdXQFEEFzc2V0T3V0QmFsYW5jZTIJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFC2ZlZUFzc2V0T3V0AghfYmFsYW5jZQQMZmVlQW1vdW50T3V0CQESY2FsY3VsYXRlT3V0QW1vdW50BQULZmVlQW1vdW50SW4FB0Fzc2V0SW4FC2ZlZUFzc2V0T3V0BQ5Bc3NldEluQmFsYW5jZQUSZmVlQXNzZXRPdXRCYWxhbmNlAwkAZgIFB21pbmltdW0FCUFtb3VudE91dAkAAgECKWFtb3VudCB0byByZWNpZXZlIGlzIGxvd2VyIHRoYW4gZ2l2ZW4gb25lAwkAAAIFCEFzc2V0T3V0BQdBc3NldEluCQACAQIYdGhpcyBzd2FwIGlzIG5vdCBhbGxvd2VkAwkAZgIAAAkAZQIFD0Fzc2V0T3V0QmFsYW5jZQUJQW1vdW50T3V0CQACAQIbY29udHJhY3QgaXMgb3V0IG9mIHJlc2VydmVzAwkBCmlzU2h1dGRvd24ACQACAQITY29udHJhY3QgaXMgb24gc3RvcAQKY3JlYXRvckZlZQkAawMFDGZlZUFtb3VudE91dAABAAoEC3Byb3RvY29sRmVlCQBrAwUMZmVlQW1vdW50T3V0AAQACgQMc3Rha2luZ1RvcFVwAwMJAAACBQtmZWVBc3NldE91dAULdXNkbkFzc2V0SWQGCQAAAgULZmVlQXNzZXRPdXQFDXB1enpsZUFzc2V0SWQJAP0HBAkBB0FkZHJlc3MBARoBV5RojPnuormqn9b1jrypj2canAb0FimJuwILdG9wVXBSZXdhcmQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgULZmVlQXNzZXRPdXQFC3Byb3RvY29sRmVlBQNuaWwFBHVuaXQDCQAAAgUMc3Rha2luZ1RvcFVwBQxzdGFraW5nVG9wVXAEDG5ld0JhbGFuY2VJbgUPQXNzZXRJbkJhbGFuY2UyBA1uZXdCYWxhbmNlT3V0CQBlAgUQQXNzZXRPdXRCYWxhbmNlMgMJAAACBQhBc3NldE91dAULZmVlQXNzZXRPdXQFDGZlZUFtb3VudE91dAAABBJuZXdCYWxhbmNlRmVlQXNzZXQDAwkBAiE9AgULZmVlQXNzZXRPdXQFB0Fzc2V0SW4JAQIhPQIFC2ZlZUFzc2V0T3V0BQhBc3NldE91dAcJAGUCBRJmZWVBc3NldE91dEJhbGFuY2UFDGZlZUFtb3VudE91dAUEdW5pdAQNYXNzZXRJbkNoYW5nZQkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgdnbG9iYWxfCQEOZ2V0QXNzZXRTdHJpbmcBBQdBc3NldEluAghfYmFsYW5jZQUMbmV3QmFsYW5jZUluBA5hc3NldE91dENoYW5nZQkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgdnbG9iYWxfBQhhc3NldE91dAIIX2JhbGFuY2UFDW5ld0JhbGFuY2VPdXQEEWZlZUFzc2V0T3V0Q2hhbmdlAwkBAiE9AgUSbmV3QmFsYW5jZUZlZUFzc2V0BQR1bml0CQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICB2dsb2JhbF8JAQ5nZXRBc3NldFN0cmluZwEFC2ZlZUFzc2V0T3V0AghfYmFsYW5jZQkBBXZhbHVlAQUSbmV3QmFsYW5jZUZlZUFzc2V0CQELU3RyaW5nRW50cnkCAgVoZWxsbwIFd29ybGQEDHZvbHVtZVVwZGF0ZQkBEmNhbGN1bGF0ZVVzZG5WYWx1ZQQFB0Fzc2V0SW4FCEFtb3VudEluBQ5Bc3NldEluQmFsYW5jZQUSZmVlQXNzZXRPdXRCYWxhbmNlCQCUCgIJAM4IAgkAzAgCBQ5hc3NldE91dENoYW5nZQkAzAgCBQ1hc3NldEluQ2hhbmdlCQDMCAIFEWZlZUFzc2V0T3V0Q2hhbmdlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUJQW1vdW50T3V0BQhBc3NldE91dAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBCQEMdHJ5R2V0U3RyaW5nAQIQc3RhdGljX3Bvb2xPd25lcgUKY3JlYXRvckZlZQULZmVlQXNzZXRPdXQJAMwIAgkBDEludGVnZXJFbnRyeQICFGdsb2JhbF9lYXJuZWRCeU93bmVyCQBkAgkBDXRyeUdldEludGVnZXIBAhRnbG9iYWxfZWFybmVkQnlPd25lcgUKY3JlYXRvckZlZQkAzAgCCQEMSW50ZWdlckVudHJ5AgINZ2xvYmFsX3ZvbHVtZQkAZAIJAQ10cnlHZXRJbnRlZ2VyAQINZ2xvYmFsX3ZvbHVtZQUMdm9sdW1lVXBkYXRlBQNuaWwDCQAAAgUMc3Rha2luZ1RvcFVwBQR1bml0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQEaAVce4ftAMWuB5uxLVhsFLFGhk27fCbE80sEFC3Byb3RvY29sRmVlBQtmZWVBc3NldE91dAUDbmlsBQNuaWwFCUFtb3VudE91dAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQADCQEKaXNTaHV0ZG93bgAHAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleQYJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFDG1hc3RlclB1YktleVRENWc=", "height": 2641139, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: DSsx97ymeRyTXGryzjaKQEQH1CzF5UGuaZkdLry5ef9M Next: EqEmydXQaTjWPfmRM6zVBbsZZk4vvHHvpba4pyQRAAhD Diff:
OldNewDifferences
1-{-# STDLIB_VERSION 5 #-}
1+{-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4+let usdnAssetId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
5+
6+let puzzleAssetId = base58'HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS'
7+
8+let usdtAssetId = base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ'
9+
10+let usdtPptAssetId = base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
11+
12+let usdnAssetIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
13+
14+let puzzleAssetIdStr = "HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS"
15+
16+let usdtAssetIdStr = "34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ"
17+
18+let usdtPptAssetIdStr = "9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi"
19+
20+let parentPoolAddress = Address(base58'3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh')
21+
22+let masterAddress = Address(base58'3PLjwHcz9NEuaTo63NZR9B9okQiKQxZSbmf')
23+
24+let masterPubKey = base58'4z8CKSYQBKkzx7PBb5uBP1YPa6YAHRNTApW1sQVHT5eU'
25+
426 func tryGetInteger (key) = match getInteger(this, key) {
527 case b: Int =>
628 b
117139
118140 let Fee = tryGetInteger("static_fee")
119141
120-let AssetsWeightsDecimals = 2
142+let AssetsWeightsDecimals = 4
121143
122144 let Scale = 10000
123145
179201 }
180202
181203
182-func calculateUsdnValue (assetId,amount,aBalance) = {
183- let usdnId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
184- let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnId))]
185- let assetWeight = AssetsWeights[value(indexOf(assetIds, assetId))]
186- let usdnBalance = tryGetInteger((("global_" + getAssetString(usdnId)) + "_balance"))
187- fraction(amount, (usdnBalance / usdnWeight), (aBalance / assetWeight))
204+func calculateUsdnValue (assetId,amount,aBalance,givenUsdnBalance) = {
205+ let usdnInPool = indexOf(assetIds, usdnAssetId)
206+ let puzzleInPool = indexOf(assetIds, puzzleAssetId)
207+ let usdtInPool = indexOf(assetIds, usdtAssetId)
208+ let wavesInPool = indexOf(assetIds, unit)
209+ let assetWeight = tryGetInteger((("static_" + getAssetString(assetId)) + "_weight"))
210+ let feeAssetStr = tryGetString("static_feeToken")
211+ if ((feeAssetStr == puzzleAssetIdStr))
212+ then {
213+ let puzzleWeight = AssetsWeights[value(indexOf(assetIds, puzzleAssetId))]
214+ let puzzleBalance = tryGetInteger((("global_" + puzzleAssetIdStr) + "_balance"))
215+ let amountInPuzzle = fraction(amount, (puzzleBalance / puzzleWeight), (aBalance / assetWeight))
216+ let puzzlePrice = getIntegerValue(parentPoolAddress, "global_lastPuzzlePrice")
217+ fraction((amountInPuzzle * puzzlePrice), 1, Scale8)
218+ }
219+ else if ((feeAssetStr == usdtAssetIdStr))
220+ then {
221+ let usdtWeight = AssetsWeights[value(usdtInPool)]
222+ let usdtBalance = tryGetInteger((("global_" + usdtAssetIdStr) + "_balance"))
223+ fraction(amount, (usdtBalance / usdtWeight), (aBalance / assetWeight))
224+ }
225+ else if ((feeAssetStr == usdnAssetIdStr))
226+ then {
227+ let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnAssetId))]
228+ let usdnBalance = match givenUsdnBalance {
229+ case x: Int =>
230+ givenUsdnBalance
231+ case _ =>
232+ tryGetInteger((("global_" + getAssetString(usdnAssetId)) + "_balance"))
233+ }
234+ fraction(amount, (value(usdnBalance) / usdnWeight), (aBalance / assetWeight))
235+ }
236+ else {
237+ let wavesWeight = 3000
238+ let wBalance = (tryGetInteger("global_WAVES_balance") / 50)
239+ fraction(amount, (wBalance / wavesWeight), (aBalance / assetWeight))
240+ }
188241 }
189242
190243
355408 let transfer = if ((rewardAmount == 0))
356409 then nil
357410 else [ScriptTransfer(address, rewardAmount, assetId)]
358- $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)))
411+ $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)))
359412 }
360413
361414 let accum = {
372425
373426 $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)
374427 }
375- (accum._1 ++ [IntegerEntry((addressStr + "_claimedRewardValue"), (tryGetInteger((addressStr + "_claimedRewardValue")) + accum._2)), IntegerEntry((addressStr + "_lastClaim"), lastBlock.timestamp)])
428+ $Tuple2((accum._1 ++ [IntegerEntry((addressStr + "_claimedRewardValue"), (tryGetInteger((addressStr + "_claimedRewardValue")) + accum._2)), IntegerEntry((addressStr + "_lastClaim"), lastBlock.timestamp)]), accum._2)
376429 }
377430
378431
379432 func indexStakeResult (addressStr,amount) = {
380- let li = claimResult(addressFromStringValue(addressStr))
433+ let li = claimResult(addressFromStringValue(addressStr))._1
381434 (li ++ [IntegerEntry((addressStr + "_indexStaked"), (tryGetInteger((addressStr + "_indexStaked")) + amount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") + amount))])
382435 }
383436
386439
387440
388441 @Callable(i)
389-func preInit (assetIdsStr,assetWeightsStr,baseTokenIdStr,poolDomain) = if ((this != i.caller))
390- then throw("admin only")
391- else if ((size(poolDomain) > 13))
392- then throw("too large pool domain")
393- else {
394- let assetIdsStrLi = split(assetIdsStr, ",")
395- let assetIdsLi = {
396- let $l = assetIdsStrLi
397- let $s = size($l)
398- let $acc0 = nil
399- func $f4_1 ($a,$i) = if (($i >= $s))
400- then $a
401- else addAssetBytesToList($a, $l[$i])
442+func preInit (assetIdsStr,assetWeightsStr,baseTokenIdStr,poolDomain,poolOwner,fee) = {
443+ let poolOwnerAddress = Address(fromBase58String(poolOwner))
444+ if (isShutdown())
445+ then throw("contract is on stop")
446+ else if ((this != i.caller))
447+ then throw("admin only")
448+ else if ((size(poolDomain) > 13))
449+ then throw("too large pool domain")
450+ else if (if ((50 > fee))
451+ then true
452+ else (fee > 500))
453+ then throw("fee value must be between 50 and 500 (0.5-5%)")
454+ else if (if (if (if (if ((indexOf(assetIdsStr, puzzleAssetIdStr) == unit))
455+ then (indexOf(assetIdsStr, usdnAssetIdStr) == unit)
456+ else false)
457+ then (indexOf(assetIdsStr, usdtAssetIdStr) == unit)
458+ else false)
459+ then (indexOf(assetIdsStr, "WAVES") == unit)
460+ else false)
461+ then (indexOf(assetIdsStr, usdtPptAssetIdStr) == unit)
462+ else false)
463+ then throw("pool must have USDT-WXG, USDT-PPT, USDN, WAVES or PUZZLE in the composition")
464+ else {
465+ let assetIdsStrLi = split(assetIdsStr, ",")
466+ let assetIdsLi = {
467+ let $l = assetIdsStrLi
468+ let $s = size($l)
469+ let $acc0 = nil
470+ func $f4_1 ($a,$i) = if (($i >= $s))
471+ then $a
472+ else addAssetBytesToList($a, $l[$i])
402473
403- func $f4_2 ($a,$i) = if (($i >= $s))
404- then $a
405- else throw("List size exceeds 10")
474+ func $f4_2 ($a,$i) = if (($i >= $s))
475+ then $a
476+ else throw("List size exceeds 10")
406477
407- $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)
408- }
409- let assetWeightsStrLi = split(assetWeightsStr, ",")
410- let assetWeightsSum = {
411- let $l = assetWeightsStrLi
412- let $s = size($l)
413- let $acc0 = 0
414- func $f5_1 ($a,$i) = if (($i >= $s))
415- then $a
416- else sum($a, $l[$i])
478+ $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)
479+ }
480+ let assetWeightsStrLi = split(assetWeightsStr, ",")
481+ let assetWeightsSum = {
482+ let $l = assetWeightsStrLi
483+ let $s = size($l)
484+ let $acc0 = 0
485+ func $f5_1 ($a,$i) = if (($i >= $s))
486+ then $a
487+ else sum($a, $l[$i])
417488
418- func $f5_2 ($a,$i) = if (($i >= $s))
419- then $a
420- else throw("List size exceeds 10")
489+ func $f5_2 ($a,$i) = if (($i >= $s))
490+ then $a
491+ else throw("List size exceeds 10")
421492
422- $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)
423- }
424- func addTokenDataEntries (accum,assetNum) = if ((assetNum >= size(assetIdsLi)))
425- then accum
426- else {
427- let assetDecimals = match assetIdsLi[assetNum] {
428- case x: ByteVector =>
429- value(assetInfo(x)).decimals
430- case _ =>
431- 8
432- }
433- (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])))])
434- }
493+ $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)
494+ }
495+ let feeAssetStr = if ((indexOf(assetIdsStr, usdnAssetIdStr) != unit))
496+ then usdnAssetIdStr
497+ else if ((indexOf(assetIdsStr, "WAVES") != unit))
498+ then "WAVES"
499+ else if ((indexOf(assetIdsStr, usdtAssetIdStr) != unit))
500+ then usdtAssetIdStr
501+ else if ((indexOf(assetIdsStr, puzzleAssetIdStr) != unit))
502+ then puzzleAssetIdStr
503+ else usdtPptAssetIdStr
504+ func addTokenDataEntries (accum,assetNum) = if ((assetNum >= size(assetIdsLi)))
505+ then accum
506+ else {
507+ let assetDecimals = match assetIdsLi[assetNum] {
508+ case x: ByteVector =>
509+ value(assetInfo(x)).decimals
510+ case _ =>
511+ 8
512+ }
513+ (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])))])
514+ }
435515
436- if ((assetWeightsSum != 100))
437- then throw("sum of token weights must be equal to 100")
438- else ({
439- let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
440- let $s = size($l)
441- let $acc0 = nil
442- func $f6_1 ($a,$i) = if (($i >= $s))
443- then $a
444- else addTokenDataEntries($a, $l[$i])
516+ if ((assetWeightsSum != 10000))
517+ then throw("sum of token weights must be equal to 10000")
518+ else ({
519+ let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
520+ let $s = size($l)
521+ let $acc0 = nil
522+ func $f6_1 ($a,$i) = if (($i >= $s))
523+ then $a
524+ else addTokenDataEntries($a, $l[$i])
445525
446- func $f6_2 ($a,$i) = if (($i >= $s))
447- then $a
448- else throw("List size exceeds 10")
526+ func $f6_2 ($a,$i) = if (($i >= $s))
527+ then $a
528+ else throw("List size exceeds 10")
449529
450- $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)
451- } ++ [StringEntry("static_tokenIds", assetIdsStr), StringEntry("static_tokenWeights", assetWeightsStr), IntegerEntry("static_tokensAmount", size(assetIdsLi)), StringEntry("static_poolDomain", poolDomain), StringEntry("static_baseTokenId", baseTokenIdStr), IntegerEntry("static_fee", 200)])
452- }
530+ $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)
531+ } ++ [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)])
532+ }
533+ }
453534
454535
455536
517598 $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)
518599 }
519600
520- if ((tryGetInteger("global_wasInited") > 0))
521- then throw("pool already inited")
522- else {
523- let initialPoolTokens = calculatePoolTokensAmount(i.payments)
524- if ((initialPoolTokens == 0))
525- then throw("you need a bigger tokens amount to launch the pool")
526- else {
527- let poolTokenIssue = Issue(("PZ " + tryGetString("static_poolDomain")), "Puzzle Swap: pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
528- let poolTokenId = calculateAssetId(poolTokenIssue)
529- (prepareList() ++ [poolTokenIssue, IntegerEntry("global_poolToken_amount", initialPoolTokens), IntegerEntry("global_wasInited", 1), BinaryEntry("global_poolToken_id", poolTokenId), StringEntry("static_poolToken_idStr", getAssetString(poolTokenId)), ScriptTransfer(i.caller, initialPoolTokens, poolTokenId)])
530- }
531- }
601+ if (isShutdown())
602+ then throw("contract is on stop")
603+ else if ((tryGetInteger("global_wasInited") > 0))
604+ then throw("pool already inited")
605+ else {
606+ let initialPoolTokens = calculatePoolTokensAmount(i.payments)
607+ if ((initialPoolTokens == 0))
608+ then throw("you need a bigger tokens amount to launch the pool")
609+ else {
610+ let poolTokenIssue = Issue(("PZ " + tryGetString("static_poolDomain")), "Puzzle Swap: pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
611+ let poolTokenId = calculateAssetId(poolTokenIssue)
612+ (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)])
613+ }
614+ }
532615 }
533616
534617
535618
536619 @Callable(i)
537-func generateIndex (needChange) = if ((size(i.payments) != T))
538- then throw(("you need to attach all pool tokens. amount of pool tokens: " + toString(T)))
539- else if (!(checkTokensValidity(i.payments)))
540- then throw("wrong assets attached")
541- else {
542- let PIssued = getMinPIssued(i.payments)
543- let reissue = Reissue(getBinaryValue("global_poolToken_id"), PIssued, true)
544- let result = handlePoolTokensAdd(PIssued, i.payments, i.originCaller, needChange)
545- $Tuple2((result ++ [ScriptTransfer(i.caller, PIssued, tryGetBinary("global_poolToken_id")), reissue, IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") + PIssued))]), PIssued)
546- }
620+func generateIndex (needChange) = if (isShutdown())
621+ then throw("contract is on stop")
622+ else if ((size(i.payments) != T))
623+ then throw(("you need to attach all pool tokens. amount of pool tokens: " + toString(T)))
624+ else if (!(checkTokensValidity(i.payments)))
625+ then throw("wrong assets attached")
626+ else {
627+ let PIssued = getMinPIssued(i.payments)
628+ let reissue = Reissue(getBinaryValue("global_poolToken_id"), PIssued, true)
629+ let result = handlePoolTokensAdd(PIssued, i.payments, i.originCaller, needChange)
630+ $Tuple2((result ++ [reissue, ScriptTransfer(i.caller, PIssued, tryGetBinary("global_poolToken_id")), IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") + PIssued))]), PIssued)
631+ }
547632
548633
549634
551636 func stakeIndex () = {
552637 let addressStr = toString(i.originCaller)
553638 let pmt = i.payments[0]
554- if ((value(pmt.assetId) != tryGetBinary("global_poolToken_id")))
555- then throw("wrong asset attached")
556- else indexStakeResult(addressStr, pmt.amount)
639+ if (isShutdown())
640+ then throw("contract is on stop")
641+ else if ((value(pmt.assetId) != tryGetBinary("global_poolToken_id")))
642+ then throw("wrong asset attached")
643+ else indexStakeResult(addressStr, pmt.amount)
557644 }
558645
559646
562649 func unstakeIndex (puzzleAmount) = {
563650 let addressStr = toString(i.originCaller)
564651 let puzzleAvailable = tryGetInteger((addressStr + "_indexStaked"))
565- if ((puzzleAmount > puzzleAvailable))
566- then throw("you don't have index tokens available")
567- else (claimResult(i.originCaller) ++ [IntegerEntry((addressStr + "_indexStaked"), (puzzleAvailable - puzzleAmount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") - puzzleAmount)), ScriptTransfer(i.caller, puzzleAmount, getBinaryValue("global_poolToken_id"))])
652+ if (isShutdown())
653+ then throw("contract is on stop")
654+ else if ((puzzleAmount > puzzleAvailable))
655+ then throw("you don't have index tokens available")
656+ 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"))])
568657 }
569658
570659
571660
572661 @Callable(i)
573-func claimIndexRewards () = claimResult(i.caller)
662+func claimIndexRewards () = if (isShutdown())
663+ then throw("contract is on stop")
664+ else claimResult(i.caller)
665+
666+
667+
668+@Callable(i)
669+func evaluateClaim (user) = $Tuple2(nil, claimResult(addressFromStringValue(user))._2)
574670
575671
576672
579675 let pmt = i.payments[0]
580676 if ((pmt.assetId != tryGetBinary("global_poolToken_id")))
581677 then throw("please attach pool share token")
582- else {
583- let PRedeemed = pmt.amount
584- let result = handlePoolTokensRedeem(PRedeemed, if (sendToOrigin)
585- then i.originCaller
586- else i.caller)
587- (result ++ [Burn(tryGetBinary("global_poolToken_id"), PRedeemed), IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") - PRedeemed))])
588- }
678+ else if (isShutdown())
679+ then throw("contract is on stop")
680+ else {
681+ let PRedeemed = pmt.amount
682+ let result = handlePoolTokensRedeem(PRedeemed, if (sendToOrigin)
683+ then i.originCaller
684+ else i.caller)
685+ (result ++ [Burn(tryGetBinary("global_poolToken_id"), PRedeemed), IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") - PRedeemed))])
686+ }
589687 }
590688
591689
592690
593691 @Callable(i)
594692 func swap (assetOut,minimum) = {
595- let pmt = value(i.payments[0])
693+ let pmt = if ((size(i.payments) == 1))
694+ then value(i.payments[0])
695+ else throw("please attach exactly one payment")
596696 let AmountIn = value(i.payments[0].amount)
597697 let AssetIn = pmt.assetId
598698 let AssetOut = getAssetBytes(assetOut)
699+ let feeAssetOutStr = tryGetString("static_feeToken")
700+ let feeAssetOut = if ((feeAssetOutStr == ""))
701+ then usdnAssetId
702+ else getAssetBytes(feeAssetOutStr)
599703 let AssetInBalance = tryGetInteger((("global_" + getAssetString(AssetIn)) + "_balance"))
600704 let AssetOutBalance = tryGetInteger((("global_" + assetOut) + "_balance"))
601- let AmountOut = calculateOutAmount(AmountIn, AssetIn, AssetOut, AssetInBalance, AssetOutBalance)
602- let feeAmount = fraction(AmountOut, Fee, FeeScale)
603- let cleanAmountOut = (AmountOut - feeAmount)
604- if ((minimum > cleanAmountOut))
605- then throw(("amount to recieve is lower than given one: " + toString(cleanAmountOut)))
606- else if ((0 > (AssetOutBalance - AmountOut)))
607- then throw("contract is out of reserves")
608- else {
609- let newBalanceIn = (AssetInBalance + AmountIn)
610- let newBalanceOut = (AssetOutBalance - AmountOut)
611- let usdnAssetId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
612- if ((usdnAssetId == AssetOut))
613- then {
614- let usdnFeeAmount = feeAmount
615- let protocolUsdnFee = fraction(usdnFeeAmount, 4, 10)
616- let stakingTopUp = reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(usdnAssetId, protocolUsdnFee)])
617- if ((stakingTopUp == stakingTopUp))
618- then $Tuple2([IntegerEntry((("global_" + assetOut) + "_balance"), newBalanceOut), IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), newBalanceIn), ScriptTransfer(i.caller, cleanAmountOut, AssetOut), IntegerEntry("global_volume", (tryGetInteger("global_volume") + calculateUsdnValue(AssetIn, AmountIn, AssetInBalance)))], cleanAmountOut)
619- else throw("Strict value is not equal to itself.")
620- }
705+ let feeAmountIn = fraction(AmountIn, Fee, FeeScale)
706+ let cleanAmountIn = (AmountIn - feeAmountIn)
707+ let AmountOut = calculateOutAmount(cleanAmountIn, AssetIn, AssetOut, AssetInBalance, AssetOutBalance)
708+ let AssetOutBalance2 = (AssetOutBalance - AmountOut)
709+ let AssetInBalance2 = (AssetInBalance + cleanAmountIn)
710+ let feeAssetOutBalance = if ((feeAssetOut == AssetIn))
711+ then AssetInBalance2
712+ else if ((feeAssetOut == AssetOut))
713+ then AssetOutBalance2
714+ else tryGetInteger((("global_" + getAssetString(feeAssetOut)) + "_balance"))
715+ let feeAmountOut = calculateOutAmount(feeAmountIn, AssetIn, feeAssetOut, AssetInBalance, feeAssetOutBalance)
716+ if ((minimum > AmountOut))
717+ then throw("amount to recieve is lower than given one")
718+ else if ((AssetOut == AssetIn))
719+ then throw("this swap is not allowed")
720+ else if ((0 > (AssetOutBalance - AmountOut)))
721+ then throw("contract is out of reserves")
722+ else if (isShutdown())
723+ then throw("contract is on stop")
621724 else {
622- let usdnBalance = if ((AssetIn == usdnAssetId))
623- then newBalanceIn
624- else tryGetInteger((("global_" + getAssetString(usdnAssetId)) + "_balance"))
625- let usdnFeeAmount = calculateOutAmount(feeAmount, AssetOut, usdnAssetId, newBalanceOut, usdnBalance)
626- let protocolUsdnFee = fraction(usdnFeeAmount, 4, 10)
627- let stakingTopUp = reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(usdnAssetId, protocolUsdnFee)])
725+ let creatorFee = fraction(feeAmountOut, 1, 10)
726+ let protocolFee = fraction(feeAmountOut, 4, 10)
727+ let stakingTopUp = if (if ((feeAssetOut == usdnAssetId))
728+ then true
729+ else (feeAssetOut == puzzleAssetId))
730+ then reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(feeAssetOut, protocolFee)])
731+ else unit
628732 if ((stakingTopUp == stakingTopUp))
629733 then {
630- let usdnBalanceChangeEntry = IntegerEntry((("global_" + toBase58String(usdnAssetId)) + "_balance"), (usdnBalance - usdnFeeAmount))
631- let balanceChanges = if ((AssetIn == usdnAssetId))
632- then [usdnBalanceChangeEntry]
633- else [usdnBalanceChangeEntry, IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), newBalanceIn)]
634- $Tuple2(([IntegerEntry((("global_" + assetOut) + "_balance"), (newBalanceOut + feeAmount)), ScriptTransfer(i.caller, cleanAmountOut, AssetOut), IntegerEntry("global_volume", (tryGetInteger("global_volume") + calculateUsdnValue(AssetIn, AmountIn, AssetInBalance)))] ++ balanceChanges), cleanAmountOut)
734+ let newBalanceIn = AssetInBalance2
735+ let newBalanceOut = (AssetOutBalance2 - (if ((AssetOut == feeAssetOut))
736+ then feeAmountOut
737+ else 0))
738+ let newBalanceFeeAsset = if (if ((feeAssetOut != AssetIn))
739+ then (feeAssetOut != AssetOut)
740+ else false)
741+ then (feeAssetOutBalance - feeAmountOut)
742+ else unit
743+ let assetInChange = IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), newBalanceIn)
744+ let assetOutChange = IntegerEntry((("global_" + assetOut) + "_balance"), newBalanceOut)
745+ let feeAssetOutChange = if ((newBalanceFeeAsset != unit))
746+ then IntegerEntry((("global_" + getAssetString(feeAssetOut)) + "_balance"), value(newBalanceFeeAsset))
747+ else StringEntry("hello", "world")
748+ let volumeUpdate = calculateUsdnValue(AssetIn, AmountIn, AssetInBalance, feeAssetOutBalance)
749+ $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") + volumeUpdate))] ++ (if ((stakingTopUp == unit))
750+ then [ScriptTransfer(Address(base58'3P4kBiU4wr2yV1S5gMfu3MdkVvy7kxXHsKe'), protocolFee, feeAssetOut)]
751+ else nil)), AmountOut)
635752 }
636753 else throw("Strict value is not equal to itself.")
637754 }
638- }
639- }
640-
641-
642-
643-@Callable(i)
644-func flashLoan (assetIdStr,amount,actionsStr) = {
645- let actions = split(actionsStr, "|")
646- nil
647755 }
648756
649757
650758 @Verifier(tx)
651759 func verify () = if (isShutdown())
652760 then false
653- else sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
761+ else if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
762+ then true
763+ else sigVerify(tx.bodyBytes, tx.proofs[0], masterPubKey)
654764
Full:
OldNewDifferences
1-{-# STDLIB_VERSION 5 #-}
1+{-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4+let usdnAssetId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
5+
6+let puzzleAssetId = base58'HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS'
7+
8+let usdtAssetId = base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ'
9+
10+let usdtPptAssetId = base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
11+
12+let usdnAssetIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
13+
14+let puzzleAssetIdStr = "HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS"
15+
16+let usdtAssetIdStr = "34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ"
17+
18+let usdtPptAssetIdStr = "9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi"
19+
20+let parentPoolAddress = Address(base58'3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh')
21+
22+let masterAddress = Address(base58'3PLjwHcz9NEuaTo63NZR9B9okQiKQxZSbmf')
23+
24+let masterPubKey = base58'4z8CKSYQBKkzx7PBb5uBP1YPa6YAHRNTApW1sQVHT5eU'
25+
426 func tryGetInteger (key) = match getInteger(this, key) {
527 case b: Int =>
628 b
729 case _ =>
830 0
931 }
1032
1133
1234 func tryGetBinary (key) = match getBinary(this, key) {
1335 case b: ByteVector =>
1436 b
1537 case _ =>
1638 base58''
1739 }
1840
1941
2042 func tryGetString (key) = match getString(this, key) {
2143 case b: String =>
2244 b
2345 case _ =>
2446 ""
2547 }
2648
2749
2850 func getAssetString (assetId) = match assetId {
2951 case b: ByteVector =>
3052 toBase58String(b)
3153 case _ =>
3254 "WAVES"
3355 }
3456
3557
3658 func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES"))
3759 then unit
3860 else fromBase58String(assetIdStr)
3961
4062
4163 func addAssetBytesToList (accum,item) = (accum :+ getAssetBytes(item))
4264
4365
4466 func addAssetWeightToList (accum,item) = (accum :+ tryGetInteger((("static_" + getAssetString(item)) + "_weight")))
4567
4668
4769 func addAssetDecimalsToList (accum,item) = (accum :+ tryGetInteger((("static_" + getAssetString(item)) + "_decimals")))
4870
4971
5072 func addAssetScaleToList (accum,item) = (accum :+ tryGetInteger((("static_" + getAssetString(item)) + "_scale")))
5173
5274
5375 func addIntToList (accum,item) = (accum :+ parseIntValue(item))
5476
5577
5678 let T = tryGetInteger("static_tokensAmount")
5779
5880 let assetIds = {
5981 let $l = split(tryGetString("static_tokenIds"), ",")
6082 let $s = size($l)
6183 let $acc0 = nil
6284 func $f0_1 ($a,$i) = if (($i >= $s))
6385 then $a
6486 else addAssetBytesToList($a, $l[$i])
6587
6688 func $f0_2 ($a,$i) = if (($i >= $s))
6789 then $a
6890 else throw("List size exceeds 10")
6991
7092 $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)
7193 }
7294
7395 let AssetsWeights = {
7496 let $l = assetIds
7597 let $s = size($l)
7698 let $acc0 = nil
7799 func $f1_1 ($a,$i) = if (($i >= $s))
78100 then $a
79101 else addAssetWeightToList($a, $l[$i])
80102
81103 func $f1_2 ($a,$i) = if (($i >= $s))
82104 then $a
83105 else throw("List size exceeds 10")
84106
85107 $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)
86108 }
87109
88110 let Decimals = {
89111 let $l = assetIds
90112 let $s = size($l)
91113 let $acc0 = nil
92114 func $f2_1 ($a,$i) = if (($i >= $s))
93115 then $a
94116 else addAssetDecimalsToList($a, $l[$i])
95117
96118 func $f2_2 ($a,$i) = if (($i >= $s))
97119 then $a
98120 else throw("List size exceeds 10")
99121
100122 $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)
101123 }
102124
103125 let Scales = {
104126 let $l = assetIds
105127 let $s = size($l)
106128 let $acc0 = nil
107129 func $f3_1 ($a,$i) = if (($i >= $s))
108130 then $a
109131 else addAssetScaleToList($a, $l[$i])
110132
111133 func $f3_2 ($a,$i) = if (($i >= $s))
112134 then $a
113135 else throw("List size exceeds 10")
114136
115137 $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)
116138 }
117139
118140 let Fee = tryGetInteger("static_fee")
119141
120-let AssetsWeightsDecimals = 2
142+let AssetsWeightsDecimals = 4
121143
122144 let Scale = 10000
123145
124146 let Scale8 = 100000000
125147
126148 let FeeScale = 10000
127149
128150 let PoolTokenDecimals = 8
129151
130152 let PoolTokenScale = pow(10, 0, PoolTokenDecimals, 0, 0, HALFUP)
131153
132154 let earnedAssets = assetIds
133155
134156 func isShutdown () = match getBoolean(Address(base58'3PEpv9hRFWEEBU22WRnLsw1bH4YGtcU728o'), "is_shutdown") {
135157 case x: Boolean =>
136158 x
137159 case _ =>
138160 false
139161 }
140162
141163
142164 func getCurrentTokenBalance (tokenType) = {
143165 let tokenId = getAssetString(assetIds[tokenType])
144166 tryGetInteger((("global_" + tokenId) + "_balance"))
145167 }
146168
147169
148170 func calculatePIssued (amount,tokenId) = {
149171 let Psupply = tryGetInteger("global_poolToken_amount")
150172 let Balance = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
151173 fraction(amount, Psupply, Balance, DOWN)
152174 }
153175
154176
155177 func getMinPIssued (payments) = {
156178 func handler (accum,current) = {
157179 let PIssued = calculatePIssued(current.amount, current.assetId)
158180 if ((PIssued == 0))
159181 then throw("one of the tokens amounts is too low")
160182 else if (if ((accum == 0))
161183 then true
162184 else (accum > PIssued))
163185 then PIssued
164186 else accum
165187 }
166188
167189 let $l = payments
168190 let $s = size($l)
169191 let $acc0 = 0
170192 func $f4_1 ($a,$i) = if (($i >= $s))
171193 then $a
172194 else handler($a, $l[$i])
173195
174196 func $f4_2 ($a,$i) = if (($i >= $s))
175197 then $a
176198 else throw("List size exceeds 10")
177199
178200 $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)
179201 }
180202
181203
182-func calculateUsdnValue (assetId,amount,aBalance) = {
183- let usdnId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
184- let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnId))]
185- let assetWeight = AssetsWeights[value(indexOf(assetIds, assetId))]
186- let usdnBalance = tryGetInteger((("global_" + getAssetString(usdnId)) + "_balance"))
187- fraction(amount, (usdnBalance / usdnWeight), (aBalance / assetWeight))
204+func calculateUsdnValue (assetId,amount,aBalance,givenUsdnBalance) = {
205+ let usdnInPool = indexOf(assetIds, usdnAssetId)
206+ let puzzleInPool = indexOf(assetIds, puzzleAssetId)
207+ let usdtInPool = indexOf(assetIds, usdtAssetId)
208+ let wavesInPool = indexOf(assetIds, unit)
209+ let assetWeight = tryGetInteger((("static_" + getAssetString(assetId)) + "_weight"))
210+ let feeAssetStr = tryGetString("static_feeToken")
211+ if ((feeAssetStr == puzzleAssetIdStr))
212+ then {
213+ let puzzleWeight = AssetsWeights[value(indexOf(assetIds, puzzleAssetId))]
214+ let puzzleBalance = tryGetInteger((("global_" + puzzleAssetIdStr) + "_balance"))
215+ let amountInPuzzle = fraction(amount, (puzzleBalance / puzzleWeight), (aBalance / assetWeight))
216+ let puzzlePrice = getIntegerValue(parentPoolAddress, "global_lastPuzzlePrice")
217+ fraction((amountInPuzzle * puzzlePrice), 1, Scale8)
218+ }
219+ else if ((feeAssetStr == usdtAssetIdStr))
220+ then {
221+ let usdtWeight = AssetsWeights[value(usdtInPool)]
222+ let usdtBalance = tryGetInteger((("global_" + usdtAssetIdStr) + "_balance"))
223+ fraction(amount, (usdtBalance / usdtWeight), (aBalance / assetWeight))
224+ }
225+ else if ((feeAssetStr == usdnAssetIdStr))
226+ then {
227+ let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnAssetId))]
228+ let usdnBalance = match givenUsdnBalance {
229+ case x: Int =>
230+ givenUsdnBalance
231+ case _ =>
232+ tryGetInteger((("global_" + getAssetString(usdnAssetId)) + "_balance"))
233+ }
234+ fraction(amount, (value(usdnBalance) / usdnWeight), (aBalance / assetWeight))
235+ }
236+ else {
237+ let wavesWeight = 3000
238+ let wBalance = (tryGetInteger("global_WAVES_balance") / 50)
239+ fraction(amount, (wBalance / wavesWeight), (aBalance / assetWeight))
240+ }
188241 }
189242
190243
191244 func checkTokensValidity (payments) = {
192245 func handler1 (accum,payment) = (accum :+ payment.assetId)
193246
194247 let ids = {
195248 let $l = payments
196249 let $s = size($l)
197250 let $acc0 = nil
198251 func $f4_1 ($a,$i) = if (($i >= $s))
199252 then $a
200253 else handler1($a, $l[$i])
201254
202255 func $f4_2 ($a,$i) = if (($i >= $s))
203256 then $a
204257 else throw("List size exceeds 10")
205258
206259 $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)
207260 }
208261 if ((ids == ids))
209262 then {
210263 func handler2 (accum,assetId) = if ((indexOf(ids, assetId) != unit))
211264 then (accum + 1)
212265 else throw(("asset not attached: " + getAssetString(assetId)))
213266
214267 let checks = {
215268 let $l = assetIds
216269 let $s = size($l)
217270 let $acc0 = 0
218271 func $f5_1 ($a,$i) = if (($i >= $s))
219272 then $a
220273 else handler2($a, $l[$i])
221274
222275 func $f5_2 ($a,$i) = if (($i >= $s))
223276 then $a
224277 else throw("List size exceeds 10")
225278
226279 $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)
227280 }
228281 if ((checks == checks))
229282 then true
230283 else throw("Strict value is not equal to itself.")
231284 }
232285 else throw("Strict value is not equal to itself.")
233286 }
234287
235288
236289 func handlePoolTokensAdd (PIssued,payments,userAddress,needChange) = {
237290 func getTokenPaymentAmount (tokenId) = {
238291 func handler (accum,payment) = if ((payment.assetId == tokenId))
239292 then payment.amount
240293 else accum
241294
242295 let $l = payments
243296 let $s = size($l)
244297 let $acc0 = 0
245298 func $f4_1 ($a,$i) = if (($i >= $s))
246299 then $a
247300 else handler($a, $l[$i])
248301
249302 func $f4_2 ($a,$i) = if (($i >= $s))
250303 then $a
251304 else throw("List size exceeds 10")
252305
253306 $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)
254307 }
255308
256309 func handleTokenChange (accum,tokenId) = {
257310 let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
258311 let PSupply = tryGetInteger("global_poolToken_amount")
259312 let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
260313 let Dk = fraction((fraction((PSupply + PIssued), tokenDecimals, PSupply, CEILING) - tokenDecimals), Bk, tokenDecimals, CEILING)
261314 let paymentAmount = getTokenPaymentAmount(tokenId)
262315 let toReturn = ((if ((paymentAmount != 0))
263316 then paymentAmount
264317 else 0) - Dk)
265318 let t = if (if (needChange)
266319 then (toReturn > 0)
267320 else false)
268321 then [ScriptTransfer(userAddress, toReturn, tokenId)]
269322 else nil
270323 ((accum ++ t) :+ IntegerEntry((("global_" + getAssetString(tokenId)) + "_balance"), (Bk + Dk)))
271324 }
272325
273326 let $l = assetIds
274327 let $s = size($l)
275328 let $acc0 = nil
276329 func $f4_1 ($a,$i) = if (($i >= $s))
277330 then $a
278331 else handleTokenChange($a, $l[$i])
279332
280333 func $f4_2 ($a,$i) = if (($i >= $s))
281334 then $a
282335 else throw("List size exceeds 10")
283336
284337 $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)
285338 }
286339
287340
288341 func handlePoolTokensRedeem (PRedeemed,userAddress) = {
289342 func handleTokenRedeem (accum,tokenId) = {
290343 let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
291344 let PSupply = tryGetInteger("global_poolToken_amount")
292345 let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
293346 let amount = toInt(fraction((toBigInt(Scale8) - fraction(toBigInt((PSupply - PRedeemed)), toBigInt(Scale8), toBigInt(PSupply), CEILING)), toBigInt(Bk), toBigInt(Scale8), DOWN))
294347 ((accum :+ IntegerEntry((("global_" + getAssetString(tokenId)) + "_balance"), (Bk - amount))) :+ ScriptTransfer(userAddress, amount, tokenId))
295348 }
296349
297350 let $l = assetIds
298351 let $s = size($l)
299352 let $acc0 = nil
300353 func $f4_1 ($a,$i) = if (($i >= $s))
301354 then $a
302355 else handleTokenRedeem($a, $l[$i])
303356
304357 func $f4_2 ($a,$i) = if (($i >= $s))
305358 then $a
306359 else throw("List size exceeds 10")
307360
308361 $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)
309362 }
310363
311364
312365 func calculateOutAmount (AmountIn,assetIn,assetOut,BalanceIn,BalanceOut) = {
313366 let IndexIn = value(indexOf(assetIds, assetIn))
314367 let IndexOut = value(indexOf(assetIds, assetOut))
315368 if ((IndexIn == IndexOut))
316369 then throw("wrong tokens pair")
317370 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)
318371 }
319372
320373
321374 func getTokenBalance (assetId) = match assetId {
322375 case t: ByteVector =>
323376 assetBalance(this, t)
324377 case _ =>
325378 wavesBalance(this).available
326379 }
327380
328381
329382 func calculateCurrentAssetInterest (assetId,assetIdStr,aBalance,tokenEarningsLastCheck) = {
330383 let totalStaked = tryGetInteger("global_indexStaked")
331384 let tokenBalanceLastCheck = tokenEarningsLastCheck
332385 let currentBalanceDelta = (getTokenBalance(assetId) - aBalance)
333386 let currentTokenEarnings = if ((currentBalanceDelta > tokenBalanceLastCheck))
334387 then currentBalanceDelta
335388 else tokenBalanceLastCheck
336389 let newEarnings = (currentTokenEarnings - tokenBalanceLastCheck)
337390 let newInterest = if ((totalStaked == 0))
338391 then 0
339392 else fraction(newEarnings, Scale8, totalStaked)
340393 let lastCheckInterest = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_interest"))
341394 (lastCheckInterest + newInterest)
342395 }
343396
344397
345398 func claimResult (address) = {
346399 let addressStr = toString(address)
347400 let puzzleAmount = tryGetInteger((addressStr + "_indexStaked"))
348401 func handler (accum,assetId) = {
349402 let assetIdStr = getAssetString(assetId)
350403 let aBalance = tryGetInteger((("global_" + getAssetString(assetId)) + "_balance"))
351404 let tokenEarningsLastCheck = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_earnings"))
352405 let currentTokenInterest = calculateCurrentAssetInterest(assetId, assetIdStr, aBalance, tokenEarningsLastCheck)
353406 let currentTokenEarnings = max([tokenEarningsLastCheck, (getTokenBalance(assetId) - aBalance)])
354407 let rewardAmount = fraction(puzzleAmount, (currentTokenInterest - tryGetInteger((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"))), Scale8)
355408 let transfer = if ((rewardAmount == 0))
356409 then nil
357410 else [ScriptTransfer(address, rewardAmount, assetId)]
358- $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)))
411+ $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)))
359412 }
360413
361414 let accum = {
362415 let $l = earnedAssets
363416 let $s = size($l)
364417 let $acc0 = $Tuple2(nil, 0)
365418 func $f4_1 ($a,$i) = if (($i >= $s))
366419 then $a
367420 else handler($a, $l[$i])
368421
369422 func $f4_2 ($a,$i) = if (($i >= $s))
370423 then $a
371424 else throw("List size exceeds 10")
372425
373426 $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)
374427 }
375- (accum._1 ++ [IntegerEntry((addressStr + "_claimedRewardValue"), (tryGetInteger((addressStr + "_claimedRewardValue")) + accum._2)), IntegerEntry((addressStr + "_lastClaim"), lastBlock.timestamp)])
428+ $Tuple2((accum._1 ++ [IntegerEntry((addressStr + "_claimedRewardValue"), (tryGetInteger((addressStr + "_claimedRewardValue")) + accum._2)), IntegerEntry((addressStr + "_lastClaim"), lastBlock.timestamp)]), accum._2)
376429 }
377430
378431
379432 func indexStakeResult (addressStr,amount) = {
380- let li = claimResult(addressFromStringValue(addressStr))
433+ let li = claimResult(addressFromStringValue(addressStr))._1
381434 (li ++ [IntegerEntry((addressStr + "_indexStaked"), (tryGetInteger((addressStr + "_indexStaked")) + amount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") + amount))])
382435 }
383436
384437
385438 func sum (accum,n) = (accum + parseIntValue(n))
386439
387440
388441 @Callable(i)
389-func preInit (assetIdsStr,assetWeightsStr,baseTokenIdStr,poolDomain) = if ((this != i.caller))
390- then throw("admin only")
391- else if ((size(poolDomain) > 13))
392- then throw("too large pool domain")
393- else {
394- let assetIdsStrLi = split(assetIdsStr, ",")
395- let assetIdsLi = {
396- let $l = assetIdsStrLi
397- let $s = size($l)
398- let $acc0 = nil
399- func $f4_1 ($a,$i) = if (($i >= $s))
400- then $a
401- else addAssetBytesToList($a, $l[$i])
442+func preInit (assetIdsStr,assetWeightsStr,baseTokenIdStr,poolDomain,poolOwner,fee) = {
443+ let poolOwnerAddress = Address(fromBase58String(poolOwner))
444+ if (isShutdown())
445+ then throw("contract is on stop")
446+ else if ((this != i.caller))
447+ then throw("admin only")
448+ else if ((size(poolDomain) > 13))
449+ then throw("too large pool domain")
450+ else if (if ((50 > fee))
451+ then true
452+ else (fee > 500))
453+ then throw("fee value must be between 50 and 500 (0.5-5%)")
454+ else if (if (if (if (if ((indexOf(assetIdsStr, puzzleAssetIdStr) == unit))
455+ then (indexOf(assetIdsStr, usdnAssetIdStr) == unit)
456+ else false)
457+ then (indexOf(assetIdsStr, usdtAssetIdStr) == unit)
458+ else false)
459+ then (indexOf(assetIdsStr, "WAVES") == unit)
460+ else false)
461+ then (indexOf(assetIdsStr, usdtPptAssetIdStr) == unit)
462+ else false)
463+ then throw("pool must have USDT-WXG, USDT-PPT, USDN, WAVES or PUZZLE in the composition")
464+ else {
465+ let assetIdsStrLi = split(assetIdsStr, ",")
466+ let assetIdsLi = {
467+ let $l = assetIdsStrLi
468+ let $s = size($l)
469+ let $acc0 = nil
470+ func $f4_1 ($a,$i) = if (($i >= $s))
471+ then $a
472+ else addAssetBytesToList($a, $l[$i])
402473
403- func $f4_2 ($a,$i) = if (($i >= $s))
404- then $a
405- else throw("List size exceeds 10")
474+ func $f4_2 ($a,$i) = if (($i >= $s))
475+ then $a
476+ else throw("List size exceeds 10")
406477
407- $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)
408- }
409- let assetWeightsStrLi = split(assetWeightsStr, ",")
410- let assetWeightsSum = {
411- let $l = assetWeightsStrLi
412- let $s = size($l)
413- let $acc0 = 0
414- func $f5_1 ($a,$i) = if (($i >= $s))
415- then $a
416- else sum($a, $l[$i])
478+ $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)
479+ }
480+ let assetWeightsStrLi = split(assetWeightsStr, ",")
481+ let assetWeightsSum = {
482+ let $l = assetWeightsStrLi
483+ let $s = size($l)
484+ let $acc0 = 0
485+ func $f5_1 ($a,$i) = if (($i >= $s))
486+ then $a
487+ else sum($a, $l[$i])
417488
418- func $f5_2 ($a,$i) = if (($i >= $s))
419- then $a
420- else throw("List size exceeds 10")
489+ func $f5_2 ($a,$i) = if (($i >= $s))
490+ then $a
491+ else throw("List size exceeds 10")
421492
422- $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)
423- }
424- func addTokenDataEntries (accum,assetNum) = if ((assetNum >= size(assetIdsLi)))
425- then accum
426- else {
427- let assetDecimals = match assetIdsLi[assetNum] {
428- case x: ByteVector =>
429- value(assetInfo(x)).decimals
430- case _ =>
431- 8
432- }
433- (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])))])
434- }
493+ $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)
494+ }
495+ let feeAssetStr = if ((indexOf(assetIdsStr, usdnAssetIdStr) != unit))
496+ then usdnAssetIdStr
497+ else if ((indexOf(assetIdsStr, "WAVES") != unit))
498+ then "WAVES"
499+ else if ((indexOf(assetIdsStr, usdtAssetIdStr) != unit))
500+ then usdtAssetIdStr
501+ else if ((indexOf(assetIdsStr, puzzleAssetIdStr) != unit))
502+ then puzzleAssetIdStr
503+ else usdtPptAssetIdStr
504+ func addTokenDataEntries (accum,assetNum) = if ((assetNum >= size(assetIdsLi)))
505+ then accum
506+ else {
507+ let assetDecimals = match assetIdsLi[assetNum] {
508+ case x: ByteVector =>
509+ value(assetInfo(x)).decimals
510+ case _ =>
511+ 8
512+ }
513+ (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])))])
514+ }
435515
436- if ((assetWeightsSum != 100))
437- then throw("sum of token weights must be equal to 100")
438- else ({
439- let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
440- let $s = size($l)
441- let $acc0 = nil
442- func $f6_1 ($a,$i) = if (($i >= $s))
443- then $a
444- else addTokenDataEntries($a, $l[$i])
516+ if ((assetWeightsSum != 10000))
517+ then throw("sum of token weights must be equal to 10000")
518+ else ({
519+ let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
520+ let $s = size($l)
521+ let $acc0 = nil
522+ func $f6_1 ($a,$i) = if (($i >= $s))
523+ then $a
524+ else addTokenDataEntries($a, $l[$i])
445525
446- func $f6_2 ($a,$i) = if (($i >= $s))
447- then $a
448- else throw("List size exceeds 10")
526+ func $f6_2 ($a,$i) = if (($i >= $s))
527+ then $a
528+ else throw("List size exceeds 10")
449529
450- $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)
451- } ++ [StringEntry("static_tokenIds", assetIdsStr), StringEntry("static_tokenWeights", assetWeightsStr), IntegerEntry("static_tokensAmount", size(assetIdsLi)), StringEntry("static_poolDomain", poolDomain), StringEntry("static_baseTokenId", baseTokenIdStr), IntegerEntry("static_fee", 200)])
452- }
530+ $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)
531+ } ++ [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)])
532+ }
533+ }
453534
454535
455536
456537 @Callable(i)
457538 func deInit () = if ((i.caller != this))
458539 then throw("admin only")
459540 else [IntegerEntry("global_wasInited", 0)]
460541
461542
462543
463544 @Callable(i)
464545 func init () = {
465546 func prepareList () = {
466547 func handler (accum,n) = (accum :+ IntegerEntry((("global_" + getAssetString(n.assetId)) + "_balance"), n.amount))
467548
468549 let $l = i.payments
469550 let $s = size($l)
470551 let $acc0 = nil
471552 func $f4_1 ($a,$i) = if (($i >= $s))
472553 then $a
473554 else handler($a, $l[$i])
474555
475556 func $f4_2 ($a,$i) = if (($i >= $s))
476557 then $a
477558 else throw("List size exceeds 10")
478559
479560 $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)
480561 }
481562
482563 func calculatePoolTokensAmount (payments) = {
483564 func handler (accum,pmt) = {
484565 let assetId = pmt.assetId
485566 func handler2 (accum,n) = if ((n == assetId))
486567 then value(indexOf(assetIds, n))
487568 else accum
488569
489570 let Token = {
490571 let $l = assetIds
491572 let $s = size($l)
492573 let $acc0 = 1
493574 func $f4_1 ($a,$i) = if (($i >= $s))
494575 then $a
495576 else handler2($a, $l[$i])
496577
497578 func $f4_2 ($a,$i) = if (($i >= $s))
498579 then $a
499580 else throw("List size exceeds 10")
500581
501582 $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)
502583 }
503584 fraction(accum, pow(pmt.amount, Decimals[Token], AssetsWeights[Token], AssetsWeightsDecimals, 8, FLOOR), Scale8)
504585 }
505586
506587 let $l = payments
507588 let $s = size($l)
508589 let $acc0 = PoolTokenScale
509590 func $f4_1 ($a,$i) = if (($i >= $s))
510591 then $a
511592 else handler($a, $l[$i])
512593
513594 func $f4_2 ($a,$i) = if (($i >= $s))
514595 then $a
515596 else throw("List size exceeds 10")
516597
517598 $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)
518599 }
519600
520- if ((tryGetInteger("global_wasInited") > 0))
521- then throw("pool already inited")
522- else {
523- let initialPoolTokens = calculatePoolTokensAmount(i.payments)
524- if ((initialPoolTokens == 0))
525- then throw("you need a bigger tokens amount to launch the pool")
526- else {
527- let poolTokenIssue = Issue(("PZ " + tryGetString("static_poolDomain")), "Puzzle Swap: pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
528- let poolTokenId = calculateAssetId(poolTokenIssue)
529- (prepareList() ++ [poolTokenIssue, IntegerEntry("global_poolToken_amount", initialPoolTokens), IntegerEntry("global_wasInited", 1), BinaryEntry("global_poolToken_id", poolTokenId), StringEntry("static_poolToken_idStr", getAssetString(poolTokenId)), ScriptTransfer(i.caller, initialPoolTokens, poolTokenId)])
530- }
531- }
601+ if (isShutdown())
602+ then throw("contract is on stop")
603+ else if ((tryGetInteger("global_wasInited") > 0))
604+ then throw("pool already inited")
605+ else {
606+ let initialPoolTokens = calculatePoolTokensAmount(i.payments)
607+ if ((initialPoolTokens == 0))
608+ then throw("you need a bigger tokens amount to launch the pool")
609+ else {
610+ let poolTokenIssue = Issue(("PZ " + tryGetString("static_poolDomain")), "Puzzle Swap: pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
611+ let poolTokenId = calculateAssetId(poolTokenIssue)
612+ (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)])
613+ }
614+ }
532615 }
533616
534617
535618
536619 @Callable(i)
537-func generateIndex (needChange) = if ((size(i.payments) != T))
538- then throw(("you need to attach all pool tokens. amount of pool tokens: " + toString(T)))
539- else if (!(checkTokensValidity(i.payments)))
540- then throw("wrong assets attached")
541- else {
542- let PIssued = getMinPIssued(i.payments)
543- let reissue = Reissue(getBinaryValue("global_poolToken_id"), PIssued, true)
544- let result = handlePoolTokensAdd(PIssued, i.payments, i.originCaller, needChange)
545- $Tuple2((result ++ [ScriptTransfer(i.caller, PIssued, tryGetBinary("global_poolToken_id")), reissue, IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") + PIssued))]), PIssued)
546- }
620+func generateIndex (needChange) = if (isShutdown())
621+ then throw("contract is on stop")
622+ else if ((size(i.payments) != T))
623+ then throw(("you need to attach all pool tokens. amount of pool tokens: " + toString(T)))
624+ else if (!(checkTokensValidity(i.payments)))
625+ then throw("wrong assets attached")
626+ else {
627+ let PIssued = getMinPIssued(i.payments)
628+ let reissue = Reissue(getBinaryValue("global_poolToken_id"), PIssued, true)
629+ let result = handlePoolTokensAdd(PIssued, i.payments, i.originCaller, needChange)
630+ $Tuple2((result ++ [reissue, ScriptTransfer(i.caller, PIssued, tryGetBinary("global_poolToken_id")), IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") + PIssued))]), PIssued)
631+ }
547632
548633
549634
550635 @Callable(i)
551636 func stakeIndex () = {
552637 let addressStr = toString(i.originCaller)
553638 let pmt = i.payments[0]
554- if ((value(pmt.assetId) != tryGetBinary("global_poolToken_id")))
555- then throw("wrong asset attached")
556- else indexStakeResult(addressStr, pmt.amount)
639+ if (isShutdown())
640+ then throw("contract is on stop")
641+ else if ((value(pmt.assetId) != tryGetBinary("global_poolToken_id")))
642+ then throw("wrong asset attached")
643+ else indexStakeResult(addressStr, pmt.amount)
557644 }
558645
559646
560647
561648 @Callable(i)
562649 func unstakeIndex (puzzleAmount) = {
563650 let addressStr = toString(i.originCaller)
564651 let puzzleAvailable = tryGetInteger((addressStr + "_indexStaked"))
565- if ((puzzleAmount > puzzleAvailable))
566- then throw("you don't have index tokens available")
567- else (claimResult(i.originCaller) ++ [IntegerEntry((addressStr + "_indexStaked"), (puzzleAvailable - puzzleAmount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") - puzzleAmount)), ScriptTransfer(i.caller, puzzleAmount, getBinaryValue("global_poolToken_id"))])
652+ if (isShutdown())
653+ then throw("contract is on stop")
654+ else if ((puzzleAmount > puzzleAvailable))
655+ then throw("you don't have index tokens available")
656+ 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"))])
568657 }
569658
570659
571660
572661 @Callable(i)
573-func claimIndexRewards () = claimResult(i.caller)
662+func claimIndexRewards () = if (isShutdown())
663+ then throw("contract is on stop")
664+ else claimResult(i.caller)
665+
666+
667+
668+@Callable(i)
669+func evaluateClaim (user) = $Tuple2(nil, claimResult(addressFromStringValue(user))._2)
574670
575671
576672
577673 @Callable(i)
578674 func redeemIndex (sendToOrigin) = {
579675 let pmt = i.payments[0]
580676 if ((pmt.assetId != tryGetBinary("global_poolToken_id")))
581677 then throw("please attach pool share token")
582- else {
583- let PRedeemed = pmt.amount
584- let result = handlePoolTokensRedeem(PRedeemed, if (sendToOrigin)
585- then i.originCaller
586- else i.caller)
587- (result ++ [Burn(tryGetBinary("global_poolToken_id"), PRedeemed), IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") - PRedeemed))])
588- }
678+ else if (isShutdown())
679+ then throw("contract is on stop")
680+ else {
681+ let PRedeemed = pmt.amount
682+ let result = handlePoolTokensRedeem(PRedeemed, if (sendToOrigin)
683+ then i.originCaller
684+ else i.caller)
685+ (result ++ [Burn(tryGetBinary("global_poolToken_id"), PRedeemed), IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") - PRedeemed))])
686+ }
589687 }
590688
591689
592690
593691 @Callable(i)
594692 func swap (assetOut,minimum) = {
595- let pmt = value(i.payments[0])
693+ let pmt = if ((size(i.payments) == 1))
694+ then value(i.payments[0])
695+ else throw("please attach exactly one payment")
596696 let AmountIn = value(i.payments[0].amount)
597697 let AssetIn = pmt.assetId
598698 let AssetOut = getAssetBytes(assetOut)
699+ let feeAssetOutStr = tryGetString("static_feeToken")
700+ let feeAssetOut = if ((feeAssetOutStr == ""))
701+ then usdnAssetId
702+ else getAssetBytes(feeAssetOutStr)
599703 let AssetInBalance = tryGetInteger((("global_" + getAssetString(AssetIn)) + "_balance"))
600704 let AssetOutBalance = tryGetInteger((("global_" + assetOut) + "_balance"))
601- let AmountOut = calculateOutAmount(AmountIn, AssetIn, AssetOut, AssetInBalance, AssetOutBalance)
602- let feeAmount = fraction(AmountOut, Fee, FeeScale)
603- let cleanAmountOut = (AmountOut - feeAmount)
604- if ((minimum > cleanAmountOut))
605- then throw(("amount to recieve is lower than given one: " + toString(cleanAmountOut)))
606- else if ((0 > (AssetOutBalance - AmountOut)))
607- then throw("contract is out of reserves")
608- else {
609- let newBalanceIn = (AssetInBalance + AmountIn)
610- let newBalanceOut = (AssetOutBalance - AmountOut)
611- let usdnAssetId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
612- if ((usdnAssetId == AssetOut))
613- then {
614- let usdnFeeAmount = feeAmount
615- let protocolUsdnFee = fraction(usdnFeeAmount, 4, 10)
616- let stakingTopUp = reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(usdnAssetId, protocolUsdnFee)])
617- if ((stakingTopUp == stakingTopUp))
618- then $Tuple2([IntegerEntry((("global_" + assetOut) + "_balance"), newBalanceOut), IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), newBalanceIn), ScriptTransfer(i.caller, cleanAmountOut, AssetOut), IntegerEntry("global_volume", (tryGetInteger("global_volume") + calculateUsdnValue(AssetIn, AmountIn, AssetInBalance)))], cleanAmountOut)
619- else throw("Strict value is not equal to itself.")
620- }
705+ let feeAmountIn = fraction(AmountIn, Fee, FeeScale)
706+ let cleanAmountIn = (AmountIn - feeAmountIn)
707+ let AmountOut = calculateOutAmount(cleanAmountIn, AssetIn, AssetOut, AssetInBalance, AssetOutBalance)
708+ let AssetOutBalance2 = (AssetOutBalance - AmountOut)
709+ let AssetInBalance2 = (AssetInBalance + cleanAmountIn)
710+ let feeAssetOutBalance = if ((feeAssetOut == AssetIn))
711+ then AssetInBalance2
712+ else if ((feeAssetOut == AssetOut))
713+ then AssetOutBalance2
714+ else tryGetInteger((("global_" + getAssetString(feeAssetOut)) + "_balance"))
715+ let feeAmountOut = calculateOutAmount(feeAmountIn, AssetIn, feeAssetOut, AssetInBalance, feeAssetOutBalance)
716+ if ((minimum > AmountOut))
717+ then throw("amount to recieve is lower than given one")
718+ else if ((AssetOut == AssetIn))
719+ then throw("this swap is not allowed")
720+ else if ((0 > (AssetOutBalance - AmountOut)))
721+ then throw("contract is out of reserves")
722+ else if (isShutdown())
723+ then throw("contract is on stop")
621724 else {
622- let usdnBalance = if ((AssetIn == usdnAssetId))
623- then newBalanceIn
624- else tryGetInteger((("global_" + getAssetString(usdnAssetId)) + "_balance"))
625- let usdnFeeAmount = calculateOutAmount(feeAmount, AssetOut, usdnAssetId, newBalanceOut, usdnBalance)
626- let protocolUsdnFee = fraction(usdnFeeAmount, 4, 10)
627- let stakingTopUp = reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(usdnAssetId, protocolUsdnFee)])
725+ let creatorFee = fraction(feeAmountOut, 1, 10)
726+ let protocolFee = fraction(feeAmountOut, 4, 10)
727+ let stakingTopUp = if (if ((feeAssetOut == usdnAssetId))
728+ then true
729+ else (feeAssetOut == puzzleAssetId))
730+ then reentrantInvoke(Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'), "topUpReward", nil, [AttachedPayment(feeAssetOut, protocolFee)])
731+ else unit
628732 if ((stakingTopUp == stakingTopUp))
629733 then {
630- let usdnBalanceChangeEntry = IntegerEntry((("global_" + toBase58String(usdnAssetId)) + "_balance"), (usdnBalance - usdnFeeAmount))
631- let balanceChanges = if ((AssetIn == usdnAssetId))
632- then [usdnBalanceChangeEntry]
633- else [usdnBalanceChangeEntry, IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), newBalanceIn)]
634- $Tuple2(([IntegerEntry((("global_" + assetOut) + "_balance"), (newBalanceOut + feeAmount)), ScriptTransfer(i.caller, cleanAmountOut, AssetOut), IntegerEntry("global_volume", (tryGetInteger("global_volume") + calculateUsdnValue(AssetIn, AmountIn, AssetInBalance)))] ++ balanceChanges), cleanAmountOut)
734+ let newBalanceIn = AssetInBalance2
735+ let newBalanceOut = (AssetOutBalance2 - (if ((AssetOut == feeAssetOut))
736+ then feeAmountOut
737+ else 0))
738+ let newBalanceFeeAsset = if (if ((feeAssetOut != AssetIn))
739+ then (feeAssetOut != AssetOut)
740+ else false)
741+ then (feeAssetOutBalance - feeAmountOut)
742+ else unit
743+ let assetInChange = IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), newBalanceIn)
744+ let assetOutChange = IntegerEntry((("global_" + assetOut) + "_balance"), newBalanceOut)
745+ let feeAssetOutChange = if ((newBalanceFeeAsset != unit))
746+ then IntegerEntry((("global_" + getAssetString(feeAssetOut)) + "_balance"), value(newBalanceFeeAsset))
747+ else StringEntry("hello", "world")
748+ let volumeUpdate = calculateUsdnValue(AssetIn, AmountIn, AssetInBalance, feeAssetOutBalance)
749+ $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") + volumeUpdate))] ++ (if ((stakingTopUp == unit))
750+ then [ScriptTransfer(Address(base58'3P4kBiU4wr2yV1S5gMfu3MdkVvy7kxXHsKe'), protocolFee, feeAssetOut)]
751+ else nil)), AmountOut)
635752 }
636753 else throw("Strict value is not equal to itself.")
637754 }
638- }
639- }
640-
641-
642-
643-@Callable(i)
644-func flashLoan (assetIdStr,amount,actionsStr) = {
645- let actions = split(actionsStr, "|")
646- nil
647755 }
648756
649757
650758 @Verifier(tx)
651759 func verify () = if (isShutdown())
652760 then false
653- else sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
761+ else if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
762+ then true
763+ else sigVerify(tx.bodyBytes, tx.proofs[0], masterPubKey)
654764

github/deemru/w8io/169f3d6 
139.76 ms