tx · 7GxRQhRibeixx8FBT7BsKz8DrwLgFzYkJ3mUv5YgyuZ4

3NAsFvuLwxz1iUtZ9fmhfmSN16r9NEsPqsh:  -0.01800000 Waves

2022.10.20 11:46 [2280492] smart account 3NAsFvuLwxz1iUtZ9fmhfmSN16r9NEsPqsh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7GxRQhRibeixx8FBT7BsKz8DrwLgFzYkJ3mUv5YgyuZ4",
    "fee": 1800000,
    "feeAssetId": null,
    "timestamp": 1666255629304,
    "version": 1,
    "sender": "3NAsFvuLwxz1iUtZ9fmhfmSN16r9NEsPqsh",
    "senderPublicKey": "33fpjdpM9FMu87RZKePniPardKqQXM96sm7VhAk3JEVQ",
    "proofs": [
        "3WyMNjJaF62cV5TYk3XoTaEwi7A6AJFwcfTGhAiKn7WJQvC6mxje7V2KSpVWkeB8f2B6AaCPtqLpyAzt3yD2Z4Jn"
    ],
    "script": "base64:BgKUFAgCEgUKAwgIBBIFCgMIGAESBwoFEQgYAQESBgoECAgICBIGCgQICAgCEgUKAwgIBBIGCgQICAEBEgQKAggYEgMKAQgSABIECgIICBIDCgEIEgQKAggIEgMKAQgSACIJc2VwYXJhdG9yIgxrZXlXeEFzc2V0SWQiE2tleUJhY2tlbmRQdWJsaWNLZXkiG2tleUV4aXN0c1JlZmVycmVyVG9SZWZlcnJhbCILcHJvZ3JhbU5hbWUiD3JlZmVycmVyQWRkcmVzcyIPcmVmZXJyYWxBZGRyZXNzIhJrZXlDbGFpbWVkUmVmZXJyZXIiDmNsYWltZXJBZGRyZXNzIhJrZXlDbGFpbWVkUmVmZXJyYWwiFGtleVVuY2xhaW1lZFJlZmVycmVyIhRrZXlVbmNsYWltZWRSZWZlcnJhbCILa2V5UmVmZXJyZXIiDmtleVByb2dyYW1OYW1lIhVrZXlUb3RhbFJlZmVycmFsQ291bnQiFmtleUFjdGl2ZVJlZmVycmFsQ291bnQiE2tleUlzUmVmZXJyYWxBY3RpdmUiFmtleUNsYWltZWRUb3RhbEFkZHJlc3MiB2FkZHJlc3MiGGtleVVuY2xhaW1lZFRvdGFsQWRkcmVzcyIPa2V5Q2xhaW1lZFRvdGFsIg9rZXlSZXdhcmRzVG90YWwiEGtleVJld2FyZEFzc2V0SWQiE2tleVRyZWFzdXJ5Q29udHJhY3QiGWtleUltcGxlbWVudGF0aW9uQ29udHJhY3QiFmtleUFsbFJlZmVycmFsUHJvZ3JhbXMiJ2tleUxhc3RJbmNVbmNsYWltZWRXaXRoUGF5bWVudENhbGxCbG9jayITa2V5TWFuYWdlclB1YmxpY0tleSIaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkiD2tleUNsYWltSGlzdG9yeSILdXNlckFkZHJlc3MiDXRyYW5zYWN0aW9uSWQiBHR5cGUiEmZvcm1hdENsYWltSGlzdG9yeSIGYW1vdW50Igh0aHJvd0VyciIDbXNnIhZtYW5hZ2VyUHVibGljS2V5T3JVbml0IgckbWF0Y2gwIgFzIh1wZW5kaW5nTWFuYWdlclB1YmxpY0tleU9yVW5pdCILbXVzdE1hbmFnZXIiAWkiAnBkIgJwayIZdXBkYXRlQWxsUmVmZXJyYWxQcm9ncmFtcyITYWxsUmVmZXJyYWxQcm9ncmFtcyIadXBkYXRlZEFsbFJlZmVycmFsUHJvZ3JhbXMiFm5ld0FsbFJlZmVycmFsUHJvZ3JhbXMiGGlzSW1wbGVtZW50YXRpb25Db250cmFjdCISY2hlY2tQcm9ncmFtRXhpc3RzIgskdDA0ODIxNTc1OCIOY2xhaW1lckNsYWltZWQiEGNsYWltZXJVbmNsYWltZWQiCmtleUNsYWltZWQiDGtleVVuY2xhaW1lZCIPY2xhaW1IaXN0b3J5S2V5IgxjbGFpbWVkVG90YWwiEHRyZWFzdXJ5Q29udHJhY3QiDXJld2FyZEFzc2V0SWQiE2NsYWltZWRUb3RhbEFkZHJlc3MiFXVuY2xhaW1lZFRvdGFsQWRkcmVzcyINY2hlY2tDYW5DbGFpbSIRbmV3Q2xhaW1lckNsYWltZWQiD25ld0NsYWltZWRUb3RhbCIWbmV3Q2xhaW1lZFRvdGFsQWRkcmVzcyIYbmV3VW5jbGFpbWVkVG90YWxBZGRyZXNzIg1iYWxhbmNlQmVmb3JlIgNyZXMiDGJhbGFuY2VBZnRlciILYmFsYW5jZURpZmYiDGNoZWNrQmFsYW5jZSIHY2xhaW1lciIMcHJvZ3JhbU5hbWVzIgtjdXJyZW50SXRlciILY2hlY2tDYWxsZXIiEHByb2dyYW1VbmNsYWltZWQiEWNsYWltQnVsa0ludGVybmFsIhF1bmNsYWltZWRSZWZlcnJlciIFY2xhaW0iDnBheW1lbnRBbW91bnRzIhFyZWZlcnJlckFkZHJlc3NlcyIJcmVzQW1vdW50Ig5hcmdzQ29tcGFyaXNvbiIFY2hlY2siEXJlZmVycmVyVW5jbGFpbWVkIgxyZXdhcmRzVG90YWwiFG5ld1JlZmVycmVyVW5jbGFpbWVkIgxuZXdSZXNBbW91bnQiA2ludiITYWxsUmVmZXJyZXJQcm9ncmFtcyIWbmV3QWxsUmVmZXJyZXJQcm9ncmFtcyIWaW1wbGVtZW50YXRpb25Db250cmFjdCIQY2hlY2tQcm9ncmFtTmFtZSIScHJvZ3JhbU5hbWVJc1ZhbGlkIhBjaGVja1Jld2FyZEFzc2V0IglzaWduYXR1cmUiIHBhaXJSZWZlcnJlclRvUmVmZXJyYWxFeGlzdENoZWNrIglub1JlZlNlbGYiBHBhaXIiEGJhY2tlbmRQdWJsaWNLZXkiEXZhbGlkYXRlU2lnbmF0dXJlIhJ0b3RhbFJlZmVycmFsQ291bnQiFW5ld1RvdGFsUmVmZXJyYWxDb3VudCIadXBkYXRlZEFsbFJlZmVycmVyUHJvZ3JhbXMiCGlzQWN0aXZlIhBpc1JlZmVycmFsQWN0aXZlIgZ1cGRhdGUiFm5ld0FjdGl2ZVJlZmVycmFsQ291bnQiDnJlZmVycmVyUmV3YXJkIg5yZWZlcnJhbFJld2FyZCIMY2hlY2tQcm9ncmFtIhZjaGVja1JlZmVycmVySW5Qcm9ncmFtIhZjaGVja1JlZmVycmFsSW5Qcm9ncmFtIhZ1bmNsYWltZWRUb3RhbFJlZmVycmVyIhZ1bmNsYWltZWRUb3RhbFJlZmVycmFsIhFyZWZlcnJhbFVuY2xhaW1lZCIZbmV3VW5jbGFpbWVkVG90YWxSZWZlcnJlciIZbmV3VW5jbGFpbWVkVG90YWxSZWZlcnJhbCIUbmV3UmVmZXJyYWxVbmNsYWltZWQiDWNhbGxlckFkZHJlc3MiCGxhc3RDYWxsIgp3YWl0QmxvY2tzIg1sYXN0Q2FsbENoZWNrIgNtYXAiBWFjY3VtIgRuZXh0Igxhc3NldElkQ2hlY2siC2Ftb3VudENoZWNrIghwYXltZW50cyICJGwiAiRzIgUkYWNjMCIFJGYwXzEiAiRhIgIkaSIFJGYwXzIiAUAiDWNsYWltSW50ZXJuYWwiEWNhbGxlclByb2dyYW1zU3RyIg5wcm9ncmFtc0V4aXN0cyIOY2FsbGVyUHJvZ3JhbXMiCWJ1bGtDbGFpbSIPY2xhaW1lZFJlZmVycmVyIg9jbGFpbWVkUmVmZXJyYWwiEXVuY2xhaW1lZFJlZmVycmFsIhdwZW5kaW5nTWFuYWdlclB1YmxpY0tleSIVY2hlY2tNYW5hZ2VyUHVibGljS2V5IgJwbSIFaGFzUE0iB2NoZWNrUE0iAnR4IgZ2ZXJpZnkiD3RhcmdldFB1YmxpY0tleR8AAWECAl9fAQFiAAkAuQkCCQDMCAICAiVzCQDMCAICCXd4QXNzZXRJZAUDbmlsBQFhAAFjCQC5CQIJAMwIAgICJXMJAMwIAgIQYmFja2VuZFB1YmxpY0tleQUDbmlsBQFhAQFkAwFlAWYBZwkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAICGGV4aXN0c1JlZmVycmVyVG9SZWZlcnJhbAkAzAgCBQFlCQDMCAIFAWYJAMwIAgUBZwUDbmlsBQFhAQFoAgFlAWkJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIPY2xhaW1lZFJlZmVycmVyCQDMCAIFAWUJAMwIAgUBaQUDbmlsBQFhAQFqAgFlAWkJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIPY2xhaW1lZFJlZmVycmFsCQDMCAIFAWUJAMwIAgUBaQUDbmlsBQFhAQFrAgFlAWkJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIRdW5jbGFpbWVkUmVmZXJyZXIJAMwIAgUBZQkAzAgCBQFpBQNuaWwFAWEBAWwCAWUBaQkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAhF1bmNsYWltZWRSZWZlcnJhbAkAzAgCBQFlCQDMCAIFAWkFA25pbAUBYQEBbQIBZQFnCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICCHJlZmVycmVyCQDMCAIFAWUJAMwIAgUBZwUDbmlsBQFhAQFuAQFlCQC5CQIJAMwIAgIEJXMlcwkAzAgCAgtwcm9ncmFtTmFtZQkAzAgCBQFlBQNuaWwFAWEBAW8CAWUBZgkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAhJ0b3RhbFJlZmVycmFsQ291bnQJAMwIAgUBZQkAzAgCBQFmBQNuaWwFAWEBAXACAWUBZgkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAhNhY3RpdmVSZWZlcnJhbENvdW50CQDMCAIFAWUJAMwIAgUBZgUDbmlsBQFhAQFxAgFlAWcJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIOYWN0aXZlUmVmZXJyYWwJAMwIAgUBZQkAzAgCBQFnBQNuaWwFAWEBAXIBAXMJALkJAgkAzAgCAgQlcyVzCQDMCAICE2NsYWltZWRUb3RhbEFkZHJlc3MJAMwIAgUBcwUDbmlsBQFhAQF0AQFzCQC5CQIJAMwIAgIEJXMlcwkAzAgCAhV1bmNsYWltZWRUb3RhbEFkZHJlc3MJAMwIAgUBcwUDbmlsBQFhAQF1AQFlCQC5CQIJAMwIAgIEJXMlcwkAzAgCAgxjbGFpbWVkVG90YWwJAMwIAgUBZQUDbmlsBQFhAQF2AQFlCQC5CQIJAMwIAgIEJXMlcwkAzAgCAgxyZXdhcmRzVG90YWwJAMwIAgUBZQUDbmlsBQFhAQF3AQFlCQC5CQIJAMwIAgIEJXMlcwkAzAgCAg1yZXdhcmRBc3NldElkCQDMCAIFAWUFA25pbAUBYQEBeAEBZQkAuQkCCQDMCAICBCVzJXMJAMwIAgIQdHJlYXN1cnlDb250cmFjdAkAzAgCBQFlBQNuaWwFAWEBAXkBAWUJALkJAgkAzAgCAgQlcyVzCQDMCAICFmltcGxlbWVudGF0aW9uQ29udHJhY3QJAMwIAgUBZQUDbmlsBQFhAQF6AQFzCQC5CQIJAMwIAgIEJXMlcwkAzAgCAhNhbGxSZWZlcnJhbFByb2dyYW1zCQDMCAIFAXMFA25pbAUBYQEBQQEBcwkAuQkCCQDMCAICBCVzJXMJAMwIAgIkbGFzdEluY1VuY2xhaW1lZFdpdGhQYXltZW50Q2FsbEJsb2NrCQDMCAIFAXMFA25pbAUBYQEBQgACFCVzX19tYW5hZ2VyUHVibGljS2V5AQFDAAIbJXNfX3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AQFEBAFlAUUBRgFHCQC5CQIJAMwIAgIKJXMlcyVzJXMlcwkAzAgCAgdoaXN0b3J5CQDMCAIFAUcJAMwIAgUBZQkAzAgCBQFFCQDMCAIFAUYFA25pbAUBYQEBSAEBSQkAuQkCCQDMCAICBiVkJWQlZAkAzAgCCQCkAwEIBQlsYXN0QmxvY2sGaGVpZ2h0CQDMCAIJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkApAMBBQFJBQNuaWwFAWEBAUoBAUsJAAIBCQC5CQIJAMwIAgIOcmVmZXJyYWwucmlkZToJAMwIAgUBSwUDbmlsAgEgAQFMAAQBTQkAoggBCQEBQgADCQABAgUBTQIGU3RyaW5nBAFOBQFNCQDZBAEFAU4DCQABAgUBTQIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAQFPAAQBTQkAoggBCQEBQwADCQABAgUBTQIGU3RyaW5nBAFOBQFNCQDZBAEFAU4DCQABAgUBTQIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAQFQAQFRBAFSCQEBSgECEXBlcm1pc3Npb24gZGVuaWVkBAFNCQEBTAADCQABAgUBTQIKQnl0ZVZlY3RvcgQBUwUBTQMJAAACCAUBUQ9jYWxsZXJQdWJsaWNLZXkFAVMGBQFSAwkAAQIFAU0CBFVuaXQDCQAAAggFAVEGY2FsbGVyBQR0aGlzBgUBUgkAAgECC01hdGNoIGVycm9yAQFUAgFzAWUEAVUJAQt2YWx1ZU9yRWxzZQIJAKIIAQkBAXoBBQFzAgAEAVYDCQEIY29udGFpbnMCBQFVBQFlBQNuaWwEAVcDCQAAAgUBVQIABQFlCQC5CQIJAMwIAgUBVQkAzAgCBQFlBQNuaWwFAWEJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAXoBBQFzBQFXBQNuaWwFAVYPAVEBDWNsYWltSW50ZXJuYWwDAWUBaQFYBAFZAwkBC3ZhbHVlT3JFbHNlAgkAoAgBCQEBbgEFAWUHBgkBAUoBAhZwcm9ncmFtIGRvZXMgbm90IGV4aXN0AwkAAAIFAVkFAVkEAVoDBQFYCQCXCgUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAWoCBQFlBQFpAAAJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAWwCBQFlBQFpAAAJAQFqAgUBZQUBaQkBAWwCBQFlBQFpCQEBRAQFAWUFAWkJANgEAQgFAVENdHJhbnNhY3Rpb25JZAINY2xhaW1SZWZlcnJhbAkAlwoFCQELdmFsdWVPckVsc2UCCQCfCAEJAQFoAgUBZQUBaQAACQELdmFsdWVPckVsc2UCCQCfCAEJAQFrAgUBZQUBaQAACQEBaAIFAWUFAWkJAQFrAgUBZQUBaQkBAUQEBQFlBQFpCQDYBAEIBQFRDXRyYW5zYWN0aW9uSWQCDWNsYWltUmVmZXJyZXIEAmFhCAUBWgJfMQQCYWIIBQFaAl8yBAJhYwgFAVoCXzMEAmFkCAUBWgJfNAQCYWUIBQFaAl81BAJhZgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEBdQEFAWUAAAQCYWcJAQV2YWx1ZQEJAKYIAQkBBXZhbHVlAQkAoggBCQEBeAEFAWUEAmFoCQDZBAEJAQV2YWx1ZQEJAKIIAQkBAXcBBQFlBAJhaQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEBcgEFAWkAAAQCYWoJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAXQBBQFpAAADAwUBWAkAAAIFAmFiAAAHCQCUCgIFA25pbAAABAJhawMJAGYCBQJhYgAABgkBAUoBAhBub3RoaW5nIHRvIGNsYWltAwkAAAIFAmFrBQJhawQCYWwJAGQCBQJhYQUCYWIEAmFtCQBkAgUCYWYFAmFiBAJhbgkAZAIFAmFpBQJhYgQCYW8JAGUCBQJhagUCYWIEAmFwCQEFdmFsdWUBCQDwBwIFBHRoaXMFAmFoAwkAAAIFAmFwBQJhcAQCYXEJAPwHBAUCYWcCFndpdGhkcmF3UmVmZXJyYWxSZXdhcmQJAMwIAgUCYWIFA25pbAUDbmlsAwkAAAIFAmFxBQJhcQQCYXIJAQV2YWx1ZQEJAPAHAgUEdGhpcwUCYWgDCQAAAgUCYXIFAmFyBAJhcwkAZQIFAmFyBQJhcAMJAAACBQJhcwUCYXMEAmF0AwkAAAIFAmFzBQJhYgYJAQFKAQIpaW5zdWZmaWNpZW50IGJhbGFuY2Ugb24gcmVmZXJyYWwgY29udHJhY3QDCQAAAgUCYXQFAmF0CQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFAmFjBQJhbAkAzAgCCQEMSW50ZWdlckVudHJ5AgUCYWQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAXUBBQFlBQJhbQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAXIBBQFpBQJhbgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAXQBBQFpBQJhbwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQFpBQJhYgUCYWgJAMwIAgkBC1N0cmluZ0VudHJ5AgUCYWUJAQFIAQUCYWIFA25pbAUCYWIJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BUQERY2xhaW1CdWxrSW50ZXJuYWwDAmF1AmF2AmF3BAJheAMJAAACCAUBUQZjYWxsZXIFBHRoaXMGCQEBSgECEXBlcm1pc3Npb24gZGVuaWVkAwkAAAIFAmF4BQJheAMJAAACBQJhdwkAkAMBBQJhdgUDbmlsBAFlCQCRAwIFAmF2BQJhdwQCYXkJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAWsCBQFlBQJhdQAABAJhZQkBAUQEBQFlBQJhdQkA2AQBCAUBUQ10cmFuc2FjdGlvbklkAgljbGFpbUJ1bGsEAmF6CQD8BwQFBHRoaXMCEWNsYWltQnVsa0ludGVybmFsCQDMCAIFAmF1CQDMCAIFAmF2CQDMCAIJAGQCBQJhdwABBQNuaWwFA25pbAMJAAACBQJhegUCYXoEAmFBCQELdmFsdWVPckVsc2UCCQCfCAEJAQFrAgUBZQUCYXUAAAQCYUIDCQBmAgUCYUEAAAkA/AcEBQR0aGlzAg1jbGFpbUludGVybmFsCQDMCAIFAWUJAMwIAgUCYXUJAMwIAgcFA25pbAUDbmlsBQR1bml0AwkAAAIFAmFCBQJhQgkAlAoCBQNuaWwJAMwIAgUCYXoJAMwIAgUCYUIFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFRAR9pbmNVbmNsYWltZWRXaXRoUGF5bWVudEludGVybmFsBQJhQwFlAmFEAmF3AmFFBAJheAMJAAACCAUBUQZjYWxsZXIFBHRoaXMGCQEBSgECEXBlcm1pc3Npb24gZGVuaWVkAwkAAAIFAmF4BQJheAQCYUYJAAACCQCQAwEFAmFDCQCQAwEFAmFEBAJhRwMFAmFGBgkBAUoBAh9saXN0cyBpbiBhcmdzIG11c3QgYmUgc2FtZSBzaXplAwkAAAIFAmFHBQJhRwMJAAACBQJhdwkAkAMBBQJhQwkAlAoCBQNuaWwFAmFFBAFmCQCRAwIFAmFEBQJhdwQCYWoJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAXQBBQFmAAAEAmFICQELdmFsdWVPckVsc2UCCQCfCAEJAQFrAgUBZQUBZgAABAJhSQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEBdgEFAWUAAAQCYW8JAGQCBQJhagkAkQMCBQJhQwUCYXcEAmFKCQBkAgUCYUgJAJEDAgUCYUMFAmF3BAJhSwkAZAIFAmFFCQCRAwIFAmFDBQJhdwQCYUwJAPwHBAUEdGhpcwIfaW5jVW5jbGFpbWVkV2l0aFBheW1lbnRJbnRlcm5hbAkAzAgCBQJhQwkAzAgCBQFlCQDMCAIFAmFECQDMCAIJAGQCBQJhdwABCQDMCAIFAmFLBQNuaWwFA25pbAMJAAACBQJhTAUCYUwEAmFNCQELdmFsdWVPckVsc2UCCQCiCAEJAQF6AQUBZgIABAJhTgMJAAACBQJhTQIABQFlCQC5CQIJAMwIAgUCYU0JAMwIAgUBZQUDbmlsBQFhCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQF0AQUBZgUCYW8JAMwIAgkBDEludGVnZXJFbnRyeQIJAQFrAgUBZQUBZgUCYUoJAMwIAgkBDEludGVnZXJFbnRyeQIJAQF2AQUBZQkAZAIFAmFJCQCRAwIFAmFDBQJhdwkAzAgCCQELU3RyaW5nRW50cnkCCQEBegEFAWYFAmFOBQNuaWwFAmFMCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAVEBFWNyZWF0ZVJlZmVycmFsUHJvZ3JhbQQBZQJhZwJhTwJhaAQCYXgJAQFQAQUBUQMJAAACBQJheAUCYXgEAmFQAwkAAAIJAKAIAQkBAW4BBQFlBQR1bml0BgkBAUoBAhtwcm9ncmFtIG5hbWUgYWxyZWFkeSBleGlzdHMDCQAAAgUCYVAFAmFQBAJhUQMJAQEhAQkBCGNvbnRhaW5zAgUBZQUBYQkBASEBCQEIY29udGFpbnMCBQFlAgEgBwQBWQMFAmFRBgkBAUoBAhRpbnZhbGlkIHByb2dyYW0gbmFtZQMJAAACBQFZBQFZBAJhUgMJAQIhPQIJAOwHAQkA2QQBBQJhaAUEdW5pdAYJAQFKAQIXaW52YWxpZCByZXdhcmQgYXNzZXQgaWQDCQAAAgUCYVIFAmFSCQCUCgIJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAQFuAQUBZQYJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAXgBBQFlBQJhZwkAzAgCCQELU3RyaW5nRW50cnkCCQEBeQEFAWUFAmFPCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQF3AQUBZQUCYWgJAMwIAgkBDEludGVnZXJFbnRyeQIJAQF2AQUBZQAABQNuaWwFBHVuaXQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BUQEKY3JlYXRlUGFpcgQBZQFmAWcCYVMEAVkDCQELdmFsdWVPckVsc2UCCQCgCAEJAQFuAQUBZQcGCQEBSgECFnByb2dyYW0gZG9lcyBub3QgZXhpc3QDCQAAAgUBWQUBWQQCYVQDCQAAAgkAoAgBCQEBZAMFAWUFAWYFAWcFBHVuaXQGCQEBSgECE3BhaXIgYWxyZWFkeSBleGlzdHMDCQAAAgUCYVQFAmFUBAJhVQMJAQIhPQIFAWYFAWcGCQEBSgECFGNhbm5vdCByZWZlciB0byBzZWxmAwkAAAIFAmFVBQJhVQQCYVYJAJsDAQkAuQkCCQDMCAIFAWUJAMwIAgUBZgkAzAgCBQFnBQNuaWwCAToEAmFXCQDZBAEJAQV2YWx1ZQEJAKIIAQUBYwQCYVgDCQD0AwMFAmFWBQJhUwUCYVcGCQEBSgECDWJhZCBzaWduYXR1cmUDCQAAAgUCYVgFAmFYBAJhWQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEBbwIFAWUFAWYAAAQCYVoJAGQCBQJhWQABBAJiYQkBAVQCBQFmBQFlBAFWCQEBVAIFAWcFAWUJAJQKAgkAzggCCQDOCAIJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAQFkAwUBZQUBZgUBZwYJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFvAgUBZQUBZgUCYVoJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAW0CBQFlBQFnBQFmBQNuaWwFAmJhBQFWBQR1bml0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAVEBFnVwZGF0ZVJlZmVycmFsQWN0aXZpdHkDAWUBZwJiYgQCYU8JAQV2YWx1ZQEJAKIIAQkBAXkBBQFlBAJiYwkBAiE9AgkAoAgBCQEBcQIFAWUFAWcFBHVuaXQEAWYJAQV2YWx1ZQEJAKIIAQkBAW0CBQFlBQFnBAJheAMJAAACCQClCAEIBQFRBmNhbGxlcgUCYU8GCQEBSgECEXBlcm1pc3Npb24gZGVuaWVkAwkAAAIFAmF4BQJheAQCYmQDCQAAAgUCYmMFAmJiCQCUCgIFA25pbAUEdW5pdAQCYmQDCQAAAgUCYmIGBAJiZQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAXACBQFlBQFmAAAAAQkAlAoCCQDMCAIJAQxCb29sZWFuRW50cnkCCQEBcQIFAWUFAWcGCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBcAIFAWUFAWYFAmJlBQNuaWwFBHVuaXQEAmJlCQBlAgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEBcAIFAWUFAWYAAAABCQCUCgIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAXECBQFlBQFnCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBcAIFAWUFAWYFAmJlBQNuaWwFBHVuaXQFAmJkBQJiZAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFRAQxpbmNVbmNsYWltZWQEAWUBZwJiZgJiZwQCYU8JAQV2YWx1ZQEJAKIIAQkBAXkBBQFlBAFmCQEFdmFsdWUBCQCiCAEJAQFtAgUBZQUBZwQCYXgDCQAAAgkApQgBCAUBUQZjYWxsZXIFAmFPBgkBAUoBAhFwZXJtaXNzaW9uIGRlbmllZAMJAAACBQJheAUCYXgEAmJoAwkAAAIFAWUCBnd4bG9jawYJAQFKAQIPaW52YWxpZCBwcm9ncmFtAwkAAAIFAmJoBQJiaAQCYmkDCQEIY29udGFpbnMCCQELdmFsdWVPckVsc2UCCQCiCAEJAQF6AQUBZgIABQFlBgkBAUoBAhdyZWZlcnJlciBub3QgaW4gcHJvZ3JhbQMJAAACBQJiaQUCYmkEAmJqAwkBCGNvbnRhaW5zAgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEBegEFAWcCAAUBZQYJAQFKAQIXcmVmZXJyYWwgbm90IGluIHByb2dyYW0DCQAAAgUCYmoFAmJqBAJiawkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEBdAEFAWYAAAQCYUgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAWsCBQFlBQFmAAAEAmJsCQELdmFsdWVPckVsc2UCCQCfCAEJAQF0AQUBZwAABAJibQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEBbAIFAWUFAWcAAAQCYUkJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAXYBBQFlAAAEAmJuCQBkAgUCYmsFAmJmBAJhSgkAZAIFAmFIBQJiZgQCYm8JAGQCBQJibAUCYmcEAmJwCQBkAgUCYm0FAmJnCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQF0AQUBZgUCYm4JAMwIAgkBDEludGVnZXJFbnRyeQIJAQF0AQUBZwUCYm8JAMwIAgkBDEludGVnZXJFbnRyeQIJAQFrAgUBZQUBZgUCYUoJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFsAgUBZQUBZwUCYnAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQF2AQUBZQkAZAIJAGQCBQJhSQUCYmYFAmJnBQNuaWwFBHVuaXQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BUQEXaW5jVW5jbGFpbWVkV2l0aFBheW1lbnQCAWUCYUQEAmJoAwkAAAIFAWUCCXd4U3BvdEZlZQYJAQFKAQIPaW52YWxpZCBwcm9ncmFtAwkAAAIFAmJoBQJiaAQCYnEJAKUIAQgFAVEGY2FsbGVyBAJicgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEBQQEFAmJxAAAEAmJzCQBkAgkAZQIFAmJyBQZoZWlnaHQAAwQCYnQDCQBmAgkAZQIFBmhlaWdodAADBQJicgYJAQFKAQkAuQkCCQDMCAICBHdhaXQJAMwIAgkApAMBBQJicwkAzAgCAgZibG9ja3MFA25pbAIBIAMJAAACBQJidAUCYnQKAQJidQICYnYCYncEAmJ4CQAAAgkA2AQBCQEFdmFsdWUBCAUCYncHYXNzZXRJZAkBBXZhbHVlAQkAoggBCQEBdwEFAWUEAmJ5AwUCYngGCQEBSgECEGludmFsaWQgYXNzZXQgaWQDCQAAAgUCYnkFAmJ5CQDNCAIFAmJ2CAUCYncGYW1vdW50CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAJiegoAAmJBCAUBUQhwYXltZW50cwoAAmJCCQCQAwEFAmJBCgACYkMFA25pbAoBAmJEAgJiRQJiRgMJAGcCBQJiRgUCYkIFAmJFCQECYnUCBQJiRQkAkQMCBQJiQQUCYkYKAQJiRwICYkUCYkYDCQBnAgUCYkYFAmJCBQJiRQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQECYkcCCQECYkQCCQECYkQCCQECYkQCCQECYkQCCQECYkQCCQECYkQCCQECYkQCCQECYkQCCQECYkQCCQECYkQCBQJiQwAAAAEAAgADAAQABQAGAAcACAAJAAoEAmFFCgACYkgJAPwHBAUEdGhpcwIfaW5jVW5jbGFpbWVkV2l0aFBheW1lbnRJbnRlcm5hbAkAzAgCBQJiegkAzAgCBQFlCQDMCAIFAmFECQDMCAIAAAkAzAgCAAAFA25pbAUDbmlsAwkAAQIFAmJIAgNJbnQFAmJICQACAQkArAICCQADAQUCYkgCGCBjb3VsZG4ndCBiZSBjYXN0IHRvIEludAMJAAACBQJhRQUCYUUEAmFnCQERQGV4dHJOYXRpdmUoMTA2MikBCQEFdmFsdWUBCQCiCAEJAQF4AQUBZQQCYWgJANkEAQkBBXZhbHVlAQkAoggBCQEBdwEFAWUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYWcFAmFFBQJhaAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAUEBBQJicQUGaGVpZ2h0BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BUQEFY2xhaW0BAWUEAVkDCQELdmFsdWVPckVsc2UCCQCgCAEJAQFuAQUBZQcGCQEBSgECFnByb2dyYW0gZG9lcyBub3QgZXhpc3QDCQAAAgUBWQUBWQQBWAkAAAIJAKUIAQgFAVEGY2FsbGVyCQEFdmFsdWUBCQCiCAEJAQF5AQUBZQQBaQMFAVgJAKUIAQgFAVEMb3JpZ2luQ2FsbGVyCQClCAEIBQFRBmNhbGxlcgQCYkkJAPwHBAUEdGhpcwINY2xhaW1JbnRlcm5hbAkAzAgCBQFlCQDMCAIFAWkJAMwIAgUBWAUDbmlsBQNuaWwDCQAAAgUCYkkFAmJJCQCUCgIFA25pbAUCYkkJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BUQEJY2xhaW1CdWxrAAQCYnEJAKUIAQgFAVEGY2FsbGVyBAJiSgkAoggBCQEBegEJAKUIAQgFAVEGY2FsbGVyBAJiSwMJAQlpc0RlZmluZWQBBQJiSgYJAQFKAQIUbm8gcmVmZXJyYWwgcHJvZ3JhbXMDCQAAAgUCYksFAmJLBAJiTAkAtQkCCQEFdmFsdWUBBQJiSgICX18EAmJNCQD8BwQFBHRoaXMCEWNsYWltQnVsa0ludGVybmFsCQDMCAIFAmJxCQDMCAIFAmJMCQDMCAIAAAUDbmlsBQNuaWwDCQAAAgUCYk0FAmJNCQCUCgIFA25pbAUCYk0JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BUQENY2xhaW1SRUFET05MWQIBZQFFBAJhYQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEBaAIFAWUFAUUAAAQCYWIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAWsCBQFlBQFFAAAJAJQKAgUDbmlsCQDMCAIFAmFiCQDMCAIFAmFhBQNuaWwBUQERY2xhaW1CdWxrUkVBRE9OTFkBAmF1BAJhaQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEBcgEFAmF1AAAEAmFqCQELdmFsdWVPckVsc2UCCQCfCAEJAQF0AQUCYXUAAAkAlAoCBQNuaWwJAMwIAgUCYWoJAMwIAgUCYWkFA25pbAFRAQxzZXRUb3RhbEtleXMCAWUBcwQCYk4JAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAWgCBQFlBQFzAAAEAmJPCQELdmFsdWVPckVsc2UCCQCfCAEJAQFqAgUBZQUBcwAABAJhQQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEBawIFAWUFAXMAAAQCYlAJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAWwCBQFlBQFzAAAEAmFpCQBkAgUCYk4FAmJPBAJhagkAZAIFAmFBBQJiUAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBcgEFAXMFAmFpCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBdAEFAXMFAmFqBQNuaWwFBHVuaXQBUQEKc2V0TWFuYWdlcgECYlEEAmF4CQEBUAEFAVEDCQAAAgUCYXgFAmF4BAJiUgkA2QQBBQJiUQMJAAACBQJiUgUCYlIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAUMABQJiUQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAVEBDmNvbmZpcm1NYW5hZ2VyAAQCYlMJAQFPAAQCYlQDCQEJaXNEZWZpbmVkAQUCYlMGCQEBSgECEm5vIHBlbmRpbmcgbWFuYWdlcgMJAAACBQJiVAUCYlQEAmJVAwkAAAIIBQFRD2NhbGxlclB1YmxpY0tleQkBBXZhbHVlAQUCYlMGCQEBSgECG3lvdSBhcmUgbm90IHBlbmRpbmcgbWFuYWdlcgMJAAACBQJiVQUCYlUJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAUIACQDYBAEJAQV2YWx1ZQEFAmJTCQDMCAIJAQtEZWxldGVFbnRyeQEJAQFDAAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJiVgECYlcABAJiWAQBTQkBAUwAAwkAAQIFAU0CCkJ5dGVWZWN0b3IEAVMFAU0FAVMDCQABAgUBTQIEVW5pdAgFAmJWD3NlbmRlclB1YmxpY0tleQkAAgECC01hdGNoIGVycm9yCQD0AwMIBQJiVglib2R5Qnl0ZXMJAJEDAggFAmJWBnByb29mcwAABQJiWOIavek=",
    "chainId": 84,
    "height": 2280492,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: FovBzKBFKTVQNiNvfU5UHKtzu5NHjHas312M1KJVKmEa
