w8 · tx

2024.04.24 15:33 [4142872] smart account 3P77iUusNwMMzWFdC8f7bftwpHyG1PBs1gq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3ZwhJeVAi25563o5MxS4zBkySNUP1Xokg8MpJ4KDJYEp",
    "fee": 2200000,
    "feeAssetId": null,
    "timestamp": 1713963864812,
    "version": 2,
    "chainId": 87,
    "sender": "3P77iUusNwMMzWFdC8f7bftwpHyG1PBs1gq",
    "senderPublicKey": "8NWqzYEdBNWAYCHd5hZB5TKhguLM5o6n9ucccjL7Q16o",
    "proofs": [
        "aMNF2h4u8tMSXHRQrWJvnJpnkmoQ7SVLpC7iuRu3JgF92QANfcvAUaLGL5mMG7j4zfkKVQv68ftiMNLKha7ifST",
        "3yVtFJc8hTqbh1ebx3Fm6nyTWS1Jzp9h7qpcT5SbhMDojinRDCai1UN9uBt4YWL85muyJfQLioEtXsMeaQpiXYbT",
        "aMNF2h4u8tMSXHRQrWJvnJpnkmoQ7SVLpC7iuRu3JgF92QANfcvAUaLGL5mMG7j4zfkKVQv68ftiMNLKha7ifST",
        "2K34dfKM4VkLPLMyKBYp6P9YuaT2hraMubzinnBZexwD55ok5XPVFhFBqGt4xqqV9WuX4Fob4jtKZXE8FMXYataC"
    ],
    "script": "base64:BgI5CAISBQoDCAgBEgMKAQESBwoFAQEBAQESAwoBARIECgIBAhIDCgEBEgASBQoDAQEBEgcKBQEBAQEBegALcmV2aXNpb25OdW0CAAAJTVVMVFNDQUxFAAgAB1NDQUxFMTYAEAADU0VQAgJfXwAFSEFMRjgAgOHrFwAIRVVMRVJYMTYJALYCAQD0quOekdSkMAAEVFdPWAkAtgIBAAIABU1VTFQ2AMCEPQAGTVVMVFg2CQC2AgEAwIQ9AAVNVUxUOACAwtcvAAZNVUxUWDgJALYCAQCAwtcvAAdNVUxUWDEwCQC2AgEAgMivoCUAB01VTFRYMTYJALYCAQCAgIT+pt7hEQAHV0FWRVNJRAkA2QQBAgVXQVZFUwALa1Jlc3VsdElkeEEAAAAPa1Jlc3VsdElkeFBhdWxCAAEAGWtSZXN1bHRJZHhXUmVzZXJ2ZXNJblVzZG4AAgAQa1Jlc3VsdElkeE11bHRCUgADABNrUmVzdWx0SWR4TXVsdFBvd2VyAAQAG2tSZXN1bHRJZHhNdWx0RXhwSW5Qb3dlclN0cgAFABJrUmVzdWx0SWR4TXVsdEtTdHIABgAPbk1ldHJpY0lkeFByaWNlAAAAG25NZXRyaWNJZHhVc2RuTG9ja2VkQmFsYW5jZQABABxuTWV0cmljSWR4V2F2ZXNMb2NrZWRCYWxhbmNlAAIAEW5NZXRyaWNJZHhSZXNlcnZlAAMAF25NZXRyaWNJZHhSZXNlcnZlSW5Vc2RuAAQAFG5NZXRyaWNJZHhVc2RuU3VwcGx5AAUAEW5NZXRyaWNJZHhTdXJwbHVzAAYAGG5NZXRyaWNJZHhTdXJwbHVzUGVyY2VudAAHAAxuTWV0cmljSWR4QlIACAAUbk1ldHJpY0lkeE5zYnRTdXBwbHkACQAXbk1ldHJpY0lkeE1heE5zYnRTdXBwbHkACgAUbk1ldHJpY0lkeFN1cmZTdXBwbHkACwASbk1ldHJpY1VzZG5Vc2R0UGVnAAwAFm5NZXRyaWNDdXJyZW50UHJpY2VBZGoADQARbk1ldHJpY0Jhc2tldEluZm8ADgESa2V5TmV1dHJpbm9BZGRyZXNzAAIdJXMlc19fY29uZmlnX19uZXV0cmlub0FkZHJlc3MBE2tleVN3YXBBbW91bnRBUGFyYW0AAhglcyVzX19jb25maWdfX3N3YXBBUGFyYW0BE2tleVN3YXBBbW91bnRCUGFyYW0AAhglcyVzX19jb25maWdfX3N3YXBCUGFyYW0BF2tleVVzZG5Td2FwQW1vdW50QVBhcmFtAAIcJXMlc19fY29uZmlnX191c2RuU3dhcEFQYXJhbQEXa2V5VXNkblN3YXBBbW91bnRCUGFyYW0AAhwlcyVzX19jb25maWdfX3VzZG5Td2FwQlBhcmFtARNrZXlQcmljZUFkak1pbkNvZWZmAAIeJXMlc19fcHJpY2VBZGpfX21pbkNvZWZmaWNpZW50ARdrZXlQcmljZUFkakFyYlJlZ3VsYXRvcgACHCVzJXNfX3ByaWNlQWRqX19hcmJSZWd1bGF0b3IBEmtleU5ldXRyaW5vQXNzZXRJZAACEW5ldXRyaW5vX2Fzc2V0X2lkAQ5rZXlOc2J0QXNzZXRJZAACDWJvbmRfYXNzZXRfaWQBDmtleVN1cmZBc3NldElkAAINc3VyZl9hc3NldF9pZAEOa2V5V2luZEFzc2V0SWQAAg13aW5kX2Fzc2V0X2lkARFzd2Fwc1RpbWVmcmFtZUtFWQACD3N3YXBzX3RpbWVmcmFtZQEaa2V5VXNlckxhc3RRdWlja1N3YXBIZWlnaHQBC3VzZXJBZGRyZXNzCQC5CQIJAMwIAgIEJXMlcwkAzAgCAhd1c2VyTGFzdFF1aWNrU3dhcEhlaWdodAkAzAgCBQt1c2VyQWRkcmVzcwUDbmlsBQNTRVABHWtleVF1aWNrU3dhcFVzZXJTcGVudEluUGVyaW9kAQt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBCVzJXMJAMwIAgIacXVpY2tTd2FwVXNlclNwZW50SW5QZXJpb2QJAMwIAgULdXNlckFkZHJlc3MFA25pbAUDU0VQAQ9iYXNrZXRBc3NldHNLZXkAAholcyVzX19jb21tb25fX2Jhc2tldEFzc2V0cwEIa2V5UHJpY2UAAgVwcmljZQEPa2V5UHJpY2VCeUFzc2V0AQdhc3NldElkCQCsAgICHiVzJXMlc19fY29tbW9uX19wcmljZUJ5QXNzZXRfXwUHYXNzZXRJZAANUnBkQmFsYW5jZUtleQILcnBkX2JhbGFuY2UBEXJwZFVzZXJCYWxhbmNlS2V5AgVvd25lcgdhc3NldElkCQC5CQIJAMwIAgUNUnBkQmFsYW5jZUtleQkAzAgCBQdhc3NldElkCQDMCAIFBW93bmVyBQNuaWwCAV8BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAAQxnZXRJbnRPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAEOZ2V0TnVtYmVyQnlLZXkCB2FkZHJlc3MDa2V5CQELdmFsdWVPckVsc2UCCQCaCAIFB2FkZHJlc3MFA2tleQAAAQ1nZXRCb29sT3JGYWlsAgdhZGRyZXNzA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCbCAIFB2FkZHJlc3MFA2tleQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQdhZGRyZXNzCQDMCAICAS4JAMwIAgUDa2V5CQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgABFmNvbnZlcnROZXV0cmlub1RvV2F2ZXMCBmFtb3VudAVwcmljZQkAawMFBmFtb3VudAUFTVVMVDgFBXByaWNlARZjb252ZXJ0V2F2ZXNUb05ldXRyaW5vAgZhbW91bnQFcHJpY2UJAGsDBQZhbW91bnQFBXByaWNlBQVNVUxUOAEFdG9YMTYCB29yaWdWYWwNb3JpZ1NjYWxlTXVsdAkAvAIDCQC2AgEFB29yaWdWYWwFB01VTFRYMTYJALYCAQUNb3JpZ1NjYWxlTXVsdAEHZnJvbVgxNgIDdmFsD3Jlc3VsdFNjYWxlTXVsdAkAoAMBCQC8AgMFA3ZhbAkAtgIBBQ9yZXN1bHRTY2FsZU11bHQFB01VTFRYMTYBCWFzQW55TGlzdAEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIJTGlzdFtBbnldBAp2YWxBbnlMeXN0BQckbWF0Y2gwBQp2YWxBbnlMeXN0CQACAQIbZmFpbCB0byBjYXN0IGludG8gTGlzdFtBbnldAQVhc0ludAEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIDSW50BAZ2YWxJbnQFByRtYXRjaDAFBnZhbEludAkAAgECFWZhaWwgdG8gY2FzdCBpbnRvIEludAEIYXNTdHJpbmcBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACBlN0cmluZwQGdmFsU3RyBQckbWF0Y2gwBQZ2YWxTdHIJAAIBAhhmYWlsIHRvIGNhc3QgaW50byBTdHJpbmcBDWFzUHJpY2VTVFJVQ1QBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIUKEludCwgSW50LCBJbnQsIEludCkEBnN0cnVjdAUHJG1hdGNoMAUGc3RydWN0CQACAQIdZmFpbCB0byBjYXN0IGludG8gUHJpY2VTVFJVQ1QAGUlkeENvbnRyb2xDZmdOZXV0cmlub0RhcHAAAQAYSWR4Q29udHJvbENmZ0F1Y3Rpb25EYXBwAAIAFElkeENvbnRyb2xDZmdScGREYXBwAAMAFUlkeENvbnRyb2xDZmdNYXRoRGFwcAAEABxJZHhDb250cm9sQ2ZnTGlxdWlkYXRpb25EYXBwAAUAFUlkeENvbnRyb2xDZmdSZXN0RGFwcAAGAB1JZHhDb250cm9sQ2ZnTm9kZVJlZ2lzdHJ5RGFwcAAHABxJZHhDb250cm9sQ2ZnTnNidFN0YWtpbmdEYXBwAAgAGUlkeENvbnRyb2xDZmdNZWRpYXRvckRhcHAACQAcSWR4Q29udHJvbENmZ1N1cmZTdGFraW5nRGFwcAAKACBJZHhDb250cm9sQ2ZnR25zYnRDb250cm9sbGVyRGFwcAALABdJZHhDb250cm9sQ2ZnUmVzdFYyRGFwcAAMABtJZHhDb250cm9sQ2ZnR292ZXJuYW5jZURhcHAADQAcSWR4Q29udHJvbENmZ1BlZ1Byb3ZpZGVyRGFwcAAOABpJZHhDb250cm9sQ2ZnV2luZFByb3h5RGFwcAAQARFrZXlDb250cm9sQWRkcmVzcwACHCVzJXNfX2NvbmZpZ19fY29udHJvbEFkZHJlc3MBDWtleUNvbnRyb2xDZmcAAhElc19fY29udHJvbENvbmZpZwEUcmVhZENvbnRyb2xDZmdPckZhaWwBB2NvbnRyb2wJALwJAgkBD2dldFN0cmluZ09yRmFpbAIFB2NvbnRyb2wJAQ1rZXlDb250cm9sQ2ZnAAUDU0VQARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCCmNvbnRyb2xDZmcDaWR4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQpjb250cm9sQ2ZnBQNpZHgJAKwCAgItQ29udHJvbCBjZmcgZG9lc24ndCBjb250YWluIGFkZHJlc3MgYXQgaW5kZXggCQCkAwEFA2lkeAAPY29udHJvbENvbnRyYWN0CQERQGV4dHJOYXRpdmUoMTA2MikBCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJARFrZXlDb250cm9sQWRkcmVzcwACIzNQNUJmZDU4UFBmTnZCTTJIeThRZmJjRHFNZU50emc3S2ZQAApjb250cm9sQ2ZnCQEUcmVhZENvbnRyb2xDZmdPckZhaWwBBQ9jb250cm9sQ29udHJhY3QAEG5ldXRyaW5vQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQpjb250cm9sQ2ZnBRlJZHhDb250cm9sQ2ZnTmV1dHJpbm9EYXBwAA9hdWN0aW9uQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQpjb250cm9sQ2ZnBRhJZHhDb250cm9sQ2ZnQXVjdGlvbkRhcHAAE2xpcXVpZGF0aW9uQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQpjb250cm9sQ2ZnBRxJZHhDb250cm9sQ2ZnTGlxdWlkYXRpb25EYXBwABN1c2RuU3Rha2luZ0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUUSWR4Q29udHJvbENmZ1JwZERhcHAAE3BlZ1Byb3ZpZGVyQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQpjb250cm9sQ2ZnBRxJZHhDb250cm9sQ2ZnUGVnUHJvdmlkZXJEYXBwABF3aW5kUHJveHlDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCmNvbnRyb2xDZmcFGklkeENvbnRyb2xDZmdXaW5kUHJveHlEYXBwABJuZXV0cmlub0Fzc2V0SWRTdHIJAQ9nZXRTdHJpbmdPckZhaWwCBRBuZXV0cmlub0NvbnRyYWN0CQESa2V5TmV1dHJpbm9Bc3NldElkAAAPbmV1dHJpbm9Bc3NldElkCQDZBAEFEm5ldXRyaW5vQXNzZXRJZFN0cgALbnNidEFzc2V0SWQJANkEAQkBEUBleHRyTmF0aXZlKDEwNTMpAgUQbmV1dHJpbm9Db250cmFjdAkBDmtleU5zYnRBc3NldElkAAALc3VyZkFzc2V0SWQJANkEAQkBEUBleHRyTmF0aXZlKDEwNTMpAgUPYXVjdGlvbkNvbnRyYWN0CQEOa2V5U3VyZkFzc2V0SWQAAA53aW5kQXNzZXRJZFN0cgkBD2dldFN0cmluZ09yRmFpbAIFEG5ldXRyaW5vQ29udHJhY3QJAQ5rZXlXaW5kQXNzZXRJZAAAC3dpbmRBc3NldElkCQDZBAEFDndpbmRBc3NldElkU3RyARBrZXlCYWxhbmNlTG9ja2VkAAINYmFsYW5jZV9sb2NrXwEOdG90YWxMb2NrZWRLRVkCCHN3YXBUeXBlB2Fzc2V0SWQJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgILYmFsYW5jZUxvY2sJAMwIAgUIc3dhcFR5cGUJAMwIAgUHYXNzZXRJZAUDbmlsBQNTRVABFWtleVRva2VuTG9ja2VkQmFsYW5jZQEHYXNzZXRJZAkBDnRvdGFsTG9ja2VkS0VZAgILb3V0TmV1dHJpbm8FB2Fzc2V0SWQBGGtleU5ldXRyaW5vTG9ja2VkQmFsYW5jZQAJAQ50b3RhbExvY2tlZEtFWQICCG91dE11bHRpBRJuZXV0cmlub0Fzc2V0SWRTdHIBG2tleU9sZE5ldXRyaW5vTG9ja2VkQmFsYW5jZQAJAKwCAgkBEGtleUJhbGFuY2VMb2NrZWQAAghuZXV0cmlubwEYa2V5T2xkV2F2ZXNMb2NrZWRCYWxhbmNlAAkArAICCQEQa2V5QmFsYW5jZUxvY2tlZAACBXdhdmVzARljYWxjVXNkbk91dE9mTWFya2V0U3VwcGx5AAQWb3V0T2ZNYXJrZXRBZGRyZXNzTGlzdAkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9jb250cm9sQ29udHJhY3QCJSVzJXNfX2NvbnRyb2xfX291dE9mTWFya2V0QWRkcmVzc0xpc3QCAAMJAAACBRZvdXRPZk1hcmtldEFkZHJlc3NMaXN0AgAAAAoBC2JhbGFuY2VzU1VNAhFvdXRPZk1hcmtldFN1cHBseQtuZXh0QWRkcmVzcwkAZAIJAGQCBRFvdXRPZk1hcmtldFN1cHBseQkBC3ZhbHVlT3JFbHNlAgkAmggCBRN1c2RuU3Rha2luZ0NvbnRyYWN0CQERcnBkVXNlckJhbGFuY2VLZXkCBQtuZXh0QWRkcmVzcwUSbmV1dHJpbm9Bc3NldElkU3RyAAAJAPAHAgkBEUBleHRyTmF0aXZlKDEwNjIpAQULbmV4dEFkZHJlc3MFD25ldXRyaW5vQXNzZXRJZAoAAiRsCQC1CQIFFm91dE9mTWFya2V0QWRkcmVzc0xpc3QFA1NFUAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQELYmFsYW5jZXNTVU0CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDcJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwERcmVhZEN1cnJlbnRBdmdQZWcACAkBDWFzUHJpY2VTVFJVQ1QBCQD8BwQFE3BlZ1Byb3ZpZGVyQ29udHJhY3QCBXByaWNlCQDMCAIABAUDbmlsBQNuaWwCXzIBC2FkanVzdFByaWNlAgdwcmljZVg2DXVzZG5Vc2R0UGVnWDYECm1pbkNvZWZmWDYJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkBE2tleVByaWNlQWRqTWluQ29lZmYAAMDPJAQOYXJiUmVndWxhdG9yWDYJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkBF2tleVByaWNlQWRqQXJiUmVndWxhdG9yAADwkwkED21heFByaWNlQ29lZmZYNgkAlgMBCQDMCAIFCm1pbkNvZWZmWDYJAMwIAgkAawMJAGQCBQVNVUxUNgUOYXJiUmVndWxhdG9yWDYFDXVzZG5Vc2R0UGVnWDYFBU1VTFQ2BQNuaWwEDHByaWNlQ29lZmZYNgkAlwMBCQDMCAIFD21heFByaWNlQ29lZmZYNgkAzAgCBQVNVUxUNgUDbmlsCQBrAwUHcHJpY2VYNgUFTVVMVDYFDHByaWNlQ29lZmZYNgAMY3VycmVudFByaWNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQ9jb250cm9sQ29udHJhY3QJAQhrZXlQcmljZQAADXVzZG5Vc2R0UGVnWDYJARFyZWFkQ3VycmVudEF2Z1BlZwAAD2N1cnJlbnRQcmljZUFkagkBC2FkanVzdFByaWNlAgUMY3VycmVudFByaWNlBQ11c2RuVXNkdFBlZ1g2ABVuZXV0cmlub0xvY2tlZEJhbGFuY2UJAGQCCQELdmFsdWVPckVsc2UCCQCaCAIFEG5ldXRyaW5vQ29udHJhY3QJARtrZXlPbGROZXV0cmlub0xvY2tlZEJhbGFuY2UAAAAJAQt2YWx1ZU9yRWxzZQIJAJoIAgUQbmV1dHJpbm9Db250cmFjdAkBGGtleU5ldXRyaW5vTG9ja2VkQmFsYW5jZQAAAAASd2F2ZXNMb2NrZWRCYWxhbmNlCQBkAgkBC3ZhbHVlT3JFbHNlAgkAmggCBRBuZXV0cmlub0NvbnRyYWN0CQEYa2V5T2xkV2F2ZXNMb2NrZWRCYWxhbmNlAAAACQELdmFsdWVPckVsc2UCCQCaCAIFEG5ldXRyaW5vQ29udHJhY3QJARVrZXlUb2tlbkxvY2tlZEJhbGFuY2UBAgVXQVZFUwAAAQdyZXNlcnZlAQdhc3NldElkBAt0ZW1wQXNzZXRJZAkA2QQBBQdhc3NldElkAwkAAAIFC3RlbXBBc3NldElkBQdXQVZFU0lECQBlAggJAO8HAQUQbmV1dHJpbm9Db250cmFjdAdyZWd1bGFyBRJ3YXZlc0xvY2tlZEJhbGFuY2UDCQAAAgULdGVtcEFzc2V0SWQFC3dpbmRBc3NldElkCQBkAgkA8AcCBRBuZXV0cmlub0NvbnRyYWN0BQt0ZW1wQXNzZXRJZAkBBWFzSW50AQkA/AcEBRF3aW5kUHJveHlDb250cmFjdAIPYmFsYW5jZVJFQURPTkxZBQNuaWwFA25pbAkAZQIJAPAHAgUQbmV1dHJpbm9Db250cmFjdAULdGVtcEFzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUQbmV1dHJpbm9Db250cmFjdAkBFWtleVRva2VuTG9ja2VkQmFsYW5jZQEFB2Fzc2V0SWQAAAENcmVzZXJ2ZXNJblVzZAEHYXNzZXRJZAQDdm9sCQEHcmVzZXJ2ZQEFB2Fzc2V0SWQEAnByCQEFdmFsdWUBCQCaCAIFD2NvbnRyb2xDb250cmFjdAkBD2tleVByaWNlQnlBc3NldAEFB2Fzc2V0SWQJAGsDBQN2b2wFAnByBQVNVUxUOAAZbmV1dHJpbm9PdXRPZk1hcmtldFN1cHBseQkBGWNhbGNVc2RuT3V0T2ZNYXJrZXRTdXBwbHkAABNuZXV0cmlub1RvdGFsU3VwcGx5CQBlAgkAZQIJAGQCBRVuZXV0cmlub0xvY2tlZEJhbGFuY2UICQEFdmFsdWUBCQDsBwEFD25ldXRyaW5vQXNzZXRJZAhxdWFudGl0eQkA8AcCBRBuZXV0cmlub0NvbnRyYWN0BQ9uZXV0cmlub0Fzc2V0SWQJAPAHAgUTbGlxdWlkYXRpb25Db250cmFjdAUPbmV1dHJpbm9Bc3NldElkAA5uZXV0cmlub1N1cHBseQkAZQIFE25ldXRyaW5vVG90YWxTdXBwbHkFGW5ldXRyaW5vT3V0T2ZNYXJrZXRTdXBwbHkBBWdldEJSAAQGYmFza2V0CQC1CQIJAQV2YWx1ZQEJAJ0IAgUQbmV1dHJpbm9Db250cmFjdAkBD2Jhc2tldEFzc2V0c0tleQAFA1NFUAoBBWFkZEJyAgNhY2MHYXNzZXRJZAkAZAIFA2FjYwkBDXJlc2VydmVzSW5Vc2QBBQdhc3NldElkBAtzdW1SZXNlcnZlcwoAAiRsBQZiYXNrZXQKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBWFkZEJyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCQBrAwULc3VtUmVzZXJ2ZXMFBU1VTFQ2BQ5uZXV0cmlub1N1cHBseQACQlIDCQAAAgUObmV1dHJpbm9TdXBwbHkAAAAACQEFZ2V0QlIAAQ1nZXRCYXNrZXRJbmZvAAQMYmFza2V0QXNzZXRzCQEFdmFsdWUBCQCdCAIFEG5ldXRyaW5vQ29udHJhY3QJAQ9iYXNrZXRBc3NldHNLZXkABAZiYXNrZXQJALUJAgUMYmFza2V0QXNzZXRzBQNTRVAKAQp3ZWlnaHRDYWxjAgNhY2MHYXNzZXRJZAQDdm9sCQEHcmVzZXJ2ZQEFB2Fzc2V0SWQEAnByCQEFdmFsdWUBCQCaCAIFD2NvbnRyb2xDb250cmFjdAkBD2tleVByaWNlQnlBc3NldAEFB2Fzc2V0SWQEBHJlc1UJAGsDBQN2b2wFAnByBQVNVUxUOAkAlAoCCQDNCAIIBQNhY2MCXzEJAJYKBAUHYXNzZXRJZAUDdm9sBQRyZXNVBQJwcgkAZAIIBQNhY2MCXzIFBHJlc1UEAXQKAAIkbAUGYmFza2V0CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKd2VpZ2h0Q2FsYwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgoBB2NvbWJpbmUCA2FjYwRpdGVtBAVzaGFyZQMJAAACCAUBdAJfMgAABQVNVUxUNgkAawMIBQRpdGVtAl8zBQVNVUxUNggFAXQCXzIJAM0IAgUDYWNjCQC5CQIJAMwIAggFBGl0ZW0CXzEJAMwIAgkApAMBBQVzaGFyZQkAzAgCCQCkAwEIBQRpdGVtAl80CQDMCAIJAKQDAQgFBGl0ZW0CXzIFA25pbAIBOgQNd2VpZ2h0ZWRQcmljZQMJAAACBQ5uZXV0cmlub1N1cHBseQAAAAAJAGsDCAUBdAJfMgUFTVVMVDYFDm5ldXRyaW5vU3VwcGx5CQCVCgMJALkJAgoAAiRsCAUBdAJfMQoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHY29tYmluZQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgIBXwUNd2VpZ2h0ZWRQcmljZQgFAXQCXzIJAWkBDWNvbnN0cnVjdG9yVjEDD25ldXRyaW5vQWRkcmVzcw9uc2J0TG9ja0FkZHJlc3MQc3dhcEFtb3VudEFQYXJhbQMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECDm5vdCBhdXRob3JpemVkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARJrZXlOZXV0cmlub0FkZHJlc3MABQ9uZXV0cmlub0FkZHJlc3MJAMwIAgkBDEludGVnZXJFbnRyeQIJARNrZXlTd2FwQW1vdW50QVBhcmFtAAUQc3dhcEFtb3VudEFQYXJhbQUDbmlsAWkBFWNhbGNTd2FwTGltaXRSRUFET05MWQELZ05zYnRBbW91bnQEFWxpbWl0QmFza2V0VG9rZW5JblVzZAMJAGcCAAAFC2dOc2J0QW1vdW50AAAECGFQYXJhbVg4CQC2AgEJAQxnZXRJbnRPckZhaWwCBQR0aGlzCQETa2V5U3dhcEFtb3VudEFQYXJhbQAECWJQYXJhbVgxNgkAtgIBCQEMZ2V0SW50T3JGYWlsAgUEdGhpcwkBE2tleVN3YXBBbW91bnRCUGFyYW0ABAlwb3dQYXJ0WDgJAHYGCQC2AgEFC2dOc2J0QW1vdW50AAYFCWJQYXJhbVgxNgAQAAgFB0NFSUxJTkcJAKADAQkAvAIDBQhhUGFyYW1YOAUJcG93UGFydFg4BQdNVUxUWDEwBAlsaW1pdFVzZG4DCQBnAgAABQtnTnNidEFtb3VudAAABAhhUGFyYW1YOAkAtgIBCQEMZ2V0SW50T3JGYWlsAgUEdGhpcwkBF2tleVVzZG5Td2FwQW1vdW50QVBhcmFtAAQJYlBhcmFtWDE2CQC2AgEJAQxnZXRJbnRPckZhaWwCBQR0aGlzCQEXa2V5VXNkblN3YXBBbW91bnRCUGFyYW0ABAlwb3dQYXJ0WDgJAHYGCQC2AgEFC2dOc2J0QW1vdW50AAYFCWJQYXJhbVgxNgAQAAgFB0NFSUxJTkcJAKADAQkAvAIDBQhhUGFyYW1YOAUJcG93UGFydFg4BQdNVUxUWDEwCQCUCgIFA25pbAkAzAgCBRVsaW1pdEJhc2tldFRva2VuSW5Vc2QJAMwIAgAACQDMCAIFCWxpbWl0VXNkbgUDbmlsAWkBEmNhbGN1bGF0ZUtSRUFET05MWQUEd1JhdwR1UmF3BXByaWNlBG1SYXcEc1JhdwQDRVhQCQC2AgEAyfSlAQQIRVhQU0NBTEUABgQBYQkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9hdWN0aW9uQ29udHJhY3QCEG5zYnRDdXJ2ZVBhcmFtX2EAAwQFcGF1bEIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPYXVjdGlvbkNvbnRyYWN0AhBuc2J0Q3VydmVQYXJhbV9iCQBpAgkAaAIAAwUFTVVMVDYACgQPd1Jlc2VydmVzSW5Vc2RuCQEWY29udmVydFdhdmVzVG9OZXV0cmlubwIFBHdSYXcFBXByaWNlBAZtdWx0QlIJAGsDBQ93UmVzZXJ2ZXNJblVzZG4FBU1VTFQ4BQR1UmF3AwkAZgIFBm11bHRCUgDQ7/fjJwkAAgEJAKwCAgkArAICAgNCUj0JAKQDAQUGbXVsdEJSAicgPiAxMDY3OC41NjQ4MTYlIHdpbGwgb3ZlcmZsb3cgZXhwb25lbnQECW11bHRQb3dlcgkAaAIFAWEJAGUCBQZtdWx0QlIFBU1VTFQ4BA5tdWx0RXhwSW5Qb3dlcgkAdgYFA0VYUAUIRVhQU0NBTEUJALYCAQUJbXVsdFBvd2VyBQlNVUxUU0NBTEUFB1NDQUxFMTYFBERPV04EBW11bHRLCQC8AgMJALYCAQUFcGF1bEIFDm11bHRFeHBJblBvd2VyBQZNVUxUWDYJAJQKAgUDbmlsCQDMCAIFAWEJAMwIAgUFcGF1bEIJAMwIAgUPd1Jlc2VydmVzSW5Vc2RuCQDMCAIFBm11bHRCUgkAzAgCBQltdWx0UG93ZXIJAMwIAgkApgMBBQ5tdWx0RXhwSW5Qb3dlcgkAzAgCCQCmAwEFBW11bHRLBQNuaWwBaQEVY3VydmVGdW5jdGlvblJFQURPTkxZAQt3YXZlc1BheVJhdwQPbmV1dHJpbm9NZXRyaWNzCQEJYXNBbnlMaXN0AQkA/AcEBQR0aGlzAhpjYWxjTmV1dGlub01ldHJpY3NSRUFET05MWQUDbmlsBQNuaWwEBXByaWNlCQEFYXNJbnQBCQCRAwIFD25ldXRyaW5vTWV0cmljcwUPbk1ldHJpY0lkeFByaWNlBAR3UmF3CQEFYXNJbnQBCQCRAwIFD25ldXRyaW5vTWV0cmljcwURbk1ldHJpY0lkeFJlc2VydmUEBHVSYXcJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBRRuTWV0cmljSWR4VXNkblN1cHBseQQEc1JhdwkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFFG5NZXRyaWNJZHhOc2J0U3VwcGx5BARtUmF3CQEFYXNJbnQBCQCRAwIFD25ldXRyaW5vTWV0cmljcwUXbk1ldHJpY0lkeE1heE5zYnRTdXBwbHkECmtDYWxjQXJyYXkJAQlhc0FueUxpc3QBCQD8BwQFBHRoaXMCEmNhbGN1bGF0ZUtSRUFET05MWQkAzAgCBQR3UmF3CQDMCAIFBHVSYXcJAMwIAgUFcHJpY2UJAMwIAgUEbVJhdwkAzAgCBQRzUmF3BQNuaWwFA25pbAQFbXVsdEsJAKcDAQkBCGFzU3RyaW5nAQkAkQMCBQprQ2FsY0FycmF5BRJrUmVzdWx0SWR4TXVsdEtTdHIEB3VzZG5QYXkJARZjb252ZXJ0V2F2ZXNUb05ldXRyaW5vAgULd2F2ZXNQYXlSYXcFBXByaWNlBBBiaWdNYXhOc2J0U3VwcGx5CQC2AgEFBG1SYXcEDWJpZ05zYnRTdXBwbHkJALYCAQkAZQIFBG1SYXcFBHNSYXcEBXN0ZXAxCQC8AgMJALYCAQUHdXNkblBheQUHTVVMVFgxNgUFbXVsdEsEBXN0ZXAyCQC8AgMFBXN0ZXAxBQ1iaWdOc2J0U3VwcGx5BRBiaWdNYXhOc2J0U3VwcGx5BAVzdGVwMwkAoAMBCQC8AgMFDWJpZ05zYnRTdXBwbHkFEGJpZ01heE5zYnRTdXBwbHkJALcCAgUFc3RlcDIFEGJpZ01heE5zYnRTdXBwbHkEDW5zYnRBbW91bnRSYXcJAGUCCQBlAgUEbVJhdwUEc1JhdwUFc3RlcDMJAJQKAgUDbmlsCQDMCAIFDW5zYnRBbW91bnRSYXcJAMwIAgUHdXNkblBheQkAzAgCBQR3UmF3CQDMCAIFBHVSYXcJAMwIAgUEbVJhdwkAzAgCBQRzUmF3CQDMCAIJAQVhc0ludAEJAJEDAgUKa0NhbGNBcnJheQULa1Jlc3VsdElkeEEJAMwIAgkBBWFzSW50AQkAkQMCBQprQ2FsY0FycmF5BQ9rUmVzdWx0SWR4UGF1bEIJAMwIAgkBBWFzSW50AQkAkQMCBQprQ2FsY0FycmF5BRlrUmVzdWx0SWR4V1Jlc2VydmVzSW5Vc2RuCQDMCAIFBXByaWNlCQDMCAIJAQVhc0ludAEJAJEDAgUKa0NhbGNBcnJheQUQa1Jlc3VsdElkeE11bHRCUgkAzAgCCQEFYXNJbnQBCQCRAwIFCmtDYWxjQXJyYXkFE2tSZXN1bHRJZHhNdWx0UG93ZXIJAMwIAgkAkQMCBQprQ2FsY0FycmF5BRtrUmVzdWx0SWR4TXVsdEV4cEluUG93ZXJTdHIJAMwIAgkAkQMCBQprQ2FsY0FycmF5BRJrUmVzdWx0SWR4TXVsdEtTdHIJAMwIAgkApgMBBQVzdGVwMQkAzAgCCQCmAwEFBXN0ZXAyCQDMCAIFBXN0ZXAzBQNuaWwBaQEUc3VyZkZ1bmN0aW9uUkVBRE9OTFkCBmFtb3VudAdhc3NldElkAwkAZgIAAAUGYW1vdW50CQACAQIZYW1vdW50IHNob3VsZCBiZSBwb3NpdGl2ZQQFcHJpY2UFDGN1cnJlbnRQcmljZQQIcHJpY2VCaWcJALYCAQUFcHJpY2UECHJlc2VydmVXCQEHcmVzZXJ2ZQECBVdBVkVTBApyZXNlcnZlQmlnCQC2AgEFCHJlc2VydmVXBAZzdXBwbHkFDm5ldXRyaW5vU3VwcGx5BAlzdXBwbHlCaWcJALYCAQUGc3VwcGx5AwkAZwIFAkJSBQVNVUxUNgkAAgEJAKwCAgkArAICAgVCUiA9IAkApAMBBQJCUgIRLCBjYW5ub3QgYnV5IFNVUkYEC21heFdhdmVzUGF5CQBlAgkAawMFBnN1cHBseQUFTVVMVDgFBXByaWNlBQhyZXNlcnZlVwQKbWF4VXNkblBheQkAZQIFBnN1cHBseQkAawMFCHJlc2VydmVXBQVwcmljZQUFTVVMVDgECXVzZUFtb3VudAMJAAACBQdhc3NldElkBQ9uZXV0cmlub0Fzc2V0SWQDCQBmAgUGYW1vdW50BQptYXhVc2RuUGF5BQptYXhVc2RuUGF5BQZhbW91bnQDCQAAAgUHYXNzZXRJZAUHV0FWRVNJRAMJAGYCBQZhbW91bnQFC21heFdhdmVzUGF5BQttYXhXYXZlc1BheQUGYW1vdW50AAAECWFtb3VudEJpZwkAtgIBBQl1c2VBbW91bnQDCQAAAgUHYXNzZXRJZAUPbmV1dHJpbm9Bc3NldElkCQCUCgIFA25pbAkAzAgCCQCgAwEJALwCAwkAvAIDBQlhbW91bnRCaWcFBk1VTFRYOAUIcHJpY2VCaWcJALgCAgUJc3VwcGx5QmlnCQC6AgIFCWFtb3VudEJpZwUEVFdPWAUKcmVzZXJ2ZUJpZwkAzAgCAAAJAMwIAgUJdXNlQW1vdW50CQDMCAIFCHJlc2VydmVXCQDMCAIFBnN1cHBseQkAzAgCBQJCUgkAzAgCBQhyZXNlcnZlVwkAzAgCCQBlAgUGc3VwcGx5BQl1c2VBbW91bnQJAMwIAgkAawMJARZjb252ZXJ0V2F2ZXNUb05ldXRyaW5vAgUIcmVzZXJ2ZVcFBXByaWNlBQVNVUxUNgkAZQIFBnN1cHBseQUJdXNlQW1vdW50CQDMCAIJAGUCBQZhbW91bnQFCXVzZUFtb3VudAkAzAgCBQVwcmljZQUDbmlsAwkAAAIFB2Fzc2V0SWQFB1dBVkVTSUQJAJQKAgUDbmlsCQDMCAIJAKADAQkAvAIDBQlzdXBwbHlCaWcJAHcGCQC8AgMJALcCAgUKcmVzZXJ2ZUJpZwUJYW1vdW50QmlnBQdNVUxUWDE2BQpyZXNlcnZlQmlnABAFCEVVTEVSWDE2ABAAEAUGSEFMRlVQBQdNVUxUWDE2CQDMCAIFCXVzZUFtb3VudAkAzAgCAAAJAMwIAgUIcmVzZXJ2ZVcJAMwIAgUGc3VwcGx5CQDMCAIFAkJSCQDMCAIJAGQCBQhyZXNlcnZlVwUJdXNlQW1vdW50CQDMCAIFBnN1cHBseQkAzAgCCQBrAwkBFmNvbnZlcnRXYXZlc1RvTmV1dHJpbm8CCQBkAgUIcmVzZXJ2ZVcFCXVzZUFtb3VudAUFcHJpY2UFBU1VTFQ2BQZzdXBwbHkJAMwIAgkAZQIFBmFtb3VudAUJdXNlQW1vdW50CQDMCAIFBXByaWNlBQNuaWwJAAIBAhFVbnN1cHBvcnRlZCBhc3NldAFpASBjYWxjQ29udHJhY3ROc2J0UHJpY2VTWVNSRUFET05MWQEPbnNidFN1cHBseURFTFRBBA9uZXV0cmlub01ldHJpY3MJAQlhc0FueUxpc3QBCQD8BwQFBHRoaXMCGmNhbGNOZXV0aW5vTWV0cmljc1JFQURPTkxZBQNuaWwFA25pbAQFcHJpY2UJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBQ9uTWV0cmljSWR4UHJpY2UEBHdSYXcJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBRFuTWV0cmljSWR4UmVzZXJ2ZQQEdVJhdwkAZQIJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBRRuTWV0cmljSWR4VXNkblN1cHBseQUPbnNidFN1cHBseURFTFRBBARzUmF3CQBkAgkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFFG5NZXRyaWNJZHhOc2J0U3VwcGx5BQ9uc2J0U3VwcGx5REVMVEEEBG1SYXcJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBRduTWV0cmljSWR4TWF4TnNidFN1cHBseQQKa0NhbGNBcnJheQkBCWFzQW55TGlzdAEJAPwHBAUEdGhpcwISY2FsY3VsYXRlS1JFQURPTkxZCQDMCAIFBHdSYXcJAMwIAgUEdVJhdwkAzAgCBQVwcmljZQkAzAgCBQRtUmF3CQDMCAIFBHNSYXcFA25pbAUDbmlsBAhtdWx0S1gxNgkApwMBCQEIYXNTdHJpbmcBCQCRAwIFCmtDYWxjQXJyYXkFEmtSZXN1bHRJZHhNdWx0S1N0cgQMbXVsdFN0ZXAxWDE2CQC8AgMJALYCAQUEbVJhdwUHTVVMVFgxNgkAtgIBCQBlAgUEbVJhdwUEc1JhdwQMbXVsdFN0ZXAyWDE2CQC8AgMFDG11bHRTdGVwMVgxNgUMbXVsdFN0ZXAxWDE2BQdNVUxUWDE2BBVtdWx0TnNidDJ1c2RuUHJpY2VYMTYJALwCAwUIbXVsdEtYMTYFDG11bHRTdGVwMlgxNgUHTVVMVFgxNgQObnNidDJ1c2RuUHJpY2UJAKADAQkAvAIDBRVtdWx0TnNidDJ1c2RuUHJpY2VYMTYJALYCAQUFTVVMVDYFB01VTFRYMTYED25zYnQyd2F2ZXNQcmljZQkAawMFDm5zYnQydXNkblByaWNlBQVNVUxUNgUFcHJpY2UJAJQKAgUDbmlsCQDMCAIFDm5zYnQydXNkblByaWNlCQDMCAIFD25zYnQyd2F2ZXNQcmljZQUDbmlsAWkBGmNhbGNOZXV0aW5vTWV0cmljc1JFQURPTkxZAAQNbnNidFN1cHBseU1BWAgJAQV2YWx1ZQEJAOwHAQULbnNidEFzc2V0SWQIcXVhbnRpdHkECm5zYnRTdXBwbHkJAGUCBQ1uc2J0U3VwcGx5TUFYCQDwBwIFD2F1Y3Rpb25Db250cmFjdAULbnNidEFzc2V0SWQECnN1cmZTdXBwbHkICQEFdmFsdWUBCQDsBwEFC3N1cmZBc3NldElkCHF1YW50aXR5BApiYXNrZXRJbmZvCQENZ2V0QmFza2V0SW5mbwAJAJQKAgUDbmlsCQDMCAIFDGN1cnJlbnRQcmljZQkAzAgCBRVuZXV0cmlub0xvY2tlZEJhbGFuY2UJAMwIAgUSd2F2ZXNMb2NrZWRCYWxhbmNlCQDMCAIJAQdyZXNlcnZlAQIFV0FWRVMJAMwIAgkBDXJlc2VydmVzSW5Vc2QBAgVXQVZFUwkAzAgCBQ5uZXV0cmlub1N1cHBseQkAzAgCBRluZXV0cmlub091dE9mTWFya2V0U3VwcGx5CQDMCAIFE25ldXRyaW5vVG90YWxTdXBwbHkJAMwIAgUCQlIJAMwIAgUKbnNidFN1cHBseQkAzAgCBQ1uc2J0U3VwcGx5TUFYCQDMCAIFCnN1cmZTdXBwbHkJAMwIAgUNdXNkblVzZHRQZWdYNgkAzAgCBQ9jdXJyZW50UHJpY2VBZGoJAMwIAggFCmJhc2tldEluZm8CXzEJAMwIAggFCmJhc2tldEluZm8CXzIJAMwIAggFCmJhc2tldEluZm8CXzMFA25pbAFpASFnZXRVbnN0YWtlQ29taXNzaW9uQW1vdW50UkVBRE9OTFkDBmFtb3VudAtzdGFydEhlaWdodAhoYWxmTGlmZQkAlAoCBQNuaWwJAGsDBQZhbW91bnQJAGwGAAIAAAkAawMJAQEtAQkAZQIFBmhlaWdodAULc3RhcnRIZWlnaHQFBU1VTFQ4BQhoYWxmTGlmZQAIAAgFBkhBTEZVUAUFTVVMVDgBaQETbWVyZ2VTdGFrZXNSRUFET05MWQUHYW1vdW50MQdoZWlnaHQxB2Ftb3VudDIHaGVpZ2h0MghoYWxmTGlmZQQBdwkAawMFB2Ftb3VudDIJAGwGAAIAAAkAawMJAGUCBQdoZWlnaHQyBQdoZWlnaHQxBQVNVUxUOAUIaGFsZkxpZmUACAAIBQZIQUxGVVAFBU1VTFQ4BAF2CQBrAwkAZAIFB2Ftb3VudDEFB2Ftb3VudDIFBU1VTFQ4CQBkAgUHYW1vdW50MQUBdwkAlAoCBQNuaWwJAGQCBQdoZWlnaHQxCQBpAgkAZQIFBUhBTEY4CQBoAgUIaGFsZkxpZmUJAG0GBQF2AAgAAgAAAAgFBkhBTEZVUAUFTVVMVDgBAnR4AQZ2ZXJpZnkABBNwdWJLZXlBZG1pbnNMaXN0U3RyCQC5CQIJAMwIAgIsR0pkTFNhTGl2NUs3eHVlamFjOG1jUmNIb3lvM2RQckVTcnZrdEczYTZNQVIJAMwIAgIsRVl3Wm1VUmQ1S0thUVJCanNWYTZnOERQaXNGb1M2U292Ukp0RmlMNWdNSFUJAMwIAgIsRHRtQWZ1RGRDckhLOHNwZEFlQVl6cTZNc1plZ2VEOWduc3JwdVRSa0NiVkEJAMwIAgIsNVdSWEZTandjVGJOZktjSnM4WnFYbVNTV1lzU1ZKVXRNdk1xWmo1aEg0TmMFA25pbAUDU0VQBBBwdWJLZXlBZG1pbnNMaXN0CQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPY29udHJvbENvbnRyYWN0Agwlc19fbXVsdGlzaWcFE3B1YktleUFkbWluc0xpc3RTdHIFA1NFUAQFY291bnQJAGQCCQBkAgkAZAIDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACQDZBAEJAJEDAgUQcHViS2V5QWRtaW5zTGlzdAAAAAEAAAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAEJANkEAQkAkQMCBRBwdWJLZXlBZG1pbnNMaXN0AAEAAQAAAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAgkA2QQBCQCRAwIFEHB1YktleUFkbWluc0xpc3QAAgABAAADCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwADCQDZBAEJAJEDAgUQcHViS2V5QWRtaW5zTGlzdAADAAIAAAkAZwIFBWNvdW50AAPqi6ti",
    "height": 4142872,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2TgCT7gX6dPAK8VsvJHxQT7maAxBGVccptnQg4dL89cc
