2024.03.18 13:25 [4089186] smart account 3P6J84oH51DzY6xk2mT5TheXRbrCwBMxonp > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Dc7TXAa6rLPun2zcFtQMsBtBG9bXu2B8xUy9q54gwhzD",
    "fee": 1100000,
    "feeAssetId": null,
    "timestamp": 1710757486281,
    "version": 2,
    "chainId": 87,
    "sender": "3P6J84oH51DzY6xk2mT5TheXRbrCwBMxonp",
    "senderPublicKey": "GTY8yEJ2S4heRompxyvbJoBN1Td5BM5Pp4JgVbj9tmCw",
    "proofs": [
        "26yCdDjyG3cWm558DsCxfvTS8vuEkPWHhTXwCi6W3nNbai4NZhvrvRac35Tu8WtgvwMFrgtQgPMPypVuYeqbb7E7",
        "",
        "41ozRpVFU8nbgjBR7J5gE8VojFDmD54gazWEXHx7GoNDz2aTcAcGPGPD5XgPQN35QxFfkYPV1iHXSmtr6o5osQet"
    ],
    "script": "base64:BgILCAISBwoFGAQICAEdAAZvcmFjbGUJAQdBZGRyZXNzAQEaAVeK/whomjW6QM1hdPISN96mN/D6OM7oHjgADWtBZG1pblB1YktleTECC2FkbWluX3B1Yl8xAA1rQWRtaW5QdWJLZXkyAgthZG1pbl9wdWJfMgANa0FkbWluUHViS2V5MwILYWRtaW5fcHViXzMAEmtBZG1pbkludm9rZVB1YktleQIQYWRtaW5faW52b2tlX3B1YgALa0dvdkFkZHJlc3MCEmdvdmVybmFuY2VfYWRkcmVzcwAMa0Zhcm1BZGRyZXNzAg9mYXJtaW5nX2FkZHJlc3MAD2tTdXJ2ZXlzQWRkcmVzcwIPc3VydmV5c19hZGRyZXNzAAxrUm91dGluZ0FkZHICD3JvdXRpbmdfYWRkcmVzcwAHa1NXT1BpZAIHU1dPUF9pZAAPa1ByZWZpeFBvb2xOYW1lAgVwb29sXwASYnVybkFpckRyb3BQZXJjZW50ABQBE2dldEJhc2U1OEZyb21PcmFjbGUBA2tleQQHJG1hdGNoMAkAnQgCBQZvcmFjbGUFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEBnN0cmluZwUHJG1hdGNoMAkA2QQBBQZzdHJpbmcEB25vdGhpbmcFByRtYXRjaDAJAAIBCQCsAgIFA2tleQIIaXMgZW1wdHkADGFkbWluUHViS2V5MQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQ1rQWRtaW5QdWJLZXkxAAxhZG1pblB1YktleTIJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUNa0FkbWluUHViS2V5MgAMYWRtaW5QdWJLZXkzCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDWtBZG1pblB1YktleTMAC2FkbWluSW52b2tlCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFEmtBZG1pbkludm9rZVB1YktleQARZ292ZXJuYW5jZUFkZHJlc3MJAQdBZGRyZXNzAQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQtrR292QWRkcmVzcwAOZmFybWluZ0FkZHJlc3MJAQdBZGRyZXNzAQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQxrRmFybUFkZHJlc3MADnN1cnZleXNBZGRyZXNzCQEHQWRkcmVzcwEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUPa1N1cnZleXNBZGRyZXNzAA5yb3V0aW5nQWRkcmVzcwkBB0FkZHJlc3MBCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDGtSb3V0aW5nQWRkcgAGc3dvcElkCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFDmZhcm1pbmdBZGRyZXNzBQdrU1dPUGlkAQppc1NlbGZDYWxsAQFpAwkAAAIIBQFpBmNhbGxlcgUEdGhpcwUEdW5pdAkAAgECK09ubHkgY29udHJhY3QgaXRzZWxmIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24BCWxpc3RUb0ludAIBYQRpdGVtCQDNCAIFAWEJAQ1wYXJzZUludFZhbHVlAQUEaXRlbQEOYXNzZXRJZEZyb21TdHIBB2Fzc2V0SWQDCQAAAgUHYXNzZXRJZAIFV0FWRVMFBHVuaXQJANkEAQUHYXNzZXRJZAEOYWNjb3VudEJhbGFuY2UBB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCaWQFByRtYXRjaDAJAPAHAgUEdGhpcwUCaWQDCQABAgUHJG1hdGNoMAIEVW5pdAQFd2F2ZXMFByRtYXRjaDAICQDvBwEFBHRoaXMJYXZhaWxhYmxlCQACAQILTWF0Y2ggZXJyb3IBEGRpcmVjdFN3b3BmaUNQTU0BBXJBcmdzBARkQXBwCQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFBXJBcmdzAAEEA3BtdAQEcG10UAkAtQkCCQCRAwIFBXJBcmdzAAICAXwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQkAkQMCBQRwbXRQAAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRwbXRQAAEFA25pbAQLbWluVG9SZWNpdmUJAJEDAgUFckFyZ3MAAwkA/AcEBQRkQXBwAgxjYWxsRnVuY3Rpb24JAMwIAgIIZXhjaGFuZ2UJAMwIAgkAzAgCBQttaW5Ub1JlY2l2ZQUDbmlsBQNuaWwFA3BtdAETZGlyZWN0Um91dGluZ1N3b3BmaQEFckFyZ3MEBGRBcHAJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUFckFyZ3MAAQQDcG10BARwbXRQCQC1CQIJAJEDAgUFckFyZ3MAAgIBfAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBCQCRAwIFBHBtdFAAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBHBtdFAAAQUDbmlsBARhcmdzBAVlQXJncwkAtQkCCQCRAwIFBXJBcmdzAAMCAXwECmV4Y2hhbmdlcnMJALUJAgkAkQMCBQVlQXJncwAAAgEsBA5leGNoYW5nZXJzVHlwZQkAtQkCCQCRAwIFBWVBcmdzAAECASwEBWFyZ3MxCgACJGwJALUJAgkAkQMCBQVlQXJncwACAgEsCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlsaXN0VG9JbnQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDMJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMEBWFyZ3MyCgACJGwJALUJAgkAkQMCBQVlQXJncwADAgEsCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlsaXN0VG9JbnQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDMJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMEEXJvdXRpbmdBc3NldHNLZXlzCQC1CQIJAJEDAgUFZUFyZ3MABAIBLAQLbWluVG9SZWNpdmUJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVlQXJncwAFCQDMCAIFCmV4Y2hhbmdlcnMJAMwIAgUOZXhjaGFuZ2Vyc1R5cGUJAMwIAgUFYXJnczEJAMwIAgUFYXJnczIJAMwIAgURcm91dGluZ0Fzc2V0c0tleXMJAMwIAgULbWluVG9SZWNpdmUFA25pbAkA/AcEBQRkQXBwAgxyb3V0aW5nVHJhZGUFBGFyZ3MFA3BtdAERYnV5U3dvcEZvckFpcmRyb3ADBHBvb2wPdG9rZW5Ub0V4Y2hhbmdlEWFtb3VudFRvTGVmdEZvclR4BAd0b2tlbklkCQEOYXNzZXRJZEZyb21TdHIBBQ90b2tlblRvRXhjaGFuZ2UEDHRva2VuQmFsYW5jZQkBDmFjY291bnRCYWxhbmNlAQUHdG9rZW5JZAMJAAACBQx0b2tlbkJhbGFuY2UFDHRva2VuQmFsYW5jZQQQYW1vdW50VG9FeGNoYW5nZQkAZQIFDHRva2VuQmFsYW5jZQURYW1vdW50VG9MZWZ0Rm9yVHgDCQBnAgAABRBhbW91bnRUb0V4Y2hhbmdlCQACAQIfTm90aGluZyB0byBleGNoYW5nZSBmb3IgYWlyZHJvcAQIcG9vbEFkZHIJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBHBvb2wJAPwHBAUIcG9vbEFkZHICDGNhbGxGdW5jdGlvbgkAzAgCAghleGNoYW5nZQkAzAgCCQDMCAICATEFA25pbAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQd0b2tlbklkBRBhbW91bnRUb0V4Y2hhbmdlBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAWkBDmV4Y2hhbmdlVG9rZW5zBQZyb3V0ZXMHYWlyZHJvcARwb29sD3Rva2VuVG9FeGNoYW5nZRFhbW91bnRUb0xlZnRGb3JUeAkBC3ZhbHVlT3JFbHNlAgkBCmlzU2VsZkNhbGwBBQFpCgENZXhjaGFuZ2VUb2tlbgIBcgVyb3V0ZQQFckFyZ3MJALUJAgUFcm91dGUCAl9fAwkAAAIJAJEDAgUFckFyZ3MAAAIQZGlyZWN0U3dvcGZpQ1BNTQQDaW52CQEQZGlyZWN0U3dvcGZpQ1BNTQEFBXJBcmdzAwkAAAIFA2ludgUDaW52CQDNCAIFAXIFA2ludgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgMJAAACCQCRAwIFBXJBcmdzAAACDXJvdXRpbmdTd29wZmkEA2ludgkBE2RpcmVjdFJvdXRpbmdTd29wZmkBBQVyQXJncwMJAAACBQNpbnYFA2ludgkAzQgCBQFyBQNpbnYJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAhJVbmtub3duIHJvdXRlIHR5cGUEA3JlcwoAAiRsBQZyb3V0ZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBDWV4Y2hhbmdlVG9rZW4CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoDCQAAAgUDcmVzBQNyZXMDCQEBIQEFB2FpcmRyb3AFA25pbAQDaW52CQERYnV5U3dvcEZvckFpcmRyb3ADBQRwb29sBQ90b2tlblRvRXhjaGFuZ2UFEWFtb3VudFRvTGVmdEZvclR4AwkAAAIFA2ludgUDaW52BAtzd29wQmFsYW5jZQkBDmFjY291bnRCYWxhbmNlAQUGc3dvcElkAwkAAAIFC3N3b3BCYWxhbmNlBQtzd29wQmFsYW5jZQQKYnVybkFtb3VudAkAawMFC3N3b3BCYWxhbmNlBRJidXJuQWlyRHJvcFBlcmNlbnQAZAQEYUludgkA/AcEBRFnb3Zlcm5hbmNlQWRkcmVzcwIHYWlyRHJvcAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQZzd29wSWQJAGUCBQtzd29wQmFsYW5jZQUKYnVybkFtb3VudAUDbmlsAwkAAAIFBGFJbnYFBGFJbnYJAMwIAgkBBEJ1cm4CBQZzd29wSWQFCmJ1cm5BbW91bnQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAEByRtYXRjaDAFAnR4AwkAAQIFByRtYXRjaDACF0ludm9rZVNjcmlwdFRyYW5zYWN0aW9uBANpbnYFByRtYXRjaDAECmlzUmlnaHRGZWUDCQAAAggFA2ludgNmZWUAoPc2CQAAAggFA2ludgpmZWVBc3NldElkBQR1bml0BwQNaXNSb3V0aW5nQ2FsbAMJAAACCAUDaW52BGRBcHAFDnJvdXRpbmdBZGRyZXNzCQAAAggFA2ludghmdW5jdGlvbgIMcm91dGluZ1RyYWRlBwQSaXNFeGNoYW5nZUNhbGxDUE1NAwMJAQlpc0RlZmluZWQBCQCdCAIFBm9yYWNsZQkArAICBQ9rUHJlZml4UG9vbE5hbWUJAKUIAQkApAgBCAUDaW52BGRBcHAJAAACCAUDaW52CGZ1bmN0aW9uAgxjYWxsRnVuY3Rpb24HCQAAAgkAkQMCCAUDaW52BGFyZ3MAAAIIZXhjaGFuZ2UHBA5pc0V4Y2hhbmdlQ2FsbAMJAQlpc0RlZmluZWQBCQCdCAIFBm9yYWNsZQkArAICBQ9rUHJlZml4UG9vbE5hbWUJAKUIAQkApAgBCAUDaW52BGRBcHAJAAACCAUDaW52CGZ1bmN0aW9uAghleGNoYW5nZQcEDWlzQWlyZHJvcENhbGwJAAACCAUDaW52CGZ1bmN0aW9uAg5leGNoYW5nZVRva2VucwQTaXNVcGRhdGVXZWlnaHRzQ2FsbAMJAAACCAUDaW52BGRBcHAFEWdvdmVybmFuY2VBZGRyZXNzCQAAAggFA2ludghmdW5jdGlvbgINdXBkYXRlV2VpZ2h0cwcEFmlzVGFrZW5JbnRvQWNjb3VudENQTU0DAwkBCWlzRGVmaW5lZAEJAJ0IAgUGb3JhY2xlCQCsAgIFD2tQcmVmaXhQb29sTmFtZQkApQgBCQCkCAEIBQNpbnYEZEFwcAkAAAIIBQNpbnYIZnVuY3Rpb24CDGNhbGxGdW5jdGlvbgcJAAACCQCRAwIIBQNpbnYEYXJncwAAAhl0YWtlSW50b0FjY291bnRFeHRyYUZ1bmRzBwQSaXNUYWtlbkludG9BY2NvdW50AwkBCWlzRGVmaW5lZAEJAJ0IAgUGb3JhY2xlCQCsAgIFD2tQcmVmaXhQb29sTmFtZQkApQgBCQCkCAEIBQNpbnYEZEFwcAkAAAIIBQNpbnYIZnVuY3Rpb24CGXRha2VJbnRvQWNjb3VudEV4dHJhRnVuZHMHBAxpc1dyaXRlVG90YWwDCQAAAggFA2ludgRkQXBwBQ5zdXJ2ZXlzQWRkcmVzcwkAAAIIBQNpbnYIZnVuY3Rpb24CC3dyaXRlVG90YWxzBwQSYWRtaW5QdWJLZXkxU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUMYWRtaW5QdWJLZXkxAAEAAAQSYWRtaW5QdWJLZXkyU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUMYWRtaW5QdWJLZXkyAAEAAAQSYWRtaW5QdWJLZXkzU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUMYWRtaW5QdWJLZXkzAAEAAAQXYWRtaW5QdWJLZXlJbnZva2VTaWduZWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABQthZG1pbkludm9rZQABAAAEEHNpZ25lZEJ5T25lQWRtaW4JAGcCCQBkAgkAZAIJAGQCBRJhZG1pblB1YktleTFTaWduZWQFEmFkbWluUHViS2V5MlNpZ25lZAUSYWRtaW5QdWJLZXkzU2lnbmVkBRdhZG1pblB1YktleUludm9rZVNpZ25lZAABAwMDAwMDBQ5pc0V4Y2hhbmdlQ2FsbAYFEmlzRXhjaGFuZ2VDYWxsQ1BNTQYFDWlzUm91dGluZ0NhbGwJAAACCQCQAwEIBQNpbnYIcGF5bWVudHMAAQcGAwMDAwMFE2lzVXBkYXRlV2VpZ2h0c0NhbGwGBRJpc1Rha2VuSW50b0FjY291bnQGBRZpc1Rha2VuSW50b0FjY291bnRDUE1NBgUMaXNXcml0ZVRvdGFsBgUNaXNBaXJkcm9wQ2FsbAkAAAIJAJADAQgFA2ludghwYXltZW50cwAABwUQc2lnbmVkQnlPbmVBZG1pbgcFCmlzUmlnaHRGZWUHBBJhZG1pblB1YktleTFTaWduZWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABQxhZG1pblB1YktleTEAAQAABBJhZG1pblB1YktleTJTaWduZWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwABBQxhZG1pblB1YktleTIAAQAABBJhZG1pblB1YktleTNTaWduZWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwACBQxhZG1pblB1YktleTMAAQAACQBnAgkAZAIJAGQCBRJhZG1pblB1YktleTFTaWduZWQFEmFkbWluUHViS2V5MlNpZ25lZAUSYWRtaW5QdWJLZXkzU2lnbmVkAALrkTjY",
    "height": 4089186,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 8eM56QNm2yyZ6Gk7HCPPYKK2YiyjLtHQuQ7u9Ve19G93