Next: HfEA2mXTse1i1tZii92uE8WbZ9CpmDgcXJDDKsha4S6W

Diff: 
Old
New
Differences
117
117
 
    }
118
118
 
119
119
 
120
+
func updateAllReferralPrograms (address,programName) = {
121
+
    let allReferralPrograms = valueOrElse(getString(keyAllReferralPrograms(address)), "")
122
+
    let updatedAllReferralPrograms = if (contains(allReferralPrograms, programName))
123
+
        then nil
124
+
        else {
125
+
            let newAllReferralPrograms = if ((allReferralPrograms == ""))
126
+
                then programName
127
+
                else makeString([allReferralPrograms, programName], separator)
128
+
[StringEntry(keyAllReferralPrograms(address), newAllReferralPrograms)]
129
+
            }
130
+
    updatedAllReferralPrograms
131
+
    }
132
+
133
+
120
134
 
@Callable(i)
121
135
 
func claimInternal (programName,claimerAddress,isImplementationContract) = {
122
136
 
    let checkProgramExists = if (valueOrElse(getBoolean(keyProgramName(programName)), false))
124
138
 
        else throwErr("program does not exist")
125
139
 
    if ((checkProgramExists == checkProgramExists))
126
140
 
        then {
127
-
            let $t042735210 = if (isImplementationContract)
141
+
            let $t048215758 = if (isImplementationContract)
128
142
 
                then $Tuple5(valueOrElse(getInteger(keyClaimedReferral(programName, claimerAddress)), 0), valueOrElse(getInteger(keyUnclaimedReferral(programName, claimerAddress)), 0), keyClaimedReferral(programName, claimerAddress), keyUnclaimedReferral(programName, claimerAddress), keyClaimHistory(programName, claimerAddress, toBase58String(i.transactionId), "claimReferral"))
129
143
 
                else $Tuple5(valueOrElse(getInteger(keyClaimedReferrer(programName, claimerAddress)), 0), valueOrElse(getInteger(keyUnclaimedReferrer(programName, claimerAddress)), 0), keyClaimedReferrer(programName, claimerAddress), keyUnclaimedReferrer(programName, claimerAddress), keyClaimHistory(programName, claimerAddress, toBase58String(i.transactionId), "claimReferrer"))
130
-
            let claimerClaimed = $t042735210._1
131
-
            let claimerUnclaimed = $t042735210._2
132
-
            let keyClaimed = $t042735210._3
133
-
            let keyUnclaimed = $t042735210._4
134
-
            let claimHistoryKey = $t042735210._5
144
+
            let claimerClaimed = $t048215758._1
145
+
            let claimerUnclaimed = $t048215758._2
146
+
            let keyClaimed = $t048215758._3
147
+
            let keyUnclaimed = $t048215758._4
148
+
            let claimHistoryKey = $t048215758._5
135
149
 
            let claimedTotal = valueOrElse(getInteger(keyClaimedTotal(programName)), 0)
136
150
 
            let treasuryContract = value(addressFromString(value(getString(keyTreasuryContract(programName)))))
137
151
 
            let rewardAssetId = fromBase58String(value(getString(keyRewardAssetId(programName))))
316
330
 
                                then {
317
331
 
                                    let totalReferralCount = valueOrElse(getInteger(keyTotalReferralCount(programName, referrerAddress)), 0)
318
332
 
                                    let newTotalReferralCount = (totalReferralCount + 1)
319
-
                                    let allReferrerPrograms = valueOrElse(getString(keyAllReferralPrograms(referrerAddress)), "")
320
-
                                    let newAllReferrerPrograms = if ((allReferrerPrograms == ""))
321
-
                                        then programName
322
-
                                        else makeString([allReferrerPrograms, programName], separator)
323
-
                                    let allReferralPrograms = valueOrElse(getString(keyAllReferralPrograms(referralAddress)), "")
324
-
                                    let newAllReferralPrograms = if ((allReferralPrograms == ""))
325
-
                                        then programName
326
-
                                        else makeString([allReferralPrograms, programName], separator)
327
-
                                    $Tuple2([BooleanEntry(keyExistsReferrerToReferral(programName, referrerAddress, referralAddress), true), IntegerEntry(keyTotalReferralCount(programName, referrerAddress), newTotalReferralCount), StringEntry(keyReferrer(programName, referralAddress), referrerAddress), StringEntry(keyAllReferralPrograms(referrerAddress), newAllReferrerPrograms), StringEntry(keyAllReferralPrograms(referralAddress), newAllReferralPrograms)], unit)
333
+
                                    let updatedAllReferrerPrograms = updateAllReferralPrograms(referrerAddress, programName)
334
+
                                    let updatedAllReferralPrograms = updateAllReferralPrograms(referralAddress, programName)
335
+
                                    $Tuple2((([BooleanEntry(keyExistsReferrerToReferral(programName, referrerAddress, referralAddress), true), IntegerEntry(keyTotalReferralCount(programName, referrerAddress), newTotalReferralCount), StringEntry(keyReferrer(programName, referralAddress), referrerAddress)] ++ updatedAllReferrerPrograms) ++ updatedAllReferralPrograms), unit)
328
336
 
                                    }
329
337
 
                                else throw("Strict value is not equal to itself.")
330
338
 
                            }
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let separator = "__"
5
5
 
6
6
 
func keyWxAssetId () = makeString(["%s", "wxAssetId"], separator)
7
7
 
8
8
 
9
9
 
let keyBackendPublicKey = makeString(["%s", "backendPublicKey"], separator)
10
10
 
11
11
 
func keyExistsReferrerToReferral (programName,referrerAddress,referralAddress) = makeString(["%s%s%s%s", "existsReferrerToReferral", programName, referrerAddress, referralAddress], separator)
12
12
 
13
13
 
14
14
 
func keyClaimedReferrer (programName,claimerAddress) = makeString(["%s%s%s", "claimedReferrer", programName, claimerAddress], separator)
15
15
 
16
16
 
17
17
 
func keyClaimedReferral (programName,claimerAddress) = makeString(["%s%s%s", "claimedReferral", programName, claimerAddress], separator)
18
18
 
19
19
 
20
20
 
func keyUnclaimedReferrer (programName,claimerAddress) = makeString(["%s%s%s", "unclaimedReferrer", programName, claimerAddress], separator)
21
21
 
22
22
 
23
23
 
func keyUnclaimedReferral (programName,claimerAddress) = makeString(["%s%s%s", "unclaimedReferral", programName, claimerAddress], separator)
24
24
 
25
25
 
26
26
 
func keyReferrer (programName,referralAddress) = makeString(["%s%s%s", "referrer", programName, referralAddress], separator)
27
27
 
28
28
 
29
29
 
func keyProgramName (programName) = makeString(["%s%s", "programName", programName], separator)
30
30
 
31
31
 
32
32
 
func keyTotalReferralCount (programName,referrerAddress) = makeString(["%s%s%s", "totalReferralCount", programName, referrerAddress], separator)
33
33
 
34
34
 
35
35
 
func keyActiveReferralCount (programName,referrerAddress) = makeString(["%s%s%s", "activeReferralCount", programName, referrerAddress], separator)
36
36
 
37
37
 
38
38
 
func keyIsReferralActive (programName,referralAddress) = makeString(["%s%s%s", "activeReferral", programName, referralAddress], separator)
39
39
 
40
40
 
41
41
 
func keyClaimedTotalAddress (address) = makeString(["%s%s", "claimedTotalAddress", address], separator)
42
42
 
43
43
 
44
44
 
func keyUnclaimedTotalAddress (address) = makeString(["%s%s", "unclaimedTotalAddress", address], separator)
45
45
 
46
46
 
47
47
 
func keyClaimedTotal (programName) = makeString(["%s%s", "claimedTotal", programName], separator)
48
48
 
49
49
 
50
50
 
func keyRewardsTotal (programName) = makeString(["%s%s", "rewardsTotal", programName], separator)
51
51
 
52
52
 
53
53
 
func keyRewardAssetId (programName) = makeString(["%s%s", "rewardAssetId", programName], separator)
54
54
 
55
55
 
56
56
 
func keyTreasuryContract (programName) = makeString(["%s%s", "treasuryContract", programName], separator)
57
57
 
58
58
 
59
59
 
func keyImplementationContract (programName) = makeString(["%s%s", "implementationContract", programName], separator)
60
60
 
61
61
 
62
62
 
func keyAllReferralPrograms (address) = makeString(["%s%s", "allReferralPrograms", address], separator)
63
63
 
64
64
 
65
65
 
func keyLastIncUnclaimedWithPaymentCallBlock (address) = makeString(["%s%s", "lastIncUnclaimedWithPaymentCallBlock", address], separator)
66
66
 
67
67
 
68
68
 
func keyManagerPublicKey () = "%s__managerPublicKey"
69
69
 
70
70
 
71
71
 
func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
72
72
 
73
73
 
74
74
 
func keyClaimHistory (programName,userAddress,transactionId,type) = makeString(["%s%s%s%s%s", "history", type, programName, userAddress, transactionId], separator)
75
75
 
76
76
 
77
77
 
func formatClaimHistory (amount) = makeString(["%d%d%d", toString(lastBlock.height), toString(lastBlock.timestamp), toString(amount)], separator)
78
78
 
79
79
 
80
80
 
func throwErr (msg) = throw(makeString(["referral.ride:", msg], " "))
81
81
 
82
82
 
83
83
 
func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
84
84
 
    case s: String => 
85
85
 
        fromBase58String(s)
86
86
 
    case _: Unit => 
87
87
 
        unit
88
88
 
    case _ => 
89
89
 
        throw("Match error")
90
90
 
}
91
91
 