Next: none

Diff: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let revisionNum = "84925bdd892fd3edaba91bacee32ee293f796de0"
4 + let revisionNum = ""
5 5  
6 6  let MULTSCALE = 8
7 7  
101 101  
102 102  
103 103  func keySurfAssetId () = "surf_asset_id"
104 + 
105 + 
106 + func keyWindAssetId () = "wind_asset_id"
104 107  
105 108  
106 109  func swapsTimeframeKEY () = "swaps_timeframe"
210 213  
211 214  let IdxControlCfgPegProviderDapp = 14
212 215  
216 + let IdxControlCfgWindProxyDapp = 16
217 + 
213 218  func keyControlAddress () = "%s%s__config__controlAddress"
214 219  
215 220  
236 241  
237 242  let pegProviderContract = getContractAddressOrFail(controlCfg, IdxControlCfgPegProviderDapp)
238 243  
244 + let windProxyContract = getContractAddressOrFail(controlCfg, IdxControlCfgWindProxyDapp)
245 + 
239 246  let neutrinoAssetIdStr = getStringOrFail(neutrinoContract, keyNeutrinoAssetId())
240 247  
241 248  let neutrinoAssetId = fromBase58String(neutrinoAssetIdStr)
243 250  let nsbtAssetId = fromBase58String(getStringValue(neutrinoContract, keyNsbtAssetId()))
244 251  
245 252  let surfAssetId = fromBase58String(getStringValue(auctionContract, keySurfAssetId()))
253 + 
254 + let windAssetIdStr = getStringOrFail(neutrinoContract, keyWindAssetId())
255 + 
256 + let windAssetId = fromBase58String(windAssetIdStr)
246 257  
247 258  func keyBalanceLocked () = "balance_lock_"
248 259  
311 322      let tempAssetId = fromBase58String(assetId)
312 323      if ((tempAssetId == WAVESID))
313 324          then (wavesBalance(neutrinoContract).regular - wavesLockedBalance)
314 -         else (assetBalance(neutrinoContract, tempAssetId) - valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance(assetId)), 0))
325 +         else if ((tempAssetId == windAssetId))
326 +             then (assetBalance(neutrinoContract, tempAssetId) + asInt(invoke(windProxyContract, "balanceREADONLY", nil, nil)))
327 +             else (assetBalance(neutrinoContract, tempAssetId) - valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance(assetId)), 0))
315 328      }
316 329  
317 330  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let revisionNum = "84925bdd892fd3edaba91bacee32ee293f796de0"
4 + let revisionNum = ""
5 5  
6 6  let MULTSCALE = 8
7 7  
8 8  let SCALE16 = 16
9 9  
10 10  let SEP = "__"
11 11  
12 12  let HALF8 = 50000000
13 13  
14 14  let EULERX16 = toBigInt(27182818284590452)
15 15  
16 16  let TWOX = toBigInt(2)
17 17  
18 18  let MULT6 = 1000000
19 19  
20 20  let MULTX6 = toBigInt(1000000)
21 21  
22 22  let MULT8 = 100000000
23 23  
24 24  let MULTX8 = toBigInt(100000000)
25 25  
26 26  let MULTX10 = toBigInt(10000000000)
27 27  
28 28  let MULTX16 = toBigInt(10000000000000000)
29 29  
30 30  let WAVESID = fromBase58String("WAVES")
31 31  
32 32  let kResultIdxA = 0
33 33  
34 34  let kResultIdxPaulB = 1
35 35  
36 36  let kResultIdxWReservesInUsdn = 2
37 37  
38 38  let kResultIdxMultBR = 3
39 39  
40 40  let kResultIdxMultPower = 4
41 41  
42 42  let kResultIdxMultExpInPowerStr = 5
43 43  
44 44  let kResultIdxMultKStr = 6
45 45  
46 46  let nMetricIdxPrice = 0
47 47  
48 48  let nMetricIdxUsdnLockedBalance = 1
49 49  
50 50  let nMetricIdxWavesLockedBalance = 2
51 51  
52 52  let nMetricIdxReserve = 3
53 53  
54 54  let nMetricIdxReserveInUsdn = 4
55 55  
56 56  let nMetricIdxUsdnSupply = 5
57 57  
58 58  let nMetricIdxSurplus = 6
59 59  
60 60  let nMetricIdxSurplusPercent = 7
61 61  
62 62  let nMetricIdxBR = 8
63 63  
64 64  let nMetricIdxNsbtSupply = 9
65 65  
66 66  let nMetricIdxMaxNsbtSupply = 10
67 67  
68 68  let nMetricIdxSurfSupply = 11
69 69  
70 70  let nMetricUsdnUsdtPeg = 12
71 71  
72 72  let nMetricCurrentPriceAdj = 13
73 73  
74 74  let nMetricBasketInfo = 14
75 75  
76 76  func keyNeutrinoAddress () = "%s%s__config__neutrinoAddress"
77 77  
78 78  
79 79  func keySwapAmountAParam () = "%s%s__config__swapAParam"
80 80  
81 81  
82 82  func keySwapAmountBParam () = "%s%s__config__swapBParam"
83 83  
84 84  
85 85  func keyUsdnSwapAmountAParam () = "%s%s__config__usdnSwapAParam"
86 86  
87 87  
88 88  func keyUsdnSwapAmountBParam () = "%s%s__config__usdnSwapBParam"
89 89  
90 90  
91 91  func keyPriceAdjMinCoeff () = "%s%s__priceAdj__minCoefficient"
92 92  
93 93  
94 94  func keyPriceAdjArbRegulator () = "%s%s__priceAdj__arbRegulator"
95 95  
96 96  
97 97  func keyNeutrinoAssetId () = "neutrino_asset_id"
98 98  
99 99  
100 100  func keyNsbtAssetId () = "bond_asset_id"
101 101  
102 102  
103 103  func keySurfAssetId () = "surf_asset_id"
104 + 
105 + 
106 + func keyWindAssetId () = "wind_asset_id"
104 107  
105 108  
106 109  func swapsTimeframeKEY () = "swaps_timeframe"
107 110  
108 111  
109 112  func keyUserLastQuickSwapHeight (userAddress) = makeString(["%s%s", "userLastQuickSwapHeight", userAddress], SEP)
110 113  
111 114  
112 115  func keyQuickSwapUserSpentInPeriod (userAddress) = makeString(["%s%s", "quickSwapUserSpentInPeriod", userAddress], SEP)
113 116  
114 117  
115 118  func basketAssetsKey () = "%s%s__common__basketAssets"
116 119  
117 120  
118 121  func keyPrice () = "price"
119 122  
120 123  
121 124  func keyPriceByAsset (assetId) = ("%s%s%s__common__priceByAsset__" + assetId)
122 125  
123 126  
124 127  let RpdBalanceKey = "rpd_balance"
125 128  
126 129  func rpdUserBalanceKey (owner,assetId) = makeString([RpdBalanceKey, assetId, owner], "_")
127 130  
128 131  
129 132  func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
130 133  
131 134  
132 135  func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
133 136  
134 137  
135 138  func getNumberByKey (address,key) = valueOrElse(getInteger(address, key), 0)
136 139  
137 140  
138 141  func getBoolOrFail (address,key) = valueOrErrorMessage(getBoolean(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
139 142  
140 143  
141 144  func convertNeutrinoToWaves (amount,price) = fraction(amount, MULT8, price)
142 145  
143 146  
144 147  func convertWavesToNeutrino (amount,price) = fraction(amount, price, MULT8)
145 148  
146 149  
147 150  func toX16 (origVal,origScaleMult) = fraction(toBigInt(origVal), MULTX16, toBigInt(origScaleMult))
148 151  
149 152  
150 153  func fromX16 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), MULTX16))
151 154  
152 155  
153 156  func asAnyList (val) = match val {
154 157      case valAnyLyst: List[Any] => 
155 158          valAnyLyst
156 159      case _ => 
157 160          throw("fail to cast into List[Any]")
158 161  }
159 162  
160 163  
161 164  func asInt (val) = match val {
162 165      case valInt: Int => 
163 166          valInt
164 167      case _ => 
165 168          throw("fail to cast into Int")
166 169  }
167 170  
168 171  
169 172  func asString (val) = match val {
170 173      case valStr: String => 
171 174          valStr
172 175      case _ => 
173 176          throw("fail to cast into String")
174 177  }
175 178  
176 179  
177 180  func asPriceSTRUCT (v) = match v {
178 181      case struct: (Int, Int, Int, Int) => 
179 182          struct
180 183      case _ => 
181 184          throw("fail to cast into PriceSTRUCT")
182 185  }
183 186  
184 187  
185 188  let IdxControlCfgNeutrinoDapp = 1
186 189  
187 190  let IdxControlCfgAuctionDapp = 2
188 191  
189 192  let IdxControlCfgRpdDapp = 3
190 193  
191 194  let IdxControlCfgMathDapp = 4
192 195  
193 196  let IdxControlCfgLiquidationDapp = 5
194 197  
195 198  let IdxControlCfgRestDapp = 6
196 199  
197 200  let IdxControlCfgNodeRegistryDapp = 7
198 201  
199 202  let IdxControlCfgNsbtStakingDapp = 8
200 203  
201 204  let IdxControlCfgMediatorDapp = 9
202 205  
203 206  let IdxControlCfgSurfStakingDapp = 10
204 207  
205 208  let IdxControlCfgGnsbtControllerDapp = 11
206 209  
207 210  let IdxControlCfgRestV2Dapp = 12
208 211  
209 212  let IdxControlCfgGovernanceDapp = 13
210 213  
211 214  let IdxControlCfgPegProviderDapp = 14
212 215  
216 + let IdxControlCfgWindProxyDapp = 16
217 + 
213 218  func keyControlAddress () = "%s%s__config__controlAddress"
214 219  
215 220  
216 221  func keyControlCfg () = "%s__controlConfig"
217 222  
218 223  
219 224  func readControlCfgOrFail (control) = split_4C(getStringOrFail(control, keyControlCfg()), SEP)
220 225  
221 226  
222 227  func getContractAddressOrFail (controlCfg,idx) = valueOrErrorMessage(addressFromString(controlCfg[idx]), ("Control cfg doesn't contain address at index " + toString(idx)))
223 228  
224 229  
225 230  let controlContract = addressFromStringValue(valueOrElse(getString(this, keyControlAddress()), "3P5Bfd58PPfNvBM2Hy8QfbcDqMeNtzg7KfP"))
226 231  
227 232  let controlCfg = readControlCfgOrFail(controlContract)
228 233  
229 234  let neutrinoContract = getContractAddressOrFail(controlCfg, IdxControlCfgNeutrinoDapp)
230 235  
231 236  let auctionContract = getContractAddressOrFail(controlCfg, IdxControlCfgAuctionDapp)
232 237  
233 238  let liquidationContract = getContractAddressOrFail(controlCfg, IdxControlCfgLiquidationDapp)
234 239  
235 240  let usdnStakingContract = getContractAddressOrFail(controlCfg, IdxControlCfgRpdDapp)
236 241  
237 242  let pegProviderContract = getContractAddressOrFail(controlCfg, IdxControlCfgPegProviderDapp)
238 243  
244 + let windProxyContract = getContractAddressOrFail(controlCfg, IdxControlCfgWindProxyDapp)
245 + 
239 246  let neutrinoAssetIdStr = getStringOrFail(neutrinoContract, keyNeutrinoAssetId())
240 247  
241 248  let neutrinoAssetId = fromBase58String(neutrinoAssetIdStr)
242 249  
243 250  let nsbtAssetId = fromBase58String(getStringValue(neutrinoContract, keyNsbtAssetId()))
244 251  
245 252  let surfAssetId = fromBase58String(getStringValue(auctionContract, keySurfAssetId()))
253 + 
254 + let windAssetIdStr = getStringOrFail(neutrinoContract, keyWindAssetId())
255 + 
256 + let windAssetId = fromBase58String(windAssetIdStr)
246 257  
247 258  func keyBalanceLocked () = "balance_lock_"
248 259  
249 260  
250 261  func totalLockedKEY (swapType,assetId) = makeString(["%s%s%s", "balanceLock", swapType, assetId], SEP)
251 262  
252 263  
253 264  func keyTokenLockedBalance (assetId) = totalLockedKEY("outNeutrino", assetId)
254 265  
255 266  
256 267  func keyNeutrinoLockedBalance () = totalLockedKEY("outMulti", neutrinoAssetIdStr)
257 268  
258 269  
259 270  func keyOldNeutrinoLockedBalance () = (keyBalanceLocked() + "neutrino")
260 271  
261 272  
262 273  func keyOldWavesLockedBalance () = (keyBalanceLocked() + "waves")
263 274  
264 275  
265 276  func calcUsdnOutOfMarketSupply () = {
266 277      let outOfMarketAddressList = valueOrElse(getString(controlContract, "%s%s__control__outOfMarketAddressList"), "")
267 278      if ((outOfMarketAddressList == ""))
268 279          then 0
269 280          else {
270 281              func balancesSUM (outOfMarketSupply,nextAddress) =             ((outOfMarketSupply + valueOrElse(getInteger(usdnStakingContract, rpdUserBalanceKey(nextAddress, neutrinoAssetIdStr)), 0)) + assetBalance(addressFromStringValue(nextAddress), neutrinoAssetId))
271 282  
272 283              let $l = split(outOfMarketAddressList, SEP)
273 284              let $s = size($l)
274 285              let $acc0 = 0
275 286              func $f0_1 ($a,$i) =             if (($i >= $s))
276 287                  then $a
277 288                  else balancesSUM($a, $l[$i])
278 289  
279 290              func $f0_2 ($a,$i) =             if (($i >= $s))
280 291                  then $a
281 292                  else throw("List size exceeds 7")
282 293  
283 294              $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7)
284 295              }
285 296      }
286 297  
287 298  
288 299  func readCurrentAvgPeg () = asPriceSTRUCT(invoke(pegProviderContract, "price", [4], nil))._2
289 300  
290 301  
291 302  func adjustPrice (priceX6,usdnUsdtPegX6) = {
292 303      let minCoeffX6 = valueOrElse(getInteger(this, keyPriceAdjMinCoeff()), 600000)
293 304      let arbRegulatorX6 = valueOrElse(getInteger(this, keyPriceAdjArbRegulator()), 150000)
294 305      let maxPriceCoeffX6 = max([minCoeffX6, fraction((MULT6 + arbRegulatorX6), usdnUsdtPegX6, MULT6)])
295 306      let priceCoeffX6 = min([maxPriceCoeffX6, MULT6])
296 307      fraction(priceX6, MULT6, priceCoeffX6)
297 308      }
298 309  
299 310  
300 311  let currentPrice = getIntegerValue(controlContract, keyPrice())
301 312  
302 313  let usdnUsdtPegX6 = readCurrentAvgPeg()
303 314  
304 315  let currentPriceAdj = adjustPrice(currentPrice, usdnUsdtPegX6)
305 316  
306 317  let neutrinoLockedBalance = (valueOrElse(getInteger(neutrinoContract, keyOldNeutrinoLockedBalance()), 0) + valueOrElse(getInteger(neutrinoContract, keyNeutrinoLockedBalance()), 0))
307 318  
308 319  let wavesLockedBalance = (valueOrElse(getInteger(neutrinoContract, keyOldWavesLockedBalance()), 0) + valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance("WAVES")), 0))
309 320  
310 321  func reserve (assetId) = {
311 322      let tempAssetId = fromBase58String(assetId)
312 323      if ((tempAssetId == WAVESID))
313 324          then (wavesBalance(neutrinoContract).regular - wavesLockedBalance)
314 -         else (assetBalance(neutrinoContract, tempAssetId) - valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance(assetId)), 0))
325 +         else if ((tempAssetId == windAssetId))
326 +             then (assetBalance(neutrinoContract, tempAssetId) + asInt(invoke(windProxyContract, "balanceREADONLY", nil, nil)))
327 +             else (assetBalance(neutrinoContract, tempAssetId) - valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance(assetId)), 0))
315 328      }
316 329  
317 330  
318 331  func reservesInUsd (assetId) = {
319 332      let vol = reserve(assetId)
320 333      let pr = value(getInteger(controlContract, keyPriceByAsset(assetId)))
321 334      fraction(vol, pr, MULT8)
322 335      }
323 336  
324 337  
325 338  let neutrinoOutOfMarketSupply = calcUsdnOutOfMarketSupply()
326 339  
327 340  let neutrinoTotalSupply = (((neutrinoLockedBalance + value(assetInfo(neutrinoAssetId)).quantity) - assetBalance(neutrinoContract, neutrinoAssetId)) - assetBalance(liquidationContract, neutrinoAssetId))
328 341  
329 342  let neutrinoSupply = (neutrinoTotalSupply - neutrinoOutOfMarketSupply)
330 343  
331 344  func getBR () = {
332 345      let basket = split(value(getString(neutrinoContract, basketAssetsKey())), SEP)
333 346      func addBr (acc,assetId) =     (acc + reservesInUsd(assetId))
334 347  
335 348      let sumReserves = {
336 349          let $l = basket
337 350          let $s = size($l)
338 351          let $acc0 = 0
339 352          func $f0_1 ($a,$i) =         if (($i >= $s))
340 353              then $a
341 354              else addBr($a, $l[$i])
342 355  
343 356          func $f0_2 ($a,$i) =         if (($i >= $s))
344 357              then $a
345 358              else throw("List size exceeds 10")
346 359  
347 360          $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)
348 361          }
349 362      fraction(sumReserves, MULT6, neutrinoSupply)
350 363      }
351 364  
352 365  
353 366  let BR = if ((neutrinoSupply == 0))
354 367      then 0
355 368      else getBR()
356 369  
357 370  func getBasketInfo () = {
358 371      let basketAssets = value(getString(neutrinoContract, basketAssetsKey()))
359 372      let basket = split(basketAssets, SEP)
360 373      func weightCalc (acc,assetId) =     {
361 374          let vol = reserve(assetId)
362 375          let pr = value(getInteger(controlContract, keyPriceByAsset(assetId)))
363 376          let resU = fraction(vol, pr, MULT8)
364 377          $Tuple2((acc._1 :+ $Tuple4(assetId, vol, resU, pr)), (acc._2 + resU))
365 378          }
366 379  
367 380      let t = {
368 381          let $l = basket
369 382          let $s = size($l)
370 383          let $acc0 = $Tuple2(nil, 0)
371 384          func $f0_1 ($a,$i) =         if (($i >= $s))
372 385              then $a
373 386              else weightCalc($a, $l[$i])
374 387  
375 388          func $f0_2 ($a,$i) =         if (($i >= $s))
376 389              then $a
377 390              else throw("List size exceeds 10")
378 391  
379 392          $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)
380 393          }
381 394      func combine (acc,item) =     {
382 395          let share = if ((t._2 == 0))
383 396              then MULT6
384 397              else fraction(item._3, MULT6, t._2)
385 398          (acc :+ makeString([item._1, toString(share), toString(item._4), toString(item._2)], ":"))
386 399          }
387 400  
388 401      let weightedPrice = if ((neutrinoSupply == 0))
389 402          then 0
390 403          else fraction(t._2, MULT6, neutrinoSupply)
391 404      $Tuple3(makeString({
392 405          let $l = t._1
393 406          let $s = size($l)
394 407          let $acc0 = nil
395 408          func $f1_1 ($a,$i) =         if (($i >= $s))
396 409              then $a
397 410              else combine($a, $l[$i])
398 411  
399 412          func $f1_2 ($a,$i) =         if (($i >= $s))
400 413              then $a
401 414              else throw("List size exceeds 10")
402 415  
403 416          $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)
404 417          }, "_"), weightedPrice, t._2)
405 418      }
406 419  
407 420  
408 421  @Callable(i)
409 422  func constructorV1 (neutrinoAddress,nsbtLockAddress,swapAmountAParam) = if ((i.caller != this))
410 423      then throw("not authorized")
411 424      else [StringEntry(keyNeutrinoAddress(), neutrinoAddress), IntegerEntry(keySwapAmountAParam(), swapAmountAParam)]
412 425  
413 426  
414 427  
415 428  @Callable(i)
416 429  func calcSwapLimitREADONLY (gNsbtAmount) = {
417 430      let limitBasketTokenInUsd = if ((0 >= gNsbtAmount))
418 431          then 0
419 432          else {
420 433              let aParamX8 = toBigInt(getIntOrFail(this, keySwapAmountAParam()))
421 434              let bParamX16 = toBigInt(getIntOrFail(this, keySwapAmountBParam()))
422 435              let powPartX8 = pow(toBigInt(gNsbtAmount), 6, bParamX16, 16, 8, CEILING)
423 436              toInt(fraction(aParamX8, powPartX8, MULTX10))
424 437              }
425 438      let limitUsdn = if ((0 >= gNsbtAmount))
426 439          then 0
427 440          else {
428 441              let aParamX8 = toBigInt(getIntOrFail(this, keyUsdnSwapAmountAParam()))
429 442              let bParamX16 = toBigInt(getIntOrFail(this, keyUsdnSwapAmountBParam()))
430 443              let powPartX8 = pow(toBigInt(gNsbtAmount), 6, bParamX16, 16, 8, CEILING)
431 444              toInt(fraction(aParamX8, powPartX8, MULTX10))
432 445              }
433 446      $Tuple2(nil, [limitBasketTokenInUsd, 0, limitUsdn])
434 447      }
435 448  
436 449  
437 450  
438 451  @Callable(i)
439 452  func calculateKREADONLY (wRaw,uRaw,price,mRaw,sRaw) = {
440 453      let EXP = toBigInt(2718281)
441 454      let EXPSCALE = 6
442 455      let a = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_a"), 3)
443 456      let paulB = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_b"), ((3 * MULT6) / 10))
444 457      let wReservesInUsdn = convertWavesToNeutrino(wRaw, price)
445 458      let multBR = fraction(wReservesInUsdn, MULT8, uRaw)
446 459      if ((multBR > 10678564816))
447 460          then throw((("BR=" + toString(multBR)) + " > 10678.564816% will overflow exponent"))
448 461          else {
449 462              let multPower = (a * (multBR - MULT8))
450 463              let multExpInPower = pow(EXP, EXPSCALE, toBigInt(multPower), MULTSCALE, SCALE16, DOWN)
451 464              let multK = fraction(toBigInt(paulB), multExpInPower, MULTX6)
452 465              $Tuple2(nil, [a, paulB, wReservesInUsdn, multBR, multPower, toString(multExpInPower), toString(multK)])
453 466              }
454 467      }
455 468  
456 469  
457 470  
458 471  @Callable(i)
459 472  func curveFunctionREADONLY (wavesPayRaw) = {
460 473      let neutrinoMetrics = asAnyList(invoke(this, "calcNeutinoMetricsREADONLY", nil, nil))
461 474      let price = asInt(neutrinoMetrics[nMetricIdxPrice])
462 475      let wRaw = asInt(neutrinoMetrics[nMetricIdxReserve])
463 476      let uRaw = asInt(neutrinoMetrics[nMetricIdxUsdnSupply])
464 477      let sRaw = asInt(neutrinoMetrics[nMetricIdxNsbtSupply])
465 478      let mRaw = asInt(neutrinoMetrics[nMetricIdxMaxNsbtSupply])
466 479      let kCalcArray = asAnyList(invoke(this, "calculateKREADONLY", [wRaw, uRaw, price, mRaw, sRaw], nil))
467 480      let multK = parseBigIntValue(asString(kCalcArray[kResultIdxMultKStr]))
468 481      let usdnPay = convertWavesToNeutrino(wavesPayRaw, price)
469 482      let bigMaxNsbtSupply = toBigInt(mRaw)
470 483      let bigNsbtSupply = toBigInt((mRaw - sRaw))
471 484      let step1 = fraction(toBigInt(usdnPay), MULTX16, multK)
472 485      let step2 = fraction(step1, bigNsbtSupply, bigMaxNsbtSupply)
473 486      let step3 = toInt(fraction(bigNsbtSupply, bigMaxNsbtSupply, (step2 + bigMaxNsbtSupply)))
474 487      let nsbtAmountRaw = ((mRaw - sRaw) - step3)
475 488      $Tuple2(nil, [nsbtAmountRaw, usdnPay, wRaw, uRaw, mRaw, sRaw, asInt(kCalcArray[kResultIdxA]), asInt(kCalcArray[kResultIdxPaulB]), asInt(kCalcArray[kResultIdxWReservesInUsdn]), price, asInt(kCalcArray[kResultIdxMultBR]), asInt(kCalcArray[kResultIdxMultPower]), kCalcArray[kResultIdxMultExpInPowerStr], kCalcArray[kResultIdxMultKStr], toString(step1), toString(step2), step3])
476 489      }
477 490  
478 491  
479 492  
480 493  @Callable(i)
481 494  func surfFunctionREADONLY (amount,assetId) = if ((0 > amount))
482 495      then throw("amount should be positive")
483 496      else {
484 497          let price = currentPrice
485 498          let priceBig = toBigInt(price)
486 499          let reserveW = reserve("WAVES")
487 500          let reserveBig = toBigInt(reserveW)
488 501          let supply = neutrinoSupply
489 502          let supplyBig = toBigInt(supply)
490 503          if ((BR >= MULT6))
491 504              then throw((("BR = " + toString(BR)) + ", cannot buy SURF"))
492 505              else {
493 506                  let maxWavesPay = (fraction(supply, MULT8, price) - reserveW)
494 507                  let maxUsdnPay = (supply - fraction(reserveW, price, MULT8))
495 508                  let useAmount = if ((assetId == neutrinoAssetId))
496 509                      then if ((amount > maxUsdnPay))
497 510                          then maxUsdnPay
498 511                          else amount
499 512                      else if ((assetId == WAVESID))
500 513                          then if ((amount > maxWavesPay))
501 514                              then maxWavesPay
502 515                              else amount
503 516                          else 0
504 517                  let amountBig = toBigInt(useAmount)
505 518                  if ((assetId == neutrinoAssetId))
506 519                      then $Tuple2(nil, [toInt(fraction(fraction(amountBig, MULTX8, priceBig), (supplyBig - (amountBig / TWOX)), reserveBig)), 0, useAmount, reserveW, supply, BR, reserveW, (supply - useAmount), fraction(convertWavesToNeutrino(reserveW, price), MULT6, (supply - useAmount)), (amount - useAmount), price])
507 520                      else if ((assetId == WAVESID))
508 521                          then $Tuple2(nil, [toInt(fraction(supplyBig, log(fraction((reserveBig + amountBig), MULTX16, reserveBig), 16, EULERX16, 16, 16, HALFUP), MULTX16)), useAmount, 0, reserveW, supply, BR, (reserveW + useAmount), supply, fraction(convertWavesToNeutrino((reserveW + useAmount), price), MULT6, supply), (amount - useAmount), price])
509 522                          else throw("Unsupported asset")
510 523                  }
511 524          }
512 525  
513 526  
514 527  
515 528  @Callable(i)
516 529  func calcContractNsbtPriceSYSREADONLY (nsbtSupplyDELTA) = {
517 530      let neutrinoMetrics = asAnyList(invoke(this, "calcNeutinoMetricsREADONLY", nil, nil))
518 531      let price = asInt(neutrinoMetrics[nMetricIdxPrice])
519 532      let wRaw = asInt(neutrinoMetrics[nMetricIdxReserve])
520 533      let uRaw = (asInt(neutrinoMetrics[nMetricIdxUsdnSupply]) - nsbtSupplyDELTA)
521 534      let sRaw = (asInt(neutrinoMetrics[nMetricIdxNsbtSupply]) + nsbtSupplyDELTA)
522 535      let mRaw = asInt(neutrinoMetrics[nMetricIdxMaxNsbtSupply])
523 536      let kCalcArray = asAnyList(invoke(this, "calculateKREADONLY", [wRaw, uRaw, price, mRaw, sRaw], nil))
524 537      let multKX16 = parseBigIntValue(asString(kCalcArray[kResultIdxMultKStr]))
525 538      let multStep1X16 = fraction(toBigInt(mRaw), MULTX16, toBigInt((mRaw - sRaw)))
526 539      let multStep2X16 = fraction(multStep1X16, multStep1X16, MULTX16)
527 540      let multNsbt2usdnPriceX16 = fraction(multKX16, multStep2X16, MULTX16)
528 541      let nsbt2usdnPrice = toInt(fraction(multNsbt2usdnPriceX16, toBigInt(MULT6), MULTX16))
529 542      let nsbt2wavesPrice = fraction(nsbt2usdnPrice, MULT6, price)
530 543      $Tuple2(nil, [nsbt2usdnPrice, nsbt2wavesPrice])
531 544      }
532 545  
533 546  
534 547  
535 548  @Callable(i)
536 549  func calcNeutinoMetricsREADONLY () = {
537 550      let nsbtSupplyMAX = value(assetInfo(nsbtAssetId)).quantity
538 551      let nsbtSupply = (nsbtSupplyMAX - assetBalance(auctionContract, nsbtAssetId))
539 552      let surfSupply = value(assetInfo(surfAssetId)).quantity
540 553      let basketInfo = getBasketInfo()
541 554      $Tuple2(nil, [currentPrice, neutrinoLockedBalance, wavesLockedBalance, reserve("WAVES"), reservesInUsd("WAVES"), neutrinoSupply, neutrinoOutOfMarketSupply, neutrinoTotalSupply, BR, nsbtSupply, nsbtSupplyMAX, surfSupply, usdnUsdtPegX6, currentPriceAdj, basketInfo._1, basketInfo._2, basketInfo._3])
542 555      }
543 556  
544 557  
545 558  
546 559  @Callable(i)
547 560  func getUnstakeComissionAmountREADONLY (amount,startHeight,halfLife) = $Tuple2(nil, fraction(amount, pow(2, 0, fraction(-((height - startHeight)), MULT8, halfLife), 8, 8, HALFUP), MULT8))
548 561  
549 562  
550 563  
551 564  @Callable(i)
552 565  func mergeStakesREADONLY (amount1,height1,amount2,height2,halfLife) = {
553 566      let w = fraction(amount2, pow(2, 0, fraction((height2 - height1), MULT8, halfLife), 8, 8, HALFUP), MULT8)
554 567      let v = fraction((amount1 + amount2), MULT8, (amount1 + w))
555 568      $Tuple2(nil, (height1 + ((HALF8 - (halfLife * log(v, 8, 2, 0, 8, HALFUP))) / MULT8)))
556 569      }
557 570  
558 571  
559 572  @Verifier(tx)
560 573  func verify () = {
561 574      let pubKeyAdminsListStr = makeString(["GJdLSaLiv5K7xuejac8mcRcHoyo3dPrESrvktG3a6MAR", "EYwZmURd5KKaQRBjsVa6g8DPisFoS6SovRJtFiL5gMHU", "DtmAfuDdCrHK8spdAeAYzq6MsZegeD9gnsrpuTRkCbVA", "5WRXFSjwcTbNfKcJs8ZqXmSSWYsSVJUtMvMqZj5hH4Nc"], SEP)
562 575      let pubKeyAdminsList = split(valueOrElse(getString(controlContract, "%s__multisig"), pubKeyAdminsListStr), SEP)
563 576      let count = ((((if (sigVerify(tx.bodyBytes, tx.proofs[0], fromBase58String(pubKeyAdminsList[0])))
564 577          then 1
565 578          else 0) + (if (sigVerify(tx.bodyBytes, tx.proofs[1], fromBase58String(pubKeyAdminsList[1])))
566 579          then 1
567 580          else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[2], fromBase58String(pubKeyAdminsList[2])))
568 581          then 1
569 582          else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[3], fromBase58String(pubKeyAdminsList[3])))
570 583          then 2
571 584          else 0))
572 585      (count >= 3)
573 586      }
574 587

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let revisionNum = "~~84925bdd892fd3edaba91bacee32ee293f796de0~~"
	4	+	let revisionNum = ""