Next: G4ZTW8Skf37uNkaSm1zFdhTFqjNy2VH14yPo5XyPMtk1

Diff: 
Old
New
Differences
22
22
 
let kSWOPid = "SWOP_id"
23
23
 
24
24
 
let kPrefixPoolName = "pool_"
25
+
26
+
let burnAirDropPercent = 20
25
27
 
26
28
 
func getBase58FromOracle (key) = match getString(oracle, key) {
27
29
 
    case string: String => 
191
193
 
                        let swopBalance = accountBalance(swopId)
192
194
 
                        if ((swopBalance == swopBalance))
193
195
 
                            then {
194
-
                                let aInv = invoke(governanceAddress, "airDrop", nil, [AttachedPayment(swopId, swopBalance)])
196
+
                                let burnAmount = fraction(swopBalance, burnAirDropPercent, 100)
197
+
                                let aInv = invoke(governanceAddress, "airDrop", nil, [AttachedPayment(swopId, (swopBalance - burnAmount))])
195
198
 
                                if ((aInv == aInv))
196
-
                                    then nil
199
+
                                    then [Burn(swopId, burnAmount)]
197
200
 
                                    else throw("Strict value is not equal to itself.")
198
201
 
                                }
199
202
 
                            else throw("Strict value is not equal to itself.")
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let oracle = Address(base58'3PEbqViERCoKnmcSULh6n2aiMvUdSQdCsom')
5
5
 
6
6
 
let kAdminPubKey1 = "admin_pub_1"
7
7
 
8
8
 
let kAdminPubKey2 = "admin_pub_2"
9
9
 
10
10
 
let kAdminPubKey3 = "admin_pub_3"
11
11
 
12
12
 
let kAdminInvokePubKey = "admin_invoke_pub"
13
13
 
14
14
 
let kGovAddress = "governance_address"
15
15
 
16
16
 
let kFarmAddress = "farming_address"
17
17
 
18
18
 
let kSurveysAddress = "surveys_address"
19
19
 
20
20
 
let kRoutingAddr = "routing_address"
21
21
 
22
22
 
let kSWOPid = "SWOP_id"
23
23
 
24
24
 
let kPrefixPoolName = "pool_"
25
+
26
+
let burnAirDropPercent = 20
25
27
 
26
28
 
func getBase58FromOracle (key) = match getString(oracle, key) {
27
29
 
    case string: String => 
28
30
 
        fromBase58String(string)
29
31
 
    case nothing => 
30
32
 
        throw((key + "is empty"))
31
33
 
}
32
34
 
33
35
 
34
36
 
let adminPubKey1 = getBase58FromOracle(kAdminPubKey1)
35
37
 
36
38
 
let adminPubKey2 = getBase58FromOracle(kAdminPubKey2)
37
39
 
38
40
 
let adminPubKey3 = getBase58FromOracle(kAdminPubKey3)
39
41
 
40
42
 
let adminInvoke = getBase58FromOracle(kAdminInvokePubKey)
41
43
 
42
44
 
let governanceAddress = Address(getBase58FromOracle(kGovAddress))
43
45
 
44
46
 
let farmingAddress = Address(getBase58FromOracle(kFarmAddress))
45
47
 
46
48
 
let surveysAddress = Address(getBase58FromOracle(kSurveysAddress))
47
49
 
48
50
 
let routingAddress = Address(getBase58FromOracle(kRoutingAddr))
49
51
 
50
52
 
let swopId = fromBase58String(getStringValue(farmingAddress, kSWOPid))
51
53
 
52
54
 
func isSelfCall (i) = if ((i.caller == this))
53
55
 
    then unit
54
56
 
    else throw("Only contract itself can call this function")
55
57
 
56
58
 
57
59
 
func listToInt (a,item) = (a :+ parseIntValue(item))
58
60
 
59
61
 
60
62
 
func assetIdFromStr (assetId) = if ((assetId == "WAVES"))
61
63
 
    then unit
62
64
 
    else fromBase58String(assetId)
63
65
 
64
66
 
65
67
 
func accountBalance (assetId) = match assetId {
66
68
 
    case id: ByteVector => 
67
69
 
        assetBalance(this, id)
68
70
 
    case waves: Unit => 
69
71
 
        wavesBalance(this).available
70
72
 
    case _ => 
71
73
 
        throw("Match error")
72
74
 
}
73
75
 
74
76
 
75
77
 
func directSwopfiCPMM (rArgs) = {
76
78
 
    let dApp = addressFromStringValue(rArgs[1])
77
79
 
    let pmt = {
78
80
 
        let pmtP = split(rArgs[2], "|")
79
81
 
[AttachedPayment(fromBase58String(pmtP[0]), parseIntValue(pmtP[1]))]
80
82
 
        }
81
83
 
    let minToRecive = rArgs[3]
82
84
 
    invoke(dApp, "callFunction", ["exchange", [minToRecive]], pmt)
83
85
 
    }
84
86
 
85
87
 
86
88
 
func directRoutingSwopfi (rArgs) = {
87
89
 
    let dApp = addressFromStringValue(rArgs[1])
88
90
 
    let pmt = {
89
91
 
        let pmtP = split(rArgs[2], "|")
90
92
 
[AttachedPayment(fromBase58String(pmtP[0]), parseIntValue(pmtP[1]))]
91
93
 
        }
92
94
 
    let args = {
93
95
 
        let eArgs = split(rArgs[3], "|")
94
96
 
        let exchangers = split(eArgs[0], ",")
95
97
 
        let exchangersType = split(eArgs[1], ",")
96
98
 
        let args1 = {
97
99
 
            let $l = split(eArgs[2], ",")
98
100
 
            let $s = size($l)
99
101
 
            let $acc0 = nil
100
102
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
101
103
 
                then $a
102
104
 
                else listToInt($a, $l[$i])
103
105
 
104
106
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
105
107
 
                then $a
106
108
 
                else throw("List size exceeds 3")
107
109
 
108
110
 
            $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
109
111
 
            }
110
112
 
        let args2 = {
111
113
 
            let $l = split(eArgs[3], ",")
112
114
 
            let $s = size($l)
113
115
 
            let $acc0 = nil
114
116
 
            func $f1_1 ($a,$i) =             if (($i >= $s))
115
117
 
                then $a
116
118
 
                else listToInt($a, $l[$i])
117
119
 
118
120
 
            func $f1_2 ($a,$i) =             if (($i >= $s))
119
121
 
                then $a
120
122
 
                else throw("List size exceeds 3")
121
123
 
122
124
 
            $f1_2($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3)
123
125
 
            }
124
126
 
        let routingAssetsKeys = split(eArgs[4], ",")
125
127
 
        let minToRecive = parseIntValue(eArgs[5])
126
128
 
[exchangers, exchangersType, args1, args2, routingAssetsKeys, minToRecive]
127
129
 
        }
128
130
 
    invoke(dApp, "routingTrade", args, pmt)
129
131
 
    }
130
132
 
131
133
 
132
134
 
func buySwopForAirdrop (pool,tokenToExchange,amountToLeftForTx) = {
133
135
 
    let tokenId = assetIdFromStr(tokenToExchange)
134
136
 
    let tokenBalance = accountBalance(tokenId)
135
137
 
    if ((tokenBalance == tokenBalance))
136
138
 
        then {
137
139
 
            let amountToExchange = (tokenBalance - amountToLeftForTx)
138
140
 
            if ((0 >= amountToExchange))
139
141
 
                then throw("Nothing to exchange for airdrop")
140
142
 
                else {
141
143
 
                    let poolAddr = addressFromStringValue(pool)
142
144
 
                    invoke(poolAddr, "callFunction", ["exchange", ["1"]], [AttachedPayment(tokenId, amountToExchange)])
143
145
 
                    }
144
146
 
            }
145
147
 
        else throw("Strict value is not equal to itself.")
146
148
 
    }
147
149
 
148
150
 
149
151
 
@Callable(i)
150
152
 
func exchangeTokens (routes,airdrop,pool,tokenToExchange,amountToLeftForTx) = valueOrElse(isSelfCall(i), {
151
153
 
    func exchangeToken (r,route) =     {
152
154
 
        let rArgs = split(route, "__")
153
155
 
        if ((rArgs[0] == "directSwopfiCPMM"))
154
156
 
            then {
155
157
 
                let inv = directSwopfiCPMM(rArgs)
156
158
 
                if ((inv == inv))
157
159
 
                    then (r :+ inv)
158
160
 
                    else throw("Strict value is not equal to itself.")
159
161
 
                }
160
162
 
            else if ((rArgs[0] == "routingSwopfi"))
161
163
 
                then {
162
164
 
                    let inv = directRoutingSwopfi(rArgs)
163
165
 
                    if ((inv == inv))
164
166
 
                        then (r :+ inv)
165
167
 
                        else throw("Strict value is not equal to itself.")
166
168
 
                    }
167
169
 
                else throw("Unknown route type")
168
170
 
        }
169
171
 
170
172
 
    let res = {
171
173
 
        let $l = routes
172
174
 
        let $s = size($l)
173
175
 
        let $acc0 = nil
174
176
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
175
177
 
            then $a
176
178
 
            else exchangeToken($a, $l[$i])
177
179
 
178
180
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
179
181
 
            then $a
180
182
 
            else throw("List size exceeds 10")
181
183
 
182
184
 
        $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)
183
185
 
        }
184
186
 
    if ((res == res))
185
187
 
        then if (!(airdrop))
186
188
 
            then nil
187
189
 
            else {
188
190
 
                let inv = buySwopForAirdrop(pool, tokenToExchange, amountToLeftForTx)
189
191
 
                if ((inv == inv))
190
192
 
                    then {
191
193
 
                        let swopBalance = accountBalance(swopId)
192
194
 
                        if ((swopBalance == swopBalance))
193
195
 
                            then {
194
-
                                let aInv = invoke(governanceAddress, "airDrop", nil, [AttachedPayment(swopId, swopBalance)])
196
+
                                let burnAmount = fraction(swopBalance, burnAirDropPercent, 100)
197
+
                                let aInv = invoke(governanceAddress, "airDrop", nil, [AttachedPayment(swopId, (swopBalance - burnAmount))])
195
198
 
                                if ((aInv == aInv))
196
-
                                    then nil
199
+
                                    then [Burn(swopId, burnAmount)]
197
200
 
                                    else throw("Strict value is not equal to itself.")
198
201
 
                                }
199
202
 
                            else throw("Strict value is not equal to itself.")
200
203
 
                        }
201
204
 
                    else throw("Strict value is not equal to itself.")
202
205
 
                }
203
206
 
        else throw("Strict value is not equal to itself.")
204
207
 
    })
