2024.03.18 18:40 [4089508] smart account 3P6J84oH51DzY6xk2mT5TheXRbrCwBMxonp > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "G4ZTW8Skf37uNkaSm1zFdhTFqjNy2VH14yPo5XyPMtk1",
    "fee": 1100000,
    "feeAssetId": null,
    "timestamp": 1710776421367,
    "version": 2,
    "chainId": 87,
    "sender": "3P6J84oH51DzY6xk2mT5TheXRbrCwBMxonp",
    "senderPublicKey": "GTY8yEJ2S4heRompxyvbJoBN1Td5BM5Pp4JgVbj9tmCw",
    "proofs": [
        "5k9T6wpLHnRRL6jvP8HzcKbvDNjNXB3rz5BTJL8X3BEJm7eNWBazu8Bifqp7aKN6gJ7rKeS81No8Eaga2g3gyg2",
        "",
        "3fGyLpwNgNd2ZCwQYPnxNT7jkdMu25kixVZvHRB1VCXnbtKv3AEHoanbFZafFN7xKCrTo7ZUEBynb1vuCjw3dQZK"
    ],
    "script": "base64:BgILCAISBwoFGAQICAEeAAZvcmFjbGUJAQdBZGRyZXNzAQEaAVeK/whomjW6QM1hdPISN96mN/D6OM7oHjgADWtBZG1pblB1YktleTECC2FkbWluX3B1Yl8xAA1rQWRtaW5QdWJLZXkyAgthZG1pbl9wdWJfMgANa0FkbWluUHViS2V5MwILYWRtaW5fcHViXzMAEmtBZG1pbkludm9rZVB1YktleQIQYWRtaW5faW52b2tlX3B1YgALa0dvdkFkZHJlc3MCEmdvdmVybmFuY2VfYWRkcmVzcwAMa0Zhcm1BZGRyZXNzAg9mYXJtaW5nX2FkZHJlc3MAD2tTdXJ2ZXlzQWRkcmVzcwIPc3VydmV5c19hZGRyZXNzAAxrUm91dGluZ0FkZHICD3JvdXRpbmdfYWRkcmVzcwAHa1NXT1BpZAIHU1dPUF9pZAAPa1ByZWZpeFBvb2xOYW1lAgVwb29sXwALa0xhc3RCdXJuZWQCEWxhc3RfYWlyZHJvcF9idXJuABJidXJuQWlyRHJvcFBlcmNlbnQAFAETZ2V0QmFzZTU4RnJvbU9yYWNsZQEDa2V5BAckbWF0Y2gwCQCdCAIFBm9yYWNsZQUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQGc3RyaW5nBQckbWF0Y2gwCQDZBAEFBnN0cmluZwQHbm90aGluZwUHJG1hdGNoMAkAAgEJAKwCAgUDa2V5AghpcyBlbXB0eQAMYWRtaW5QdWJLZXkxCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDWtBZG1pblB1YktleTEADGFkbWluUHViS2V5MgkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQ1rQWRtaW5QdWJLZXkyAAxhZG1pblB1YktleTMJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUNa0FkbWluUHViS2V5MwALYWRtaW5JbnZva2UJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUSa0FkbWluSW52b2tlUHViS2V5ABFnb3Zlcm5hbmNlQWRkcmVzcwkBB0FkZHJlc3MBCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFC2tHb3ZBZGRyZXNzAA5mYXJtaW5nQWRkcmVzcwkBB0FkZHJlc3MBCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDGtGYXJtQWRkcmVzcwAOc3VydmV5c0FkZHJlc3MJAQdBZGRyZXNzAQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQ9rU3VydmV5c0FkZHJlc3MADnJvdXRpbmdBZGRyZXNzCQEHQWRkcmVzcwEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUMa1JvdXRpbmdBZGRyAAZzd29wSWQJANkEAQkBEUBleHRyTmF0aXZlKDEwNTMpAgUOZmFybWluZ0FkZHJlc3MFB2tTV09QaWQBCmlzU2VsZkNhbGwBAWkDCQAAAggFAWkGY2FsbGVyBQR0aGlzBQR1bml0CQACAQIrT25seSBjb250cmFjdCBpdHNlbGYgY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgEJbGlzdFRvSW50AgFhBGl0ZW0JAM0IAgUBYQkBDXBhcnNlSW50VmFsdWUBBQRpdGVtAQ5hc3NldElkRnJvbVN0cgEHYXNzZXRJZAMJAAACBQdhc3NldElkAgVXQVZFUwUEdW5pdAkA2QQBBQdhc3NldElkAQ5hY2NvdW50QmFsYW5jZQEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJpZAUHJG1hdGNoMAkA8AcCBQR0aGlzBQJpZAMJAAECBQckbWF0Y2gwAgRVbml0BAV3YXZlcwUHJG1hdGNoMAgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAAIBAgtNYXRjaCBlcnJvcgEQZGlyZWN0U3dvcGZpQ1BNTQEFckFyZ3MEBGRBcHAJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUFckFyZ3MAAQQDcG10BARwbXRQCQC1CQIJAJEDAgUFckFyZ3MAAgIBfAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBCQCRAwIFBHBtdFAAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBHBtdFAAAQUDbmlsBAttaW5Ub1JlY2l2ZQkAkQMCBQVyQXJncwADCQD8BwQFBGRBcHACDGNhbGxGdW5jdGlvbgkAzAgCAghleGNoYW5nZQkAzAgCCQDMCAIFC21pblRvUmVjaXZlBQNuaWwFA25pbAUDcG10ARNkaXJlY3RSb3V0aW5nU3dvcGZpAQVyQXJncwQEZEFwcAkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQVyQXJncwABBANwbXQEBHBtdFAJALUJAgkAkQMCBQVyQXJncwACAgF8CQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEJAJEDAgUEcG10UAAACQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEcG10UAABBQNuaWwEBGFyZ3MEBWVBcmdzCQC1CQIJAJEDAgUFckFyZ3MAAwIBfAQKZXhjaGFuZ2VycwkAtQkCCQCRAwIFBWVBcmdzAAACASwEDmV4Y2hhbmdlcnNUeXBlCQC1CQIJAJEDAgUFZUFyZ3MAAQIBLAQFYXJnczEKAAIkbAkAtQkCCQCRAwIFBWVBcmdzAAICASwKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWxpc3RUb0ludAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMwkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwQFYXJnczIKAAIkbAkAtQkCCQCRAwIFBWVBcmdzAAMCASwKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWxpc3RUb0ludAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMwkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwQRcm91dGluZ0Fzc2V0c0tleXMJALUJAgkAkQMCBQVlQXJncwAEAgEsBAttaW5Ub1JlY2l2ZQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWVBcmdzAAUJAMwIAgUKZXhjaGFuZ2VycwkAzAgCBQ5leGNoYW5nZXJzVHlwZQkAzAgCBQVhcmdzMQkAzAgCBQVhcmdzMgkAzAgCBRFyb3V0aW5nQXNzZXRzS2V5cwkAzAgCBQttaW5Ub1JlY2l2ZQUDbmlsCQD8BwQFBGRBcHACDHJvdXRpbmdUcmFkZQUEYXJncwUDcG10ARFidXlTd29wRm9yQWlyZHJvcAMEcG9vbA90b2tlblRvRXhjaGFuZ2URYW1vdW50VG9MZWZ0Rm9yVHgEB3Rva2VuSWQJAQ5hc3NldElkRnJvbVN0cgEFD3Rva2VuVG9FeGNoYW5nZQQMdG9rZW5CYWxhbmNlCQEOYWNjb3VudEJhbGFuY2UBBQd0b2tlbklkAwkAAAIFDHRva2VuQmFsYW5jZQUMdG9rZW5CYWxhbmNlBBBhbW91bnRUb0V4Y2hhbmdlCQBlAgUMdG9rZW5CYWxhbmNlBRFhbW91bnRUb0xlZnRGb3JUeAMJAGcCAAAFEGFtb3VudFRvRXhjaGFuZ2UJAAIBAh9Ob3RoaW5nIHRvIGV4Y2hhbmdlIGZvciBhaXJkcm9wBAhwb29sQWRkcgkBEUBleHRyTmF0aXZlKDEwNjIpAQUEcG9vbAkA/AcEBQhwb29sQWRkcgIMY2FsbEZ1bmN0aW9uCQDMCAICCGV4Y2hhbmdlCQDMCAIJAMwIAgIBMQUDbmlsBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFB3Rva2VuSWQFEGFtb3VudFRvRXhjaGFuZ2UFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEBaQEOZXhjaGFuZ2VUb2tlbnMFBnJvdXRlcwdhaXJkcm9wBHBvb2wPdG9rZW5Ub0V4Y2hhbmdlEWFtb3VudFRvTGVmdEZvclR4CQELdmFsdWVPckVsc2UCCQEKaXNTZWxmQ2FsbAEFAWkKAQ1leGNoYW5nZVRva2VuAgFyBXJvdXRlBAVyQXJncwkAtQkCBQVyb3V0ZQICX18DCQAAAgkAkQMCBQVyQXJncwAAAhBkaXJlY3RTd29wZmlDUE1NBANpbnYJARBkaXJlY3RTd29wZmlDUE1NAQUFckFyZ3MDCQAAAgUDaW52BQNpbnYJAM0IAgUBcgUDaW52CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAwkAAAIJAJEDAgUFckFyZ3MAAAINcm91dGluZ1N3b3BmaQQDaW52CQETZGlyZWN0Um91dGluZ1N3b3BmaQEFBXJBcmdzAwkAAAIFA2ludgUDaW52CQDNCAIFAXIFA2ludgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECElVua25vd24gcm91dGUgdHlwZQQDcmVzCgACJGwFBnJvdXRlcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQENZXhjaGFuZ2VUb2tlbgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgMJAAACBQNyZXMFA3JlcwMJAQEhAQUHYWlyZHJvcAUDbmlsBANpbnYJARFidXlTd29wRm9yQWlyZHJvcAMFBHBvb2wFD3Rva2VuVG9FeGNoYW5nZQURYW1vdW50VG9MZWZ0Rm9yVHgDCQAAAgUDaW52BQNpbnYEC3N3b3BCYWxhbmNlCQEOYWNjb3VudEJhbGFuY2UBBQZzd29wSWQDCQAAAgULc3dvcEJhbGFuY2UFC3N3b3BCYWxhbmNlBApidXJuQW1vdW50CQBrAwULc3dvcEJhbGFuY2UFEmJ1cm5BaXJEcm9wUGVyY2VudABkBARhSW52CQD8BwQFEWdvdmVybmFuY2VBZGRyZXNzAgdhaXJEcm9wBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFBnN3b3BJZAkAZQIFC3N3b3BCYWxhbmNlBQpidXJuQW1vdW50BQNuaWwDCQAAAgUEYUludgUEYUludgkAzAgCCQEMSW50ZWdlckVudHJ5AgULa0xhc3RCdXJuZWQFCmJ1cm5BbW91bnQJAMwIAgkBBEJ1cm4CBQZzd29wSWQFCmJ1cm5BbW91bnQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAEByRtYXRjaDAFAnR4AwkAAQIFByRtYXRjaDACF0ludm9rZVNjcmlwdFRyYW5zYWN0aW9uBANpbnYFByRtYXRjaDAECmlzUmlnaHRGZWUDCQAAAggFA2ludgNmZWUAoPc2CQAAAggFA2ludgpmZWVBc3NldElkBQR1bml0BwQNaXNSb3V0aW5nQ2FsbAMJAAACCAUDaW52BGRBcHAFDnJvdXRpbmdBZGRyZXNzCQAAAggFA2ludghmdW5jdGlvbgIMcm91dGluZ1RyYWRlBwQSaXNFeGNoYW5nZUNhbGxDUE1NAwMJAQlpc0RlZmluZWQBCQCdCAIFBm9yYWNsZQkArAICBQ9rUHJlZml4UG9vbE5hbWUJAKUIAQkApAgBCAUDaW52BGRBcHAJAAACCAUDaW52CGZ1bmN0aW9uAgxjYWxsRnVuY3Rpb24HCQAAAgkAkQMCCAUDaW52BGFyZ3MAAAIIZXhjaGFuZ2UHBA5pc0V4Y2hhbmdlQ2FsbAMJAQlpc0RlZmluZWQBCQCdCAIFBm9yYWNsZQkArAICBQ9rUHJlZml4UG9vbE5hbWUJAKUIAQkApAgBCAUDaW52BGRBcHAJAAACCAUDaW52CGZ1bmN0aW9uAghleGNoYW5nZQcEDWlzQWlyZHJvcENhbGwJAAACCAUDaW52CGZ1bmN0aW9uAg5leGNoYW5nZVRva2VucwQTaXNVcGRhdGVXZWlnaHRzQ2FsbAMJAAACCAUDaW52BGRBcHAFEWdvdmVybmFuY2VBZGRyZXNzCQAAAggFA2ludghmdW5jdGlvbgINdXBkYXRlV2VpZ2h0cwcEFmlzVGFrZW5JbnRvQWNjb3VudENQTU0DAwkBCWlzRGVmaW5lZAEJAJ0IAgUGb3JhY2xlCQCsAgIFD2tQcmVmaXhQb29sTmFtZQkApQgBCQCkCAEIBQNpbnYEZEFwcAkAAAIIBQNpbnYIZnVuY3Rpb24CDGNhbGxGdW5jdGlvbgcJAAACCQCRAwIIBQNpbnYEYXJncwAAAhl0YWtlSW50b0FjY291bnRFeHRyYUZ1bmRzBwQSaXNUYWtlbkludG9BY2NvdW50AwkBCWlzRGVmaW5lZAEJAJ0IAgUGb3JhY2xlCQCsAgIFD2tQcmVmaXhQb29sTmFtZQkApQgBCQCkCAEIBQNpbnYEZEFwcAkAAAIIBQNpbnYIZnVuY3Rpb24CGXRha2VJbnRvQWNjb3VudEV4dHJhRnVuZHMHBAxpc1dyaXRlVG90YWwDCQAAAggFA2ludgRkQXBwBQ5zdXJ2ZXlzQWRkcmVzcwkAAAIIBQNpbnYIZnVuY3Rpb24CC3dyaXRlVG90YWxzBwQSYWRtaW5QdWJLZXkxU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUMYWRtaW5QdWJLZXkxAAEAAAQSYWRtaW5QdWJLZXkyU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUMYWRtaW5QdWJLZXkyAAEAAAQSYWRtaW5QdWJLZXkzU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUMYWRtaW5QdWJLZXkzAAEAAAQXYWRtaW5QdWJLZXlJbnZva2VTaWduZWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABQthZG1pbkludm9rZQABAAAEEHNpZ25lZEJ5T25lQWRtaW4JAGcCCQBkAgkAZAIJAGQCBRJhZG1pblB1YktleTFTaWduZWQFEmFkbWluUHViS2V5MlNpZ25lZAUSYWRtaW5QdWJLZXkzU2lnbmVkBRdhZG1pblB1YktleUludm9rZVNpZ25lZAABAwMDAwMDBQ5pc0V4Y2hhbmdlQ2FsbAYFEmlzRXhjaGFuZ2VDYWxsQ1BNTQYFDWlzUm91dGluZ0NhbGwJAAACCQCQAwEIBQNpbnYIcGF5bWVudHMAAQcGAwMDAwMFE2lzVXBkYXRlV2VpZ2h0c0NhbGwGBRJpc1Rha2VuSW50b0FjY291bnQGBRZpc1Rha2VuSW50b0FjY291bnRDUE1NBgUMaXNXcml0ZVRvdGFsBgUNaXNBaXJkcm9wQ2FsbAkAAAIJAJADAQgFA2ludghwYXltZW50cwAABwUQc2lnbmVkQnlPbmVBZG1pbgcFCmlzUmlnaHRGZWUHBBJhZG1pblB1YktleTFTaWduZWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABQxhZG1pblB1YktleTEAAQAABBJhZG1pblB1YktleTJTaWduZWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwABBQxhZG1pblB1YktleTIAAQAABBJhZG1pblB1YktleTNTaWduZWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwACBQxhZG1pblB1YktleTMAAQAACQBnAgkAZAIJAGQCBRJhZG1pblB1YktleTFTaWduZWQFEmFkbWluUHViS2V5MlNpZ25lZAUSYWRtaW5QdWJLZXkzU2lnbmVkAAKRHpTw",
    "height": 4089508,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Dc7TXAa6rLPun2zcFtQMsBtBG9bXu2B8xUy9q54gwhzD
Next: FUhX5PD4Fd6QwE1kQ1VzgqkiL7NS7ZZaevuhcEyqh1S4

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

github/deemru/w8io/786bc32 
30.37 ms ◑