92
92
 
93
93
 
func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
94
94
 
    case s: String => 
95
95
 
        fromBase58String(s)
96
96
 
    case _: Unit => 
97
97
 
        unit
98
98
 
    case _ => 
99
99
 
        throw("Match error")
100
100
 
}
101
101
 
102
102
 
103
103
 
func mustManager (i) = {
104
104
 
    let pd = throwErr("permission denied")
105
105
 
    match managerPublicKeyOrUnit() {
106
106
 
        case pk: ByteVector => 
107
107
 
            if ((i.callerPublicKey == pk))
108
108
 
                then true
109
109
 
                else pd
110
110
 
        case _: Unit => 
111
111
 
            if ((i.caller == this))
112
112
 
                then true
113
113
 
                else pd
114
114
 
        case _ => 
115
115
 
            throw("Match error")
116
116
 
    }
117
117
 
    }
118
118
 
119
119
 
120
+
func updateAllReferralPrograms (address,programName) = {
121
+
    let allReferralPrograms = valueOrElse(getString(keyAllReferralPrograms(address)), "")
122
+
    let updatedAllReferralPrograms = if (contains(allReferralPrograms, programName))
123
+
        then nil
124
+
        else {
125
+
            let newAllReferralPrograms = if ((allReferralPrograms == ""))
126
+
                then programName
127
+
                else makeString([allReferralPrograms, programName], separator)
128
+
[StringEntry(keyAllReferralPrograms(address), newAllReferralPrograms)]
129
+
            }
130
+
    updatedAllReferralPrograms
131
+
    }
