w8 · tx · 3hH···WzH

tx · 3hHMirAbiaYJsBNcpsN8YEycppuoB2pyrQncF4Z7mWzH

3PCxF4JryswYYp9mpUtE725wjTgvpBmp3M9:  -0.01800000 Waves

2024.03.06 09:01 [4071596] smart account 3PCxF4JryswYYp9mpUtE725wjTgvpBmp3M9 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3hHMirAbiaYJsBNcpsN8YEycppuoB2pyrQncF4Z7mWzH",
    "fee": 1800000,
    "feeAssetId": null,
    "timestamp": 1709704956411,
    "version": 2,
    "chainId": 87,
    "sender": "3PCxF4JryswYYp9mpUtE725wjTgvpBmp3M9",
    "senderPublicKey": "ABaPDrNzForWeg3KKG9KFKPWxuihEJxK9fjZ9nDfvE26",
    "proofs": [
        "S7ANoqY4ktW75bg5zxLUNFmzSgoZ42QeHjGRwJYQFZCiT8Wq277bBN6XbAQ6u295KrTvAyP2jwQkt1fvCLC1L7i"
    ],
    "script": "base64:BgJACAISABIAEgASABIDCgEIEgASABIAEgMKAQgSABIAEgMKAQgSABIAEgMKAQgSABIECgIICBIECgIIARIECgIICCQBDXRyeUdldEludGVnZXICB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCaCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEMdHJ5R2V0U3RyaW5nAgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAnQgCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFiBQckbWF0Y2gwBQFiAgAAAmQ4AIDC1y8AAmQ2AMCEPQAHcG9vbEJCQgEaAVdS7pNWFE1+B4zShQ/mflxXN34cn+88gh0ADXB1enpsZVN0YWtpbmcJAQdBZGRyZXNzAQEaAVeUaIz57qK5qp/W9Y68qY9nGpwG9BYpibsACWJiYlBvb2xJZAEaAVdS7pNWFE1+B4zShQ/mflxXN34cn+88gh0ADHB1enpsZU1hcmtldAkBB0FkZHJlc3MBARoBV12L8V/LKCBrH2ajyG7aC6iX7Q/o/clE8QAHYnVybnh0bgEgJE91eWp+Mzm4+wz/hKlxXF7KLd4zoMRdafnqRBHsTFQACXdoaXJscG9vbAEgWeON3MK1I7pKFNzE0K8UCeZk5gS+JQYLJk7lUG2XWccABnB1enpsZQEg8Rr+Jf72mTj0aSrE3+ES1keyxsoOujcJr3dtH46i5WMABHJvbWUBIItflAGEw2XBJDSO/xv8cJExSGrJMeqoy5Pz+Z80RAjPAARzdXJmASCS0fRK4hEBK/R+6t4hjj3F+8nyfc6Hsu1SGfA6TiRY9QAMcHV6emxlU3Rha2VkCQENdHJ5R2V0SW50ZWdlcgIFDXB1enpsZVN0YWtpbmcJAKwCAgkApQgBBQR0aGlzAgdfc3Rha2VkAAxwdXp6bGVJblBvb2wJAQ10cnlHZXRJbnRlZ2VyAgkBB0FkZHJlc3MBBQliYmJQb29sSWQJAKwCAgkArAICAgdnbG9iYWxfCQDYBAEFBnB1enpsZQIIX2JhbGFuY2UADHByb2plY3RTdGFrZQkBDXRyeUdldEludGVnZXICCQEHQWRkcmVzcwEFCWJiYlBvb2xJZAkArAICCQClCAEFBHRoaXMCDF9pbmRleFN0YWtlZAAKdG90YWxTdGFrZQkBDXRyeUdldEludGVnZXICCQEHQWRkcmVzcwEFCWJiYlBvb2xJZAIXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQAC2Fzc2V0V2VpZ2h0CQENdHJ5R2V0SW50ZWdlcgIJAQdBZGRyZXNzAQUJYmJiUG9vbElkCQCsAgIJAKwCAgIHc3RhdGljXwkA2AQBBQZwdXp6bGUCB193ZWlnaHQADUJCQmxwSW5QdXp6bGUJAGsDCQBoAgkAaQIFDHB1enpsZUluUG9vbAULYXNzZXRXZWlnaHQAkE4FDHByb2plY3RTdGFrZQUKdG90YWxTdGFrZQAWa2V5QWRkcmVzc2VzUmVnaXN0ZXJlZAIUQWRkcmVzc2VzIHJlZ2lzdGVyZWQACWFkZHJlc3NlcwkAswICCQEMdHJ5R2V0U3RyaW5nAgUEdGhpcwUWa2V5QWRkcmVzc2VzUmVnaXN0ZXJlZAABABBrZXlCdXJueHRuQW1vdW50AhZCVVJOLVhUTiB0b3RhbCByZXdhcmRzAA1rZXlSb21lQW1vdW50AhJST01FIHRvdGFsIHJld2FyZHMAD2tleVB1enpsZUFtb3VudAIUUFVaWkxFIHRvdGFsIHJld2FyZHMADmtleVdhdmVzQW1vdW50AhNXQVZFUyB0b3RhbCByZXdhcmRzABJrZXlXaGlybHBvb2xBbW91bnQCF1dISVJMUE9PTCB0b3RhbCByZXdhcmRzABBrZXlUb3RhbE5GVHBvd2VyAg9Ub3RhbCBORlQgcG93ZXIAE2tleVRvdGFsUHV6emxlVmFsdWUCElRvdGFsIHB1enpsZSB2YWx1ZQATa2V5VG90YWxCdXJueHRuUGFpZAITVG90YWwgQlVSTi1YVE4gcGFpZAAVa2V5VG90YWxXaGlybHBvb2xQYWlkAhRUb3RhbCBXSElSTFBPT0wgcGFpZAAQa2V5VG90YWxSb21lUGFpZAIPVG90YWwgUk9NRSBwYWlkABFrZXlUb3RhbFdhdmVzUGFpZAIQVG90YWwgV0FWRVMgcGFpZAASa2V5VG90YWxQdXp6bGVQYWlkAhFUb3RhbCBQVVpaTEUgcGFpZAAHV0ZTbGlzdAkAzAgCAixHbnB5NW5WYWpQUDNYUVFWeHJIYm9NQXNYdGpueVdBeHliTURkS3JicjhzRAkAzAgCAixCVDlRNG1RZFFRbWVpMnI1WU5NQk1hc1pCUWo3bXlOYWl6NlFIYmE1Y1BYUwkAzAgCAixCTXZreUZ0UFZtRmF0cEZSOVFWRktSNU1ZVGNaVlRZMlZVd0ZaMjV2ckFBYwkAzAgCAiw3N1JxdThUTGpCZE10RHVYZDlvNWZVU0dvNjR6UWU1RkNjYW81TDhIdDlqOAkAzAgCAiw4S25oQkxWNDlTREp6cTFTU3kxWXZHSFlZNm03UTE0NmJWN1E2R0txUWI1QwkAzAgCAixGRnhzVWZLYkhFVzR6Wnl3TFVMNTVpcDhOcXA2ZmNXRHNxN3kzYW45eVFoZQkAzAgCAiw1blFSZWRHSG9WcEVRYXNNUWl2YjFVTXZGQkNIWGVmWFBYdFVSYk1NbmZzdQkAzAgCAiw2TjNNU0Z0Skd2VDc5dWNYNHBMZnR4UDdmR3M4RG5tWWRQZWR2bm9OYlZ0OQkAzAgCAitkRkMyaUpMNExEV2FzcTlZekhmMmtXZlBOUDY5VHlhbWlpOTNuczlCSHZNCQDMCAICLEExNThUN3laTHRtdWlNRXMyMVA5alYyZnRiTVh6eTNNbmZITUV1MWVNQUdLBQNuaWwAB0JCQmxpc3QJAMwIAgIsOXBDeG9HdEQxOEdlSDlnQ2VtenFyakhNTWpmeUJRRGZzclJBdXhTUmFnTWMJAMwIAgIsN0RnRmdDa0JqVkRjNVA5Wmd3c1ZMOVNpVGk3a1hKdVM0YVJWZ2I3WkhXM2sJAMwIAgIsNzZiVHZFOHR0SHZzdU4xRnVINEtjOFFVVzRrTDRtOGMxY2pmc1h5MkdmYlYJAMwIAgIsNFpyZjRINXRpRmNRTDhlUW1uQTJ3SjFYV1BFQkg2aDFHMk1lZlpEWW1jQ0IJAMwIAgIsMkR0QzRuRm54ejVVTTZtYmpQd01WWnBRV1pGVXF4czUyb1pyQmVOUms5QW8JAMwIAgIsRGpaR01BRmZvUVdrTVczUzVGVHNRTjNqb25jWnQ2QnNtaG5FSzNnZ0x4bU4JAMwIAgIsQm5lYVpYRDZvdkRKY1Y1cmdmcjhoc0haYU1Rc0pROERINmE1Z1RuR0NwQmMJAMwIAgIsNEVLZmd6RmtkNVVHS3JqbmFKVjN3N2FyZ1cxWW1GNGhxNTR4V1FGekFYYjkJAMwIAgIsOGhHRGtXS2l1MmlnRHBXVDNIcHI0bWNoREQ2eHdKOWhHbTJoMmpuVXZUcXoJAMwIAgIsRTNablNlanBYTDFYcjZWRzRRb0xoOHhvZDlOTWdwUGU0NzNyOVFrMkhpYkwFA25pbAANU1VSRmJvYXJkTGlzdAkAzAgCAixEekxTZ0VhQkI0VU5iUENaZWtQU3piUTg1S29rTUI3ZDFLUlJtelVQdTVocwkAzAgCAitXbVd6c2JiM1BOdnpKNHc0RmI3M0tjb05HTFh1bWdZWmFnVjIyekVpWDF3CQDMCAICLDdScnhiZ2F5VWtzUEhyQTc5OXBLdUNyNjFyZVQ4bkVOZHFDa2dWSFBnYU4yCQDMCAICLEZtRExmenNwYlZKZUtoS2R1TERVYmEySG9WZFJyS3Rzd0RLTVUzZTlxanRQCQDMCAICLEhtUXZWeVFkRWphZkxycEtQU2lnZGFmdmNZdkxiTllHRWdWQ3hMWlJXdDF5CQDMCAICLDJyVnhOTVh1dnVnNzRUb3JMUVpHQzJFUkhqQWJKblZVZ05YUTFrSm10bkFlCQDMCAICLDl5Yjl5R0ptNmd6Vm96Qkh1UVZIQmRBbnpmY3QzTjliUnBkampOVW5yemNDCQDMCAICK3MxU2ZHVnNoZjJqS0NBOUt2dktLdlV1Szh1dHAzTmUzZWU4THA2S0tMUncJAMwIAgIsM0UzeWI3VHZESzc2MmRuMTFkbVJMd2FwZ2hhZWZRVUV5dW5WZFhTTnA0dEIJAMwIAgIsRkg3NVR2QXB5VnRmZDlYNWExQXIxOU5zOUROSnZ6cHpMRkU1cGpoMXdpNGgJAMwIAgIsRWdxa2JEeVdSUGdWTlZxdEVFdFJTeldjR0QzM29yVm9FMmJ6WWRBZGllUVMJAMwIAgIsRHNLeUpwSkNaY0Z2OWpTblFiUVZHNEp4M1dTUDFLdGZIaEFLVGtTS3JWQmoJAMwIAgIsQWVzUHI1VUZEZ1k1alpYWVVaOEprYll0Sm92VmRESGJ5MTVTQ2tzRWhtSksJAMwIAgIsQVZzZmRxdzJtNWFVTnhhMUhZOWVtTG1DTEJmVkFHVHhWdTRlZjN4RURLQzgJAMwIAgIsNWpkdlNTWTJLN2g4VWlVQ1hVZ0s5VDd6Zk1yeXF3Mml0S1A4QnlzZFhERGsJAMwIAgIsQTR2b0taZXM4TVZEQVh5UWpLa2I2YmRFY3FNYnZCNHB0emJwcVlxdmVHNW4JAMwIAgIsMzRvWkthV0hwU0pyWnZHTGRZdTVXRzhXV1hnN3J3RjJISHg4SzE1R2ZVQ1EJAMwIAgIsNzdNY0NIa21OclJNNERqcWtTTTlCOFlqdUpjS3RuNjdqUWdlMXB6WnJROFQJAMwIAgIsN05FRkJudkdHTWZZZEJuaE1MTnB1VmdTMjJMcGNnWENaZ0hmbThESG1taUEJAMwIAgIsR29GOXlva3hIZ1BOb3hvV2dqamRtR2VXaGNMWUFyU3N4cWZmUnRmWUd0ZnMFA25pbBMBaQEKaW52b2tlQ2xJMQADCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhxhY2Nlc3Mgb25seSBieSBwcm9qZWN0IG93bmVyBAJjbAkA/AcEBQR0aGlzAhFjbGFpbUludmVzdFB1enpsZQUDbmlsBQNuaWwDCQAAAgUCY2wFAmNsBAJpMQkA/AcEBQR0aGlzAghpbnZva2VyMQUDbmlsBQNuaWwDCQAAAgUCaTEFAmkxBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQERY2xhaW1JbnZlc3RQdXp6bGUAAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIcYWNjZXNzIG9ubHkgYnkgcHJvamVjdCBvd25lcgQRcm9tZUJhbGFuY2VCZWZvcmUJAPAHAgUEdGhpcwUEcm9tZQMJAAACBRFyb21lQmFsYW5jZUJlZm9yZQURcm9tZUJhbGFuY2VCZWZvcmUEEmNsYWltUHV6emxlU3Rha2luZwkA/AcEBQ1wdXp6bGVTdGFraW5nAgtjbGFpbVJld2FyZAUDbmlsBQNuaWwDCQAAAgUSY2xhaW1QdXp6bGVTdGFraW5nBRJjbGFpbVB1enpsZVN0YWtpbmcED3Bvb2xPbmVUb2tlbkludgkA/AcECQEHQWRkcmVzcwEBGgFX/SXDvU5hlEHvul4SY4/FOW9JtYg69eltAiFnZW5lcmF0ZUluZGV4V2l0aE9uZVRva2VuQW5kU3Rha2UJAMwIAgkA2AQBBQdwb29sQkJCBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFBnB1enpsZQkA8AcCBQR0aGlzBQZwdXp6bGUFA25pbAMJAAACBQ9wb29sT25lVG9rZW5JbnYFD3Bvb2xPbmVUb2tlbkludgQQcm9tZUJhbGFuY2VBZnRlcgkA8AcCBQR0aGlzBQRyb21lCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhVBY3RpdmF0ZWQgYmxvY2toZWlnaHQFBmhlaWdodAkAzAgCCQEMSW50ZWdlckVudHJ5AgUQa2V5QnVybnh0bkFtb3VudAkA8AcCBQR0aGlzBQdidXJueHRuCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQ1rZXlSb21lQW1vdW50CQBlAgUQcm9tZUJhbGFuY2VBZnRlcgURcm9tZUJhbGFuY2VCZWZvcmUJAMwIAgkBDEludGVnZXJFbnRyeQIFDmtleVdhdmVzQW1vdW50AwkAZgIJAGUCCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQUCZDgAAAkAZQIICQDvBwEFBHRoaXMJYXZhaWxhYmxlBQJkOAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCBRJrZXlXaGlybHBvb2xBbW91bnQJAPAHAgUEdGhpcwUJd2hpcmxwb29sBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEIaW52b2tlcjEABAVyZXNldAkA/AcEBQR0aGlzAgpyZXNldENvdW50BQNuaWwFA25pbAMJAAACBQVyZXNldAUFcmVzZXQEBGxpc3QJALwJAgUJYWRkcmVzc2VzAgEsCgEBcgIFYWNjdW0HYWRkcmVzcwkA/AcEBQR0aGlzAg1jb3VudE5GVHBvd2VyCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsBAdpbnZva2VyCgACJGwFBGxpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBAXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDMwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAwkAAAIFB2ludm9rZXIFB2ludm9rZXIEAXAJAPwHBAUEdGhpcwIEZGF0YQUDbmlsBQNuaWwDCQAAAgUBcAUBcAkAzAgCCQEMSW50ZWdlckVudHJ5AgIQV0ZTIHB1enpsZSB2YWx1ZQkAawMJAGsDCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMFE2tleVRvdGFsUHV6emxlVmFsdWUAAQkBDXRyeUdldEludGVnZXICBQR0aGlzBRBrZXlUb3RhbE5GVHBvd2VyAAoACQkAzAgCCQEMSW50ZWdlckVudHJ5AgIQQkJCIHB1enpsZSB2YWx1ZQkAawMJAGsDCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMFE2tleVRvdGFsUHV6emxlVmFsdWUACgkBDXRyeUdldEludGVnZXICBQR0aGlzBRBrZXlUb3RhbE5GVHBvd2VyAAoACQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCnJlc2V0Q291bnQACQDMCAIJAQxJbnRlZ2VyRW50cnkCBRBrZXlUb3RhbE5GVHBvd2VyAAAFA25pbAFpAQ1jb3VudE5GVHBvd2VyAQdhZGRyZXNzCgEIZm9sZEZ1bmMCA2FjYwNXRlMJAGQCCQBkAgUDYWNjCQDwBwIJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB2FkZHJlc3MJANkEAQUDV0ZTAwkAAAIJAQx0cnlHZXRTdHJpbmcCBQxwdXp6bGVNYXJrZXQJAKwCAgkArAICAgRuZnRfBQNXRlMCB19zZWxsZXIFB2FkZHJlc3MAAQAABAhzaGFyZVdGUwoAAiRsBQdXRlNsaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQhmb2xkRnVuYwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgoBCWZvbGRGdW5jQgIDYWNjA0JCQgkAZAIJAGQCBQNhY2MJAPAHAgkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwkA2QQBBQNCQkIDCQAAAgkBDHRyeUdldFN0cmluZwIFDHB1enpsZU1hcmtldAkArAICCQCsAgICBG5mdF8FA0JCQgIHX3NlbGxlcgUHYWRkcmVzcwABAAAECHNoYXJlQkJCCgACJGwFB0JCQmxpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWZvbGRGdW5jQgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgMJAAACCQBkAgUIc2hhcmVXRlMFCHNoYXJlQkJCAAAEBGxpc3QJALwJAgUJYWRkcmVzc2VzAgEsBApub05GVGluZGV4CQEFdmFsdWUBCQDPCAIFBGxpc3QFB2FkZHJlc3MEDmxpc3RNaW51c05vTkZUCQDRCAIFBGxpc3QFCm5vTkZUaW5kZXgEDW1pbnVzTm9ORlRzdHIJAKwCAgkAuQkCBQ5saXN0TWludXNOb05GVAIBLAIBLAkAzAgCCQELU3RyaW5nRW50cnkCBRZrZXlBZGRyZXNzZXNSZWdpc3RlcmVkBQ1taW51c05vTkZUc3RyBQNuaWwJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHYWRkcmVzcwIEX1dGUwUIc2hhcmVXRlMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHYWRkcmVzcwIEX0JCQgkAaAIFCHNoYXJlQkJCAAoJAMwIAgkBDEludGVnZXJFbnRyeQIFEGtleVRvdGFsTkZUcG93ZXIJAGQCCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMFEGtleVRvdGFsTkZUcG93ZXIJAGQCBQhzaGFyZVdGUwkAaAIFCHNoYXJlQkJCAAoFA25pbAFpAQRkYXRhAAkAzAgCCQEMSW50ZWdlckVudHJ5AgIOcHV6emxlIGJhbGFuY2UJAPAHAgUEdGhpcwUGcHV6emxlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAg1wdXp6bGUgc3Rha2VkBQxwdXp6bGVTdGFrZWQJAMwIAgkBDEludGVnZXJFbnRyeQICDXB1enpsZSBCQkIgTFAFDUJCQmxwSW5QdXp6bGUJAMwIAgkBDEludGVnZXJFbnRyeQIFE2tleVRvdGFsUHV6emxlVmFsdWUJAGQCCQBkAgkA8AcCBQR0aGlzBQZwdXp6bGUFDHB1enpsZVN0YWtlZAUNQkJCbHBJblB1enpsZQUDbmlsAWkBCGludm9rZXIyAAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECHGFjY2VzcyBvbmx5IGJ5IHByb2plY3Qgb3duZXIEAXQJAPwHBAUEdGhpcwIOdHJhY2tUb3RhbFBhaWQFA25pbAUDbmlsAwkAAAIFAXQFAXQEBGxpc3QJALwJAgUJYWRkcmVzc2VzAgEsCgEBcgIFYWNjdW0HYWRkcmVzcwkA/AcEBQR0aGlzAhFkaXN0cmlidXRlUmV3YXJkcwkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAQHaW52b2tlcgoAAiRsBQRsaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQFyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQDCQAAAgUHaW52b2tlcgUHaW52b2tlcgQCYnMJAPwHBAUEdGhpcwIIYnVyblN1cmYFA25pbAUDbmlsAwkAAAIFAmJzBQJicwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBDnRyYWNrVG90YWxQYWlkAAQNYW1vdW50QnVybnh0bgkBDXRyeUdldEludGVnZXICBQR0aGlzBRBrZXlCdXJueHRuQW1vdW50BA9hbW91bnRXaGlybHBvb2wJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwUSa2V5V2hpcmxwb29sQW1vdW50BAthbW91bnRXYXZlcwkBDXRyeUdldEludGVnZXICBQR0aGlzBQ5rZXlXYXZlc0Ftb3VudAQKYW1vdW50Um9tZQkBDXRyeUdldEludGVnZXICBQR0aGlzBQ1rZXlSb21lQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRNrZXlUb3RhbEJ1cm54dG5QYWlkCQBkAgUNYW1vdW50QnVybnh0bgkBDXRyeUdldEludGVnZXICBQR0aGlzBRNrZXlUb3RhbEJ1cm54dG5QYWlkCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRVrZXlUb3RhbFdoaXJscG9vbFBhaWQJAGQCBQ9hbW91bnRXaGlybHBvb2wJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwUVa2V5VG90YWxXaGlybHBvb2xQYWlkCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRFrZXlUb3RhbFdhdmVzUGFpZAkAZAIFC2Ftb3VudFdhdmVzCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMFEWtleVRvdGFsV2F2ZXNQYWlkCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRBrZXlUb3RhbFJvbWVQYWlkCQBkAgUKYW1vdW50Um9tZQkBDXRyeUdldEludGVnZXICBQR0aGlzBRBrZXlUb3RhbFJvbWVQYWlkBQNuaWwBaQERZGlzdHJpYnV0ZVJld2FyZHMBB2FkZHJlc3MDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhxhY2Nlc3Mgb25seSBieSBwcm9qZWN0IG93bmVyCgEIZm9sZEZ1bmMCA2FjYwNXRlMJAGQCCQBkAgUDYWNjCQDwBwIJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB2FkZHJlc3MJANkEAQUDV0ZTAwkAAAIJAQx0cnlHZXRTdHJpbmcCBQxwdXp6bGVNYXJrZXQJAKwCAgkArAICAgRuZnRfBQNXRlMCB19zZWxsZXIFB2FkZHJlc3MAAQAABAhzaGFyZVdGUwoAAiRsBQdXRlNsaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQhmb2xkRnVuYwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgoBCWZvbGRGdW5jQgIDYWNjA0JCQgkAZAIJAGQCBQNhY2MJAPAHAgkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwkA2QQBBQNCQkIDCQAAAgkBDHRyeUdldFN0cmluZwIFDHB1enpsZU1hcmtldAkArAICCQCsAgICBG5mdF8FA0JCQgIHX3NlbGxlcgUHYWRkcmVzcwABAAAECHNoYXJlQkJCCgACJGwFB0JCQmxpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWZvbGRGdW5jQgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgoBCWZvbGRGdW5jQwIDYWNjCVNVUkZib2FyZAkAZAIJAGQCBQNhY2MJAPAHAgkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwkA2QQBBQlTVVJGYm9hcmQDCQAAAgkBDHRyeUdldFN0cmluZwIFDHB1enpsZU1hcmtldAkArAICCQCsAgICBG5mdF8FCVNVUkZib2FyZAIHX3NlbGxlcgUHYWRkcmVzcwABAAAED2Ftb3VudFNVUkZib2FyZAoAAiRsBQ1TVVJGYm9hcmRMaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYyXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlmb2xkRnVuY0MCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjJfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDIwCQEFJGYyXzICCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAQNYW1vdW50QnVybnh0bgkAawMJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwUQa2V5QnVybnh0bkFtb3VudAkAZAIFCHNoYXJlV0ZTCQBoAgUIc2hhcmVCQkIACgkBDXRyeUdldEludGVnZXICBQR0aGlzBRBrZXlUb3RhbE5GVHBvd2VyBA9hbW91bnRXaGlybHBvb2wJAGsDCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMFEmtleVdoaXJscG9vbEFtb3VudAkAZAIFCHNoYXJlV0ZTCQBoAgUIc2hhcmVCQkIACgkBDXRyeUdldEludGVnZXICBQR0aGlzBRBrZXlUb3RhbE5GVHBvd2VyBAthbW91bnRXYXZlcwkAawMJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwUOa2V5V2F2ZXNBbW91bnQJAGQCBQhzaGFyZVdGUwkAaAIFCHNoYXJlQkJCAAoJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwUQa2V5VG90YWxORlRwb3dlcgQKYW1vdW50Um9tZQkAawMJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwUNa2V5Um9tZUFtb3VudAkAZAIFCHNoYXJlV0ZTCQBoAgUIc2hhcmVCQkIACgkBDXRyeUdldEludGVnZXICBQR0aGlzBRBrZXlUb3RhbE5GVHBvd2VyCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB2FkZHJlc3MFDWFtb3VudEJ1cm54dG4FB2J1cm54dG4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwUPYW1vdW50V2hpcmxwb29sBQl3aGlybHBvb2wJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwULYW1vdW50V2F2ZXMFBHVuaXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwUKYW1vdW50Um9tZQUEcm9tZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQdhZGRyZXNzCQBoAgUPYW1vdW50U1VSRmJvYXJkBQJkNgUEc3VyZgUDbmlsAWkBCGJ1cm5TdXJmAAkAzAgCCQEEQnVybgIFBHN1cmYFAmQ2CQDMCAIJAQxJbnRlZ2VyRW50cnkCAhFTVVJGIHRvdGFsIGJ1cm5lZAkAZAIJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwIRU1VSRiB0b3RhbCBidXJuZWQFAmQ2BQNuaWwBaQEIcmVnaXN0ZXIAAwkBCGNvbnRhaW5zAgkBDHRyeUdldFN0cmluZwIFBHRoaXMFFmtleUFkZHJlc3Nlc1JlZ2lzdGVyZWQJAKUIAQgFAWkGY2FsbGVyCQACAQISYWxyZWFkeSByZWdpc3RlcmVkAwkAAAIJAJADAQkAvAkCBQlhZGRyZXNzZXMCASwAHgkAAgECC21heCByZWFjaGVkCQDMCAIJAQtTdHJpbmdFbnRyeQIFFmtleUFkZHJlc3Nlc1JlZ2lzdGVyZWQJAKwCAgkArAICCQEMdHJ5R2V0U3RyaW5nAgUEdGhpcwUWa2V5QWRkcmVzc2VzUmVnaXN0ZXJlZAkApQgBCAUBaQZjYWxsZXICASwFA25pbAFpARByZWdpc3Rlck1hbnVhbGx5AQdhZGRyZXNzAwkBCGNvbnRhaW5zAgkBDHRyeUdldFN0cmluZwIFBHRoaXMFFmtleUFkZHJlc3Nlc1JlZ2lzdGVyZWQFB2FkZHJlc3MJAAIBAhJhbHJlYWR5IHJlZ2lzdGVyZWQDCQAAAgkAkAMBCQC8CQIFCWFkZHJlc3NlcwIBLAAoCQACAQILbWF4IHJlYWNoZWQDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhxhY2Nlc3Mgb25seSBieSBwcm9qZWN0IG93bmVyCQDMCAIJAQtTdHJpbmdFbnRyeQIFFmtleUFkZHJlc3Nlc1JlZ2lzdGVyZWQJAKwCAgkArAICCQEMdHJ5R2V0U3RyaW5nAgUEdGhpcwUWa2V5QWRkcmVzc2VzUmVnaXN0ZXJlZAUHYWRkcmVzcwIBLAUDbmlsAWkBDmNsYWltQnlBbnlib2R5AAMJAGYCCQBkAgkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwIVQWN0aXZhdGVkIGJsb2NraGVpZ2h0CQBoAgAeAKALBQZoZWlnaHQJAAIBCQCsAgICFldhaXQgdGlsbCBibG9ja2hlaWdodDoJAKQDAQkAZAIJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMCFUFjdGl2YXRlZCBibG9ja2hlaWdodAkAaAIAHgCgCwQTcHV6emxlQmFsYW5jZUJlZm9yZQkA8AcCBQR0aGlzBQZwdXp6bGUDCQAAAgUTcHV6emxlQmFsYW5jZUJlZm9yZQUTcHV6emxlQmFsYW5jZUJlZm9yZQQRcm9tZUJhbGFuY2VCZWZvcmUJAPAHAgUEdGhpcwUEcm9tZQMJAAACBRFyb21lQmFsYW5jZUJlZm9yZQURcm9tZUJhbGFuY2VCZWZvcmUEEmNsYWltUHV6emxlU3Rha2luZwkA/AcEBQ1wdXp6bGVTdGFraW5nAgtjbGFpbVJld2FyZAUDbmlsBQNuaWwDCQAAAgUSY2xhaW1QdXp6bGVTdGFraW5nBRJjbGFpbVB1enpsZVN0YWtpbmcECGNsYWltSW52CQD8BwQJAQdBZGRyZXNzAQUHcG9vbEJCQgIRY2xhaW1JbmRleFJld2FyZHMFA25pbAUDbmlsAwkAAAIFCGNsYWltSW52BQhjbGFpbUludgQScHV6emxlQmFsYW5jZUFmdGVyCQDwBwIFBHRoaXMFBnB1enpsZQQQcm9tZUJhbGFuY2VBZnRlcgkA8AcCBQR0aGlzBQRyb21lCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRBrZXlCdXJueHRuQW1vdW50CQDwBwIFBHRoaXMFB2J1cm54dG4JAMwIAgkBDEludGVnZXJFbnRyeQIFDWtleVJvbWVBbW91bnQJAGUCBRByb21lQmFsYW5jZUFmdGVyBRFyb21lQmFsYW5jZUJlZm9yZQkAzAgCCQEMSW50ZWdlckVudHJ5AgUPa2V5UHV6emxlQW1vdW50CQBlAgUScHV6emxlQmFsYW5jZUFmdGVyBRNwdXp6bGVCYWxhbmNlQmVmb3JlCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQ5rZXlXYXZlc0Ftb3VudAMJAGYCCQBlAggJAO8HAQUEdGhpcwlhdmFpbGFibGUFAmQ4AAAJAGUCCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQUCZDgAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgUSa2V5V2hpcmxwb29sQW1vdW50CQDwBwIFBHRoaXMFCXdoaXJscG9vbAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBEGludm9rZXJCeUFueWJvZHkAAwkAZgIJAGQCCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzAhVBY3RpdmF0ZWQgYmxvY2toZWlnaHQJAGgCAB4AoAsFBmhlaWdodAkAAgEJAKwCAgIWV2FpdCB0aWxsIGJsb2NraGVpZ2h0OgkApAMBCQBkAgkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwIVQWN0aXZhdGVkIGJsb2NraGVpZ2h0CQBoAgAeAKALBAVyZXNldAkA/AcEBQR0aGlzAhpkaXN0cmlidXRlUmV3YXJkc0J5QW55Ym9keQUDbmlsBQNuaWwDCQAAAgUFcmVzZXQFBXJlc2V0BARsaXN0CQC8CQIFCWFkZHJlc3NlcwIBLAoBAXICBWFjY3VtB2FkZHJlc3MJAPwHBAUEdGhpcwINY291bnRORlRwb3dlcgkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAQHaW52b2tlcgoAAiRsBQRsaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQFyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA0MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoAwkAAAIFB2ludm9rZXIFB2ludm9rZXIFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARpkaXN0cmlidXRlUmV3YXJkc0J5QW55Ym9keQEHYWRkcmVzcwMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECHGFjY2VzcyBvbmx5IGJ5IHByb2plY3Qgb3duZXIKAQhmb2xkRnVuYwIDYWNjA1dGUwkAZAIJAGQCBQNhY2MJAPAHAgkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwkA2QQBBQNXRlMDCQAAAgkBDHRyeUdldFN0cmluZwIFDHB1enpsZU1hcmtldAkArAICCQCsAgICBG5mdF8FA1dGUwIHX3NlbGxlcgUHYWRkcmVzcwABAAAECHNoYXJlV0ZTCgACJGwFB1dGU2xpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCGZvbGRGdW5jAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCgEJZm9sZEZ1bmNCAgNhY2MDQkJCCQBkAgkAZAIFA2FjYwkA8AcCCQERQGV4dHJOYXRpdmUoMTA2MikBBQdhZGRyZXNzCQDZBAEFA0JCQgMJAAACCQEMdHJ5R2V0U3RyaW5nAgUMcHV6emxlTWFya2V0CQCsAgIJAKwCAgIEbmZ0XwUDQkJCAgdfc2VsbGVyBQdhZGRyZXNzAAEAAAQIc2hhcmVCQkIKAAIkbAUHQkJCbGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJZm9sZEZ1bmNCAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAwkAAAIJAGQCBQhzaGFyZVdGUwUIc2hhcmVCQkIAAAQEbGlzdAkAvAkCBQlhZGRyZXNzZXMCASwECm5vTkZUaW5kZXgJAQV2YWx1ZQEJAM8IAgUEbGlzdAUHYWRkcmVzcwQObGlzdE1pbnVzTm9ORlQJANEIAgUEbGlzdAUKbm9ORlRpbmRleAQNbWludXNOb05GVHN0cgkArAICCQC5CQIFDmxpc3RNaW51c05vTkZUAgEsAgEsCQDMCAIJAQtTdHJpbmdFbnRyeQIFFmtleUFkZHJlc3Nlc1JlZ2lzdGVyZWQFDW1pbnVzTm9ORlRzdHIFA25pbAQNYW1vdW50QnVybnh0bgkAawMJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwUQa2V5QnVybnh0bkFtb3VudAkAZAIFCHNoYXJlV0ZTCQBoAgUIc2hhcmVCQkIACgkBDXRyeUdldEludGVnZXICBQR0aGlzBRBrZXlUb3RhbE5GVHBvd2VyBA9hbW91bnRXaGlybHBvb2wJAGsDCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMFEmtleVdoaXJscG9vbEFtb3VudAkAZAIFCHNoYXJlV0ZTCQBoAgUIc2hhcmVCQkIACgkBDXRyeUdldEludGVnZXICBQR0aGlzBRBrZXlUb3RhbE5GVHBvd2VyBAthbW91bnRXYXZlcwkAawMJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwUOa2V5V2F2ZXNBbW91bnQJAGQCBQhzaGFyZVdGUwkAaAIFCHNoYXJlQkJCAAoJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwUQa2V5VG90YWxORlRwb3dlcgQKYW1vdW50Um9tZQkAawMJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwUNa2V5Um9tZUFtb3VudAkAZAIFCHNoYXJlV0ZTCQBoAgUIc2hhcmVCQkIACgkBDXRyeUdldEludGVnZXICBQR0aGlzBRBrZXlUb3RhbE5GVHBvd2VyBAxhbW91bnRQdXp6bGUJAGsDCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMFD2tleVB1enpsZUFtb3VudAkAZAIFCHNoYXJlV0ZTCQBoAgUIc2hhcmVCQkIACgkBDXRyeUdldEludGVnZXICBQR0aGlzBRBrZXlUb3RhbE5GVHBvd2VyCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB2FkZHJlc3MFDWFtb3VudEJ1cm54dG4FB2J1cm54dG4JAMwIAgkBDEludGVnZXJFbnRyeQIFE2tleVRvdGFsQnVybnh0blBhaWQJAGQCBQ1hbW91bnRCdXJueHRuCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMFE2tleVRvdGFsQnVybnh0blBhaWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwUPYW1vdW50V2hpcmxwb29sBQl3aGlybHBvb2wJAMwIAgkBDEludGVnZXJFbnRyeQIFFWtleVRvdGFsV2hpcmxwb29sUGFpZAkAZAIFD2Ftb3VudFdoaXJscG9vbAkBDXRyeUdldEludGVnZXICBQR0aGlzBRVrZXlUb3RhbFdoaXJscG9vbFBhaWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwULYW1vdW50V2F2ZXMFBHVuaXQJAMwIAgkBDEludGVnZXJFbnRyeQIFEWtleVRvdGFsV2F2ZXNQYWlkCQBkAgULYW1vdW50V2F2ZXMJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwURa2V5VG90YWxXYXZlc1BhaWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwUKYW1vdW50Um9tZQUEcm9tZQkAzAgCCQEMSW50ZWdlckVudHJ5AgUQa2V5VG90YWxSb21lUGFpZAkAZAIFCmFtb3VudFJvbWUJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwUQa2V5VG90YWxSb21lUGFpZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQdhZGRyZXNzBQxhbW91bnRQdXp6bGUFBnB1enpsZQkAzAgCCQEMSW50ZWdlckVudHJ5AgUSa2V5VG90YWxQdXp6bGVQYWlkCQBkAgUMYW1vdW50UHV6emxlCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMFEmtleVRvdGFsUHV6emxlUGFpZAUDbmlsAWkBC2RlbGV0ZUVudHJ5AAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECHGFjY2VzcyBvbmx5IGJ5IHByb2plY3Qgb3duZXIJAMwIAgkBC0RlbGV0ZUVudHJ5AQUWa2V5QWRkcmVzc2VzUmVnaXN0ZXJlZAUDbmlsAWkBCGFkZFdGU2lkAglXRlNudW1iZXIKV0ZTYXNzZXRJZAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECHGFjY2VzcyBvbmx5IGJ5IHByb2plY3Qgb3duZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQlXRlNudW1iZXICAAUKV0ZTYXNzZXRJZAUDbmlsAWkBEmNoYW5nZUludGVnZXJFbnRyeQIJa2V5U3RyaW5nB2ludGVnZXIDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhxhY2Nlc3Mgb25seSBieSBwcm9qZWN0IG93bmVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlrZXlTdHJpbmcFB2ludGVnZXIFA25pbAFpARBjaGVja01hcmtldEVudHJ5AgNCQkIHYWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgIOTkZUcyBvbiBtYXJrZXQDCQAAAgkBEUBleHRyTmF0aXZlKDEwNTMpAgUMcHV6emxlTWFya2V0CQCsAgIJAKwCAgIEbmZ0XwUDQkJCAgdfc2VsbGVyBQdhZGRyZXNzAAEAAAUDbmlsAB1/EOo=",
    "height": 4071596,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 9UjcYHuhePWxMQshwKPHDVWVLbrtchnoZGfTkFrMXc6i