5	5
6	6		let MULTSCALE = 8
7	7

101	101
102	102
103	103		func keySurfAssetId () = "surf_asset_id"
	104	+
	105	+
	106	+	func keyWindAssetId () = "wind_asset_id"
104	107
105	108
106	109		func swapsTimeframeKEY () = "swaps_timeframe"

210	213
211	214		let IdxControlCfgPegProviderDapp = 14
212	215
	216	+	let IdxControlCfgWindProxyDapp = 16
	217	+
213	218		func keyControlAddress () = "%s%s__config__controlAddress"
214	219
215	220

236	241
237	242		let pegProviderContract = getContractAddressOrFail(controlCfg, IdxControlCfgPegProviderDapp)
238	243
	244	+	let windProxyContract = getContractAddressOrFail(controlCfg, IdxControlCfgWindProxyDapp)
	245	+
239	246		let neutrinoAssetIdStr = getStringOrFail(neutrinoContract, keyNeutrinoAssetId())
240	247
241	248		let neutrinoAssetId = fromBase58String(neutrinoAssetIdStr)

243	250		let nsbtAssetId = fromBase58String(getStringValue(neutrinoContract, keyNsbtAssetId()))
244	251
245	252		let surfAssetId = fromBase58String(getStringValue(auctionContract, keySurfAssetId()))
	253	+
	254	+	let windAssetIdStr = getStringOrFail(neutrinoContract, keyWindAssetId())
	255	+
	256	+	let windAssetId = fromBase58String(windAssetIdStr)