132
+
133
+
120
134
 
@Callable(i)
121
135
 
func claimInternal (programName,claimerAddress,isImplementationContract) = {
122
136
 
    let checkProgramExists = if (valueOrElse(getBoolean(keyProgramName(programName)), false))
123
137
 
        then true
124
138
 
        else throwErr("program does not exist")
125
139
 
    if ((checkProgramExists == checkProgramExists))
126
140
 
        then {
127
-
            let $t042735210 = if (isImplementationContract)
141
+
            let $t048215758 = if (isImplementationContract)
128
142
 
                then $Tuple5(valueOrElse(getInteger(keyClaimedReferral(programName, claimerAddress)), 0), valueOrElse(getInteger(keyUnclaimedReferral(programName, claimerAddress)), 0), keyClaimedReferral(programName, claimerAddress), keyUnclaimedReferral(programName, claimerAddress), keyClaimHistory(programName, claimerAddress, toBase58String(i.transactionId), "claimReferral"))
129
143
 
                else $Tuple5(valueOrElse(getInteger(keyClaimedReferrer(programName, claimerAddress)), 0), valueOrElse(getInteger(keyUnclaimedReferrer(programName, claimerAddress)), 0), keyClaimedReferrer(programName, claimerAddress), keyUnclaimedReferrer(programName, claimerAddress), keyClaimHistory(programName, claimerAddress, toBase58String(i.transactionId), "claimReferrer"))
130
-
            let claimerClaimed = $t042735210._1
131
-
            let claimerUnclaimed = $t042735210._2
132
-
            let keyClaimed = $t042735210._3
133
-
            let keyUnclaimed = $t042735210._4
134
-
            let claimHistoryKey = $t042735210._5
144
+
            let claimerClaimed = $t048215758._1
145
+
            let claimerUnclaimed = $t048215758._2
146
+
            let keyClaimed = $t048215758._3
147
+
            let keyUnclaimed = $t048215758._4
148
+
            let claimHistoryKey = $t048215758._5
135
149
 
            let claimedTotal = valueOrElse(getInteger(keyClaimedTotal(programName)), 0)
136
150
 
            let treasuryContract = value(addressFromString(value(getString(keyTreasuryContract(programName)))))
137
151
 
            let rewardAssetId = fromBase58String(value(getString(keyRewardAssetId(programName))))
138
152
 
            let claimedTotalAddress = valueOrElse(getInteger(keyClaimedTotalAddress(claimerAddress)), 0)
139
153
 
            let unclaimedTotalAddress = valueOrElse(getInteger(keyUnclaimedTotalAddress(claimerAddress)), 0)
140
154
 
            if (if (isImplementationContract)
141
155
 
                then (claimerUnclaimed == 0)
142
156
 
                else false)
143
157
 
                then $Tuple2(nil, 0)
144
158
 
                else {
145
159
 
                    let checkCanClaim = if ((claimerUnclaimed > 0))
146
160
 
                        then true
147
161
 
                        else throwErr("nothing to claim")
148
162
 
                    if ((checkCanClaim == checkCanClaim))
149
163
 
                        then {
150
164
 
                            let newClaimerClaimed = (claimerClaimed + claimerUnclaimed)
151
165
 
                            let newClaimedTotal = (claimedTotal + claimerUnclaimed)
152
166
 
                            let newClaimedTotalAddress = (claimedTotalAddress + claimerUnclaimed)
153
167
 
                            let newUnclaimedTotalAddress = (unclaimedTotalAddress - claimerUnclaimed)
154
168
 
                            let balanceBefore = value(assetBalance(this, rewardAssetId))
155
169
 
                            if ((balanceBefore == balanceBefore))
156
170
 
                                then {
157
171
 
                                    let res = invoke(treasuryContract, "withdrawReferralReward", [claimerUnclaimed], nil)
158
172
 
                                    if ((res == res))
159
173
 
                                        then {
160
174
 
                                            let balanceAfter = value(assetBalance(this, rewardAssetId))
161
175
 
                                            if ((balanceAfter == balanceAfter))
162
176
 
                                                then {
163
177
 
                                                    let balanceDiff = (balanceAfter - balanceBefore)
164
178
 
                                                    if ((balanceDiff == balanceDiff))
165
179
 
                                                        then {
166
180
 
                                                            let checkBalance = if ((balanceDiff == claimerUnclaimed))
167
181
 
                                                                then true
168
182
 
                                                                else throwErr("insufficient balance on referral contract")
169
183
 
                                                            if ((checkBalance == checkBalance))
170
184
 
                                                                then $Tuple2([IntegerEntry(keyClaimed, newClaimerClaimed), IntegerEntry(keyUnclaimed, 0), IntegerEntry(keyClaimedTotal(programName), newClaimedTotal), IntegerEntry(keyClaimedTotalAddress(claimerAddress), newClaimedTotalAddress), IntegerEntry(keyUnclaimedTotalAddress(claimerAddress), newUnclaimedTotalAddress), ScriptTransfer(addressFromStringValue(claimerAddress), claimerUnclaimed, rewardAssetId), StringEntry(claimHistoryKey, formatClaimHistory(claimerUnclaimed))], claimerUnclaimed)
171
185
 
                                                                else throw("Strict value is not equal to itself.")
172
186
 
                                                            }
173
187
 
                                                        else throw("Strict value is not equal to itself.")
174
188
 
                                                    }
175
189
 
                                                else throw("Strict value is not equal to itself.")
176
190
 
                                            }
177
191
 
                                        else throw("Strict value is not equal to itself.")
178
192
 
                                    }
179
193
 
                                else throw("Strict value is not equal to itself.")
180
194
 
                            }
181
195
 
                        else throw("Strict value is not equal to itself.")
182
196
 
                    }
183
197
 
            }
184
198
 
        else throw("Strict value is not equal to itself.")
185
199
 
    }