205
208
 
206
209
 
207
210
 
@Verifier(tx)
208
211
 
func verify () = match tx {
209
212
 
    case inv: InvokeScriptTransaction => 
210
213
 
        let isRightFee = if ((inv.fee == 900000))
211
214
 
            then (inv.feeAssetId == unit)
212
215
 
            else false
213
216
 
        let isRoutingCall = if ((inv.dApp == routingAddress))
214
217
 
            then (inv.function == "routingTrade")
215
218
 
            else false
216
219
 
        let isExchangeCallCPMM = if (if (isDefined(getString(oracle, (kPrefixPoolName + toString(addressFromRecipient(inv.dApp))))))
217
220
 
            then (inv.function == "callFunction")
218
221
 
            else false)
219
222
 
            then (inv.args[0] == "exchange")
220
223
 
            else false
221
224
 
        let isExchangeCall = if (isDefined(getString(oracle, (kPrefixPoolName + toString(addressFromRecipient(inv.dApp))))))
222
225
 
            then (inv.function == "exchange")
223
226
 
            else false
224
227
 
        let isAirdropCall = (inv.function == "exchangeTokens")
225
228
 
        let isUpdateWeightsCall = if ((inv.dApp == governanceAddress))
226
229
 
            then (inv.function == "updateWeights")
227
230
 
            else false
228
231
 
        let isTakenIntoAccountCPMM = if (if (isDefined(getString(oracle, (kPrefixPoolName + toString(addressFromRecipient(inv.dApp))))))
229
232
 
            then (inv.function == "callFunction")
230
233
 
            else false)
231
234
 
            then (inv.args[0] == "takeIntoAccountExtraFunds")
232
235
 
            else false
233
236
 
        let isTakenIntoAccount = if (isDefined(getString(oracle, (kPrefixPoolName + toString(addressFromRecipient(inv.dApp))))))
234
237
 
            then (inv.function == "takeIntoAccountExtraFunds")
235
238
 
            else false
236
239
 
        let isWriteTotal = if ((inv.dApp == surveysAddress))
237
240
 
            then (inv.function == "writeTotals")
238
241
 
            else false
239
242
 
        let adminPubKey1Signed = if (sigVerify(tx.bodyBytes, tx.proofs[0], adminPubKey1))
240
243
 
            then 1
241
244
 
            else 0
242
245
 
        let adminPubKey2Signed = if (sigVerify(tx.bodyBytes, tx.proofs[0], adminPubKey2))
243
246
 
            then 1
244
247
 
            else 0
245
248
 
        let adminPubKey3Signed = if (sigVerify(tx.bodyBytes, tx.proofs[0], adminPubKey3))
246
249
 
            then 1
247
250
 
            else 0
248
251
 
        let adminPubKeyInvokeSigned = if (sigVerify(tx.bodyBytes, tx.proofs[0], adminInvoke))
249
252
 
            then 1
250
253
 
            else 0
251
254
 
        let signedByOneAdmin = ((((adminPubKey1Signed + adminPubKey2Signed) + adminPubKey3Signed) + adminPubKeyInvokeSigned) >= 1)
252
255
 
        if (if (if (if (if (if (isExchangeCall)
253
256
 
            then true
254
257
 
            else isExchangeCallCPMM)
255
258
 
            then true
256
259
 
            else isRoutingCall)
257
260
 
            then (size(inv.payments) == 1)
258
261
 
            else false)
259
262
 
            then true
260
263
 
            else if (if (if (if (if (isUpdateWeightsCall)
261
264
 
                then true
262
265
 
                else isTakenIntoAccount)
263
266
 
                then true
264
267
 
                else isTakenIntoAccountCPMM)
265
268
 
                then true
266
269
 
                else isWriteTotal)
267
270
 
                then true
268
271
 
                else isAirdropCall)
269
272
 
                then (size(inv.payments) == 0)
270
273
 
                else false)
271
274
 
            then signedByOneAdmin
272
275
 
            else false)
273
276
 
            then isRightFee
274
277
 
            else false
275
278
 
    case _ => 
276
279
 
        let adminPubKey1Signed = if (sigVerify(tx.bodyBytes, tx.proofs[0], adminPubKey1))
277
280
 
            then 1
278
281
 
            else 0
279
282
 
        let adminPubKey2Signed = if (sigVerify(tx.bodyBytes, tx.proofs[1], adminPubKey2))
280
283
 
            then 1
281
284
 
            else 0
282
285
 
        let adminPubKey3Signed = if (sigVerify(tx.bodyBytes, tx.proofs[2], adminPubKey3))
283
286
 
            then 1
284
287
 
            else 0
285
288
 
        (((adminPubKey1Signed + adminPubKey2Signed) + adminPubKey3Signed) >= 2)
286
289
 
}
287
290
 

github/deemru/w8io/786bc32 
46.58 ms ◑