246	257
247	258		func keyBalanceLocked () = "balance_lock_"
248	259

311	322		let tempAssetId = fromBase58String(assetId)
312	323		if ((tempAssetId == WAVESID))
313	324		then (wavesBalance(neutrinoContract).regular - wavesLockedBalance)
314		-	else (assetBalance(neutrinoContract, tempAssetId) - valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance(assetId)), 0))
	325	+	else if ((tempAssetId == windAssetId))
	326	+	then (assetBalance(neutrinoContract, tempAssetId) + asInt(invoke(windProxyContract, "balanceREADONLY", nil, nil)))
	327	+	else (assetBalance(neutrinoContract, tempAssetId) - valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance(assetId)), 0))
315	328		}
316	329
317	330

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let revisionNum = "~~84925bdd892fd3edaba91bacee32ee293f796de0~~"
	4	+	let revisionNum = ""
5	5
6	6		let MULTSCALE = 8
7	7
8	8		let SCALE16 = 16
9	9
10	10		let SEP = "__"
11	11
12	12		let HALF8 = 50000000
13	13
14	14		let EULERX16 = toBigInt(27182818284590452)
15	15
16	16		let TWOX = toBigInt(2)
17	17
18	18		let MULT6 = 1000000
19	19
20	20		let MULTX6 = toBigInt(1000000)
21	21
22	22		let MULT8 = 100000000
23	23
24	24		let MULTX8 = toBigInt(100000000)
25	25
26	26		let MULTX10 = toBigInt(10000000000)
27	27
28	28		let MULTX16 = toBigInt(10000000000000000)
29	29
30	30		let WAVESID = fromBase58String("WAVES")
31	31
32	32		let kResultIdxA = 0
33	33
34	34		let kResultIdxPaulB = 1
35	35
36	36		let kResultIdxWReservesInUsdn = 2
37	37
38	38		let kResultIdxMultBR = 3
39	39
40	40		let kResultIdxMultPower = 4
41	41
42	42		let kResultIdxMultExpInPowerStr = 5
43	43
44	44		let kResultIdxMultKStr = 6
45	45
46	46		let nMetricIdxPrice = 0
47	47
48	48		let nMetricIdxUsdnLockedBalance = 1
49	49
50	50		let nMetricIdxWavesLockedBalance = 2
51	51
52	52		let nMetricIdxReserve = 3
53	53
54	54		let nMetricIdxReserveInUsdn = 4
55	55
56	56		let nMetricIdxUsdnSupply = 5
57	57
58	58		let nMetricIdxSurplus = 6
59	59
60	60		let nMetricIdxSurplusPercent = 7
61	61
62	62		let nMetricIdxBR = 8
63	63
64	64		let nMetricIdxNsbtSupply = 9
65	65
66	66		let nMetricIdxMaxNsbtSupply = 10
67	67
68	68		let nMetricIdxSurfSupply = 11
69	69
70	70		let nMetricUsdnUsdtPeg = 12
71	71
72	72		let nMetricCurrentPriceAdj = 13
73	73
74	74		let nMetricBasketInfo = 14
75	75
76	76		func keyNeutrinoAddress () = "%s%s__config__neutrinoAddress"
77	77
78	78
79	79		func keySwapAmountAParam () = "%s%s__config__swapAParam"
80	80
81	81
82	82		func keySwapAmountBParam () = "%s%s__config__swapBParam"
83	83
84	84
85	85		func keyUsdnSwapAmountAParam () = "%s%s__config__usdnSwapAParam"
86	86
87	87
88	88		func keyUsdnSwapAmountBParam () = "%s%s__config__usdnSwapBParam"
89	89
90	90
91	91		func keyPriceAdjMinCoeff () = "%s%s__priceAdj__minCoefficient"
92	92
93	93
94	94		func keyPriceAdjArbRegulator () = "%s%s__priceAdj__arbRegulator"
95	95
96	96
97	97		func keyNeutrinoAssetId () = "neutrino_asset_id"
98	98
99	99
100	100		func keyNsbtAssetId () = "bond_asset_id"
101	101
102	102
103	103		func keySurfAssetId () = "surf_asset_id"
	104	+
	105	+
	106	+	func keyWindAssetId () = "wind_asset_id"