186
200
 
187
201
 
188
202
 
189
203
 
@Callable(i)
190
204
 
func claimBulkInternal (claimer,programNames,currentIter) = {
191
205
 
    let checkCaller = if ((i.caller == this))
192
206
 
        then true
193
207
 
        else throwErr("permission denied")
194
208
 
    if ((checkCaller == checkCaller))
195
209
 
        then if ((currentIter == size(programNames)))
196
210
 
            then nil
197
211
 
            else {
198
212
 
                let programName = programNames[currentIter]
199
213
 
                let programUnclaimed = valueOrElse(getInteger(keyUnclaimedReferrer(programName, claimer)), 0)
200
214
 
                let claimHistoryKey = keyClaimHistory(programName, claimer, toBase58String(i.transactionId), "claimBulk")
201
215
 
                let claimBulkInternal = invoke(this, "claimBulkInternal", [claimer, programNames, (currentIter + 1)], nil)
202
216
 
                if ((claimBulkInternal == claimBulkInternal))
203
217
 
                    then {
204
218
 
                        let unclaimedReferrer = valueOrElse(getInteger(keyUnclaimedReferrer(programName, claimer)), 0)
205
219
 
                        let claim = if ((unclaimedReferrer > 0))
206
220
 
                            then invoke(this, "claimInternal", [programName, claimer, false], nil)
207
221
 
                            else unit
208
222
 
                        if ((claim == claim))
209
223
 
                            then $Tuple2(nil, [claimBulkInternal, claim])
210
224
 
                            else throw("Strict value is not equal to itself.")
211
225
 
                        }
212
226
 
                    else throw("Strict value is not equal to itself.")
213
227
 
                }
214
228
 
        else throw("Strict value is not equal to itself.")
215
229
 
    }