Next: DcJ14mcwHW96wVJ3DwssBZWqCbbsRHp1FT9CNchNFnCs

Diff: 
Old New Differences
27 27  
28 28  let bbbPoolId = base58'3P9VPwVfNj3dDevQZt1Z951A4K57cmQmCgk'
29 29  
30 - let puzzleMarket = Address(base58'3P6fAxtw12pjFhayEfpcUWxgu2BHVCeP78A')
30 + let puzzleMarket = Address(base58'3PATXDVE53rKJtkwXYV3tvuLVS2fDtGtKCc')
31 31  
32 32  let burnxtn = base58'3SjxA2YLdfF9fTRbzLm9xFn27C6MW34W1YsdJ6Axefns'
33 33  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  func tryGetInteger (address,key) = match getInteger(address, key) {
5 5      case b: Int => 
6 6          b
7 7      case _ => 
8 8          0
9 9  }
10 10  
11 11  
12 12  func tryGetString (address,key) = match getString(address, key) {
13 13      case b: String => 
14 14          b
15 15      case _ => 
16 16          ""
17 17  }
18 18  
19 19  
20 20  let d8 = 100000000
21 21  
22 22  let d6 = 1000000
23 23  
24 24  let poolBBB = base58'3P9VPwVfNj3dDevQZt1Z951A4K57cmQmCgk'
25 25  
26 26  let puzzleStaking = Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS')
27 27  
28 28  let bbbPoolId = base58'3P9VPwVfNj3dDevQZt1Z951A4K57cmQmCgk'
29 29  
30 - let puzzleMarket = Address(base58'3P6fAxtw12pjFhayEfpcUWxgu2BHVCeP78A')
30 + let puzzleMarket = Address(base58'3PATXDVE53rKJtkwXYV3tvuLVS2fDtGtKCc')
31 31  
32 32  let burnxtn = base58'3SjxA2YLdfF9fTRbzLm9xFn27C6MW34W1YsdJ6Axefns'
33 33  
34 34  let whirlpool = base58'73tY3E6Gd5AWYmsuq8m8Kek7KnJNAYyS3GoveTbc6jCi'
35 35  
36 36  let puzzle = base58'HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS'
37 37  
38 38  let rome = base58'AP4Cb5xLYGH6ZigHreCZHoXpQTWDkPsG2BHqfDUx6taJ'
39 39  
40 40  let surf = base58'At8D6NFFpheCbvKVnjVoeLL84Eo8NZn6ovManxfLaFWL'
41 41  
42 42  let puzzleStaked = tryGetInteger(puzzleStaking, (toString(this) + "_staked"))
43 43  
44 44  let puzzleInPool = tryGetInteger(Address(bbbPoolId), (("global_" + toBase58String(puzzle)) + "_balance"))
45 45  
46 46  let projectStake = tryGetInteger(Address(bbbPoolId), (toString(this) + "_indexStaked"))
47 47  
48 48  let totalStake = tryGetInteger(Address(bbbPoolId), "global_poolToken_amount")
49 49  
50 50  let assetWeight = tryGetInteger(Address(bbbPoolId), (("static_" + toBase58String(puzzle)) + "_weight"))
51 51  
52 52  let BBBlpInPuzzle = fraction(((puzzleInPool / assetWeight) * 10000), projectStake, totalStake)
53 53  
54 54  let keyAddressesRegistered = "Addresses registered"
55 55  
56 56  let addresses = dropRight(tryGetString(this, keyAddressesRegistered), 1)
57 57  
58 58  let keyBurnxtnAmount = "BURN-XTN total rewards"
59 59  
60 60  let keyRomeAmount = "ROME total rewards"
61 61  
62 62  let keyPuzzleAmount = "PUZZLE total rewards"
63 63  
64 64  let keyWavesAmount = "WAVES total rewards"
65 65  
66 66  let keyWhirlpoolAmount = "WHIRLPOOL total rewards"
67 67  
68 68  let keyTotalNFTpower = "Total NFT power"
69 69  
70 70  let keyTotalPuzzleValue = "Total puzzle value"
71 71  
72 72  let keyTotalBurnxtnPaid = "Total BURN-XTN paid"
73 73  
74 74  let keyTotalWhirlpoolPaid = "Total WHIRLPOOL paid"
75 75  
76 76  let keyTotalRomePaid = "Total ROME paid"
77 77  
78 78  let keyTotalWavesPaid = "Total WAVES paid"
79 79  
80 80  let keyTotalPuzzlePaid = "Total PUZZLE paid"
81 81  
82 82  let WFSlist = ["Gnpy5nVajPP3XQQVxrHboMAsXtjnyWAxybMDdKrbr8sD", "BT9Q4mQdQQmei2r5YNMBMasZBQj7myNaiz6QHba5cPXS", "BMvkyFtPVmFatpFR9QVFKR5MYTcZVTY2VUwFZ25vrAAc", "77Rqu8TLjBdMtDuXd9o5fUSGo64zQe5FCcao5L8Ht9j8", "8KnhBLV49SDJzq1SSy1YvGHYY6m7Q146bV7Q6GKqQb5C", "FFxsUfKbHEW4zZywLUL55ip8Nqp6fcWDsq7y3an9yQhe", "5nQRedGHoVpEQasMQivb1UMvFBCHXefXPXtURbMMnfsu", "6N3MSFtJGvT79ucX4pLftxP7fGs8DnmYdPedvnoNbVt9", "dFC2iJL4LDWasq9YzHf2kWfPNP69Tyamii93ns9BHvM", "A158T7yZLtmuiMEs21P9jV2ftbMXzy3MnfHMEu1eMAGK"]
83 83  
84 84  let BBBlist = ["9pCxoGtD18GeH9gCemzqrjHMMjfyBQDfsrRAuxSRagMc", "7DgFgCkBjVDc5P9ZgwsVL9SiTi7kXJuS4aRVgb7ZHW3k", "76bTvE8ttHvsuN1FuH4Kc8QUW4kL4m8c1cjfsXy2GfbV", "4Zrf4H5tiFcQL8eQmnA2wJ1XWPEBH6h1G2MefZDYmcCB", "2DtC4nFnxz5UM6mbjPwMVZpQWZFUqxs52oZrBeNRk9Ao", "DjZGMAFfoQWkMW3S5FTsQN3joncZt6BsmhnEK3ggLxmN", "BneaZXD6ovDJcV5rgfr8hsHZaMQsJQ8DH6a5gTnGCpBc", "4EKfgzFkd5UGKrjnaJV3w7argW1YmF4hq54xWQFzAXb9", "8hGDkWKiu2igDpWT3Hpr4mchDD6xwJ9hGm2h2jnUvTqz", "E3ZnSejpXL1Xr6VG4QoLh8xod9NMgpPe473r9Qk2HibL"]
85 85  
86 86  let SURFboardList = ["DzLSgEaBB4UNbPCZekPSzbQ85KokMB7d1KRRmzUPu5hs", "WmWzsbb3PNvzJ4w4Fb73KcoNGLXumgYZagV22zEiX1w", "7RrxbgayUksPHrA799pKuCr61reT8nENdqCkgVHPgaN2", "FmDLfzspbVJeKhKduLDUba2HoVdRrKtswDKMU3e9qjtP", "HmQvVyQdEjafLrpKPSigdafvcYvLbNYGEgVCxLZRWt1y", "2rVxNMXuvug74TorLQZGC2ERHjAbJnVUgNXQ1kJmtnAe", "9yb9yGJm6gzVozBHuQVHBdAnzfct3N9bRpdjjNUnrzcC", "s1SfGVshf2jKCA9KvvKKvUuK8utp3Ne3ee8Lp6KKLRw", "3E3yb7TvDK762dn11dmRLwapghaefQUEyunVdXSNp4tB", "FH75TvApyVtfd9X5a1Ar19Ns9DNJvzpzLFE5pjh1wi4h", "EgqkbDyWRPgVNVqtEEtRSzWcGD33orVoE2bzYdAdieQS", "DsKyJpJCZcFv9jSnQbQVG4Jx3WSP1KtfHhAKTkSKrVBj", "AesPr5UFDgY5jZXYUZ8JkbYtJovVdDHby15SCksEhmJK", "AVsfdqw2m5aUNxa1HY9emLmCLBfVAGTxVu4ef3xEDKC8", "5jdvSSY2K7h8UiUCXUgK9T7zfMryqw2itKP8BysdXDDk", "A4voKZes8MVDAXyQjKkb6bdEcqMbvB4ptzbpqYqveG5n", "34oZKaWHpSJrZvGLdYu5WG8WWXg7rwF2HHx8K15GfUCQ", "77McCHkmNrRM4DjqkSM9B8YjuJcKtn67jQge1pzZrQ8T", "7NEFBnvGGMfYdBnhMLNpuVgS22LpcgXCZgHfm8DHmmiA", "GoF9yokxHgPNoxoWgjjdmGeWhcLYArSsxqffRtfYGtfs"]
87 87  
88 88  @Callable(i)
89 89  func invokeClI1 () = if ((i.caller != this))
90 90      then throw("access only by project owner")
91 91      else {
92 92          let cl = invoke(this, "claimInvestPuzzle", nil, nil)
93 93          if ((cl == cl))
94 94              then {
95 95                  let i1 = invoke(this, "invoker1", nil, nil)
96 96                  if ((i1 == i1))
97 97                      then nil
98 98                      else throw("Strict value is not equal to itself.")
99 99                  }
100 100              else throw("Strict value is not equal to itself.")
101 101          }
102 102  
103 103  
104 104  
105 105  @Callable(i)
106 106  func claimInvestPuzzle () = if ((i.caller != this))
107 107      then throw("access only by project owner")
108 108      else {
109 109          let romeBalanceBefore = assetBalance(this, rome)
110 110          if ((romeBalanceBefore == romeBalanceBefore))
111 111              then {
112 112                  let claimPuzzleStaking = invoke(puzzleStaking, "claimReward", nil, nil)
113 113                  if ((claimPuzzleStaking == claimPuzzleStaking))
114 114                      then {
115 115                          let poolOneTokenInv = invoke(Address(base58'3PR1Qvi9mHT35SwWEkLSqqE2L8thiPLdVWU'), "generateIndexWithOneTokenAndStake", [toBase58String(poolBBB)], [AttachedPayment(puzzle, assetBalance(this, puzzle))])
116 116                          if ((poolOneTokenInv == poolOneTokenInv))
117 117                              then {
118 118                                  let romeBalanceAfter = assetBalance(this, rome)
119 119  [IntegerEntry("Activated blockheight", height), IntegerEntry(keyBurnxtnAmount, assetBalance(this, burnxtn)), IntegerEntry(keyRomeAmount, (romeBalanceAfter - romeBalanceBefore)), IntegerEntry(keyWavesAmount, if (((wavesBalance(this).available - d8) > 0))
120 120                                      then (wavesBalance(this).available - d8)
121 121                                      else 0), IntegerEntry(keyWhirlpoolAmount, assetBalance(this, whirlpool))]
122 122                                  }
123 123                              else throw("Strict value is not equal to itself.")
124 124                          }
125 125                      else throw("Strict value is not equal to itself.")
126 126                  }
127 127              else throw("Strict value is not equal to itself.")
128 128          }
129 129  
130 130  
131 131  
132 132  @Callable(i)
133 133  func invoker1 () = {
134 134      let reset = invoke(this, "resetCount", nil, nil)
135 135      if ((reset == reset))
136 136          then {
137 137              let list = split_4C(addresses, ",")
138 138              func r (accum,address) =             invoke(this, "countNFTpower", [address], nil)
139 139  
140 140              let invoker = {
141 141                  let $l = list
142 142                  let $s = size($l)
143 143                  let $acc0 = nil
144 144                  func $f0_1 ($a,$i) =                 if (($i >= $s))
145 145                      then $a
146 146                      else r($a, $l[$i])
147 147  
148 148                  func $f0_2 ($a,$i) =                 if (($i >= $s))
149 149                      then $a
150 150                      else throw("List size exceeds 30")
151 151  
152 152                  $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30)
153 153                  }
154 154              if ((invoker == invoker))
155 155                  then {
156 156                      let p = invoke(this, "data", nil, nil)
157 157                      if ((p == p))
158 158                          then [IntegerEntry("WFS puzzle value", fraction(fraction(tryGetInteger(this, keyTotalPuzzleValue), 1, tryGetInteger(this, keyTotalNFTpower)), 10, 9)), IntegerEntry("BBB puzzle value", fraction(fraction(tryGetInteger(this, keyTotalPuzzleValue), 10, tryGetInteger(this, keyTotalNFTpower)), 10, 9))]
159 159                          else throw("Strict value is not equal to itself.")
160 160                      }
161 161                  else throw("Strict value is not equal to itself.")
162 162              }
163 163          else throw("Strict value is not equal to itself.")
164 164      }
165 165  
166 166  
167 167  
168 168  @Callable(i)
169 169  func resetCount () = [IntegerEntry(keyTotalNFTpower, 0)]
170 170  
171 171  
172 172  
173 173  @Callable(i)
174 174  func countNFTpower (address) = {
175 175      func foldFunc (acc,WFS) =     ((acc + assetBalance(addressFromStringValue(address), fromBase58String(WFS))) + (if ((tryGetString(puzzleMarket, (("nft_" + WFS) + "_seller")) == address))
176 176          then 1
177 177          else 0))
178 178  
179 179      let shareWFS = {
180 180          let $l = WFSlist
181 181          let $s = size($l)
182 182          let $acc0 = 0
183 183          func $f0_1 ($a,$i) =         if (($i >= $s))
184 184              then $a
185 185              else foldFunc($a, $l[$i])
186 186  
187 187          func $f0_2 ($a,$i) =         if (($i >= $s))
188 188              then $a
189 189              else throw("List size exceeds 10")
190 190  
191 191          $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)
192 192          }
193 193      func foldFuncB (acc,BBB) =     ((acc + assetBalance(addressFromStringValue(address), fromBase58String(BBB))) + (if ((tryGetString(puzzleMarket, (("nft_" + BBB) + "_seller")) == address))
194 194          then 1
195 195          else 0))
196 196  
197 197      let shareBBB = {
198 198          let $l = BBBlist
199 199          let $s = size($l)
200 200          let $acc0 = 0
201 201          func $f1_1 ($a,$i) =         if (($i >= $s))
202 202              then $a
203 203              else foldFuncB($a, $l[$i])
204 204  
205 205          func $f1_2 ($a,$i) =         if (($i >= $s))
206 206              then $a
207 207              else throw("List size exceeds 10")
208 208  
209 209          $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
210 210          }
211 211      if (((shareWFS + shareBBB) == 0))
212 212          then {
213 213              let list = split_4C(addresses, ",")
214 214              let noNFTindex = value(indexOf(list, address))
215 215              let listMinusNoNFT = removeByIndex(list, noNFTindex)
216 216              let minusNoNFTstr = (makeString(listMinusNoNFT, ",") + ",")
217 217  [StringEntry(keyAddressesRegistered, minusNoNFTstr)]
218 218              }
219 219          else [IntegerEntry((address + "_WFS"), shareWFS), IntegerEntry((address + "_BBB"), (shareBBB * 10)), IntegerEntry(keyTotalNFTpower, (tryGetInteger(this, keyTotalNFTpower) + (shareWFS + (shareBBB * 10))))]
220 220      }
221 221  
222 222  
223 223  
224 224  @Callable(i)
225 225  func data () = [IntegerEntry("puzzle balance", assetBalance(this, puzzle)), IntegerEntry("puzzle staked", puzzleStaked), IntegerEntry("puzzle BBB LP", BBBlpInPuzzle), IntegerEntry(keyTotalPuzzleValue, ((assetBalance(this, puzzle) + puzzleStaked) + BBBlpInPuzzle))]
226 226  
227 227  
228 228  
229 229  @Callable(i)
230 230  func invoker2 () = if ((i.caller != this))
231 231      then throw("access only by project owner")
232 232      else {
233 233          let t = invoke(this, "trackTotalPaid", nil, nil)
234 234          if ((t == t))
235 235              then {
236 236                  let list = split_4C(addresses, ",")
237 237                  func r (accum,address) =                 invoke(this, "distributeRewards", [address], nil)
238 238  
239 239                  let invoker = {
240 240                      let $l = list
241 241                      let $s = size($l)
242 242                      let $acc0 = nil
243 243                      func $f0_1 ($a,$i) =                     if (($i >= $s))
244 244                          then $a
245 245                          else r($a, $l[$i])
246 246  
247 247                      func $f0_2 ($a,$i) =                     if (($i >= $s))
248 248                          then $a
249 249                          else throw("List size exceeds 20")
250 250  
251 251                      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
252 252                      }
253 253                  if ((invoker == invoker))
254 254                      then {
255 255                          let bs = invoke(this, "burnSurf", nil, nil)
256 256                          if ((bs == bs))
257 257                              then nil
258 258                              else throw("Strict value is not equal to itself.")
259 259                          }
260 260                      else throw("Strict value is not equal to itself.")
261 261                  }
262 262              else throw("Strict value is not equal to itself.")
263 263          }
264 264  
265 265  
266 266  
267 267  @Callable(i)
268 268  func trackTotalPaid () = {
269 269      let amountBurnxtn = tryGetInteger(this, keyBurnxtnAmount)
270 270      let amountWhirlpool = tryGetInteger(this, keyWhirlpoolAmount)
271 271      let amountWaves = tryGetInteger(this, keyWavesAmount)
272 272      let amountRome = tryGetInteger(this, keyRomeAmount)
273 273  [IntegerEntry(keyTotalBurnxtnPaid, (amountBurnxtn + tryGetInteger(this, keyTotalBurnxtnPaid))), IntegerEntry(keyTotalWhirlpoolPaid, (amountWhirlpool + tryGetInteger(this, keyTotalWhirlpoolPaid))), IntegerEntry(keyTotalWavesPaid, (amountWaves + tryGetInteger(this, keyTotalWavesPaid))), IntegerEntry(keyTotalRomePaid, (amountRome + tryGetInteger(this, keyTotalRomePaid)))]
274 274      }
275 275  
276 276  
277 277  
278 278  @Callable(i)
279 279  func distributeRewards (address) = if ((i.caller != this))
280 280      then throw("access only by project owner")
281 281      else {
282 282          func foldFunc (acc,WFS) =         ((acc + assetBalance(addressFromStringValue(address), fromBase58String(WFS))) + (if ((tryGetString(puzzleMarket, (("nft_" + WFS) + "_seller")) == address))
283 283              then 1
284 284              else 0))
285 285  
286 286          let shareWFS = {
287 287              let $l = WFSlist
288 288              let $s = size($l)
289 289              let $acc0 = 0
290 290              func $f0_1 ($a,$i) =             if (($i >= $s))
291 291                  then $a
292 292                  else foldFunc($a, $l[$i])
293 293  
294 294              func $f0_2 ($a,$i) =             if (($i >= $s))
295 295                  then $a
296 296                  else throw("List size exceeds 10")
297 297  
298 298              $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)
299 299              }
300 300          func foldFuncB (acc,BBB) =         ((acc + assetBalance(addressFromStringValue(address), fromBase58String(BBB))) + (if ((tryGetString(puzzleMarket, (("nft_" + BBB) + "_seller")) == address))
301 301              then 1
302 302              else 0))
303 303  
304 304          let shareBBB = {
305 305              let $l = BBBlist
306 306              let $s = size($l)
307 307              let $acc0 = 0
308 308              func $f1_1 ($a,$i) =             if (($i >= $s))
309 309                  then $a
310 310                  else foldFuncB($a, $l[$i])
311 311  
312 312              func $f1_2 ($a,$i) =             if (($i >= $s))
313 313                  then $a
314 314                  else throw("List size exceeds 10")
315 315  
316 316              $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
317 317              }
318 318          func foldFuncC (acc,SURFboard) =         ((acc + assetBalance(addressFromStringValue(address), fromBase58String(SURFboard))) + (if ((tryGetString(puzzleMarket, (("nft_" + SURFboard) + "_seller")) == address))
319 319              then 1
320 320              else 0))
321 321  
322 322          let amountSURFboard = {
323 323              let $l = SURFboardList
324 324              let $s = size($l)
325 325              let $acc0 = 0
326 326              func $f2_1 ($a,$i) =             if (($i >= $s))
327 327                  then $a
328 328                  else foldFuncC($a, $l[$i])
329 329  
330 330              func $f2_2 ($a,$i) =             if (($i >= $s))
331 331                  then $a
332 332                  else throw("List size exceeds 20")
333 333  
334 334              $f2_2($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
335 335              }
336 336          let amountBurnxtn = fraction(tryGetInteger(this, keyBurnxtnAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
337 337          let amountWhirlpool = fraction(tryGetInteger(this, keyWhirlpoolAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
338 338          let amountWaves = fraction(tryGetInteger(this, keyWavesAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
339 339          let amountRome = fraction(tryGetInteger(this, keyRomeAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
340 340  [ScriptTransfer(addressFromStringValue(address), amountBurnxtn, burnxtn), ScriptTransfer(addressFromStringValue(address), amountWhirlpool, whirlpool), ScriptTransfer(addressFromStringValue(address), amountWaves, unit), ScriptTransfer(addressFromStringValue(address), amountRome, rome), ScriptTransfer(addressFromStringValue(address), (amountSURFboard * d6), surf)]
341 341          }
342 342  
343 343  
344 344  
345 345  @Callable(i)
346 346  func burnSurf () = [Burn(surf, d6), IntegerEntry("SURF total burned", (tryGetInteger(this, "SURF total burned") + d6))]
347 347  
348 348  
349 349  
350 350  @Callable(i)
351 351  func register () = if (contains(tryGetString(this, keyAddressesRegistered), toString(i.caller)))
352 352      then throw("already registered")
353 353      else if ((size(split_4C(addresses, ",")) == 30))
354 354          then throw("max reached")
355 355          else [StringEntry(keyAddressesRegistered, ((tryGetString(this, keyAddressesRegistered) + toString(i.caller)) + ","))]
356 356  
357 357  
358 358  
359 359  @Callable(i)
360 360  func registerManually (address) = if (contains(tryGetString(this, keyAddressesRegistered), address))
361 361      then throw("already registered")
362 362      else if ((size(split_4C(addresses, ",")) == 40))
363 363          then throw("max reached")
364 364          else if ((i.caller != this))
365 365              then throw("access only by project owner")
366 366              else [StringEntry(keyAddressesRegistered, ((tryGetString(this, keyAddressesRegistered) + address) + ","))]
367 367  
368 368  
369 369  
370 370  @Callable(i)
371 371  func claimByAnybody () = if (((getIntegerValue(this, "Activated blockheight") + (30 * 1440)) > height))
372 372      then throw(("Wait till blockheight:" + toString((getIntegerValue(this, "Activated blockheight") + (30 * 1440)))))
373 373      else {
374 374          let puzzleBalanceBefore = assetBalance(this, puzzle)
375 375          if ((puzzleBalanceBefore == puzzleBalanceBefore))
376 376              then {
377 377                  let romeBalanceBefore = assetBalance(this, rome)
378 378                  if ((romeBalanceBefore == romeBalanceBefore))
379 379                      then {
380 380                          let claimPuzzleStaking = invoke(puzzleStaking, "claimReward", nil, nil)
381 381                          if ((claimPuzzleStaking == claimPuzzleStaking))
382 382                              then {
383 383                                  let claimInv = invoke(Address(poolBBB), "claimIndexRewards", nil, nil)
384 384                                  if ((claimInv == claimInv))
385 385                                      then {
386 386                                          let puzzleBalanceAfter = assetBalance(this, puzzle)
387 387                                          let romeBalanceAfter = assetBalance(this, rome)
388 388  [IntegerEntry(keyBurnxtnAmount, assetBalance(this, burnxtn)), IntegerEntry(keyRomeAmount, (romeBalanceAfter - romeBalanceBefore)), IntegerEntry(keyPuzzleAmount, (puzzleBalanceAfter - puzzleBalanceBefore)), IntegerEntry(keyWavesAmount, if (((wavesBalance(this).available - d8) > 0))
389 389                                              then (wavesBalance(this).available - d8)
390 390                                              else 0), IntegerEntry(keyWhirlpoolAmount, assetBalance(this, whirlpool))]
391 391                                          }
392 392                                      else throw("Strict value is not equal to itself.")
393 393                                  }
394 394                              else throw("Strict value is not equal to itself.")
395 395                          }
396 396                      else throw("Strict value is not equal to itself.")
397 397                  }
398 398              else throw("Strict value is not equal to itself.")
399 399          }
400 400  
401 401  
402 402  
403 403  @Callable(i)
404 404  func invokerByAnybody () = if (((getIntegerValue(this, "Activated blockheight") + (30 * 1440)) > height))
405 405      then throw(("Wait till blockheight:" + toString((getIntegerValue(this, "Activated blockheight") + (30 * 1440)))))
406 406      else {
407 407          let reset = invoke(this, "distributeRewardsByAnybody", nil, nil)
408 408          if ((reset == reset))
409 409              then {
410 410                  let list = split_4C(addresses, ",")
411 411                  func r (accum,address) =                 invoke(this, "countNFTpower", [address], nil)
412 412  
413 413                  let invoker = {
414 414                      let $l = list
415 415                      let $s = size($l)
416 416                      let $acc0 = nil
417 417                      func $f0_1 ($a,$i) =                     if (($i >= $s))
418 418                          then $a
419 419                          else r($a, $l[$i])
420 420  
421 421                      func $f0_2 ($a,$i) =                     if (($i >= $s))
422 422                          then $a
423 423                          else throw("List size exceeds 40")
424 424  
425 425                      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40)
426 426                      }
427 427                  if ((invoker == invoker))
428 428                      then nil
429 429                      else throw("Strict value is not equal to itself.")
430 430                  }
431 431              else throw("Strict value is not equal to itself.")
432 432          }
433 433  
434 434  
435 435  
436 436  @Callable(i)
437 437  func distributeRewardsByAnybody (address) = if ((i.caller != this))
438 438      then throw("access only by project owner")
439 439      else {
440 440          func foldFunc (acc,WFS) =         ((acc + assetBalance(addressFromStringValue(address), fromBase58String(WFS))) + (if ((tryGetString(puzzleMarket, (("nft_" + WFS) + "_seller")) == address))
441 441              then 1
442 442              else 0))
443 443  
444 444          let shareWFS = {
445 445              let $l = WFSlist
446 446              let $s = size($l)
447 447              let $acc0 = 0
448 448              func $f0_1 ($a,$i) =             if (($i >= $s))
449 449                  then $a
450 450                  else foldFunc($a, $l[$i])
451 451  
452 452              func $f0_2 ($a,$i) =             if (($i >= $s))
453 453                  then $a
454 454                  else throw("List size exceeds 10")
455 455  
456 456              $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)
457 457              }
458 458          func foldFuncB (acc,BBB) =         ((acc + assetBalance(addressFromStringValue(address), fromBase58String(BBB))) + (if ((tryGetString(puzzleMarket, (("nft_" + BBB) + "_seller")) == address))
459 459              then 1
460 460              else 0))
461 461  
462 462          let shareBBB = {
463 463              let $l = BBBlist
464 464              let $s = size($l)
465 465              let $acc0 = 0
466 466              func $f1_1 ($a,$i) =             if (($i >= $s))
467 467                  then $a
468 468                  else foldFuncB($a, $l[$i])
469 469  
470 470              func $f1_2 ($a,$i) =             if (($i >= $s))
471 471                  then $a
472 472                  else throw("List size exceeds 10")
473 473  
474 474              $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
475 475              }
476 476          if (((shareWFS + shareBBB) == 0))
477 477              then {
478 478                  let list = split_4C(addresses, ",")
479 479                  let noNFTindex = value(indexOf(list, address))
480 480                  let listMinusNoNFT = removeByIndex(list, noNFTindex)
481 481                  let minusNoNFTstr = (makeString(listMinusNoNFT, ",") + ",")
482 482  [StringEntry(keyAddressesRegistered, minusNoNFTstr)]
483 483                  }
484 484              else {
485 485                  let amountBurnxtn = fraction(tryGetInteger(this, keyBurnxtnAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
486 486                  let amountWhirlpool = fraction(tryGetInteger(this, keyWhirlpoolAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
487 487                  let amountWaves = fraction(tryGetInteger(this, keyWavesAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
488 488                  let amountRome = fraction(tryGetInteger(this, keyRomeAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
489 489                  let amountPuzzle = fraction(tryGetInteger(this, keyPuzzleAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
490 490  [ScriptTransfer(addressFromStringValue(address), amountBurnxtn, burnxtn), IntegerEntry(keyTotalBurnxtnPaid, (amountBurnxtn + tryGetInteger(this, keyTotalBurnxtnPaid))), ScriptTransfer(addressFromStringValue(address), amountWhirlpool, whirlpool), IntegerEntry(keyTotalWhirlpoolPaid, (amountWhirlpool + tryGetInteger(this, keyTotalWhirlpoolPaid))), ScriptTransfer(addressFromStringValue(address), amountWaves, unit), IntegerEntry(keyTotalWavesPaid, (amountWaves + tryGetInteger(this, keyTotalWavesPaid))), ScriptTransfer(addressFromStringValue(address), amountRome, rome), IntegerEntry(keyTotalRomePaid, (amountRome + tryGetInteger(this, keyTotalRomePaid))), ScriptTransfer(addressFromStringValue(address), amountPuzzle, puzzle), IntegerEntry(keyTotalPuzzlePaid, (amountPuzzle + tryGetInteger(this, keyTotalPuzzlePaid)))]
491 491                  }
492 492          }
493 493  
494 494  
495 495  
496 496  @Callable(i)
497 497  func deleteEntry () = if ((i.caller != this))
498 498      then throw("access only by project owner")
499 499      else [DeleteEntry(keyAddressesRegistered)]
500 500  
501 501  
502 502  
503 503  @Callable(i)
504 504  func addWFSid (WFSnumber,WFSassetId) = if ((i.caller != this))
505 505      then throw("access only by project owner")
506 506      else [StringEntry((WFSnumber + ""), WFSassetId)]
507 507  
508 508  
509 509  
510 510  @Callable(i)
511 511  func changeIntegerEntry (keyString,integer) = if ((i.caller != this))
512 512      then throw("access only by project owner")
513 513      else [IntegerEntry(keyString, integer)]
514 514  
515 515  
516 516  
517 517  @Callable(i)
518 518  func checkMarketEntry (BBB,address) = [IntegerEntry("NFTs on market", if ((getStringValue(puzzleMarket, (("nft_" + BBB) + "_seller")) == address))
519 519      then 1
520 520      else 0)]
521 521  
522 522

Old	New		Differences
27	27
28	28		let bbbPoolId = base58'3P9VPwVfNj3dDevQZt1Z951A4K57cmQmCgk'
29	29
30		-	let puzzleMarket = Address(base58'~~3P6fAxtw12pjFhayEfpcUWxgu2BHVCeP78A~~')
	30	+	let puzzleMarket = Address(base58'3PATXDVE53rKJtkwXYV3tvuLVS2fDtGtKCc')
31	31
32	32		let burnxtn = base58'3SjxA2YLdfF9fTRbzLm9xFn27C6MW34W1YsdJ6Axefns'
33	33

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		func tryGetInteger (address,key) = match getInteger(address, key) {
5	5		case b: Int =>
6	6		b
7	7		case _ =>
8	8		0
9	9		}
10	10
11	11
12	12		func tryGetString (address,key) = match getString(address, key) {
13	13		case b: String =>
14	14		b
15	15		case _ =>
16	16		""
17	17		}
18	18
19	19
20	20		let d8 = 100000000
21	21
22	22		let d6 = 1000000
23	23
24	24		let poolBBB = base58'3P9VPwVfNj3dDevQZt1Z951A4K57cmQmCgk'
25	25
26	26		let puzzleStaking = Address(base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS')
27	27
28	28		let bbbPoolId = base58'3P9VPwVfNj3dDevQZt1Z951A4K57cmQmCgk'
29	29
30		-	let puzzleMarket = Address(base58'~~3P6fAxtw12pjFhayEfpcUWxgu2BHVCeP78A~~')
	30	+	let puzzleMarket = Address(base58'3PATXDVE53rKJtkwXYV3tvuLVS2fDtGtKCc')
31	31
32	32		let burnxtn = base58'3SjxA2YLdfF9fTRbzLm9xFn27C6MW34W1YsdJ6Axefns'
33	33
34	34		let whirlpool = base58'73tY3E6Gd5AWYmsuq8m8Kek7KnJNAYyS3GoveTbc6jCi'
35	35
36	36		let puzzle = base58'HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS'
37	37
38	38		let rome = base58'AP4Cb5xLYGH6ZigHreCZHoXpQTWDkPsG2BHqfDUx6taJ'
39	39
40	40		let surf = base58'At8D6NFFpheCbvKVnjVoeLL84Eo8NZn6ovManxfLaFWL'
41	41
42	42		let puzzleStaked = tryGetInteger(puzzleStaking, (toString(this) + "_staked"))
43	43
44	44		let puzzleInPool = tryGetInteger(Address(bbbPoolId), (("global_" + toBase58String(puzzle)) + "_balance"))
45	45
46	46		let projectStake = tryGetInteger(Address(bbbPoolId), (toString(this) + "_indexStaked"))
47	47
48	48		let totalStake = tryGetInteger(Address(bbbPoolId), "global_poolToken_amount")
49	49
50	50		let assetWeight = tryGetInteger(Address(bbbPoolId), (("static_" + toBase58String(puzzle)) + "_weight"))
51	51
52	52		let BBBlpInPuzzle = fraction(((puzzleInPool / assetWeight) * 10000), projectStake, totalStake)
53	53
54	54		let keyAddressesRegistered = "Addresses registered"
55	55
56	56		let addresses = dropRight(tryGetString(this, keyAddressesRegistered), 1)
57	57
58	58		let keyBurnxtnAmount = "BURN-XTN total rewards"
59	59
60	60		let keyRomeAmount = "ROME total rewards"
61	61
62	62		let keyPuzzleAmount = "PUZZLE total rewards"
63	63
64	64		let keyWavesAmount = "WAVES total rewards"
65	65
66	66		let keyWhirlpoolAmount = "WHIRLPOOL total rewards"
67	67
68	68		let keyTotalNFTpower = "Total NFT power"
69	69
70	70		let keyTotalPuzzleValue = "Total puzzle value"
71	71
72	72		let keyTotalBurnxtnPaid = "Total BURN-XTN paid"
73	73
74	74		let keyTotalWhirlpoolPaid = "Total WHIRLPOOL paid"
75	75
76	76		let keyTotalRomePaid = "Total ROME paid"
77	77
78	78		let keyTotalWavesPaid = "Total WAVES paid"
79	79
80	80		let keyTotalPuzzlePaid = "Total PUZZLE paid"
81	81
82	82		let WFSlist = ["Gnpy5nVajPP3XQQVxrHboMAsXtjnyWAxybMDdKrbr8sD", "BT9Q4mQdQQmei2r5YNMBMasZBQj7myNaiz6QHba5cPXS", "BMvkyFtPVmFatpFR9QVFKR5MYTcZVTY2VUwFZ25vrAAc", "77Rqu8TLjBdMtDuXd9o5fUSGo64zQe5FCcao5L8Ht9j8", "8KnhBLV49SDJzq1SSy1YvGHYY6m7Q146bV7Q6GKqQb5C", "FFxsUfKbHEW4zZywLUL55ip8Nqp6fcWDsq7y3an9yQhe", "5nQRedGHoVpEQasMQivb1UMvFBCHXefXPXtURbMMnfsu", "6N3MSFtJGvT79ucX4pLftxP7fGs8DnmYdPedvnoNbVt9", "dFC2iJL4LDWasq9YzHf2kWfPNP69Tyamii93ns9BHvM", "A158T7yZLtmuiMEs21P9jV2ftbMXzy3MnfHMEu1eMAGK"]
83	83
84	84		let BBBlist = ["9pCxoGtD18GeH9gCemzqrjHMMjfyBQDfsrRAuxSRagMc", "7DgFgCkBjVDc5P9ZgwsVL9SiTi7kXJuS4aRVgb7ZHW3k", "76bTvE8ttHvsuN1FuH4Kc8QUW4kL4m8c1cjfsXy2GfbV", "4Zrf4H5tiFcQL8eQmnA2wJ1XWPEBH6h1G2MefZDYmcCB", "2DtC4nFnxz5UM6mbjPwMVZpQWZFUqxs52oZrBeNRk9Ao", "DjZGMAFfoQWkMW3S5FTsQN3joncZt6BsmhnEK3ggLxmN", "BneaZXD6ovDJcV5rgfr8hsHZaMQsJQ8DH6a5gTnGCpBc", "4EKfgzFkd5UGKrjnaJV3w7argW1YmF4hq54xWQFzAXb9", "8hGDkWKiu2igDpWT3Hpr4mchDD6xwJ9hGm2h2jnUvTqz", "E3ZnSejpXL1Xr6VG4QoLh8xod9NMgpPe473r9Qk2HibL"]
85	85
86	86		let SURFboardList = ["DzLSgEaBB4UNbPCZekPSzbQ85KokMB7d1KRRmzUPu5hs", "WmWzsbb3PNvzJ4w4Fb73KcoNGLXumgYZagV22zEiX1w", "7RrxbgayUksPHrA799pKuCr61reT8nENdqCkgVHPgaN2", "FmDLfzspbVJeKhKduLDUba2HoVdRrKtswDKMU3e9qjtP", "HmQvVyQdEjafLrpKPSigdafvcYvLbNYGEgVCxLZRWt1y", "2rVxNMXuvug74TorLQZGC2ERHjAbJnVUgNXQ1kJmtnAe", "9yb9yGJm6gzVozBHuQVHBdAnzfct3N9bRpdjjNUnrzcC", "s1SfGVshf2jKCA9KvvKKvUuK8utp3Ne3ee8Lp6KKLRw", "3E3yb7TvDK762dn11dmRLwapghaefQUEyunVdXSNp4tB", "FH75TvApyVtfd9X5a1Ar19Ns9DNJvzpzLFE5pjh1wi4h", "EgqkbDyWRPgVNVqtEEtRSzWcGD33orVoE2bzYdAdieQS", "DsKyJpJCZcFv9jSnQbQVG4Jx3WSP1KtfHhAKTkSKrVBj", "AesPr5UFDgY5jZXYUZ8JkbYtJovVdDHby15SCksEhmJK", "AVsfdqw2m5aUNxa1HY9emLmCLBfVAGTxVu4ef3xEDKC8", "5jdvSSY2K7h8UiUCXUgK9T7zfMryqw2itKP8BysdXDDk", "A4voKZes8MVDAXyQjKkb6bdEcqMbvB4ptzbpqYqveG5n", "34oZKaWHpSJrZvGLdYu5WG8WWXg7rwF2HHx8K15GfUCQ", "77McCHkmNrRM4DjqkSM9B8YjuJcKtn67jQge1pzZrQ8T", "7NEFBnvGGMfYdBnhMLNpuVgS22LpcgXCZgHfm8DHmmiA", "GoF9yokxHgPNoxoWgjjdmGeWhcLYArSsxqffRtfYGtfs"]
87	87
88	88		@Callable(i)
89	89		func invokeClI1 () = if ((i.caller != this))
90	90		then throw("access only by project owner")
91	91		else {
92	92		let cl = invoke(this, "claimInvestPuzzle", nil, nil)
93	93		if ((cl == cl))
94	94		then {
95	95		let i1 = invoke(this, "invoker1", nil, nil)
96	96		if ((i1 == i1))
97	97		then nil
98	98		else throw("Strict value is not equal to itself.")
99	99		}
100	100		else throw("Strict value is not equal to itself.")
101	101		}
102	102
103	103
104	104
105	105		@Callable(i)
106	106		func claimInvestPuzzle () = if ((i.caller != this))
107	107		then throw("access only by project owner")
108	108		else {
109	109		let romeBalanceBefore = assetBalance(this, rome)
110	110		if ((romeBalanceBefore == romeBalanceBefore))
111	111		then {
112	112		let claimPuzzleStaking = invoke(puzzleStaking, "claimReward", nil, nil)
113	113		if ((claimPuzzleStaking == claimPuzzleStaking))
114	114		then {
115	115		let poolOneTokenInv = invoke(Address(base58'3PR1Qvi9mHT35SwWEkLSqqE2L8thiPLdVWU'), "generateIndexWithOneTokenAndStake", [toBase58String(poolBBB)], [AttachedPayment(puzzle, assetBalance(this, puzzle))])
116	116		if ((poolOneTokenInv == poolOneTokenInv))
117	117		then {
118	118		let romeBalanceAfter = assetBalance(this, rome)
119	119		[IntegerEntry("Activated blockheight", height), IntegerEntry(keyBurnxtnAmount, assetBalance(this, burnxtn)), IntegerEntry(keyRomeAmount, (romeBalanceAfter - romeBalanceBefore)), IntegerEntry(keyWavesAmount, if (((wavesBalance(this).available - d8) > 0))
120	120		then (wavesBalance(this).available - d8)
121	121		else 0), IntegerEntry(keyWhirlpoolAmount, assetBalance(this, whirlpool))]
122	122		}
123	123		else throw("Strict value is not equal to itself.")
124	124		}
125	125		else throw("Strict value is not equal to itself.")
126	126		}
127	127		else throw("Strict value is not equal to itself.")
128	128		}
129	129
130	130
131	131
132	132		@Callable(i)
133	133		func invoker1 () = {
134	134		let reset = invoke(this, "resetCount", nil, nil)
135	135		if ((reset == reset))
136	136		then {
137	137		let list = split_4C(addresses, ",")
138	138		func r (accum,address) = invoke(this, "countNFTpower", [address], nil)
139	139
140	140		let invoker = {
141	141		let $l = list
142	142		let $s = size($l)
143	143		let $acc0 = nil
144	144		func $f0_1 ($a,$i) = if (($i >= $s))
145	145		then $a
146	146		else r($a, $l[$i])
147	147
148	148		func $f0_2 ($a,$i) = if (($i >= $s))
149	149		then $a
150	150		else throw("List size exceeds 30")
151	151
152	152		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30)
153	153		}
154	154		if ((invoker == invoker))
155	155		then {
156	156		let p = invoke(this, "data", nil, nil)
157	157		if ((p == p))
158	158		then [IntegerEntry("WFS puzzle value", fraction(fraction(tryGetInteger(this, keyTotalPuzzleValue), 1, tryGetInteger(this, keyTotalNFTpower)), 10, 9)), IntegerEntry("BBB puzzle value", fraction(fraction(tryGetInteger(this, keyTotalPuzzleValue), 10, tryGetInteger(this, keyTotalNFTpower)), 10, 9))]
159	159		else throw("Strict value is not equal to itself.")
160	160		}
161	161		else throw("Strict value is not equal to itself.")
162	162		}
163	163		else throw("Strict value is not equal to itself.")
164	164		}
165	165
166	166
167	167
168	168		@Callable(i)
169	169		func resetCount () = [IntegerEntry(keyTotalNFTpower, 0)]
170	170
171	171
172	172
173	173		@Callable(i)
174	174		func countNFTpower (address) = {
175	175		func foldFunc (acc,WFS) = ((acc + assetBalance(addressFromStringValue(address), fromBase58String(WFS))) + (if ((tryGetString(puzzleMarket, (("nft_" + WFS) + "_seller")) == address))
176	176		then 1
177	177		else 0))
178	178
179	179		let shareWFS = {
180	180		let $l = WFSlist
181	181		let $s = size($l)
182	182		let $acc0 = 0
183	183		func $f0_1 ($a,$i) = if (($i >= $s))
184	184		then $a
185	185		else foldFunc($a, $l[$i])
186	186
187	187		func $f0_2 ($a,$i) = if (($i >= $s))
188	188		then $a
189	189		else throw("List size exceeds 10")
190	190
191	191		$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)
192	192		}
193	193		func foldFuncB (acc,BBB) = ((acc + assetBalance(addressFromStringValue(address), fromBase58String(BBB))) + (if ((tryGetString(puzzleMarket, (("nft_" + BBB) + "_seller")) == address))
194	194		then 1
195	195		else 0))
196	196
197	197		let shareBBB = {
198	198		let $l = BBBlist
199	199		let $s = size($l)
200	200		let $acc0 = 0
201	201		func $f1_1 ($a,$i) = if (($i >= $s))
202	202		then $a
203	203		else foldFuncB($a, $l[$i])
204	204
205	205		func $f1_2 ($a,$i) = if (($i >= $s))
206	206		then $a
207	207		else throw("List size exceeds 10")
208	208
209	209		$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
210	210		}
211	211		if (((shareWFS + shareBBB) == 0))
212	212		then {
213	213		let list = split_4C(addresses, ",")
214	214		let noNFTindex = value(indexOf(list, address))
215	215		let listMinusNoNFT = removeByIndex(list, noNFTindex)
216	216		let minusNoNFTstr = (makeString(listMinusNoNFT, ",") + ",")
217	217		[StringEntry(keyAddressesRegistered, minusNoNFTstr)]
218	218		}
219	219		else [IntegerEntry((address + "_WFS"), shareWFS), IntegerEntry((address + "_BBB"), (shareBBB * 10)), IntegerEntry(keyTotalNFTpower, (tryGetInteger(this, keyTotalNFTpower) + (shareWFS + (shareBBB * 10))))]
220	220		}
221	221
222	222
223	223
224	224		@Callable(i)
225	225		func data () = [IntegerEntry("puzzle balance", assetBalance(this, puzzle)), IntegerEntry("puzzle staked", puzzleStaked), IntegerEntry("puzzle BBB LP", BBBlpInPuzzle), IntegerEntry(keyTotalPuzzleValue, ((assetBalance(this, puzzle) + puzzleStaked) + BBBlpInPuzzle))]
226	226
227	227
228	228
229	229		@Callable(i)
230	230		func invoker2 () = if ((i.caller != this))
231	231		then throw("access only by project owner")
232	232		else {
233	233		let t = invoke(this, "trackTotalPaid", nil, nil)
234	234		if ((t == t))
235	235		then {
236	236		let list = split_4C(addresses, ",")
237	237		func r (accum,address) = invoke(this, "distributeRewards", [address], nil)
238	238
239	239		let invoker = {
240	240		let $l = list
241	241		let $s = size($l)
242	242		let $acc0 = nil
243	243		func $f0_1 ($a,$i) = if (($i >= $s))
244	244		then $a
245	245		else r($a, $l[$i])
246	246
247	247		func $f0_2 ($a,$i) = if (($i >= $s))
248	248		then $a
249	249		else throw("List size exceeds 20")
250	250
251	251		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
252	252		}
253	253		if ((invoker == invoker))
254	254		then {
255	255		let bs = invoke(this, "burnSurf", nil, nil)
256	256		if ((bs == bs))
257	257		then nil
258	258		else throw("Strict value is not equal to itself.")
259	259		}
260	260		else throw("Strict value is not equal to itself.")
261	261		}
262	262		else throw("Strict value is not equal to itself.")
263	263		}
264	264
265	265
266	266
267	267		@Callable(i)
268	268		func trackTotalPaid () = {
269	269		let amountBurnxtn = tryGetInteger(this, keyBurnxtnAmount)
270	270		let amountWhirlpool = tryGetInteger(this, keyWhirlpoolAmount)
271	271		let amountWaves = tryGetInteger(this, keyWavesAmount)
272	272		let amountRome = tryGetInteger(this, keyRomeAmount)
273	273		[IntegerEntry(keyTotalBurnxtnPaid, (amountBurnxtn + tryGetInteger(this, keyTotalBurnxtnPaid))), IntegerEntry(keyTotalWhirlpoolPaid, (amountWhirlpool + tryGetInteger(this, keyTotalWhirlpoolPaid))), IntegerEntry(keyTotalWavesPaid, (amountWaves + tryGetInteger(this, keyTotalWavesPaid))), IntegerEntry(keyTotalRomePaid, (amountRome + tryGetInteger(this, keyTotalRomePaid)))]
274	274		}
275	275
276	276
277	277
278	278		@Callable(i)
279	279		func distributeRewards (address) = if ((i.caller != this))
280	280		then throw("access only by project owner")
281	281		else {
282	282		func foldFunc (acc,WFS) = ((acc + assetBalance(addressFromStringValue(address), fromBase58String(WFS))) + (if ((tryGetString(puzzleMarket, (("nft_" + WFS) + "_seller")) == address))
283	283		then 1
284	284		else 0))
285	285
286	286		let shareWFS = {
287	287		let $l = WFSlist
288	288		let $s = size($l)
289	289		let $acc0 = 0
290	290		func $f0_1 ($a,$i) = if (($i >= $s))
291	291		then $a
292	292		else foldFunc($a, $l[$i])
293	293
294	294		func $f0_2 ($a,$i) = if (($i >= $s))
295	295		then $a
296	296		else throw("List size exceeds 10")
297	297
298	298		$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)
299	299		}
300	300		func foldFuncB (acc,BBB) = ((acc + assetBalance(addressFromStringValue(address), fromBase58String(BBB))) + (if ((tryGetString(puzzleMarket, (("nft_" + BBB) + "_seller")) == address))
301	301		then 1
302	302		else 0))
303	303
304	304		let shareBBB = {
305	305		let $l = BBBlist
306	306		let $s = size($l)
307	307		let $acc0 = 0
308	308		func $f1_1 ($a,$i) = if (($i >= $s))
309	309		then $a
310	310		else foldFuncB($a, $l[$i])
311	311
312	312		func $f1_2 ($a,$i) = if (($i >= $s))
313	313		then $a
314	314		else throw("List size exceeds 10")
315	315
316	316		$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
317	317		}
318	318		func foldFuncC (acc,SURFboard) = ((acc + assetBalance(addressFromStringValue(address), fromBase58String(SURFboard))) + (if ((tryGetString(puzzleMarket, (("nft_" + SURFboard) + "_seller")) == address))
319	319		then 1
320	320		else 0))
321	321
322	322		let amountSURFboard = {
323	323		let $l = SURFboardList
324	324		let $s = size($l)
325	325		let $acc0 = 0
326	326		func $f2_1 ($a,$i) = if (($i >= $s))
327	327		then $a
328	328		else foldFuncC($a, $l[$i])
329	329
330	330		func $f2_2 ($a,$i) = if (($i >= $s))
331	331		then $a
332	332		else throw("List size exceeds 20")
333	333
334	334		$f2_2($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
335	335		}
336	336		let amountBurnxtn = fraction(tryGetInteger(this, keyBurnxtnAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
337	337		let amountWhirlpool = fraction(tryGetInteger(this, keyWhirlpoolAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
338	338		let amountWaves = fraction(tryGetInteger(this, keyWavesAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
339	339		let amountRome = fraction(tryGetInteger(this, keyRomeAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
340	340		[ScriptTransfer(addressFromStringValue(address), amountBurnxtn, burnxtn), ScriptTransfer(addressFromStringValue(address), amountWhirlpool, whirlpool), ScriptTransfer(addressFromStringValue(address), amountWaves, unit), ScriptTransfer(addressFromStringValue(address), amountRome, rome), ScriptTransfer(addressFromStringValue(address), (amountSURFboard * d6), surf)]
341	341		}
342	342
343	343
344	344
345	345		@Callable(i)
346	346		func burnSurf () = [Burn(surf, d6), IntegerEntry("SURF total burned", (tryGetInteger(this, "SURF total burned") + d6))]
347	347
348	348
349	349
350	350		@Callable(i)
351	351		func register () = if (contains(tryGetString(this, keyAddressesRegistered), toString(i.caller)))
352	352		then throw("already registered")
353	353		else if ((size(split_4C(addresses, ",")) == 30))
354	354		then throw("max reached")
355	355		else [StringEntry(keyAddressesRegistered, ((tryGetString(this, keyAddressesRegistered) + toString(i.caller)) + ","))]
356	356
357	357
358	358
359	359		@Callable(i)
360	360		func registerManually (address) = if (contains(tryGetString(this, keyAddressesRegistered), address))
361	361		then throw("already registered")
362	362		else if ((size(split_4C(addresses, ",")) == 40))
363	363		then throw("max reached")
364	364		else if ((i.caller != this))
365	365		then throw("access only by project owner")
366	366		else [StringEntry(keyAddressesRegistered, ((tryGetString(this, keyAddressesRegistered) + address) + ","))]
367	367
368	368
369	369
370	370		@Callable(i)
371	371		func claimByAnybody () = if (((getIntegerValue(this, "Activated blockheight") + (30 * 1440)) > height))
372	372		then throw(("Wait till blockheight:" + toString((getIntegerValue(this, "Activated blockheight") + (30 * 1440)))))
373	373		else {
374	374		let puzzleBalanceBefore = assetBalance(this, puzzle)
375	375		if ((puzzleBalanceBefore == puzzleBalanceBefore))
376	376		then {
377	377		let romeBalanceBefore = assetBalance(this, rome)
378	378		if ((romeBalanceBefore == romeBalanceBefore))
379	379		then {
380	380		let claimPuzzleStaking = invoke(puzzleStaking, "claimReward", nil, nil)
381	381		if ((claimPuzzleStaking == claimPuzzleStaking))
382	382		then {
383	383		let claimInv = invoke(Address(poolBBB), "claimIndexRewards", nil, nil)
384	384		if ((claimInv == claimInv))
385	385		then {
386	386		let puzzleBalanceAfter = assetBalance(this, puzzle)
387	387		let romeBalanceAfter = assetBalance(this, rome)
388	388		[IntegerEntry(keyBurnxtnAmount, assetBalance(this, burnxtn)), IntegerEntry(keyRomeAmount, (romeBalanceAfter - romeBalanceBefore)), IntegerEntry(keyPuzzleAmount, (puzzleBalanceAfter - puzzleBalanceBefore)), IntegerEntry(keyWavesAmount, if (((wavesBalance(this).available - d8) > 0))
389	389		then (wavesBalance(this).available - d8)
390	390		else 0), IntegerEntry(keyWhirlpoolAmount, assetBalance(this, whirlpool))]
391	391		}
392	392		else throw("Strict value is not equal to itself.")
393	393		}
394	394		else throw("Strict value is not equal to itself.")
395	395		}
396	396		else throw("Strict value is not equal to itself.")
397	397		}
398	398		else throw("Strict value is not equal to itself.")
399	399		}
400	400
401	401
402	402
403	403		@Callable(i)
404	404		func invokerByAnybody () = if (((getIntegerValue(this, "Activated blockheight") + (30 * 1440)) > height))
405	405		then throw(("Wait till blockheight:" + toString((getIntegerValue(this, "Activated blockheight") + (30 * 1440)))))
406	406		else {
407	407		let reset = invoke(this, "distributeRewardsByAnybody", nil, nil)
408	408		if ((reset == reset))
409	409		then {
410	410		let list = split_4C(addresses, ",")
411	411		func r (accum,address) = invoke(this, "countNFTpower", [address], nil)
412	412
413	413		let invoker = {
414	414		let $l = list
415	415		let $s = size($l)
416	416		let $acc0 = nil
417	417		func $f0_1 ($a,$i) = if (($i >= $s))
418	418		then $a
419	419		else r($a, $l[$i])
420	420
421	421		func $f0_2 ($a,$i) = if (($i >= $s))
422	422		then $a
423	423		else throw("List size exceeds 40")
424	424
425	425		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40)
426	426		}
427	427		if ((invoker == invoker))
428	428		then nil
429	429		else throw("Strict value is not equal to itself.")
430	430		}
431	431		else throw("Strict value is not equal to itself.")
432	432		}
433	433
434	434
435	435
436	436		@Callable(i)
437	437		func distributeRewardsByAnybody (address) = if ((i.caller != this))
438	438		then throw("access only by project owner")
439	439		else {
440	440		func foldFunc (acc,WFS) = ((acc + assetBalance(addressFromStringValue(address), fromBase58String(WFS))) + (if ((tryGetString(puzzleMarket, (("nft_" + WFS) + "_seller")) == address))
441	441		then 1
442	442		else 0))
443	443
444	444		let shareWFS = {
445	445		let $l = WFSlist
446	446		let $s = size($l)
447	447		let $acc0 = 0
448	448		func $f0_1 ($a,$i) = if (($i >= $s))
449	449		then $a
450	450		else foldFunc($a, $l[$i])
451	451
452	452		func $f0_2 ($a,$i) = if (($i >= $s))
453	453		then $a
454	454		else throw("List size exceeds 10")
455	455
456	456		$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)
457	457		}
458	458		func foldFuncB (acc,BBB) = ((acc + assetBalance(addressFromStringValue(address), fromBase58String(BBB))) + (if ((tryGetString(puzzleMarket, (("nft_" + BBB) + "_seller")) == address))
459	459		then 1
460	460		else 0))
461	461
462	462		let shareBBB = {
463	463		let $l = BBBlist
464	464		let $s = size($l)
465	465		let $acc0 = 0
466	466		func $f1_1 ($a,$i) = if (($i >= $s))
467	467		then $a
468	468		else foldFuncB($a, $l[$i])
469	469
470	470		func $f1_2 ($a,$i) = if (($i >= $s))
471	471		then $a
472	472		else throw("List size exceeds 10")
473	473
474	474		$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
475	475		}
476	476		if (((shareWFS + shareBBB) == 0))
477	477		then {
478	478		let list = split_4C(addresses, ",")
479	479		let noNFTindex = value(indexOf(list, address))
480	480		let listMinusNoNFT = removeByIndex(list, noNFTindex)
481	481		let minusNoNFTstr = (makeString(listMinusNoNFT, ",") + ",")
482	482		[StringEntry(keyAddressesRegistered, minusNoNFTstr)]
483	483		}
484	484		else {
485	485		let amountBurnxtn = fraction(tryGetInteger(this, keyBurnxtnAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
486	486		let amountWhirlpool = fraction(tryGetInteger(this, keyWhirlpoolAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
487	487		let amountWaves = fraction(tryGetInteger(this, keyWavesAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
488	488		let amountRome = fraction(tryGetInteger(this, keyRomeAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
489	489		let amountPuzzle = fraction(tryGetInteger(this, keyPuzzleAmount), (shareWFS + (shareBBB * 10)), tryGetInteger(this, keyTotalNFTpower))
490	490		[ScriptTransfer(addressFromStringValue(address), amountBurnxtn, burnxtn), IntegerEntry(keyTotalBurnxtnPaid, (amountBurnxtn + tryGetInteger(this, keyTotalBurnxtnPaid))), ScriptTransfer(addressFromStringValue(address), amountWhirlpool, whirlpool), IntegerEntry(keyTotalWhirlpoolPaid, (amountWhirlpool + tryGetInteger(this, keyTotalWhirlpoolPaid))), ScriptTransfer(addressFromStringValue(address), amountWaves, unit), IntegerEntry(keyTotalWavesPaid, (amountWaves + tryGetInteger(this, keyTotalWavesPaid))), ScriptTransfer(addressFromStringValue(address), amountRome, rome), IntegerEntry(keyTotalRomePaid, (amountRome + tryGetInteger(this, keyTotalRomePaid))), ScriptTransfer(addressFromStringValue(address), amountPuzzle, puzzle), IntegerEntry(keyTotalPuzzlePaid, (amountPuzzle + tryGetInteger(this, keyTotalPuzzlePaid)))]
491	491		}
492	492		}
493	493
494	494
495	495
496	496		@Callable(i)
497	497		func deleteEntry () = if ((i.caller != this))
498	498		then throw("access only by project owner")
499	499		else [DeleteEntry(keyAddressesRegistered)]

github/deemru/w8io/3ef1775 
58.90 ms ◑