104	107
105	108
106	109		func swapsTimeframeKEY () = "swaps_timeframe"
107	110
108	111
109	112		func keyUserLastQuickSwapHeight (userAddress) = makeString(["%s%s", "userLastQuickSwapHeight", userAddress], SEP)
110	113
111	114
112	115		func keyQuickSwapUserSpentInPeriod (userAddress) = makeString(["%s%s", "quickSwapUserSpentInPeriod", userAddress], SEP)
113	116
114	117
115	118		func basketAssetsKey () = "%s%s__common__basketAssets"
116	119
117	120
118	121		func keyPrice () = "price"
119	122
120	123
121	124		func keyPriceByAsset (assetId) = ("%s%s%s__common__priceByAsset__" + assetId)
122	125
123	126
124	127		let RpdBalanceKey = "rpd_balance"
125	128
126	129		func rpdUserBalanceKey (owner,assetId) = makeString([RpdBalanceKey, assetId, owner], "_")
127	130
128	131
129	132		func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
130	133
131	134
132	135		func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
133	136
134	137
135	138		func getNumberByKey (address,key) = valueOrElse(getInteger(address, key), 0)
136	139
137	140
138	141		func getBoolOrFail (address,key) = valueOrErrorMessage(getBoolean(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
139	142
140	143
141	144		func convertNeutrinoToWaves (amount,price) = fraction(amount, MULT8, price)
142	145
143	146
144	147		func convertWavesToNeutrino (amount,price) = fraction(amount, price, MULT8)
145	148
146	149
147	150		func toX16 (origVal,origScaleMult) = fraction(toBigInt(origVal), MULTX16, toBigInt(origScaleMult))
148	151
149	152
150	153		func fromX16 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), MULTX16))
151	154
152	155
153	156		func asAnyList (val) = match val {
154	157		case valAnyLyst: List[Any] =>
155	158		valAnyLyst
156	159		case _ =>
157	160		throw("fail to cast into List[Any]")
158	161		}
159	162
160	163
161	164		func asInt (val) = match val {
162	165		case valInt: Int =>
163	166		valInt
164	167		case _ =>
165	168		throw("fail to cast into Int")
166	169		}
167	170
168	171
169	172		func asString (val) = match val {
170	173		case valStr: String =>
171	174		valStr
172	175		case _ =>
173	176		throw("fail to cast into String")
174	177		}
175	178
176	179
177	180		func asPriceSTRUCT (v) = match v {
178	181		case struct: (Int, Int, Int, Int) =>
179	182		struct
180	183		case _ =>
181	184		throw("fail to cast into PriceSTRUCT")
182	185		}
183	186
184	187
185	188		let IdxControlCfgNeutrinoDapp = 1
186	189
187	190		let IdxControlCfgAuctionDapp = 2
188	191
189	192		let IdxControlCfgRpdDapp = 3
190	193
191	194		let IdxControlCfgMathDapp = 4
192	195
193	196		let IdxControlCfgLiquidationDapp = 5
194	197
195	198		let IdxControlCfgRestDapp = 6
196	199
197	200		let IdxControlCfgNodeRegistryDapp = 7
198	201
199	202		let IdxControlCfgNsbtStakingDapp = 8
200	203
201	204		let IdxControlCfgMediatorDapp = 9
202	205
203	206		let IdxControlCfgSurfStakingDapp = 10
204	207
205	208		let IdxControlCfgGnsbtControllerDapp = 11
206	209
207	210		let IdxControlCfgRestV2Dapp = 12
208	211
209	212		let IdxControlCfgGovernanceDapp = 13
210	213
211	214		let IdxControlCfgPegProviderDapp = 14
212	215
	216	+	let IdxControlCfgWindProxyDapp = 16
	217	+