216
230
 
217
231
 
218
232
 
219
233
 
@Callable(i)
220
234
 
func incUnclaimedWithPaymentInternal (paymentAmounts,programName,referrerAddresses,currentIter,resAmount) = {
221
235
 
    let checkCaller = if ((i.caller == this))
222
236
 
        then true
223
237
 
        else throwErr("permission denied")
224
238
 
    if ((checkCaller == checkCaller))
225
239
 
        then {
226
240
 
            let argsComparison = (size(paymentAmounts) == size(referrerAddresses))
227
241
 
            let check = if (argsComparison)
228
242
 
                then true
229
243
 
                else throwErr("lists in args must be same size")
230
244
 
            if ((check == check))
231
245
 
                then if ((currentIter == size(paymentAmounts)))
232
246
 
                    then $Tuple2(nil, resAmount)
233
247
 
                    else {
234
248
 
                        let referrerAddress = referrerAddresses[currentIter]
235
249
 
                        let unclaimedTotalAddress = valueOrElse(getInteger(keyUnclaimedTotalAddress(referrerAddress)), 0)
236
250
 
                        let referrerUnclaimed = valueOrElse(getInteger(keyUnclaimedReferrer(programName, referrerAddress)), 0)
237
251
 
                        let rewardsTotal = valueOrElse(getInteger(keyRewardsTotal(programName)), 0)
238
252
 
                        let newUnclaimedTotalAddress = (unclaimedTotalAddress + paymentAmounts[currentIter])
239
253
 
                        let newReferrerUnclaimed = (referrerUnclaimed + paymentAmounts[currentIter])
240
254
 
                        let newResAmount = (resAmount + paymentAmounts[currentIter])
241
255
 
                        let inv = invoke(this, "incUnclaimedWithPaymentInternal", [paymentAmounts, programName, referrerAddresses, (currentIter + 1), newResAmount], nil)
242
256
 
                        if ((inv == inv))
243
257
 
                            then {
244
258
 
                                let allReferrerPrograms = valueOrElse(getString(keyAllReferralPrograms(referrerAddress)), "")
245
259
 
                                let newAllReferrerPrograms = if ((allReferrerPrograms == ""))
246
260
 
                                    then programName
247
261
 
                                    else makeString([allReferrerPrograms, programName], separator)
248
262
 
                                $Tuple2([IntegerEntry(keyUnclaimedTotalAddress(referrerAddress), newUnclaimedTotalAddress), IntegerEntry(keyUnclaimedReferrer(programName, referrerAddress), newReferrerUnclaimed), IntegerEntry(keyRewardsTotal(programName), (rewardsTotal + paymentAmounts[currentIter])), StringEntry(keyAllReferralPrograms(referrerAddress), newAllReferrerPrograms)], inv)
249
263
 
                                }
250
264
 
                            else throw("Strict value is not equal to itself.")
251
265
 
                        }
252
266
 
                else throw("Strict value is not equal to itself.")
253
267
 
            }
254
268
 
        else throw("Strict value is not equal to itself.")
255
269
 
    }
256
270
 
257
271
 
258
272
 
259
273
 
@Callable(i)
260
274
 
func createReferralProgram (programName,treasuryContract,implementationContract,rewardAssetId) = {
261
275
 
    let checkCaller = mustManager(i)
262
276
 
    if ((checkCaller == checkCaller))
263
277
 
        then {
264
278
 
            let checkProgramName = if ((getBoolean(keyProgramName(programName)) == unit))
265
279
 
                then true
266
280
 
                else throwErr("program name already exists")
267
281
 
            if ((checkProgramName == checkProgramName))
268
282
 
                then {
269
283
 
                    let programNameIsValid = if (!(contains(programName, separator)))
270
284
 
                        then !(contains(programName, " "))
271
285
 
                        else false
272
286
 
                    let checkProgramExists = if (programNameIsValid)
273
287
 
                        then true
274
288
 
                        else throwErr("invalid program name")
275
289
 
                    if ((checkProgramExists == checkProgramExists))
276
290
 
                        then {
277
291
 
                            let checkRewardAsset = if ((assetInfo(fromBase58String(rewardAssetId)) != unit))
278
292
 
                                then true
279
293
 
                                else throwErr("invalid reward asset id")
280
294
 
                            if ((checkRewardAsset == checkRewardAsset))
281
295
 
                                then $Tuple2([BooleanEntry(keyProgramName(programName), true), StringEntry(keyTreasuryContract(programName), treasuryContract), StringEntry(keyImplementationContract(programName), implementationContract), StringEntry(keyRewardAssetId(programName), rewardAssetId), IntegerEntry(keyRewardsTotal(programName), 0)], unit)
282
296
 
                                else throw("Strict value is not equal to itself.")
283
297
 
                            }
284
298
 
                        else throw("Strict value is not equal to itself.")
285
299
 
                    }
286
300
 
                else throw("Strict value is not equal to itself.")
287
301
 
            }
288
302
 
        else throw("Strict value is not equal to itself.")
289
303
 
    }
290
304
 
291
305
 
292
306
 
293
307
 
@Callable(i)
294
308
 
func createPair (programName,referrerAddress,referralAddress,signature) = {
295
309
 
    let checkProgramExists = if (valueOrElse(getBoolean(keyProgramName(programName)), false))
296
310
 
        then true
297
311
 
        else throwErr("program does not exist")
298
312
 
    if ((checkProgramExists == checkProgramExists))
299
313
 
        then {
300
314
 
            let pairReferrerToReferralExistCheck = if ((getBoolean(keyExistsReferrerToReferral(programName, referrerAddress, referralAddress)) == unit))
301
315
 
                then true
302
316
 
                else throwErr("pair already exists")
303
317
 
            if ((pairReferrerToReferralExistCheck == pairReferrerToReferralExistCheck))
304
318
 
                then {
305
319
 
                    let noRefSelf = if ((referrerAddress != referralAddress))
306
320
 
                        then true
307
321
 
                        else throwErr("cannot refer to self")
308
322
 
                    if ((noRefSelf == noRefSelf))
309
323
 
                        then {
310
324
 
                            let pair = toBytes(makeString([programName, referrerAddress, referralAddress], ":"))
311
325
 
                            let backendPublicKey = fromBase58String(value(getString(keyBackendPublicKey)))
312
326
 
                            let validateSignature = if (sigVerify(pair, signature, backendPublicKey))
313
327
 
                                then true
314
328
 
                                else throwErr("bad signature")
315
329
 
                            if ((validateSignature == validateSignature))
316
330
 
                                then {
317
331
 
                                    let totalReferralCount = valueOrElse(getInteger(keyTotalReferralCount(programName, referrerAddress)), 0)
318
332
 
                                    let newTotalReferralCount = (totalReferralCount + 1)
319
-
                                    let allReferrerPrograms = valueOrElse(getString(keyAllReferralPrograms(referrerAddress)), "")
320
-
                                    let newAllReferrerPrograms = if ((allReferrerPrograms == ""))
321
-
                                        then programName
322
-
                                        else makeString([allReferrerPrograms, programName], separator)
323
-
                                    let allReferralPrograms = valueOrElse(getString(keyAllReferralPrograms(referralAddress)), "")
324
-
                                    let newAllReferralPrograms = if ((allReferralPrograms == ""))
325
-
                                        then programName
326
-
                                        else makeString([allReferralPrograms, programName], separator)
327
-
                                    $Tuple2([BooleanEntry(keyExistsReferrerToReferral(programName, referrerAddress, referralAddress), true), IntegerEntry(keyTotalReferralCount(programName, referrerAddress), newTotalReferralCount), StringEntry(keyReferrer(programName, referralAddress), referrerAddress), StringEntry(keyAllReferralPrograms(referrerAddress), newAllReferrerPrograms), StringEntry(keyAllReferralPrograms(referralAddress), newAllReferralPrograms)], unit)
333
+
                                    let updatedAllReferrerPrograms = updateAllReferralPrograms(referrerAddress, programName)
334
+
                                    let updatedAllReferralPrograms = updateAllReferralPrograms(referralAddress, programName)
335
+
                                    $Tuple2((([BooleanEntry(keyExistsReferrerToReferral(programName, referrerAddress, referralAddress), true), IntegerEntry(keyTotalReferralCount(programName, referrerAddress), newTotalReferralCount), StringEntry(keyReferrer(programName, referralAddress), referrerAddress)] ++ updatedAllReferrerPrograms) ++ updatedAllReferralPrograms), unit)
328
336
 
                                    }
329
337
 
                                else throw("Strict value is not equal to itself.")
330
338
 
                            }
331
339
 
                        else throw("Strict value is not equal to itself.")
332
340
 
                    }
333
341
 
                else throw("Strict value is not equal to itself.")
334
342
 
            }
335
343
 
        else throw("Strict value is not equal to itself.")
336
344
 
    }
337
345
 
338
346
 
339
347
 
340
348
 
@Callable(i)
341
349
 
func updateReferralActivity (programName,referralAddress,isActive) = {
342
350
 
    let implementationContract = value(getString(keyImplementationContract(programName)))
343
351
 
    let isReferralActive = (getBoolean(keyIsReferralActive(programName, referralAddress)) != unit)
344
352
 
    let referrerAddress = value(getString(keyReferrer(programName, referralAddress)))
345
353
 
    let checkCaller = if ((toString(i.caller) == implementationContract))
346
354
 
        then true
347
355
 
        else throwErr("permission denied")
348
356
 
    if ((checkCaller == checkCaller))
349
357
 
        then {
350
358
 
            let update = if ((isReferralActive == isActive))
351
359
 
                then $Tuple2(nil, unit)
352
360
 
                else {
353
361
 
                    let update = if ((isActive == true))
354
362
 
                        then {
355
363
 
                            let newActiveReferralCount = (valueOrElse(getInteger(keyActiveReferralCount(programName, referrerAddress)), 0) + 1)
356
364
 
                            $Tuple2([BooleanEntry(keyIsReferralActive(programName, referralAddress), true), IntegerEntry(keyActiveReferralCount(programName, referrerAddress), newActiveReferralCount)], unit)
357
365
 
                            }
358
366
 
                        else {
359
367
 
                            let newActiveReferralCount = (valueOrElse(getInteger(keyActiveReferralCount(programName, referrerAddress)), 0) - 1)
360
368
 
                            $Tuple2([DeleteEntry(keyIsReferralActive(programName, referralAddress)), IntegerEntry(keyActiveReferralCount(programName, referrerAddress), newActiveReferralCount)], unit)
361
369
 
                            }
362
370
 
                    update
363
371
 
                    }
364
372
 
            update
365
373
 
            }
366
374
 
        else throw("Strict value is not equal to itself.")
367
375
 
    }
368
376
 
369
377
 
370
378
 
371
379
 
@Callable(i)
372
380
 
func incUnclaimed (programName,referralAddress,referrerReward,referralReward) = {
373
381
 
    let implementationContract = value(getString(keyImplementationContract(programName)))
374
382
 
    let referrerAddress = value(getString(keyReferrer(programName, referralAddress)))
375
383
 
    let checkCaller = if ((toString(i.caller) == implementationContract))
376
384
 
        then true
377
385
 
        else throwErr("permission denied")
378
386
 
    if ((checkCaller == checkCaller))
379
387
 
        then {
380
388
 
            let checkProgram = if ((programName == "wxlock"))
381
389
 
                then true
382
390
 
                else throwErr("invalid program")
383
391
 
            if ((checkProgram == checkProgram))
384
392
 
                then {
385
393
 
                    let checkReferrerInProgram = if (contains(valueOrElse(getString(keyAllReferralPrograms(referrerAddress)), ""), programName))
386
394
 
                        then true
387
395
 
                        else throwErr("referrer not in program")
388
396
 
                    if ((checkReferrerInProgram == checkReferrerInProgram))
389
397
 
                        then {
390
398
 
                            let checkReferralInProgram = if (contains(valueOrElse(getString(keyAllReferralPrograms(referralAddress)), ""), programName))
391
399
 
                                then true
392
400
 
                                else throwErr("referral not in program")
393
401
 
                            if ((checkReferralInProgram == checkReferralInProgram))
394
402
 
                                then {
395
403
 
                                    let unclaimedTotalReferrer = valueOrElse(getInteger(keyUnclaimedTotalAddress(referrerAddress)), 0)
396
404
 
                                    let referrerUnclaimed = valueOrElse(getInteger(keyUnclaimedReferrer(programName, referrerAddress)), 0)
397
405
 
                                    let unclaimedTotalReferral = valueOrElse(getInteger(keyUnclaimedTotalAddress(referralAddress)), 0)
398
406
 
                                    let referralUnclaimed = valueOrElse(getInteger(keyUnclaimedReferral(programName, referralAddress)), 0)
399
407
 
                                    let rewardsTotal = valueOrElse(getInteger(keyRewardsTotal(programName)), 0)
400
408
 
                                    let newUnclaimedTotalReferrer = (unclaimedTotalReferrer + referrerReward)
401
409
 
                                    let newReferrerUnclaimed = (referrerUnclaimed + referrerReward)
402
410
 
                                    let newUnclaimedTotalReferral = (unclaimedTotalReferral + referralReward)
403
411
 
                                    let newReferralUnclaimed = (referralUnclaimed + referralReward)
404
412
 
                                    $Tuple2([IntegerEntry(keyUnclaimedTotalAddress(referrerAddress), newUnclaimedTotalReferrer), IntegerEntry(keyUnclaimedTotalAddress(referralAddress), newUnclaimedTotalReferral), IntegerEntry(keyUnclaimedReferrer(programName, referrerAddress), newReferrerUnclaimed), IntegerEntry(keyUnclaimedReferral(programName, referralAddress), newReferralUnclaimed), IntegerEntry(keyRewardsTotal(programName), ((rewardsTotal + referrerReward) + referralReward))], unit)
405
413
 
                                    }
406
414
 
                                else throw("Strict value is not equal to itself.")
407
415
 
                            }
408
416
 
                        else throw("Strict value is not equal to itself.")
409
417
 
                    }
410
418
 
                else throw("Strict value is not equal to itself.")
411
419
 
            }
412
420
 
        else throw("Strict value is not equal to itself.")
413
421
 
    }