213	218		func keyControlAddress () = "%s%s__config__controlAddress"
214	219
215	220
216	221		func keyControlCfg () = "%s__controlConfig"
217	222
218	223
219	224		func readControlCfgOrFail (control) = split_4C(getStringOrFail(control, keyControlCfg()), SEP)
220	225
221	226
222	227		func getContractAddressOrFail (controlCfg,idx) = valueOrErrorMessage(addressFromString(controlCfg[idx]), ("Control cfg doesn't contain address at index " + toString(idx)))
223	228
224	229
225	230		let controlContract = addressFromStringValue(valueOrElse(getString(this, keyControlAddress()), "3P5Bfd58PPfNvBM2Hy8QfbcDqMeNtzg7KfP"))
226	231
227	232		let controlCfg = readControlCfgOrFail(controlContract)
228	233
229	234		let neutrinoContract = getContractAddressOrFail(controlCfg, IdxControlCfgNeutrinoDapp)
230	235
231	236		let auctionContract = getContractAddressOrFail(controlCfg, IdxControlCfgAuctionDapp)
232	237
233	238		let liquidationContract = getContractAddressOrFail(controlCfg, IdxControlCfgLiquidationDapp)
234	239
235	240		let usdnStakingContract = getContractAddressOrFail(controlCfg, IdxControlCfgRpdDapp)
236	241
237	242		let pegProviderContract = getContractAddressOrFail(controlCfg, IdxControlCfgPegProviderDapp)
238	243
	244	+	let windProxyContract = getContractAddressOrFail(controlCfg, IdxControlCfgWindProxyDapp)
	245	+