414
422
 
415
423
 
416
424
 
417
425
 
@Callable(i)
418
426
 
func incUnclaimedWithPayment (programName,referrerAddresses) = {
419
427
 
    let checkProgram = if ((programName == "wxSpotFee"))
420
428
 
        then true
421
429
 
        else throwErr("invalid program")
422
430
 
    if ((checkProgram == checkProgram))
423
431
 
        then {
424
432
 
            let callerAddress = toString(i.caller)
425
433
 
            let lastCall = valueOrElse(getInteger(keyLastIncUnclaimedWithPaymentCallBlock(callerAddress)), 0)
426
434
 
            let waitBlocks = ((lastCall - height) + 3)
427
435
 
            let lastCallCheck = if (((height - 3) > lastCall))
428
436
 
                then true
429
437
 
                else throwErr(makeString(["wait", toString(waitBlocks), "blocks"], " "))
430
438
 
            if ((lastCallCheck == lastCallCheck))
431
439
 
                then {
432
440
 
                    func map (accum,next) =                     {
433
441
 
                        let assetIdCheck = (toBase58String(value(next.assetId)) == value(getString(keyRewardAssetId(programName))))
434
442
 
                        let amountCheck = if (assetIdCheck)
435
443
 
                            then true
436
444
 
                            else throwErr("invalid asset id")
437
445
 
                        if ((amountCheck == amountCheck))
438
446
 
                            then (accum :+ next.amount)
439
447
 
                            else throw("Strict value is not equal to itself.")
440
448
 
                        }
441
449
 
442
450
 
                    let payments = {
443
451
 
                        let $l = i.payments
444
452
 
                        let $s = size($l)
445
453
 
                        let $acc0 = nil
446
454
 
                        func $f0_1 ($a,$i) =                         if (($i >= $s))
447
455
 
                            then $a
448
456
 
                            else map($a, $l[$i])
449
457
 
450
458
 
                        func $f0_2 ($a,$i) =                         if (($i >= $s))
451
459
 
                            then $a
452
460
 
                            else throw("List size exceeds 10")
453
461
 
454
462
 
                        $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)
455
463
 
                        }
456
464
 
                    let resAmount = {
457
465
 
                        let @ = invoke(this, "incUnclaimedWithPaymentInternal", [payments, programName, referrerAddresses, 0, 0], nil)
458
466
 
                        if ($isInstanceOf(@, "Int"))
459
467
 
                            then @
460
468
 
                            else throw(($getType(@) + " couldn't be cast to Int"))
461
469
 
                        }
462
470
 
                    if ((resAmount == resAmount))
463
471
 
                        then {
464
472
 
                            let treasuryContract = addressFromStringValue(value(getString(keyTreasuryContract(programName))))
465
473
 
                            let rewardAssetId = fromBase58String(value(getString(keyRewardAssetId(programName))))
466
474
 
[ScriptTransfer(treasuryContract, resAmount, rewardAssetId), IntegerEntry(keyLastIncUnclaimedWithPaymentCallBlock(callerAddress), height)]
467
475
 
                            }
468
476
 
                        else throw("Strict value is not equal to itself.")
469
477
 
                    }
470
478
 
                else throw("Strict value is not equal to itself.")
471
479
 
            }
472
480
 
        else throw("Strict value is not equal to itself.")
473
481
 
    }
474
482
 
475
483
 
476
484
 
477
485
 
@Callable(i)
478
486
 
func claim (programName) = {
479
487
 
    let checkProgramExists = if (valueOrElse(getBoolean(keyProgramName(programName)), false))
480
488
 
        then true
481
489
 
        else throwErr("program does not exist")
482
490
 
    if ((checkProgramExists == checkProgramExists))
483
491
 
        then {
484
492
 
            let isImplementationContract = (toString(i.caller) == value(getString(keyImplementationContract(programName))))
485
493
 
            let claimerAddress = if (isImplementationContract)
486
494
 
                then toString(i.originCaller)
487
495
 
                else toString(i.caller)
488
496
 
            let claimInternal = invoke(this, "claimInternal", [programName, claimerAddress, isImplementationContract], nil)
489
497
 
            if ((claimInternal == claimInternal))
490
498
 
                then $Tuple2(nil, claimInternal)
491
499
 
                else throw("Strict value is not equal to itself.")
492
500
 
            }
493
501
 
        else throw("Strict value is not equal to itself.")
494
502
 
    }
495
503
 
496
504
 
497
505
 
498
506
 
@Callable(i)
499
507
 
func claimBulk () = {
500
508
 
    let callerAddress = toString(i.caller)
501
509
 
    let callerProgramsStr = getString(keyAllReferralPrograms(toString(i.caller)))
502
510
 
    let programsExists = if (isDefined(callerProgramsStr))
503
511
 
        then true
504
512
 
        else throwErr("no referral programs")
505
513
 
    if ((programsExists == programsExists))
506
514
 
        then {
507
515
 
            let callerPrograms = split(value(callerProgramsStr), "__")
508
516
 
            let bulkClaim = invoke(this, "claimBulkInternal", [callerAddress, callerPrograms, 0], nil)
509
517
 
            if ((bulkClaim == bulkClaim))
510
518
 
                then $Tuple2(nil, bulkClaim)
511
519
 
                else throw("Strict value is not equal to itself.")
512
520
 
            }
513
521
 
        else throw("Strict value is not equal to itself.")
514
522
 
    }
515
523
 
516
524
 
517
525
 
518
526
 
@Callable(i)
519
527
 
func claimREADONLY (programName,userAddress) = {
520
528
 
    let claimerClaimed = valueOrElse(getInteger(keyClaimedReferrer(programName, userAddress)), 0)
521
529
 
    let claimerUnclaimed = valueOrElse(getInteger(keyUnclaimedReferrer(programName, userAddress)), 0)
522
530
 
    $Tuple2(nil, [claimerUnclaimed, claimerClaimed])
523
531
 
    }
524
532
 
525
533
 
526
534
 
527
535
 
@Callable(i)
528
536
 
func claimBulkREADONLY (claimer) = {
529
537
 
    let claimedTotalAddress = valueOrElse(getInteger(keyClaimedTotalAddress(claimer)), 0)
530
538
 
    let unclaimedTotalAddress = valueOrElse(getInteger(keyUnclaimedTotalAddress(claimer)), 0)
531
539
 
    $Tuple2(nil, [unclaimedTotalAddress, claimedTotalAddress])
532
540
 
    }
533
541
 
534
542
 
535
543
 
536
544
 
@Callable(i)
537
545
 
func setTotalKeys (programName,address) = {
538
546
 
    let claimedReferrer = valueOrElse(getInteger(keyClaimedReferrer(programName, address)), 0)
539
547
 
    let claimedReferral = valueOrElse(getInteger(keyClaimedReferral(programName, address)), 0)
540
548
 
    let unclaimedReferrer = valueOrElse(getInteger(keyUnclaimedReferrer(programName, address)), 0)
541
549
 
    let unclaimedReferral = valueOrElse(getInteger(keyUnclaimedReferral(programName, address)), 0)
542
550
 
    let claimedTotalAddress = (claimedReferrer + claimedReferral)
543
551
 
    let unclaimedTotalAddress = (unclaimedReferrer + unclaimedReferral)
544
552
 
    $Tuple2([IntegerEntry(keyClaimedTotalAddress(address), claimedTotalAddress), IntegerEntry(keyUnclaimedTotalAddress(address), unclaimedTotalAddress)], unit)
545
553
 
    }
546
554
 
547
555
 
548
556
 
549
557
 
@Callable(i)
550
558
 
func setManager (pendingManagerPublicKey) = {
551
559
 
    let checkCaller = mustManager(i)
552
560
 
    if ((checkCaller == checkCaller))
553
561
 
        then {
554
562
 
            let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
555
563
 
            if ((checkManagerPublicKey == checkManagerPublicKey))
556
564
 
                then [StringEntry(keyPendingManagerPublicKey(), pendingManagerPublicKey)]
557
565
 
                else throw("Strict value is not equal to itself.")
558
566
 
            }
559
567
 
        else throw("Strict value is not equal to itself.")
560
568
 
    }
561
569
 
562
570
 
563
571
 
564
572
 
@Callable(i)
565
573
 
func confirmManager () = {
566
574
 
    let pm = pendingManagerPublicKeyOrUnit()
567
575
 
    let hasPM = if (isDefined(pm))
568
576
 
        then true
569
577
 
        else throwErr("no pending manager")
570
578
 
    if ((hasPM == hasPM))
571
579
 
        then {
572
580
 
            let checkPM = if ((i.callerPublicKey == value(pm)))
573
581
 
                then true
574
582
 
                else throwErr("you are not pending manager")
575
583
 
            if ((checkPM == checkPM))
576
584
 
                then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
577
585
 
                else throw("Strict value is not equal to itself.")
578
586
 
            }
579
587
 
        else throw("Strict value is not equal to itself.")
580
588
 
    }
581
589
 
582
590
 
583
591
 
@Verifier(tx)
584
592
 
func verify () = {
585
593
 
    let targetPublicKey =     match managerPublicKeyOrUnit() {
586
594
 
        case pk: ByteVector => 
587
595
 
            pk
588
596
 
        case _: Unit => 
589
597
 
            tx.senderPublicKey
590
598
 
        case _ => 
591
599
 
            throw("Match error")
592
600
 
    }
593
601
 
    sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
594
602
 
    }
595
603
 

github/deemru/w8io/169f3d6 
90.13 ms ◑