239	246		let neutrinoAssetIdStr = getStringOrFail(neutrinoContract, keyNeutrinoAssetId())
240	247
241	248		let neutrinoAssetId = fromBase58String(neutrinoAssetIdStr)
242	249
243	250		let nsbtAssetId = fromBase58String(getStringValue(neutrinoContract, keyNsbtAssetId()))
244	251
245	252		let surfAssetId = fromBase58String(getStringValue(auctionContract, keySurfAssetId()))
	253	+
	254	+	let windAssetIdStr = getStringOrFail(neutrinoContract, keyWindAssetId())
	255	+
	256	+	let windAssetId = fromBase58String(windAssetIdStr)
246	257
247	258		func keyBalanceLocked () = "balance_lock_"
248	259
249	260
250	261		func totalLockedKEY (swapType,assetId) = makeString(["%s%s%s", "balanceLock", swapType, assetId], SEP)
251	262
252	263
253	264		func keyTokenLockedBalance (assetId) = totalLockedKEY("outNeutrino", assetId)
254	265
255	266
256	267		func keyNeutrinoLockedBalance () = totalLockedKEY("outMulti", neutrinoAssetIdStr)
257	268
258	269
259	270		func keyOldNeutrinoLockedBalance () = (keyBalanceLocked() + "neutrino")
260	271
261	272
262	273		func keyOldWavesLockedBalance () = (keyBalanceLocked() + "waves")
263	274
264	275
265	276		func calcUsdnOutOfMarketSupply () = {
266	277		let outOfMarketAddressList = valueOrElse(getString(controlContract, "%s%s__control__outOfMarketAddressList"), "")
267	278		if ((outOfMarketAddressList == ""))
268	279		then 0
269	280		else {
270	281		func balancesSUM (outOfMarketSupply,nextAddress) = ((outOfMarketSupply + valueOrElse(getInteger(usdnStakingContract, rpdUserBalanceKey(nextAddress, neutrinoAssetIdStr)), 0)) + assetBalance(addressFromStringValue(nextAddress), neutrinoAssetId))
271	282
272	283		let $l = split(outOfMarketAddressList, SEP)
273	284		let $s = size($l)
274	285		let $acc0 = 0
275	286		func $f0_1 ($a,$i) = if (($i >= $s))
276	287		then $a
277	288		else balancesSUM($a, $l[$i])
278	289
279	290		func $f0_2 ($a,$i) = if (($i >= $s))
280	291		then $a
281	292		else throw("List size exceeds 7")
282	293
283	294		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7)
284	295		}
285	296		}
286	297
287	298
288	299		func readCurrentAvgPeg () = asPriceSTRUCT(invoke(pegProviderContract, "price", [4], nil))._2
289	300
290	301
291	302		func adjustPrice (priceX6,usdnUsdtPegX6) = {
292	303		let minCoeffX6 = valueOrElse(getInteger(this, keyPriceAdjMinCoeff()), 600000)
293	304		let arbRegulatorX6 = valueOrElse(getInteger(this, keyPriceAdjArbRegulator()), 150000)
294	305		let maxPriceCoeffX6 = max([minCoeffX6, fraction((MULT6 + arbRegulatorX6), usdnUsdtPegX6, MULT6)])
295	306		let priceCoeffX6 = min([maxPriceCoeffX6, MULT6])
296	307		fraction(priceX6, MULT6, priceCoeffX6)
297	308		}
298	309
299	310
300	311		let currentPrice = getIntegerValue(controlContract, keyPrice())
301	312
302	313		let usdnUsdtPegX6 = readCurrentAvgPeg()
303	314
304	315		let currentPriceAdj = adjustPrice(currentPrice, usdnUsdtPegX6)
305	316
306	317		let neutrinoLockedBalance = (valueOrElse(getInteger(neutrinoContract, keyOldNeutrinoLockedBalance()), 0) + valueOrElse(getInteger(neutrinoContract, keyNeutrinoLockedBalance()), 0))
307	318
308	319		let wavesLockedBalance = (valueOrElse(getInteger(neutrinoContract, keyOldWavesLockedBalance()), 0) + valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance("WAVES")), 0))
309	320
310	321		func reserve (assetId) = {
311	322		let tempAssetId = fromBase58String(assetId)
312	323		if ((tempAssetId == WAVESID))
313	324		then (wavesBalance(neutrinoContract).regular - wavesLockedBalance)
314		-	else (assetBalance(neutrinoContract, tempAssetId) - valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance(assetId)), 0))
	325	+	else if ((tempAssetId == windAssetId))
	326	+	then (assetBalance(neutrinoContract, tempAssetId) + asInt(invoke(windProxyContract, "balanceREADONLY", nil, nil)))
	327	+	else (assetBalance(neutrinoContract, tempAssetId) - valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance(assetId)), 0))
315	328		}
316	329
317	330
318	331		func reservesInUsd (assetId) = {
319	332		let vol = reserve(assetId)
320	333		let pr = value(getInteger(controlContract, keyPriceByAsset(assetId)))
321	334		fraction(vol, pr, MULT8)
322	335		}
323	336
324	337
325	338		let neutrinoOutOfMarketSupply = calcUsdnOutOfMarketSupply()
326	339
327	340		let neutrinoTotalSupply = (((neutrinoLockedBalance + value(assetInfo(neutrinoAssetId)).quantity) - assetBalance(neutrinoContract, neutrinoAssetId)) - assetBalance(liquidationContract, neutrinoAssetId))
328	341
329	342		let neutrinoSupply = (neutrinoTotalSupply - neutrinoOutOfMarketSupply)
330	343
331	344		func getBR () = {
332	345		let basket = split(value(getString(neutrinoContract, basketAssetsKey())), SEP)
333	346		func addBr (acc,assetId) = (acc + reservesInUsd(assetId))
334	347
335	348		let sumReserves = {
336	349		let $l = basket
337	350		let $s = size($l)
338	351		let $acc0 = 0
339	352		func $f0_1 ($a,$i) = if (($i >= $s))
340	353		then $a
341	354		else addBr($a, $l[$i])
342	355
343	356		func $f0_2 ($a,$i) = if (($i >= $s))
344	357		then $a
345	358		else throw("List size exceeds 10")
346	359
347	360		$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)
348	361		}
349	362		fraction(sumReserves, MULT6, neutrinoSupply)
350	363		}
351	364
352	365
353	366		let BR = if ((neutrinoSupply == 0))
354	367		then 0
355	368		else getBR()
356	369
357	370		func getBasketInfo () = {
358	371		let basketAssets = value(getString(neutrinoContract, basketAssetsKey()))
359	372		let basket = split(basketAssets, SEP)
360	373		func weightCalc (acc,assetId) = {
361	374		let vol = reserve(assetId)
362	375		let pr = value(getInteger(controlContract, keyPriceByAsset(assetId)))
363	376		let resU = fraction(vol, pr, MULT8)
364	377		$Tuple2((acc._1 :+ $Tuple4(assetId, vol, resU, pr)), (acc._2 + resU))
365	378		}
366	379
367	380		let t = {
368	381		let $l = basket
369	382		let $s = size($l)
370	383		let $acc0 = $Tuple2(nil, 0)
371	384		func $f0_1 ($a,$i) = if (($i >= $s))
372	385		then $a
373	386		else weightCalc($a, $l[$i])
374	387
375	388		func $f0_2 ($a,$i) = if (($i >= $s))
376	389		then $a
377	390		else throw("List size exceeds 10")
378	391
379	392		$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)
380	393		}
381	394		func combine (acc,item) = {
382	395		let share = if ((t._2 == 0))
383	396		then MULT6
384	397		else fraction(item._3, MULT6, t._2)
385	398		(acc :+ makeString([item._1, toString(share), toString(item._4), toString(item._2)], ":"))
386	399		}
387	400
388	401		let weightedPrice = if ((neutrinoSupply == 0))
389	402		then 0
390	403		else fraction(t._2, MULT6, neutrinoSupply)
391	404		$Tuple3(makeString({
392	405		let $l = t._1
393	406		let $s = size($l)
394	407		let $acc0 = nil
395	408		func $f1_1 ($a,$i) = if (($i >= $s))
396	409		then $a
397	410		else combine($a, $l[$i])
398	411
399	412		func $f1_2 ($a,$i) = if (($i >= $s))
400	413		then $a
401	414		else throw("List size exceeds 10")
402	415
403	416		$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)
404	417		}, "_"), weightedPrice, t._2)
405	418		}
406	419
407	420
408	421		@Callable(i)
409	422		func constructorV1 (neutrinoAddress,nsbtLockAddress,swapAmountAParam) = if ((i.caller != this))
410	423		then throw("not authorized")
411	424		else [StringEntry(keyNeutrinoAddress(), neutrinoAddress), IntegerEntry(keySwapAmountAParam(), swapAmountAParam)]
412	425
413	426
414	427
415	428		@Callable(i)
416	429		func calcSwapLimitREADONLY (gNsbtAmount) = {
417	430		let limitBasketTokenInUsd = if ((0 >= gNsbtAmount))
418	431		then 0
419	432		else {
420	433		let aParamX8 = toBigInt(getIntOrFail(this, keySwapAmountAParam()))
421	434		let bParamX16 = toBigInt(getIntOrFail(this, keySwapAmountBParam()))
422	435		let powPartX8 = pow(toBigInt(gNsbtAmount), 6, bParamX16, 16, 8, CEILING)
423	436		toInt(fraction(aParamX8, powPartX8, MULTX10))
424	437		}
425	438		let limitUsdn = if ((0 >= gNsbtAmount))
426	439		then 0
427	440		else {
428	441		let aParamX8 = toBigInt(getIntOrFail(this, keyUsdnSwapAmountAParam()))
429	442		let bParamX16 = toBigInt(getIntOrFail(this, keyUsdnSwapAmountBParam()))
430	443		let powPartX8 = pow(toBigInt(gNsbtAmount), 6, bParamX16, 16, 8, CEILING)
431	444		toInt(fraction(aParamX8, powPartX8, MULTX10))
432	445		}
433	446		$Tuple2(nil, [limitBasketTokenInUsd, 0, limitUsdn])
434	447		}
435	448
436	449
437	450
438	451		@Callable(i)
439	452		func calculateKREADONLY (wRaw,uRaw,price,mRaw,sRaw) = {
440	453		let EXP = toBigInt(2718281)
441	454		let EXPSCALE = 6
442	455		let a = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_a"), 3)
443	456		let paulB = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_b"), ((3 * MULT6) / 10))
444	457		let wReservesInUsdn = convertWavesToNeutrino(wRaw, price)
445	458		let multBR = fraction(wReservesInUsdn, MULT8, uRaw)
446	459		if ((multBR > 10678564816))
447	460		then throw((("BR=" + toString(multBR)) + " > 10678.564816% will overflow exponent"))
448	461		else {
449	462		let multPower = (a * (multBR - MULT8))
450	463		let multExpInPower = pow(EXP, EXPSCALE, toBigInt(multPower), MULTSCALE, SCALE16, DOWN)
451	464		let multK = fraction(toBigInt(paulB), multExpInPower, MULTX6)
452	465		$Tuple2(nil, [a, paulB, wReservesInUsdn, multBR, multPower, toString(multExpInPower), toString(multK)])
453	466		}
454	467		}
455	468
456	469
457	470
458	471		@Callable(i)
459	472		func curveFunctionREADONLY (wavesPayRaw) = {
460	473		let neutrinoMetrics = asAnyList(invoke(this, "calcNeutinoMetricsREADONLY", nil, nil))
461	474		let price = asInt(neutrinoMetrics[nMetricIdxPrice])
462	475		let wRaw = asInt(neutrinoMetrics[nMetricIdxReserve])
463	476		let uRaw = asInt(neutrinoMetrics[nMetricIdxUsdnSupply])
464	477		let sRaw = asInt(neutrinoMetrics[nMetricIdxNsbtSupply])
465	478		let mRaw = asInt(neutrinoMetrics[nMetricIdxMaxNsbtSupply])
466	479		let kCalcArray = asAnyList(invoke(this, "calculateKREADONLY", [wRaw, uRaw, price, mRaw, sRaw], nil))
467	480		let multK = parseBigIntValue(asString(kCalcArray[kResultIdxMultKStr]))
468	481		let usdnPay = convertWavesToNeutrino(wavesPayRaw, price)
469	482		let bigMaxNsbtSupply = toBigInt(mRaw)
470	483		let bigNsbtSupply = toBigInt((mRaw - sRaw))
471	484		let step1 = fraction(toBigInt(usdnPay), MULTX16, multK)
472	485		let step2 = fraction(step1, bigNsbtSupply, bigMaxNsbtSupply)
473	486		let step3 = toInt(fraction(bigNsbtSupply, bigMaxNsbtSupply, (step2 + bigMaxNsbtSupply)))
474	487		let nsbtAmountRaw = ((mRaw - sRaw) - step3)
475	488		$Tuple2(nil, [nsbtAmountRaw, usdnPay, wRaw, uRaw, mRaw, sRaw, asInt(kCalcArray[kResultIdxA]), asInt(kCalcArray[kResultIdxPaulB]), asInt(kCalcArray[kResultIdxWReservesInUsdn]), price, asInt(kCalcArray[kResultIdxMultBR]), asInt(kCalcArray[kResultIdxMultPower]), kCalcArray[kResultIdxMultExpInPowerStr], kCalcArray[kResultIdxMultKStr], toString(step1), toString(step2), step3])
476	489		}
477	490
478	491
479	492
480	493		@Callable(i)
481	494		func surfFunctionREADONLY (amount,assetId) = if ((0 > amount))
482	495		then throw("amount should be positive")
483	496		else {
484	497		let price = currentPrice
485	498		let priceBig = toBigInt(price)

github/deemru/w8io/786bc32 
61.72 ms ◑