w8 · tx · AA9···GJj

tx · AA9EwSwRWMdm5VjUeMZCFeEXxaJx7yJ6kVfboKvYAGJj

3PQV9AUMU36fdDYMmMZw6urSYG3BuMahQuk:  -0.01100000 Waves

2022.07.27 14:25 [3223660] smart account 3PQV9AUMU36fdDYMmMZw6urSYG3BuMahQuk > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "AA9EwSwRWMdm5VjUeMZCFeEXxaJx7yJ6kVfboKvYAGJj",
    "fee": 1100000,
    "feeAssetId": null,
    "timestamp": 1658921151612,
    "version": 2,
    "chainId": 87,
    "sender": "3PQV9AUMU36fdDYMmMZw6urSYG3BuMahQuk",
    "senderPublicKey": "8bMNZV1S5S2hfim2ZPy5hsSdC1AHBwPHUEXPBhdEF2Mk",
    "proofs": [
        "5ycNtqcsnbyg5CqHjJvm16xnoAPZ7exgXWbb8PFnC9oGcATnT4gyfh9eDLhPWUJcwsXfenyxk3iLFD5nJyM9U6Ca"
    ],
    "script": "base64:BgLmCggCEgASABIAEgASABIAEgASABIAEgASABIAIgp1c2R0VXNkbkxQIg11c2R0VXNkbkxQVENJIgh3eFVzZG5MUCILd3hVc2RuTFBUQ0kiCnVzZGNVc2RuTFAiDXVzZGNVc2RuTFBUQ0kiCnVzZGNVc2R0TFAiDXVzZGNVc2R0TFBUQ0kiDHB1enpsZVVzZG5MUCIPcHV6emxlVXNkbkxQVENJIgR3eElkIg5rZXlTcG9uc29yc2hpcCIJaXNTdG9wcGVkIglrZXlTdGFrZWQiC2tleUNvbXBvdW5kIhFrZXl3eFVzZG5Db21wb3VuZCIJa2V5V1hVU0ROIhNrZXlVc2RjVXNkbkNvbXBvdW5kIgtrZXlVU0RDVVNETiITa2V5VXNkY1VzZHRDb21wb3VuZCILa2V5VVNEQ1VTRFQiFWtleVB1enpsZVVzZG5Db21wb3VuZCINa2V5UFVaWkxFVVNETiIDZGVmIgdmZWVQZXJjIgJ0dyIGb3JhY2xlIgxjaGVja0FkZHJlc3MiBmNhbGxlciIBaSIDcG10IglwbXRBbW91bnQiCHRrU3Rha2VkIgt0b3RhbElzc3VlZCIHJG1hdGNoMCIFYXNzZXQiA29uZSIHdG9Jc3N1ZSILdXBkYXRlU3RhdGUiB0xQc3Rha2UiB0xQSXNzdWUiCHRyYW5zZmVyIgxmcm9tQ29tcG91bmQiBmZvck9uZSIHcGF5bWVudCICYW0iAmlkIglUQ0lBbW91bnQiAXEiDnVzZG5Vc2R0U3Rha2VkIgxmb3JTaW5nbGVUQ0kiEHVzZG5McFRvV2l0aGRyYXciA2ZlZSIRdW5zdGFrZVVzZHRVc2RuTFAiEXVzZG5McGZlZVRyYW5zZmVyIhJ1cGRhdGVVc2RuTHBTdGFrZWQiA2JybiIHd3hUY2lBbSIMd3hVc2RuU3Rha2VkIgpzaW5nbGVXWExQIg53eExwVG9XaXRoZHJhdyIPdW5zdGFrZVd4VXNkbkxQIg93eExwRmVlVHJhbnNmZXIiDHd4THBUcmFuc2ZlciIQdXBkYXRlV3hMcFN0YWtlZCILYnVybld4THBUY2kiC3VzZGNVc2RuVENJIg51c2RjVXNkblN0YWtlZCIMc2luZ2xlVXNkY0xQIhR1c2RjVXNkbkxwVG9XaXRoZHJhdyIRdW5zdGFrZVVzZGNVc2RuTFAiDXVzZGNVc2RuTFBGZWUiEHVzZGNVc2RuVHJhbnNmZXIiFnVwZGF0ZVVzZGNVc2RuTHBTdGFrZWQiEWJ1cm5Vc2RjVXNkbkxwVGNpIgt1c2RjVXNkdFRjaSIOdXNkY1VzZHRTdGFrZWQiDnNpbmdsZVVzZGNVc2R0IhR1c2RjVXNkdExwVG9XaXRoZHJhdyIRdW5zdGFrZVVzZGNVc2R0TFAiDXVzZGNVc2R0TFBGZWUiEHVzZGNVc2R0VHJhbnNmZXIiFnVwZGF0ZVVzZGNVc2R0THBTdGFrZWQiDXB1enpsZVVzZG5UY2kiDnB1enpsZUxQU3Rha2VkIhBzaW5nbGVQdXp6bGVVc2RuIhJwdXp6bGVVc2RuV2l0aGRyYXciE3Vuc3Rha2VQdXp6bGVVc2RuTFAiD3B1enpsZVVzZG5MUEZlZSIScHV6emxlVXNkblRyYW5zZmVyIhh1cGRhdGVQdXp6bGVVc2RuTHBTdGFrZWQiDWJ1cm5QdXp6bGVUQ0kiCGNvbXBvdW5kIgJjYSIIaXNPcmFjbGUiC3RvdGFsU3Rha2VkIgZzdGFrZUMiAnRjIgJwbSIKbG9ja1BlcmlvZCIJc3BvbnNvcmVkIgRsb2NrIgFzIgJ0eCIGdmVyaWZ5HAABYQEgeKe/TORdN+2VIdfWflWy/q4Ef+gR/VrWL/1DGC+Wt8AAAWIBIBG6tC/qJMhI0cdjddgUOO1bmK5/To9FHcuj/RydMcYtAAFjASDQT71RdBIZXVrFawprtgfBi/YgCUpkJByIvvbGrlTraAABZAEg3XVBqjphIlMvzVYwHrzDvrUJrUyGvZRTnBKh7j6j3vgAAWUBIANpAfwbCpgKiM2P/hFZhYUmkTKzWpL8JulIXdOf3lx2AAFmASD2Ajfd05/vhkUvXCNHD5Vf0TptoSvCp7SbVEEHUvVuxgABZwEgxvikdBtWSFYQn5B+wjP0MWuLBEosK/2ZS4f1hZt85IwAAWgBIALGhXwESzPH4u+HZ4dS+1WC/bPfhCO2oFrFNd3PV0r+AAFpASDDM8Z0ziOqpCLfSSTlxJlreASwd1aCdP+40R1KjRzRngABagEgvJT6zwcHAR1Xf2NHmqYN/fUF18bEe85zWm98KZKIR7UAAWsBIJMBHKupx24lV85mnnG2vapr+DzoWAsq7tmgTrs83BSxAAFsAhNTcG9uc29yc2hpcF9pbl9sb2NrAAFtBwABbgIJU1RBS0VEX0xQAAFvAg1Gcm9tX0NvbXBvdW5kAAFwAhBXWF9VU0ROX2NvbXBvdW5kAAFxAgdXWF9VU0ROAAFyAhJVU0RDX1VTRE5fY29tcG91bmQAAXMCCVVTRENfVVNETgABdAISVVNEQ19VU0RUX2NvbXBvdW5kAAF1AglVU0RDX1VTRFQAAXYCFFBVWlpMRV9VU0ROX2NvbXBvdW5kAAF3AgtQVVpaTEVfVVNETgABeACAwtcvAAF5AIDIr6AlAAF6ARoBV04EqfVyjN7n+dJSSt24a1NFjHqnmjh9nAABQQEaAVc1rR+kHbEVbVHzz0HIOqmzeJRqg4q8b4kBAUIBAUMDCQECIT0CBQFDBQFBBwYMAUQBD2RlcG9zaXRXeFVzZG5MUAAEAUUJAQV2YWx1ZQEJAJEDAggFAUQIcGF5bWVudHMAAAQBRggFAUUGYW1vdW50AwkBAiE9AggFAUUHYXNzZXRJZAUBYwkAAgECG2F0dGFjaCBXWFVTRE5MUCB0b2tlbnMgb25seQMFAW0JAAIBAhlzbWFydCBjb250cmFjdCBpcyBvbiBsb2NrBAFHCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAXEAAAQBSAQBSQkA7AcBBQFkAwkAAQIFAUkCBUFzc2V0BAFKBQFJCAUBSghxdWFudGl0eQkAAgECEENhbid0IGZpbmQgYXNzZXQEAUsJAGsDBQFIAIDC1y8FAUcEAUwJAGsDBQFGBQFLAIDC1y8EAU0JAQxJbnRlZ2VyRW50cnkCBQFxCQBkAgUBRwUBRgQBTgkA/AcECQEHQWRkcmVzcwEBGgFX6zvnfm4FGMKRpJgWF+Fm10UnIO4lSVaoAgVzdGFrZQUDbmlsCQDMCAIFAUUFA25pbAMJAAACBQFOBQFOBAFPCQEHUmVpc3N1ZQMFAWQFAUwGBAFQCQEOU2NyaXB0VHJhbnNmZXIDCAUBRAZjYWxsZXIFAUwFAWQJAMwIAgUBTwkAzAgCBQFQCQDMCAIFAU0FA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFEARFkZXBvc2l0VXNkdFVzZG5MUAAEAUUJAQV2YWx1ZQEJAJEDAggFAUQIcGF5bWVudHMAAAQBRggFAUUGYW1vdW50AwkBAiE9AggFAUUHYXNzZXRJZAUBYQkAAgECHWF0dGFjaCBVU0RUVVNETkxQIHRva2VucyBvbmx5AwUBbQkAAgECGXNtYXJ0IGNvbnRyYWN0IGlzIG9uIGxvY2sEAUcJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUBbgAABAFIBAFJCQDsBwEFAWIDCQABAgUBSQIFQXNzZXQEAUoFAUkIBQFKCHF1YW50aXR5CQACAQIQQ2FuJ3QgZmluZCBhc3NldAQBUQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQFvAAAEAVIJAGsDBQFIAIDC1y8FAUcEAUwJAGsDBQFGBQFSAIDC1y8EAU0JAQxJbnRlZ2VyRW50cnkCBQFuCQBkAgUBRwUBRgQBTgkA/AcECQEHQWRkcmVzcwEBGgFX6zvnfm4FGMKRpJgWF+Fm10UnIO4lSVaoAgVzdGFrZQUDbmlsCQDMCAIFAUUFA25pbAMJAAACBQFOBQFOBAFPCQEHUmVpc3N1ZQMFAWIFAUwGBAFQCQEOU2NyaXB0VHJhbnNmZXIDCAUBRAZjYWxsZXIFAUwFAWIJAMwIAgUBTwkAzAgCBQFQCQDMCAIFAU0FA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFEARFkZXBvc2l0VXNkY1VzZG5MUAAEAUUJAQV2YWx1ZQEJAJEDAggFAUQIcGF5bWVudHMAAAQBRggFAUUGYW1vdW50AwkBAiE9AggFAUUHYXNzZXRJZAUBZQkAAgECHWF0dGFjaCBVU0RDVVNETkxQIHRva2VucyBvbmx5AwUBbQkAAgECGXNtYXJ0IGNvbnRyYWN0IGlzIG9uIGxvY2sEAUcJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUBcwAABAFIBAFJCQDsBwEFAWYDCQABAgUBSQIFQXNzZXQEAUoFAUkIBQFKCHF1YW50aXR5CQACAQIQQ2FuJ3QgZmluZCBhc3NldAQBUQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQFyAAAEAVIJAGsDBQFIAIDC1y8FAUcEAUwJAGsDBQFGBQFSAIDC1y8EAU0JAQxJbnRlZ2VyRW50cnkCBQFzCQBkAgUBRwUBRgQBTgkA/AcECQEHQWRkcmVzcwEBGgFX6zvnfm4FGMKRpJgWF+Fm10UnIO4lSVaoAgVzdGFrZQUDbmlsCQDMCAIFAUUFA25pbAMJAAACBQFOBQFOBAFPCQEHUmVpc3N1ZQMFAWYFAUwGBAFQCQEOU2NyaXB0VHJhbnNmZXIDCAUBRAZjYWxsZXIFAUwFAWYJAMwIAgUBTwkAzAgCBQFQCQDMCAIFAU0FA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFEARFkZXBvc2l0VXNkY1VzZHRMUAAEAUUJAQV2YWx1ZQEJAJEDAggFAUQIcGF5bWVudHMAAAQBRggFAUUGYW1vdW50AwkBAiE9AggFAUUHYXNzZXRJZAUBZwkAAgECHWF0dGFjaCBVU0RDVVNEVExQIHRva2VucyBvbmx5AwUBbQkAAgECGXNtYXJ0IGNvbnRyYWN0IGlzIG9uIGxvY2sEAUcJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUBdQAABAFIBAFJCQDsBwEFAWgDCQABAgUBSQIFQXNzZXQEAUoFAUkIBQFKCHF1YW50aXR5CQACAQIQQ2FuJ3QgZmluZCBhc3NldAQBUQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQF0AAAEAVIJAGsDBQFIAIDC1y8FAUcEAUwJAGsDBQFGBQFSAIDC1y8EAU0JAQxJbnRlZ2VyRW50cnkCBQF1CQBkAgUBRwUBRgQBTgkA/AcECQEHQWRkcmVzcwEBGgFX6zvnfm4FGMKRpJgWF+Fm10UnIO4lSVaoAgVzdGFrZQUDbmlsCQDMCAIFAUUFA25pbAMJAAACBQFOBQFOBAFPCQEHUmVpc3N1ZQMFAWgFAUwGBAFQCQEOU2NyaXB0VHJhbnNmZXIDCAUBRAZjYWxsZXIFAUwFAWgJAMwIAgUBTwkAzAgCBQFQCQDMCAIFAU0FA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFEARNkZXBvc2l0UHV6emxlVXNkbkxQAAQBRQkBBXZhbHVlAQkAkQMCCAUBRAhwYXltZW50cwAABAFGCAUBRQZhbW91bnQDCQECIT0CCAUBRQdhc3NldElkBQFpCQACAQIfYXR0YWNoIFBVWlpMRVVEU05MUCB0b2tlbnMgb25seQMFAW0JAAIBAhlzbWFydCBjb250cmFjdCBpcyBvbiBsb2NrBAFHCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAXcAAAQBSAQBSQkA7AcBBQFqAwkAAQIFAUkCBUFzc2V0BAFKBQFJCAUBSghxdWFudGl0eQkAAgECEENhbid0IGZpbmQgYXNzZXQEAVEJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUBdgAABAFSCQBrAwUBSACAwtcvBQFHBAFMCQBrAwUBRgUBUgCAwtcvBAFNCQEMSW50ZWdlckVudHJ5AgUBdwkAZAIFAUcFAUYEAU4JAPwHBAkBB0FkZHJlc3MBARoBV+s7535uBRjCkaSYFhfhZtdFJyDuJUlWqAIFc3Rha2UFA25pbAkAzAgCBQFFBQNuaWwDCQAAAgUBTgUBTgQBTwkBB1JlaXNzdWUDBQFqBQFMBgQBUAkBDlNjcmlwdFRyYW5zZmVyAwgFAUQGY2FsbGVyBQFMBQFqCQDMCAIFAU8JAMwIAgUBUAkAzAgCBQFNBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BRAEId2l0aGRyYXcABAFTCQEFdmFsdWUBCQCRAwIIBQFECHBheW1lbnRzAAAEAVQIBQFTBmFtb3VudAQBVQgFAVMHYXNzZXRJZAMJAAACBQFVBQFhBAFWBAFJCQDsBwEFAWIDCQABAgUBSQIFQXNzZXQEAVcFAUkIBQFXCHF1YW50aXR5AAAEAVgJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUBbgAABAFZCQBrAwUBWAUBeAUBVgQBWgkAawMFAVkFAVQFAXgEAmFhCQBrAwUBWgUBeAUBeQQCYWIJAPwHBAkBB0FkZHJlc3MBARoBV+s7535uBRjCkaSYFhfhZtdFJyDuJUlWqAIHdW5zdGFrZQkAzAgCAiw5N3pIRnAxQzNjQjdxZnZ4OFh2NWYycldwOW5VU0c1VW5BYW1mUGNXNnR4ZgkAzAgCBQFaBQNuaWwFA25pbAMJAAACBQJhYgUCYWIEAmFjCQEOU2NyaXB0VHJhbnNmZXIDCQEHQWRkcmVzcwEFAXoFAmFhBQFhBAFQCQEOU2NyaXB0VHJhbnNmZXIDCAUBRAZjYWxsZXIJAGUCBQFaBQJhYQUBYQQCYWQJAQxJbnRlZ2VyRW50cnkCBQFuCQBlAgUBWAUBWgQCYWUJAQRCdXJuAgUBYgUBVAMJAAACBQJhZQUCYWUJAMwIAgUCYWMJAMwIAgUBUAkAzAgCBQJhZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAwkAAAIFAVUFAWQEAmFmBAFJCQDsBwEFAWQDCQABAgUBSQIFQXNzZXQEAVcFAUkIBQFXCHF1YW50aXR5AAAEAmFnCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAXEAAAQCYWgJAGsDBQJhZwUBeAUCYWYEAmFpCQBrAwUCYWgFAVQFAXgEAmFhCQBrAwUCYWkFAXgFAXkEAmFqCQD8BwQJAQdBZGRyZXNzAQEaAVfrO+d+bgUYwpGkmBYX4WbXRScg7iVJVqgCB3Vuc3Rha2UJAMwIAgIsRjJBS2tBNTEzazV5SEVKa0xzVTZ2V3hDWVlrODExR3BqTGh3RXYyV0d3WjkJAMwIAgUCYWkFA25pbAUDbmlsAwkAAAIFAmFqBQJhagQCYWsJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQUBegUCYWEFAWMEAmFsCQEOU2NyaXB0VHJhbnNmZXIDCAUBRAZjYWxsZXIJAGUCBQJhaQUCYWEFAWMEAmFtCQEMSW50ZWdlckVudHJ5AgUBcQkAZQIFAmFnBQJhaQQCYW4JAQRCdXJuAgUBYwUBVAMJAAACBQJhbgUCYW4JAMwIAgUCYWsJAMwIAgUCYWwJAMwIAgUCYW0FA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgMJAAACBQFVBQFmBAJhbwQBSQkA7AcBBQFmAwkAAQIFAUkCBUFzc2V0BAFXBQFJCAUBVwhxdWFudGl0eQAABAJhcAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQFzAAAEAmFxCQBrAwUCYXAFAXgFAmFvBAJhcgkAawMFAmFxBQFUBQF4BAJhYQkAawMFAmFyBQF4BQF5BAJhcwkA/AcECQEHQWRkcmVzcwEBGgFX6zvnfm4FGMKRpJgWF+Fm10UnIO4lSVaoAgd1bnN0YWtlCQDMCAICK0VLNk43UzM4eGJ0QlQzU3hBcW9HZERMQ2lYNnJvalg2RzE2OUNuU3l1RTUJAMwIAgUCYXIFA25pbAUDbmlsAwkAAAIFAmFzBQJhcwQCYXQJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQUBegUCYWEFAWUEAmF1CQEOU2NyaXB0VHJhbnNmZXIDCAUBRAZjYWxsZXIJAGUCBQJhcgUCYWEFAWUEAmF2CQEMSW50ZWdlckVudHJ5AgUBcwkAZQIFAmFwBQJhcgQCYXcJAQRCdXJuAgUBZgUBVAMJAAACBQJhdwUCYXcJAMwIAgUCYXQJAMwIAgUCYXUJAMwIAgUCYXYFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgMJAAACBQFVBQFoBAJheAQBSQkA7AcBBQFmAwkAAQIFAUkCBUFzc2V0BAFXBQFJCAUBVwhxdWFudGl0eQAABAJheQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQF1AAAEAmF6CQBrAwUCYXkFAXgFAmF4BAJhQQkAawMFAmF6BQFUBQF4BAJhYQkAawMFAmFBBQF4BQF5BAJhQgkA/AcECQEHQWRkcmVzcwEBGgFX6zvnfm4FGMKRpJgWF+Fm10UnIO4lSVaoAgd1bnN0YWtlCQDMCAICLEVQaGRFZm1RYU5jSHl2RG1SR2huTGhnY0p0S1oyYTRrM1pCbUtXdEFFV3lICQDMCAIFAmFBBQNuaWwFA25pbAMJAAACBQJhQgUCYUIEAmFDCQEOU2NyaXB0VHJhbnNmZXIDCQEHQWRkcmVzcwEFAXoFAmFhBQFnBAJhRAkBDlNjcmlwdFRyYW5zZmVyAwgFAUQGY2FsbGVyCQBlAgUCYUEFAmFhBQFnBAJhRQkBDEludGVnZXJFbnRyeQIFAXUJAGUCBQJheQUCYUEEAmFuCQEEQnVybgIFAWYFAVQDCQAAAgUCYW4FAmFuCQDMCAIFAmFDCQDMCAIFAmFECQDMCAIFAmFFBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4DCQAAAgUBVQUBagQCYUYEAUkJAOwHAQUBagMJAAECBQFJAgVBc3NldAQBVwUBSQgFAVcIcXVhbnRpdHkAAAQCYUcJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUBdwAABAJhSAkAawMFAmFHBQF4BQJhRgQCYUkJAGsDBQJhSAUBVAUBeAQCYWEJAGsDBQJhSQUBeAUBeQQCYUoJAPwHBAkBB0FkZHJlc3MBARoBV+s7535uBRjCkaSYFhfhZtdFJyDuJUlWqAIHdW5zdGFrZQkAzAgCAixFOHpIdTMzR2ZjTnlHTHlwWDc3Z1ppVVhmdnVaUWVhWW1pRWZzeTdWWU53UAkAzAgCBQJhSQUDbmlsBQNuaWwDCQAAAgUCYUoFAmFKBAJhSwkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBBQF6BQJhYQUBaQQCYUwJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFEBmNhbGxlcgkAZQIFAmFJBQJhYQUBaQQCYU0JAQxJbnRlZ2VyRW50cnkCBQF3CQBlAgUCYUcFAmFJBAJhTgkBBEJ1cm4CBQFqBQFUAwkAAAIFAmFOBQJhTgkAzAgCBQJhSwkAzAgCBQJhTAkAzAgCBQJhTQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQINSW52YWxpZCBhc3NldAFEARBjb21wb3VuZFd4VXNkbkxQAAQCYU8JAQV2YWx1ZQEJAJEDAggFAUQIcGF5bWVudHMAAAQCYVAIBQJhTwZhbW91bnQEAmFRCQEBQgEICAUBRAZjYWxsZXIFYnl0ZXMDCQECIT0CCAUCYU8HYXNzZXRJZAUBYwkAAgECG2F0dGFjaCBXWFVTRE5MUCB0b2tlbnMgb25seQMJAQEhAQUCYVEJAAIBAixZb3UgYXJlIG5vdCBhdXRob3RpemVkIHRvIGNhbGwgdGhpcyBmdW5jdGlvbgQBUQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQFwAAAEAmFSCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAXEAAAQCYVMJAPwHBAkBB0FkZHJlc3MBARoBV+s7535uBRjCkaSYFhfhZtdFJyDuJUlWqAIFc3Rha2UFA25pbAkAzAgCBQJhTwUDbmlsAwkAAAIFAmFTBQJhUwQBTQkBDEludGVnZXJFbnRyeQIFAXEJAGQCBQJhUgUCYVAEAmFUCQEMSW50ZWdlckVudHJ5AgUBcAkAZAIFAVEFAmFQCQDMCAIFAU0JAMwIAgUCYVQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFEARJjb21wb3VuZFVzZHRVc2RuTFAABAJhTwkBBXZhbHVlAQkAkQMCCAUBRAhwYXltZW50cwAABAJhUAgFAmFPBmFtb3VudAQCYVEJAQFCAQgIBQFEBmNhbGxlcgVieXRlcwMJAQIhPQIIBQJhTwdhc3NldElkBQFhCQACAQIdYXR0YWNoIFVTRFRVU0ROTFAgdG9rZW5zIG9ubHkDCQEBIQEFAmFRCQACAQIsWW91IGFyZSBub3QgYXV0aG90aXplZCB0byBjYWxsIHRoaXMgZnVuY3Rpb24EAVEJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUBbwAABAJhUgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQFuAAAEAmFTCQD8BwQJAQdBZGRyZXNzAQEaAVfrO+d+bgUYwpGkmBYX4WbXRScg7iVJVqgCBXN0YWtlBQNuaWwJAMwIAgUCYU8FA25pbAMJAAACBQJhUwUCYVMEAU0JAQxJbnRlZ2VyRW50cnkCBQFuCQBkAgUCYVIFAmFQBAJhVAkBDEludGVnZXJFbnRyeQIFAW8JAGQCBQFRBQJhUAkAzAgCBQFNCQDMCAIFAmFUBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BRAESY29tcG91bmRVc2RjVXNkbkxQAAQCYU8JAQV2YWx1ZQEJAJEDAggFAUQIcGF5bWVudHMAAAQCYVAIBQJhTwZhbW91bnQEAmFRCQEBQgEICAUBRAZjYWxsZXIFYnl0ZXMDCQECIT0CCAUCYU8HYXNzZXRJZAUBZQkAAgECHWF0dGFjaCBVU0RDVVNETkxQIHRva2VucyBvbmx5AwkBASEBBQJhUQkAAgECLFlvdSBhcmUgbm90IGF1dGhvdGl6ZWQgdG8gY2FsbCB0aGlzIGZ1bmN0aW9uBAFRCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAXIAAAQCYVIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUBcwAABAJhUwkA/AcECQEHQWRkcmVzcwEBGgFX6zvnfm4FGMKRpJgWF+Fm10UnIO4lSVaoAgVzdGFrZQUDbmlsCQDMCAIFAmFPBQNuaWwDCQAAAgUCYVMFAmFTBAFNCQEMSW50ZWdlckVudHJ5AgUBcwkAZAIFAmFSBQJhUAQCYVQJAQxJbnRlZ2VyRW50cnkCBQFyCQBkAgUBUQUCYVAJAMwIAgUBTQkAzAgCBQJhVAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAUQBEmNvbXBvdW5kVXNkY1VzZHRMUAAEAmFPCQEFdmFsdWUBCQCRAwIIBQFECHBheW1lbnRzAAAEAmFQCAUCYU8GYW1vdW50BAJhUQkBAUIBCAgFAUQGY2FsbGVyBWJ5dGVzAwkBAiE9AggFAmFPB2Fzc2V0SWQFAWcJAAIBAh1hdHRhY2ggVVNEQ1VTRFRMUCB0b2tlbnMgb25seQMJAQEhAQUCYVEJAAIBAixZb3UgYXJlIG5vdCBhdXRob3RpemVkIHRvIGNhbGwgdGhpcyBmdW5jdGlvbgQBUQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQF0AAAEAmFSCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAXUAAAQCYVMJAPwHBAkBB0FkZHJlc3MBARoBV+s7535uBRjCkaSYFhfhZtdFJyDuJUlWqAIFc3Rha2UFA25pbAkAzAgCBQJhTwUDbmlsAwkAAAIFAmFTBQJhUwQBTQkBDEludGVnZXJFbnRyeQIFAXUJAGQCBQJhUgUCYVAEAmFUCQEMSW50ZWdlckVudHJ5AgUBdAkAZAIFAVEFAmFQCQDMCAIFAU0JAMwIAgUCYVQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFEARRjb21wb3VuZFB1enpsZVVzZG5MUAAEAmFPCQEFdmFsdWUBCQCRAwIIBQFECHBheW1lbnRzAAAEAmFQCAUCYU8GYW1vdW50BAJhUQkBAUIBCAgFAUQGY2FsbGVyBWJ5dGVzAwkBAiE9AggFAmFPB2Fzc2V0SWQFAWkJAAIBAh9hdHRhY2ggUFVaWkxFVVNETkxQIHRva2VucyBvbmx5AwkBASEBBQJhUQkAAgECLFlvdSBhcmUgbm90IGF1dGhvdGl6ZWQgdG8gY2FsbCB0aGlzIGZ1bmN0aW9uBAFRCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAXYAAAQCYVIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUBdwAABAJhUwkA/AcECQEHQWRkcmVzcwEBGgFX6zvnfm4FGMKRpJgWF+Fm10UnIO4lSVaoAgVzdGFrZQUDbmlsCQDMCAIFAmFPBQNuaWwDCQAAAgUCYVMFAmFTBAFNCQEMSW50ZWdlckVudHJ5AgUBdwkAZAIFAmFSBQJhUAQCYVQJAQxJbnRlZ2VyRW50cnkCBQF2CQBkAgUBUQUCYVAJAMwIAgUBTQkAzAgCBQJhVAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAUQBDHNwb25zb3JCb29zdAAEAmFVCQEFdmFsdWUBCQCRAwIIBQFECHBheW1lbnRzAAAEAmFWAGQDCQECIT0CCAUCYVUHYXNzZXRJZAUBawkAAgECBUVycm9yBAJhVwkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQFsAAAEAmFYCQD8BwQJAQdBZGRyZXNzAQEaAVez5uZVGBFpsOQzD4hRQ6ScrtbVSwNLEVgCDGluY3JlYXNlTG9jawkAzAgCBQJhVgUDbmlsCQDMCAIFAmFVBQNuaWwDCQAAAgUCYVgFAmFYBAJhWQkBDEludGVnZXJFbnRyeQIFAWwJAGQCCAUCYVUGYW1vdW50BQJhVwkAzAgCBQJhWQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJhWgECYmEACQD0AwMIBQJhWglib2R5Qnl0ZXMJAJEDAggFAmFaBnByb29mcwAACAUCYVoPc2VuZGVyUHVibGljS2V5xV/3Vw==",
    "height": 3223660,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: AU1Z3PQoMtyKfmycrDZNuYvjESVwfh2jrNrmDQ9Cmy1y
Next: 3PWq1F2wk2ckL6qTDsRK6AkVTx2ewqcjrzCR4jjn4Wz4

Diff: 
Old New Differences
46 46  let keyPuzzleUsdnCompound = "PUZZLE_USDN_compound"
47 47  
48 48  let keyPUZZLEUSDN = "PUZZLE_USDN"
49 + 
50 + let def = 100000000
51 + 
52 + let feePerc = 10000000000
53 + 
54 + let tw = base58'3P93R2GBkTGVehRPhytHr7sdxYww93jkbhm'
49 55  
50 56  let oracle = base58'3P6phwFZFQtZFuc9dvdXsgvtg8JEFVgECPA'
51 57  
219 225  
220 226  
221 227  @Callable(i)
228 + func withdraw () = {
229 +     let payment = value(i.payments[0])
230 +     let am = payment.amount
231 +     let id = payment.assetId
232 +     if ((id == usdtUsdnLP))
233 +         then {
234 +             let TCIAmount =             match assetInfo(usdtUsdnLPTCI) {
235 +                 case q: Asset => 
236 +                     q.quantity
237 +                 case _ => 
238 +                     0
239 +             }
240 +             let usdnUsdtStaked = valueOrElse(getInteger(this, keyStaked), 0)
241 +             let forSingleTCI = fraction(usdnUsdtStaked, def, TCIAmount)
242 +             let usdnLpToWithdraw = fraction(forSingleTCI, am, def)
243 +             let fee = fraction(usdnLpToWithdraw, def, feePerc)
244 +             let unstakeUsdtUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["97zHFp1C3cB7qfvx8Xv5f2rWp9nUSG5UnAamfPcW6txf", usdnLpToWithdraw], nil)
245 +             if ((unstakeUsdtUsdnLP == unstakeUsdtUsdnLP))
246 +                 then {
247 +                     let usdnLpfeeTransfer = ScriptTransfer(Address(tw), fee, usdtUsdnLP)
248 +                     let transfer = ScriptTransfer(i.caller, (usdnLpToWithdraw - fee), usdtUsdnLP)
249 +                     let updateUsdnLpStaked = IntegerEntry(keyStaked, (usdnUsdtStaked - usdnLpToWithdraw))
250 +                     let brn = Burn(usdtUsdnLPTCI, am)
251 +                     if ((brn == brn))
252 +                         then [usdnLpfeeTransfer, transfer, updateUsdnLpStaked]
253 +                         else throw("Strict value is not equal to itself.")
254 +                     }
255 +                 else throw("Strict value is not equal to itself.")
256 +             }
257 +         else if ((id == wxUsdnLPTCI))
258 +             then {
259 +                 let wxTciAm =                 match assetInfo(wxUsdnLPTCI) {
260 +                     case q: Asset => 
261 +                         q.quantity
262 +                     case _ => 
263 +                         0
264 +                 }
265 +                 let wxUsdnStaked = valueOrElse(getInteger(this, keyWXUSDN), 0)
266 +                 let singleWXLP = fraction(wxUsdnStaked, def, wxTciAm)
267 +                 let wxLpToWithdraw = fraction(singleWXLP, am, def)
268 +                 let fee = fraction(wxLpToWithdraw, def, feePerc)
269 +                 let unstakeWxUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["F2AKkA513k5yHEJkLsU6vWxCYYk811GpjLhwEv2WGwZ9", wxLpToWithdraw], nil)
270 +                 if ((unstakeWxUsdnLP == unstakeWxUsdnLP))
271 +                     then {
272 +                         let wxLpFeeTransfer = ScriptTransfer(Address(tw), fee, wxUsdnLP)
273 +                         let wxLpTransfer = ScriptTransfer(i.caller, (wxLpToWithdraw - fee), wxUsdnLP)
274 +                         let updateWxLpStaked = IntegerEntry(keyWXUSDN, (wxUsdnStaked - wxLpToWithdraw))
275 +                         let burnWxLpTci = Burn(wxUsdnLP, am)
276 +                         if ((burnWxLpTci == burnWxLpTci))
277 +                             then [wxLpFeeTransfer, wxLpTransfer, updateWxLpStaked]
278 +                             else throw("Strict value is not equal to itself.")
279 +                         }
280 +                     else throw("Strict value is not equal to itself.")
281 +                 }
282 +             else if ((id == usdcUsdnLPTCI))
283 +                 then {
284 +                     let usdcUsdnTCI =                     match assetInfo(usdcUsdnLPTCI) {
285 +                         case q: Asset => 
286 +                             q.quantity
287 +                         case _ => 
288 +                             0
289 +                     }
290 +                     let usdcUsdnStaked = valueOrElse(getInteger(this, keyUSDCUSDN), 0)
291 +                     let singleUsdcLP = fraction(usdcUsdnStaked, def, usdcUsdnTCI)
292 +                     let usdcUsdnLpToWithdraw = fraction(singleUsdcLP, am, def)
293 +                     let fee = fraction(usdcUsdnLpToWithdraw, def, feePerc)
294 +                     let unstakeUsdcUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["EK6N7S38xbtBT3SxAqoGdDLCiX6rojX6G169CnSyuE5", usdcUsdnLpToWithdraw], nil)
295 +                     if ((unstakeUsdcUsdnLP == unstakeUsdcUsdnLP))
296 +                         then {
297 +                             let usdcUsdnLPFee = ScriptTransfer(Address(tw), fee, usdcUsdnLP)
298 +                             let usdcUsdnTransfer = ScriptTransfer(i.caller, (usdcUsdnLpToWithdraw - fee), usdcUsdnLP)
299 +                             let updateUsdcUsdnLpStaked = IntegerEntry(keyUSDCUSDN, (usdcUsdnStaked - usdcUsdnLpToWithdraw))
300 +                             let burnUsdcUsdnLpTci = Burn(usdcUsdnLPTCI, am)
301 +                             if ((burnUsdcUsdnLpTci == burnUsdcUsdnLpTci))
302 +                                 then [usdcUsdnLPFee, usdcUsdnTransfer, updateUsdcUsdnLpStaked]
303 +                                 else throw("Strict value is not equal to itself.")
304 +                             }
305 +                         else throw("Strict value is not equal to itself.")
306 +                     }
307 +                 else if ((id == usdcUsdtLPTCI))
308 +                     then {
309 +                         let usdcUsdtTci =                         match assetInfo(usdcUsdnLPTCI) {
310 +                             case q: Asset => 
311 +                                 q.quantity
312 +                             case _ => 
313 +                                 0
314 +                         }
315 +                         let usdcUsdtStaked = valueOrElse(getInteger(this, keyUSDCUSDT), 0)
316 +                         let singleUsdcUsdt = fraction(usdcUsdtStaked, def, usdcUsdtTci)
317 +                         let usdcUsdtLpToWithdraw = fraction(singleUsdcUsdt, am, def)
318 +                         let fee = fraction(usdcUsdtLpToWithdraw, def, feePerc)
319 +                         let unstakeUsdcUsdtLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["EPhdEfmQaNcHyvDmRGhnLhgcJtKZ2a4k3ZBmKWtAEWyH", usdcUsdtLpToWithdraw], nil)
320 +                         if ((unstakeUsdcUsdtLP == unstakeUsdcUsdtLP))
321 +                             then {
322 +                                 let usdcUsdtLPFee = ScriptTransfer(Address(tw), fee, usdcUsdtLP)
323 +                                 let usdcUsdtTransfer = ScriptTransfer(i.caller, (usdcUsdtLpToWithdraw - fee), usdcUsdtLP)
324 +                                 let updateUsdcUsdtLpStaked = IntegerEntry(keyUSDCUSDT, (usdcUsdtStaked - usdcUsdtLpToWithdraw))
325 +                                 let burnWxLpTci = Burn(usdcUsdnLPTCI, am)
326 +                                 if ((burnWxLpTci == burnWxLpTci))
327 +                                     then [usdcUsdtLPFee, usdcUsdtTransfer, updateUsdcUsdtLpStaked]
328 +                                     else throw("Strict value is not equal to itself.")
329 +                                 }
330 +                             else throw("Strict value is not equal to itself.")
331 +                         }
332 +                     else if ((id == puzzleUsdnLPTCI))
333 +                         then {
334 +                             let puzzleUsdnTci =                             match assetInfo(puzzleUsdnLPTCI) {
335 +                                 case q: Asset => 
336 +                                     q.quantity
337 +                                 case _ => 
338 +                                     0
339 +                             }
340 +                             let puzzleLPStaked = valueOrElse(getInteger(this, keyPUZZLEUSDN), 0)
341 +                             let singlePuzzleUsdn = fraction(puzzleLPStaked, def, puzzleUsdnTci)
342 +                             let puzzleUsdnWithdraw = fraction(singlePuzzleUsdn, am, def)
343 +                             let fee = fraction(puzzleUsdnWithdraw, def, feePerc)
344 +                             let unstakePuzzleUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["E8zHu33GfcNyGLypX77gZiUXfvuZQeaYmiEfsy7VYNwP", puzzleUsdnWithdraw], nil)
345 +                             if ((unstakePuzzleUsdnLP == unstakePuzzleUsdnLP))
346 +                                 then {
347 +                                     let puzzleUsdnLPFee = ScriptTransfer(Address(tw), fee, puzzleUsdnLP)
348 +                                     let puzzleUsdnTransfer = ScriptTransfer(i.caller, (puzzleUsdnWithdraw - fee), puzzleUsdnLP)
349 +                                     let updatePuzzleUsdnLpStaked = IntegerEntry(keyPUZZLEUSDN, (puzzleLPStaked - puzzleUsdnWithdraw))
350 +                                     let burnPuzzleTCI = Burn(puzzleUsdnLPTCI, am)
351 +                                     if ((burnPuzzleTCI == burnPuzzleTCI))
352 +                                         then [puzzleUsdnLPFee, puzzleUsdnTransfer, updatePuzzleUsdnLpStaked]
353 +                                         else throw("Strict value is not equal to itself.")
354 +                                     }
355 +                                 else throw("Strict value is not equal to itself.")
356 +                             }
357 +                         else throw("Invalid asset")
358 +     }
359 + 
360 + 
361 + 
362 + @Callable(i)
222 363  func compoundWxUsdnLP () = {
223 364      let compound = value(i.payments[0])
224 365      let ca = compound.amount
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let usdtUsdnLP = base58'97zHFp1C3cB7qfvx8Xv5f2rWp9nUSG5UnAamfPcW6txf'
5 5  
6 6  let usdtUsdnLPTCI = base58'2CD44HANZzsdU7yqRsmz7L9eA2Foh4YYMC4azMbaZEj6'
7 7  
8 8  let wxUsdnLP = base58'F2AKkA513k5yHEJkLsU6vWxCYYk811GpjLhwEv2WGwZ9'
9 9  
10 10  let wxUsdnLPTCI = base58'FuUobp3DcfARzDLcvtVW37i7FvMPvCCpgdcvWke8sBuh'
11 11  
12 12  let usdcUsdnLP = base58'EK6N7S38xbtBT3SxAqoGdDLCiX6rojX6G169CnSyuE5'
13 13  
14 14  let usdcUsdnLPTCI = base58'HZKFpNfyPG5gt4D6Nfy1zQSg2Ptmqv932GjNTCyBEeKP'
15 15  
16 16  let usdcUsdtLP = base58'EPhdEfmQaNcHyvDmRGhnLhgcJtKZ2a4k3ZBmKWtAEWyH'
17 17  
18 18  let usdcUsdtLPTCI = base58'BqPYkaiz7Le6fFu1rjZ54anrpT57EpvyugZCUqrsjXj'
19 19  
20 20  let puzzleUsdnLP = base58'E8zHu33GfcNyGLypX77gZiUXfvuZQeaYmiEfsy7VYNwP'
21 21  
22 22  let puzzleUsdnLPTCI = base58'Dh9QXSSABE5V6aRfu3mCbDAUokbpE7ER7pbZV6cvyg1A'
23 23  
24 24  let wxId = base58'Atqv59EYzjFGuitKVnMRk6H8FukjoV3ktPorbEys25on'
25 25  
26 26  let keySponsorship = "Sponsorship_in_lock"
27 27  
28 28  let isStopped = false
29 29  
30 30  let keyStaked = "STAKED_LP"
31 31  
32 32  let keyCompound = "From_Compound"
33 33  
34 34  let keywxUsdnCompound = "WX_USDN_compound"
35 35  
36 36  let keyWXUSDN = "WX_USDN"
37 37  
38 38  let keyUsdcUsdnCompound = "USDC_USDN_compound"
39 39  
40 40  let keyUSDCUSDN = "USDC_USDN"
41 41  
42 42  let keyUsdcUsdtCompound = "USDC_USDT_compound"
43 43  
44 44  let keyUSDCUSDT = "USDC_USDT"
45 45  
46 46  let keyPuzzleUsdnCompound = "PUZZLE_USDN_compound"
47 47  
48 48  let keyPUZZLEUSDN = "PUZZLE_USDN"
49 + 
50 + let def = 100000000
51 + 
52 + let feePerc = 10000000000
53 + 
54 + let tw = base58'3P93R2GBkTGVehRPhytHr7sdxYww93jkbhm'
49 55  
50 56  let oracle = base58'3P6phwFZFQtZFuc9dvdXsgvtg8JEFVgECPA'
51 57  
52 58  func checkAddress (caller) = if ((caller != oracle))
53 59      then false
54 60      else true
55 61  
56 62  
57 63  @Callable(i)
58 64  func depositWxUsdnLP () = {
59 65      let pmt = value(i.payments[0])
60 66      let pmtAmount = pmt.amount
61 67      if ((pmt.assetId != wxUsdnLP))
62 68          then throw("attach WXUSDNLP tokens only")
63 69          else if (isStopped)
64 70              then throw("smart contract is on lock")
65 71              else {
66 72                  let tkStaked = valueOrElse(getInteger(this, keyWXUSDN), 0)
67 73                  let totalIssued =                 match assetInfo(wxUsdnLPTCI) {
68 74                      case asset: Asset => 
69 75                          asset.quantity
70 76                      case _ => 
71 77                          throw("Can't find asset")
72 78                  }
73 79                  let one = fraction(totalIssued, 100000000, tkStaked)
74 80                  let toIssue = fraction(pmtAmount, one, 100000000)
75 81                  let updateState = IntegerEntry(keyWXUSDN, (tkStaked + pmtAmount))
76 82                  let LPstake = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [pmt])
77 83                  if ((LPstake == LPstake))
78 84                      then {
79 85                          let LPIssue = Reissue(wxUsdnLPTCI, toIssue, true)
80 86                          let transfer = ScriptTransfer(i.caller, toIssue, wxUsdnLPTCI)
81 87  [LPIssue, transfer, updateState]
82 88                          }
83 89                      else throw("Strict value is not equal to itself.")
84 90                  }
85 91      }
86 92  
87 93  
88 94  
89 95  @Callable(i)
90 96  func depositUsdtUsdnLP () = {
91 97      let pmt = value(i.payments[0])
92 98      let pmtAmount = pmt.amount
93 99      if ((pmt.assetId != usdtUsdnLP))
94 100          then throw("attach USDTUSDNLP tokens only")
95 101          else if (isStopped)
96 102              then throw("smart contract is on lock")
97 103              else {
98 104                  let tkStaked = valueOrElse(getInteger(this, keyStaked), 0)
99 105                  let totalIssued =                 match assetInfo(usdtUsdnLPTCI) {
100 106                      case asset: Asset => 
101 107                          asset.quantity
102 108                      case _ => 
103 109                          throw("Can't find asset")
104 110                  }
105 111                  let fromCompound = valueOrElse(getInteger(this, keyCompound), 0)
106 112                  let forOne = fraction(totalIssued, 100000000, tkStaked)
107 113                  let toIssue = fraction(pmtAmount, forOne, 100000000)
108 114                  let updateState = IntegerEntry(keyStaked, (tkStaked + pmtAmount))
109 115                  let LPstake = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [pmt])
110 116                  if ((LPstake == LPstake))
111 117                      then {
112 118                          let LPIssue = Reissue(usdtUsdnLPTCI, toIssue, true)
113 119                          let transfer = ScriptTransfer(i.caller, toIssue, usdtUsdnLPTCI)
114 120  [LPIssue, transfer, updateState]
115 121                          }
116 122                      else throw("Strict value is not equal to itself.")
117 123                  }
118 124      }
119 125  
120 126  
121 127  
122 128  @Callable(i)
123 129  func depositUsdcUsdnLP () = {
124 130      let pmt = value(i.payments[0])
125 131      let pmtAmount = pmt.amount
126 132      if ((pmt.assetId != usdcUsdnLP))
127 133          then throw("attach USDCUSDNLP tokens only")
128 134          else if (isStopped)
129 135              then throw("smart contract is on lock")
130 136              else {
131 137                  let tkStaked = valueOrElse(getInteger(this, keyUSDCUSDN), 0)
132 138                  let totalIssued =                 match assetInfo(usdcUsdnLPTCI) {
133 139                      case asset: Asset => 
134 140                          asset.quantity
135 141                      case _ => 
136 142                          throw("Can't find asset")
137 143                  }
138 144                  let fromCompound = valueOrElse(getInteger(this, keyUsdcUsdnCompound), 0)
139 145                  let forOne = fraction(totalIssued, 100000000, tkStaked)
140 146                  let toIssue = fraction(pmtAmount, forOne, 100000000)
141 147                  let updateState = IntegerEntry(keyUSDCUSDN, (tkStaked + pmtAmount))
142 148                  let LPstake = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [pmt])
143 149                  if ((LPstake == LPstake))
144 150                      then {
145 151                          let LPIssue = Reissue(usdcUsdnLPTCI, toIssue, true)
146 152                          let transfer = ScriptTransfer(i.caller, toIssue, usdcUsdnLPTCI)
147 153  [LPIssue, transfer, updateState]
148 154                          }
149 155                      else throw("Strict value is not equal to itself.")
150 156                  }
151 157      }
152 158  
153 159  
154 160  
155 161  @Callable(i)
156 162  func depositUsdcUsdtLP () = {
157 163      let pmt = value(i.payments[0])
158 164      let pmtAmount = pmt.amount
159 165      if ((pmt.assetId != usdcUsdtLP))
160 166          then throw("attach USDCUSDTLP tokens only")
161 167          else if (isStopped)
162 168              then throw("smart contract is on lock")
163 169              else {
164 170                  let tkStaked = valueOrElse(getInteger(this, keyUSDCUSDT), 0)
165 171                  let totalIssued =                 match assetInfo(usdcUsdtLPTCI) {
166 172                      case asset: Asset => 
167 173                          asset.quantity
168 174                      case _ => 
169 175                          throw("Can't find asset")
170 176                  }
171 177                  let fromCompound = valueOrElse(getInteger(this, keyUsdcUsdtCompound), 0)
172 178                  let forOne = fraction(totalIssued, 100000000, tkStaked)
173 179                  let toIssue = fraction(pmtAmount, forOne, 100000000)
174 180                  let updateState = IntegerEntry(keyUSDCUSDT, (tkStaked + pmtAmount))
175 181                  let LPstake = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [pmt])
176 182                  if ((LPstake == LPstake))
177 183                      then {
178 184                          let LPIssue = Reissue(usdcUsdtLPTCI, toIssue, true)
179 185                          let transfer = ScriptTransfer(i.caller, toIssue, usdcUsdtLPTCI)
180 186  [LPIssue, transfer, updateState]
181 187                          }
182 188                      else throw("Strict value is not equal to itself.")
183 189                  }
184 190      }
185 191  
186 192  
187 193  
188 194  @Callable(i)
189 195  func depositPuzzleUsdnLP () = {
190 196      let pmt = value(i.payments[0])
191 197      let pmtAmount = pmt.amount
192 198      if ((pmt.assetId != puzzleUsdnLP))
193 199          then throw("attach PUZZLEUDSNLP tokens only")
194 200          else if (isStopped)
195 201              then throw("smart contract is on lock")
196 202              else {
197 203                  let tkStaked = valueOrElse(getInteger(this, keyPUZZLEUSDN), 0)
198 204                  let totalIssued =                 match assetInfo(puzzleUsdnLPTCI) {
199 205                      case asset: Asset => 
200 206                          asset.quantity
201 207                      case _ => 
202 208                          throw("Can't find asset")
203 209                  }
204 210                  let fromCompound = valueOrElse(getInteger(this, keyPuzzleUsdnCompound), 0)
205 211                  let forOne = fraction(totalIssued, 100000000, tkStaked)
206 212                  let toIssue = fraction(pmtAmount, forOne, 100000000)
207 213                  let updateState = IntegerEntry(keyPUZZLEUSDN, (tkStaked + pmtAmount))
208 214                  let LPstake = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [pmt])
209 215                  if ((LPstake == LPstake))
210 216                      then {
211 217                          let LPIssue = Reissue(puzzleUsdnLPTCI, toIssue, true)
212 218                          let transfer = ScriptTransfer(i.caller, toIssue, puzzleUsdnLPTCI)
213 219  [LPIssue, transfer, updateState]
214 220                          }
215 221                      else throw("Strict value is not equal to itself.")
216 222                  }
217 223      }
218 224  
219 225  
220 226  
221 227  @Callable(i)
228 + func withdraw () = {
229 +     let payment = value(i.payments[0])
230 +     let am = payment.amount
231 +     let id = payment.assetId
232 +     if ((id == usdtUsdnLP))
233 +         then {
234 +             let TCIAmount =             match assetInfo(usdtUsdnLPTCI) {
235 +                 case q: Asset => 
236 +                     q.quantity
237 +                 case _ => 
238 +                     0
239 +             }
240 +             let usdnUsdtStaked = valueOrElse(getInteger(this, keyStaked), 0)
241 +             let forSingleTCI = fraction(usdnUsdtStaked, def, TCIAmount)
242 +             let usdnLpToWithdraw = fraction(forSingleTCI, am, def)
243 +             let fee = fraction(usdnLpToWithdraw, def, feePerc)
244 +             let unstakeUsdtUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["97zHFp1C3cB7qfvx8Xv5f2rWp9nUSG5UnAamfPcW6txf", usdnLpToWithdraw], nil)
245 +             if ((unstakeUsdtUsdnLP == unstakeUsdtUsdnLP))
246 +                 then {
247 +                     let usdnLpfeeTransfer = ScriptTransfer(Address(tw), fee, usdtUsdnLP)
248 +                     let transfer = ScriptTransfer(i.caller, (usdnLpToWithdraw - fee), usdtUsdnLP)
249 +                     let updateUsdnLpStaked = IntegerEntry(keyStaked, (usdnUsdtStaked - usdnLpToWithdraw))
250 +                     let brn = Burn(usdtUsdnLPTCI, am)
251 +                     if ((brn == brn))
252 +                         then [usdnLpfeeTransfer, transfer, updateUsdnLpStaked]
253 +                         else throw("Strict value is not equal to itself.")
254 +                     }
255 +                 else throw("Strict value is not equal to itself.")
256 +             }
257 +         else if ((id == wxUsdnLPTCI))
258 +             then {
259 +                 let wxTciAm =                 match assetInfo(wxUsdnLPTCI) {
260 +                     case q: Asset => 
261 +                         q.quantity
262 +                     case _ => 
263 +                         0
264 +                 }
265 +                 let wxUsdnStaked = valueOrElse(getInteger(this, keyWXUSDN), 0)
266 +                 let singleWXLP = fraction(wxUsdnStaked, def, wxTciAm)
267 +                 let wxLpToWithdraw = fraction(singleWXLP, am, def)
268 +                 let fee = fraction(wxLpToWithdraw, def, feePerc)
269 +                 let unstakeWxUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["F2AKkA513k5yHEJkLsU6vWxCYYk811GpjLhwEv2WGwZ9", wxLpToWithdraw], nil)
270 +                 if ((unstakeWxUsdnLP == unstakeWxUsdnLP))
271 +                     then {
272 +                         let wxLpFeeTransfer = ScriptTransfer(Address(tw), fee, wxUsdnLP)
273 +                         let wxLpTransfer = ScriptTransfer(i.caller, (wxLpToWithdraw - fee), wxUsdnLP)
274 +                         let updateWxLpStaked = IntegerEntry(keyWXUSDN, (wxUsdnStaked - wxLpToWithdraw))
275 +                         let burnWxLpTci = Burn(wxUsdnLP, am)
276 +                         if ((burnWxLpTci == burnWxLpTci))
277 +                             then [wxLpFeeTransfer, wxLpTransfer, updateWxLpStaked]
278 +                             else throw("Strict value is not equal to itself.")
279 +                         }
280 +                     else throw("Strict value is not equal to itself.")
281 +                 }
282 +             else if ((id == usdcUsdnLPTCI))
283 +                 then {
284 +                     let usdcUsdnTCI =                     match assetInfo(usdcUsdnLPTCI) {
285 +                         case q: Asset => 
286 +                             q.quantity
287 +                         case _ => 
288 +                             0
289 +                     }
290 +                     let usdcUsdnStaked = valueOrElse(getInteger(this, keyUSDCUSDN), 0)
291 +                     let singleUsdcLP = fraction(usdcUsdnStaked, def, usdcUsdnTCI)
292 +                     let usdcUsdnLpToWithdraw = fraction(singleUsdcLP, am, def)
293 +                     let fee = fraction(usdcUsdnLpToWithdraw, def, feePerc)
294 +                     let unstakeUsdcUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["EK6N7S38xbtBT3SxAqoGdDLCiX6rojX6G169CnSyuE5", usdcUsdnLpToWithdraw], nil)
295 +                     if ((unstakeUsdcUsdnLP == unstakeUsdcUsdnLP))
296 +                         then {
297 +                             let usdcUsdnLPFee = ScriptTransfer(Address(tw), fee, usdcUsdnLP)
298 +                             let usdcUsdnTransfer = ScriptTransfer(i.caller, (usdcUsdnLpToWithdraw - fee), usdcUsdnLP)
299 +                             let updateUsdcUsdnLpStaked = IntegerEntry(keyUSDCUSDN, (usdcUsdnStaked - usdcUsdnLpToWithdraw))
300 +                             let burnUsdcUsdnLpTci = Burn(usdcUsdnLPTCI, am)
301 +                             if ((burnUsdcUsdnLpTci == burnUsdcUsdnLpTci))
302 +                                 then [usdcUsdnLPFee, usdcUsdnTransfer, updateUsdcUsdnLpStaked]
303 +                                 else throw("Strict value is not equal to itself.")
304 +                             }
305 +                         else throw("Strict value is not equal to itself.")
306 +                     }
307 +                 else if ((id == usdcUsdtLPTCI))
308 +                     then {
309 +                         let usdcUsdtTci =                         match assetInfo(usdcUsdnLPTCI) {
310 +                             case q: Asset => 
311 +                                 q.quantity
312 +                             case _ => 
313 +                                 0
314 +                         }
315 +                         let usdcUsdtStaked = valueOrElse(getInteger(this, keyUSDCUSDT), 0)
316 +                         let singleUsdcUsdt = fraction(usdcUsdtStaked, def, usdcUsdtTci)
317 +                         let usdcUsdtLpToWithdraw = fraction(singleUsdcUsdt, am, def)
318 +                         let fee = fraction(usdcUsdtLpToWithdraw, def, feePerc)
319 +                         let unstakeUsdcUsdtLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["EPhdEfmQaNcHyvDmRGhnLhgcJtKZ2a4k3ZBmKWtAEWyH", usdcUsdtLpToWithdraw], nil)
320 +                         if ((unstakeUsdcUsdtLP == unstakeUsdcUsdtLP))
321 +                             then {
322 +                                 let usdcUsdtLPFee = ScriptTransfer(Address(tw), fee, usdcUsdtLP)
323 +                                 let usdcUsdtTransfer = ScriptTransfer(i.caller, (usdcUsdtLpToWithdraw - fee), usdcUsdtLP)
324 +                                 let updateUsdcUsdtLpStaked = IntegerEntry(keyUSDCUSDT, (usdcUsdtStaked - usdcUsdtLpToWithdraw))
325 +                                 let burnWxLpTci = Burn(usdcUsdnLPTCI, am)
326 +                                 if ((burnWxLpTci == burnWxLpTci))
327 +                                     then [usdcUsdtLPFee, usdcUsdtTransfer, updateUsdcUsdtLpStaked]
328 +                                     else throw("Strict value is not equal to itself.")
329 +                                 }
330 +                             else throw("Strict value is not equal to itself.")
331 +                         }
332 +                     else if ((id == puzzleUsdnLPTCI))
333 +                         then {
334 +                             let puzzleUsdnTci =                             match assetInfo(puzzleUsdnLPTCI) {
335 +                                 case q: Asset => 
336 +                                     q.quantity
337 +                                 case _ => 
338 +                                     0
339 +                             }
340 +                             let puzzleLPStaked = valueOrElse(getInteger(this, keyPUZZLEUSDN), 0)
341 +                             let singlePuzzleUsdn = fraction(puzzleLPStaked, def, puzzleUsdnTci)
342 +                             let puzzleUsdnWithdraw = fraction(singlePuzzleUsdn, am, def)
343 +                             let fee = fraction(puzzleUsdnWithdraw, def, feePerc)
344 +                             let unstakePuzzleUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["E8zHu33GfcNyGLypX77gZiUXfvuZQeaYmiEfsy7VYNwP", puzzleUsdnWithdraw], nil)
345 +                             if ((unstakePuzzleUsdnLP == unstakePuzzleUsdnLP))
346 +                                 then {
347 +                                     let puzzleUsdnLPFee = ScriptTransfer(Address(tw), fee, puzzleUsdnLP)
348 +                                     let puzzleUsdnTransfer = ScriptTransfer(i.caller, (puzzleUsdnWithdraw - fee), puzzleUsdnLP)
349 +                                     let updatePuzzleUsdnLpStaked = IntegerEntry(keyPUZZLEUSDN, (puzzleLPStaked - puzzleUsdnWithdraw))
350 +                                     let burnPuzzleTCI = Burn(puzzleUsdnLPTCI, am)
351 +                                     if ((burnPuzzleTCI == burnPuzzleTCI))
352 +                                         then [puzzleUsdnLPFee, puzzleUsdnTransfer, updatePuzzleUsdnLpStaked]
353 +                                         else throw("Strict value is not equal to itself.")
354 +                                     }
355 +                                 else throw("Strict value is not equal to itself.")
356 +                             }
357 +                         else throw("Invalid asset")
358 +     }
359 + 
360 + 
361 + 
362 + @Callable(i)
222 363  func compoundWxUsdnLP () = {
223 364      let compound = value(i.payments[0])
224 365      let ca = compound.amount
225 366      let isOracle = checkAddress(i.caller.bytes)
226 367      if ((compound.assetId != wxUsdnLP))
227 368          then throw("attach WXUSDNLP tokens only")
228 369          else if (!(isOracle))
229 370              then throw("You are not authotized to call this function")
230 371              else {
231 372                  let fromCompound = valueOrElse(getInteger(this, keywxUsdnCompound), 0)
232 373                  let totalStaked = valueOrElse(getInteger(this, keyWXUSDN), 0)
233 374                  let stakeC = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [compound])
234 375                  if ((stakeC == stakeC))
235 376                      then {
236 377                          let updateState = IntegerEntry(keyWXUSDN, (totalStaked + ca))
237 378                          let tc = IntegerEntry(keywxUsdnCompound, (fromCompound + ca))
238 379  [updateState, tc]
239 380                          }
240 381                      else throw("Strict value is not equal to itself.")
241 382                  }
242 383      }
243 384  
244 385  
245 386  
246 387  @Callable(i)
247 388  func compoundUsdtUsdnLP () = {
248 389      let compound = value(i.payments[0])
249 390      let ca = compound.amount
250 391      let isOracle = checkAddress(i.caller.bytes)
251 392      if ((compound.assetId != usdtUsdnLP))
252 393          then throw("attach USDTUSDNLP tokens only")
253 394          else if (!(isOracle))
254 395              then throw("You are not authotized to call this function")
255 396              else {
256 397                  let fromCompound = valueOrElse(getInteger(this, keyCompound), 0)
257 398                  let totalStaked = valueOrElse(getInteger(this, keyStaked), 0)
258 399                  let stakeC = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [compound])
259 400                  if ((stakeC == stakeC))
260 401                      then {
261 402                          let updateState = IntegerEntry(keyStaked, (totalStaked + ca))
262 403                          let tc = IntegerEntry(keyCompound, (fromCompound + ca))
263 404  [updateState, tc]
264 405                          }
265 406                      else throw("Strict value is not equal to itself.")
266 407                  }
267 408      }
268 409  
269 410  
270 411  
271 412  @Callable(i)
272 413  func compoundUsdcUsdnLP () = {
273 414      let compound = value(i.payments[0])
274 415      let ca = compound.amount
275 416      let isOracle = checkAddress(i.caller.bytes)
276 417      if ((compound.assetId != usdcUsdnLP))
277 418          then throw("attach USDCUSDNLP tokens only")
278 419          else if (!(isOracle))
279 420              then throw("You are not authotized to call this function")
280 421              else {
281 422                  let fromCompound = valueOrElse(getInteger(this, keyUsdcUsdnCompound), 0)
282 423                  let totalStaked = valueOrElse(getInteger(this, keyUSDCUSDN), 0)
283 424                  let stakeC = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [compound])
284 425                  if ((stakeC == stakeC))
285 426                      then {
286 427                          let updateState = IntegerEntry(keyUSDCUSDN, (totalStaked + ca))
287 428                          let tc = IntegerEntry(keyUsdcUsdnCompound, (fromCompound + ca))
288 429  [updateState, tc]
289 430                          }
290 431                      else throw("Strict value is not equal to itself.")
291 432                  }
292 433      }
293 434  
294 435  
295 436  
296 437  @Callable(i)
297 438  func compoundUsdcUsdtLP () = {
298 439      let compound = value(i.payments[0])
299 440      let ca = compound.amount
300 441      let isOracle = checkAddress(i.caller.bytes)
301 442      if ((compound.assetId != usdcUsdtLP))
302 443          then throw("attach USDCUSDTLP tokens only")
303 444          else if (!(isOracle))
304 445              then throw("You are not authotized to call this function")
305 446              else {
306 447                  let fromCompound = valueOrElse(getInteger(this, keyUsdcUsdtCompound), 0)
307 448                  let totalStaked = valueOrElse(getInteger(this, keyUSDCUSDT), 0)
308 449                  let stakeC = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [compound])
309 450                  if ((stakeC == stakeC))
310 451                      then {
311 452                          let updateState = IntegerEntry(keyUSDCUSDT, (totalStaked + ca))
312 453                          let tc = IntegerEntry(keyUsdcUsdtCompound, (fromCompound + ca))
313 454  [updateState, tc]
314 455                          }
315 456                      else throw("Strict value is not equal to itself.")
316 457                  }
317 458      }
318 459  
319 460  
320 461  
321 462  @Callable(i)
322 463  func compoundPuzzleUsdnLP () = {
323 464      let compound = value(i.payments[0])
324 465      let ca = compound.amount
325 466      let isOracle = checkAddress(i.caller.bytes)
326 467      if ((compound.assetId != puzzleUsdnLP))
327 468          then throw("attach PUZZLEUSDNLP tokens only")
328 469          else if (!(isOracle))
329 470              then throw("You are not authotized to call this function")
330 471              else {
331 472                  let fromCompound = valueOrElse(getInteger(this, keyPuzzleUsdnCompound), 0)
332 473                  let totalStaked = valueOrElse(getInteger(this, keyPUZZLEUSDN), 0)
333 474                  let stakeC = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [compound])
334 475                  if ((stakeC == stakeC))
335 476                      then {
336 477                          let updateState = IntegerEntry(keyPUZZLEUSDN, (totalStaked + ca))
337 478                          let tc = IntegerEntry(keyPuzzleUsdnCompound, (fromCompound + ca))
338 479  [updateState, tc]
339 480                          }
340 481                      else throw("Strict value is not equal to itself.")
341 482                  }
342 483      }
343 484  
344 485  
345 486  
346 487  @Callable(i)
347 488  func sponsorBoost () = {
348 489      let pm = value(i.payments[0])
349 490      let lockPeriod = 100
350 491      if ((pm.assetId != wxId))
351 492          then throw("Error")
352 493          else {
353 494              let sponsored = valueOrElse(getInteger(this, keySponsorship), 0)
354 495              let lock = invoke(Address(base58'3PJL8Hn8LACaSBWLQ3UVhctA5cTQLBFwBAP'), "increaseLock", [lockPeriod], [pm])
355 496              if ((lock == lock))
356 497                  then {
357 498                      let s = IntegerEntry(keySponsorship, (pm.amount + sponsored))
358 499  [s]
359 500                      }
360 501                  else throw("Strict value is not equal to itself.")
361 502              }
362 503      }
363 504  
364 505  
365 506  @Verifier(tx)
366 507  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
367 508

Old	New		Differences
46	46		let keyPuzzleUsdnCompound = "PUZZLE_USDN_compound"
47	47
48	48		let keyPUZZLEUSDN = "PUZZLE_USDN"
	49	+
	50	+	let def = 100000000
	51	+
	52	+	let feePerc = 10000000000
	53	+
	54	+	let tw = base58'3P93R2GBkTGVehRPhytHr7sdxYww93jkbhm'
49	55
50	56		let oracle = base58'3P6phwFZFQtZFuc9dvdXsgvtg8JEFVgECPA'
51	57

219	225
220	226
221	227		@Callable(i)
	228	+	func withdraw () = {
	229	+	let payment = value(i.payments[0])
	230	+	let am = payment.amount
	231	+	let id = payment.assetId
	232	+	if ((id == usdtUsdnLP))
	233	+	then {
	234	+	let TCIAmount = match assetInfo(usdtUsdnLPTCI) {
	235	+	case q: Asset =>
	236	+	q.quantity
	237	+	case _ =>
	238	+	0
	239	+	}
	240	+	let usdnUsdtStaked = valueOrElse(getInteger(this, keyStaked), 0)
	241	+	let forSingleTCI = fraction(usdnUsdtStaked, def, TCIAmount)
	242	+	let usdnLpToWithdraw = fraction(forSingleTCI, am, def)
	243	+	let fee = fraction(usdnLpToWithdraw, def, feePerc)
	244	+	let unstakeUsdtUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["97zHFp1C3cB7qfvx8Xv5f2rWp9nUSG5UnAamfPcW6txf", usdnLpToWithdraw], nil)
	245	+	if ((unstakeUsdtUsdnLP == unstakeUsdtUsdnLP))
	246	+	then {
	247	+	let usdnLpfeeTransfer = ScriptTransfer(Address(tw), fee, usdtUsdnLP)
	248	+	let transfer = ScriptTransfer(i.caller, (usdnLpToWithdraw - fee), usdtUsdnLP)
	249	+	let updateUsdnLpStaked = IntegerEntry(keyStaked, (usdnUsdtStaked - usdnLpToWithdraw))
	250	+	let brn = Burn(usdtUsdnLPTCI, am)
	251	+	if ((brn == brn))
	252	+	then [usdnLpfeeTransfer, transfer, updateUsdnLpStaked]
	253	+	else throw("Strict value is not equal to itself.")
	254	+	}
	255	+	else throw("Strict value is not equal to itself.")
	256	+	}
	257	+	else if ((id == wxUsdnLPTCI))
	258	+	then {
	259	+	let wxTciAm = match assetInfo(wxUsdnLPTCI) {
	260	+	case q: Asset =>
	261	+	q.quantity
	262	+	case _ =>
	263	+	0
	264	+	}
	265	+	let wxUsdnStaked = valueOrElse(getInteger(this, keyWXUSDN), 0)
	266	+	let singleWXLP = fraction(wxUsdnStaked, def, wxTciAm)
	267	+	let wxLpToWithdraw = fraction(singleWXLP, am, def)
	268	+	let fee = fraction(wxLpToWithdraw, def, feePerc)
	269	+	let unstakeWxUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["F2AKkA513k5yHEJkLsU6vWxCYYk811GpjLhwEv2WGwZ9", wxLpToWithdraw], nil)
	270	+	if ((unstakeWxUsdnLP == unstakeWxUsdnLP))
	271	+	then {
	272	+	let wxLpFeeTransfer = ScriptTransfer(Address(tw), fee, wxUsdnLP)
	273	+	let wxLpTransfer = ScriptTransfer(i.caller, (wxLpToWithdraw - fee), wxUsdnLP)
	274	+	let updateWxLpStaked = IntegerEntry(keyWXUSDN, (wxUsdnStaked - wxLpToWithdraw))
	275	+	let burnWxLpTci = Burn(wxUsdnLP, am)
	276	+	if ((burnWxLpTci == burnWxLpTci))
	277	+	then [wxLpFeeTransfer, wxLpTransfer, updateWxLpStaked]
	278	+	else throw("Strict value is not equal to itself.")
	279	+	}
	280	+	else throw("Strict value is not equal to itself.")
	281	+	}
	282	+	else if ((id == usdcUsdnLPTCI))
	283	+	then {
	284	+	let usdcUsdnTCI = match assetInfo(usdcUsdnLPTCI) {
	285	+	case q: Asset =>
	286	+	q.quantity
	287	+	case _ =>
	288	+	0
	289	+	}
	290	+	let usdcUsdnStaked = valueOrElse(getInteger(this, keyUSDCUSDN), 0)
	291	+	let singleUsdcLP = fraction(usdcUsdnStaked, def, usdcUsdnTCI)
	292	+	let usdcUsdnLpToWithdraw = fraction(singleUsdcLP, am, def)
	293	+	let fee = fraction(usdcUsdnLpToWithdraw, def, feePerc)
	294	+	let unstakeUsdcUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["EK6N7S38xbtBT3SxAqoGdDLCiX6rojX6G169CnSyuE5", usdcUsdnLpToWithdraw], nil)
	295	+	if ((unstakeUsdcUsdnLP == unstakeUsdcUsdnLP))
	296	+	then {
	297	+	let usdcUsdnLPFee = ScriptTransfer(Address(tw), fee, usdcUsdnLP)
	298	+	let usdcUsdnTransfer = ScriptTransfer(i.caller, (usdcUsdnLpToWithdraw - fee), usdcUsdnLP)
	299	+	let updateUsdcUsdnLpStaked = IntegerEntry(keyUSDCUSDN, (usdcUsdnStaked - usdcUsdnLpToWithdraw))
	300	+	let burnUsdcUsdnLpTci = Burn(usdcUsdnLPTCI, am)
	301	+	if ((burnUsdcUsdnLpTci == burnUsdcUsdnLpTci))
	302	+	then [usdcUsdnLPFee, usdcUsdnTransfer, updateUsdcUsdnLpStaked]
	303	+	else throw("Strict value is not equal to itself.")
	304	+	}
	305	+	else throw("Strict value is not equal to itself.")
	306	+	}
	307	+	else if ((id == usdcUsdtLPTCI))
	308	+	then {
	309	+	let usdcUsdtTci = match assetInfo(usdcUsdnLPTCI) {
	310	+	case q: Asset =>
	311	+	q.quantity
	312	+	case _ =>
	313	+	0
	314	+	}
	315	+	let usdcUsdtStaked = valueOrElse(getInteger(this, keyUSDCUSDT), 0)
	316	+	let singleUsdcUsdt = fraction(usdcUsdtStaked, def, usdcUsdtTci)
	317	+	let usdcUsdtLpToWithdraw = fraction(singleUsdcUsdt, am, def)
	318	+	let fee = fraction(usdcUsdtLpToWithdraw, def, feePerc)
	319	+	let unstakeUsdcUsdtLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["EPhdEfmQaNcHyvDmRGhnLhgcJtKZ2a4k3ZBmKWtAEWyH", usdcUsdtLpToWithdraw], nil)
	320	+	if ((unstakeUsdcUsdtLP == unstakeUsdcUsdtLP))
	321	+	then {
	322	+	let usdcUsdtLPFee = ScriptTransfer(Address(tw), fee, usdcUsdtLP)
	323	+	let usdcUsdtTransfer = ScriptTransfer(i.caller, (usdcUsdtLpToWithdraw - fee), usdcUsdtLP)
	324	+	let updateUsdcUsdtLpStaked = IntegerEntry(keyUSDCUSDT, (usdcUsdtStaked - usdcUsdtLpToWithdraw))
	325	+	let burnWxLpTci = Burn(usdcUsdnLPTCI, am)
	326	+	if ((burnWxLpTci == burnWxLpTci))
	327	+	then [usdcUsdtLPFee, usdcUsdtTransfer, updateUsdcUsdtLpStaked]
	328	+	else throw("Strict value is not equal to itself.")
	329	+	}
	330	+	else throw("Strict value is not equal to itself.")
	331	+	}
	332	+	else if ((id == puzzleUsdnLPTCI))
	333	+	then {
	334	+	let puzzleUsdnTci = match assetInfo(puzzleUsdnLPTCI) {
	335	+	case q: Asset =>
	336	+	q.quantity
	337	+	case _ =>
	338	+	0
	339	+	}
	340	+	let puzzleLPStaked = valueOrElse(getInteger(this, keyPUZZLEUSDN), 0)
	341	+	let singlePuzzleUsdn = fraction(puzzleLPStaked, def, puzzleUsdnTci)
	342	+	let puzzleUsdnWithdraw = fraction(singlePuzzleUsdn, am, def)
	343	+	let fee = fraction(puzzleUsdnWithdraw, def, feePerc)
	344	+	let unstakePuzzleUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["E8zHu33GfcNyGLypX77gZiUXfvuZQeaYmiEfsy7VYNwP", puzzleUsdnWithdraw], nil)
	345	+	if ((unstakePuzzleUsdnLP == unstakePuzzleUsdnLP))
	346	+	then {
	347	+	let puzzleUsdnLPFee = ScriptTransfer(Address(tw), fee, puzzleUsdnLP)
	348	+	let puzzleUsdnTransfer = ScriptTransfer(i.caller, (puzzleUsdnWithdraw - fee), puzzleUsdnLP)
	349	+	let updatePuzzleUsdnLpStaked = IntegerEntry(keyPUZZLEUSDN, (puzzleLPStaked - puzzleUsdnWithdraw))
	350	+	let burnPuzzleTCI = Burn(puzzleUsdnLPTCI, am)
	351	+	if ((burnPuzzleTCI == burnPuzzleTCI))
	352	+	then [puzzleUsdnLPFee, puzzleUsdnTransfer, updatePuzzleUsdnLpStaked]
	353	+	else throw("Strict value is not equal to itself.")
	354	+	}
	355	+	else throw("Strict value is not equal to itself.")
	356	+	}
	357	+	else throw("Invalid asset")
	358	+	}
	359	+
	360	+
	361	+
	362	+	@Callable(i)
222	363		func compoundWxUsdnLP () = {
223	364		let compound = value(i.payments[0])
224	365		let ca = compound.amount

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let usdtUsdnLP = base58'97zHFp1C3cB7qfvx8Xv5f2rWp9nUSG5UnAamfPcW6txf'
5	5
6	6		let usdtUsdnLPTCI = base58'2CD44HANZzsdU7yqRsmz7L9eA2Foh4YYMC4azMbaZEj6'
7	7
8	8		let wxUsdnLP = base58'F2AKkA513k5yHEJkLsU6vWxCYYk811GpjLhwEv2WGwZ9'
9	9
10	10		let wxUsdnLPTCI = base58'FuUobp3DcfARzDLcvtVW37i7FvMPvCCpgdcvWke8sBuh'
11	11
12	12		let usdcUsdnLP = base58'EK6N7S38xbtBT3SxAqoGdDLCiX6rojX6G169CnSyuE5'
13	13
14	14		let usdcUsdnLPTCI = base58'HZKFpNfyPG5gt4D6Nfy1zQSg2Ptmqv932GjNTCyBEeKP'
15	15
16	16		let usdcUsdtLP = base58'EPhdEfmQaNcHyvDmRGhnLhgcJtKZ2a4k3ZBmKWtAEWyH'
17	17
18	18		let usdcUsdtLPTCI = base58'BqPYkaiz7Le6fFu1rjZ54anrpT57EpvyugZCUqrsjXj'
19	19
20	20		let puzzleUsdnLP = base58'E8zHu33GfcNyGLypX77gZiUXfvuZQeaYmiEfsy7VYNwP'
21	21
22	22		let puzzleUsdnLPTCI = base58'Dh9QXSSABE5V6aRfu3mCbDAUokbpE7ER7pbZV6cvyg1A'
23	23
24	24		let wxId = base58'Atqv59EYzjFGuitKVnMRk6H8FukjoV3ktPorbEys25on'
25	25
26	26		let keySponsorship = "Sponsorship_in_lock"
27	27
28	28		let isStopped = false
29	29
30	30		let keyStaked = "STAKED_LP"
31	31
32	32		let keyCompound = "From_Compound"
33	33
34	34		let keywxUsdnCompound = "WX_USDN_compound"
35	35
36	36		let keyWXUSDN = "WX_USDN"
37	37
38	38		let keyUsdcUsdnCompound = "USDC_USDN_compound"
39	39
40	40		let keyUSDCUSDN = "USDC_USDN"
41	41
42	42		let keyUsdcUsdtCompound = "USDC_USDT_compound"
43	43
44	44		let keyUSDCUSDT = "USDC_USDT"
45	45
46	46		let keyPuzzleUsdnCompound = "PUZZLE_USDN_compound"
47	47
48	48		let keyPUZZLEUSDN = "PUZZLE_USDN"
	49	+
	50	+	let def = 100000000
	51	+
	52	+	let feePerc = 10000000000
	53	+
	54	+	let tw = base58'3P93R2GBkTGVehRPhytHr7sdxYww93jkbhm'
49	55
50	56		let oracle = base58'3P6phwFZFQtZFuc9dvdXsgvtg8JEFVgECPA'
51	57
52	58		func checkAddress (caller) = if ((caller != oracle))
53	59		then false
54	60		else true
55	61
56	62
57	63		@Callable(i)
58	64		func depositWxUsdnLP () = {
59	65		let pmt = value(i.payments[0])
60	66		let pmtAmount = pmt.amount
61	67		if ((pmt.assetId != wxUsdnLP))
62	68		then throw("attach WXUSDNLP tokens only")
63	69		else if (isStopped)
64	70		then throw("smart contract is on lock")
65	71		else {
66	72		let tkStaked = valueOrElse(getInteger(this, keyWXUSDN), 0)
67	73		let totalIssued = match assetInfo(wxUsdnLPTCI) {
68	74		case asset: Asset =>
69	75		asset.quantity
70	76		case _ =>
71	77		throw("Can't find asset")
72	78		}
73	79		let one = fraction(totalIssued, 100000000, tkStaked)
74	80		let toIssue = fraction(pmtAmount, one, 100000000)
75	81		let updateState = IntegerEntry(keyWXUSDN, (tkStaked + pmtAmount))
76	82		let LPstake = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [pmt])
77	83		if ((LPstake == LPstake))
78	84		then {
79	85		let LPIssue = Reissue(wxUsdnLPTCI, toIssue, true)
80	86		let transfer = ScriptTransfer(i.caller, toIssue, wxUsdnLPTCI)
81	87		[LPIssue, transfer, updateState]
82	88		}
83	89		else throw("Strict value is not equal to itself.")
84	90		}
85	91		}
86	92
87	93
88	94
89	95		@Callable(i)
90	96		func depositUsdtUsdnLP () = {
91	97		let pmt = value(i.payments[0])
92	98		let pmtAmount = pmt.amount
93	99		if ((pmt.assetId != usdtUsdnLP))
94	100		then throw("attach USDTUSDNLP tokens only")
95	101		else if (isStopped)
96	102		then throw("smart contract is on lock")
97	103		else {
98	104		let tkStaked = valueOrElse(getInteger(this, keyStaked), 0)
99	105		let totalIssued = match assetInfo(usdtUsdnLPTCI) {
100	106		case asset: Asset =>
101	107		asset.quantity
102	108		case _ =>
103	109		throw("Can't find asset")
104	110		}
105	111		let fromCompound = valueOrElse(getInteger(this, keyCompound), 0)
106	112		let forOne = fraction(totalIssued, 100000000, tkStaked)
107	113		let toIssue = fraction(pmtAmount, forOne, 100000000)
108	114		let updateState = IntegerEntry(keyStaked, (tkStaked + pmtAmount))
109	115		let LPstake = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [pmt])
110	116		if ((LPstake == LPstake))
111	117		then {
112	118		let LPIssue = Reissue(usdtUsdnLPTCI, toIssue, true)
113	119		let transfer = ScriptTransfer(i.caller, toIssue, usdtUsdnLPTCI)
114	120		[LPIssue, transfer, updateState]
115	121		}
116	122		else throw("Strict value is not equal to itself.")
117	123		}
118	124		}
119	125
120	126
121	127
122	128		@Callable(i)
123	129		func depositUsdcUsdnLP () = {
124	130		let pmt = value(i.payments[0])
125	131		let pmtAmount = pmt.amount
126	132		if ((pmt.assetId != usdcUsdnLP))
127	133		then throw("attach USDCUSDNLP tokens only")
128	134		else if (isStopped)
129	135		then throw("smart contract is on lock")
130	136		else {
131	137		let tkStaked = valueOrElse(getInteger(this, keyUSDCUSDN), 0)
132	138		let totalIssued = match assetInfo(usdcUsdnLPTCI) {
133	139		case asset: Asset =>
134	140		asset.quantity
135	141		case _ =>
136	142		throw("Can't find asset")
137	143		}
138	144		let fromCompound = valueOrElse(getInteger(this, keyUsdcUsdnCompound), 0)
139	145		let forOne = fraction(totalIssued, 100000000, tkStaked)
140	146		let toIssue = fraction(pmtAmount, forOne, 100000000)
141	147		let updateState = IntegerEntry(keyUSDCUSDN, (tkStaked + pmtAmount))
142	148		let LPstake = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [pmt])
143	149		if ((LPstake == LPstake))
144	150		then {
145	151		let LPIssue = Reissue(usdcUsdnLPTCI, toIssue, true)
146	152		let transfer = ScriptTransfer(i.caller, toIssue, usdcUsdnLPTCI)
147	153		[LPIssue, transfer, updateState]
148	154		}
149	155		else throw("Strict value is not equal to itself.")
150	156		}
151	157		}
152	158
153	159
154	160
155	161		@Callable(i)
156	162		func depositUsdcUsdtLP () = {
157	163		let pmt = value(i.payments[0])
158	164		let pmtAmount = pmt.amount
159	165		if ((pmt.assetId != usdcUsdtLP))
160	166		then throw("attach USDCUSDTLP tokens only")
161	167		else if (isStopped)
162	168		then throw("smart contract is on lock")
163	169		else {
164	170		let tkStaked = valueOrElse(getInteger(this, keyUSDCUSDT), 0)
165	171		let totalIssued = match assetInfo(usdcUsdtLPTCI) {
166	172		case asset: Asset =>
167	173		asset.quantity
168	174		case _ =>
169	175		throw("Can't find asset")
170	176		}
171	177		let fromCompound = valueOrElse(getInteger(this, keyUsdcUsdtCompound), 0)
172	178		let forOne = fraction(totalIssued, 100000000, tkStaked)
173	179		let toIssue = fraction(pmtAmount, forOne, 100000000)
174	180		let updateState = IntegerEntry(keyUSDCUSDT, (tkStaked + pmtAmount))
175	181		let LPstake = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [pmt])
176	182		if ((LPstake == LPstake))
177	183		then {
178	184		let LPIssue = Reissue(usdcUsdtLPTCI, toIssue, true)
179	185		let transfer = ScriptTransfer(i.caller, toIssue, usdcUsdtLPTCI)
180	186		[LPIssue, transfer, updateState]
181	187		}
182	188		else throw("Strict value is not equal to itself.")
183	189		}
184	190		}
185	191
186	192
187	193
188	194		@Callable(i)
189	195		func depositPuzzleUsdnLP () = {
190	196		let pmt = value(i.payments[0])
191	197		let pmtAmount = pmt.amount
192	198		if ((pmt.assetId != puzzleUsdnLP))
193	199		then throw("attach PUZZLEUDSNLP tokens only")
194	200		else if (isStopped)
195	201		then throw("smart contract is on lock")
196	202		else {
197	203		let tkStaked = valueOrElse(getInteger(this, keyPUZZLEUSDN), 0)
198	204		let totalIssued = match assetInfo(puzzleUsdnLPTCI) {
199	205		case asset: Asset =>
200	206		asset.quantity
201	207		case _ =>
202	208		throw("Can't find asset")
203	209		}
204	210		let fromCompound = valueOrElse(getInteger(this, keyPuzzleUsdnCompound), 0)
205	211		let forOne = fraction(totalIssued, 100000000, tkStaked)
206	212		let toIssue = fraction(pmtAmount, forOne, 100000000)
207	213		let updateState = IntegerEntry(keyPUZZLEUSDN, (tkStaked + pmtAmount))
208	214		let LPstake = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [pmt])
209	215		if ((LPstake == LPstake))
210	216		then {
211	217		let LPIssue = Reissue(puzzleUsdnLPTCI, toIssue, true)
212	218		let transfer = ScriptTransfer(i.caller, toIssue, puzzleUsdnLPTCI)
213	219		[LPIssue, transfer, updateState]
214	220		}
215	221		else throw("Strict value is not equal to itself.")
216	222		}
217	223		}
218	224
219	225
220	226
221	227		@Callable(i)
	228	+	func withdraw () = {
	229	+	let payment = value(i.payments[0])
	230	+	let am = payment.amount
	231	+	let id = payment.assetId
	232	+	if ((id == usdtUsdnLP))
	233	+	then {
	234	+	let TCIAmount = match assetInfo(usdtUsdnLPTCI) {
	235	+	case q: Asset =>
	236	+	q.quantity
	237	+	case _ =>
	238	+	0
	239	+	}
	240	+	let usdnUsdtStaked = valueOrElse(getInteger(this, keyStaked), 0)
	241	+	let forSingleTCI = fraction(usdnUsdtStaked, def, TCIAmount)
	242	+	let usdnLpToWithdraw = fraction(forSingleTCI, am, def)
	243	+	let fee = fraction(usdnLpToWithdraw, def, feePerc)
	244	+	let unstakeUsdtUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["97zHFp1C3cB7qfvx8Xv5f2rWp9nUSG5UnAamfPcW6txf", usdnLpToWithdraw], nil)
	245	+	if ((unstakeUsdtUsdnLP == unstakeUsdtUsdnLP))
	246	+	then {
	247	+	let usdnLpfeeTransfer = ScriptTransfer(Address(tw), fee, usdtUsdnLP)
	248	+	let transfer = ScriptTransfer(i.caller, (usdnLpToWithdraw - fee), usdtUsdnLP)
	249	+	let updateUsdnLpStaked = IntegerEntry(keyStaked, (usdnUsdtStaked - usdnLpToWithdraw))
	250	+	let brn = Burn(usdtUsdnLPTCI, am)
	251	+	if ((brn == brn))
	252	+	then [usdnLpfeeTransfer, transfer, updateUsdnLpStaked]
	253	+	else throw("Strict value is not equal to itself.")
	254	+	}
	255	+	else throw("Strict value is not equal to itself.")
	256	+	}
	257	+	else if ((id == wxUsdnLPTCI))
	258	+	then {
	259	+	let wxTciAm = match assetInfo(wxUsdnLPTCI) {
	260	+	case q: Asset =>
	261	+	q.quantity
	262	+	case _ =>
	263	+	0
	264	+	}
	265	+	let wxUsdnStaked = valueOrElse(getInteger(this, keyWXUSDN), 0)
	266	+	let singleWXLP = fraction(wxUsdnStaked, def, wxTciAm)
	267	+	let wxLpToWithdraw = fraction(singleWXLP, am, def)
	268	+	let fee = fraction(wxLpToWithdraw, def, feePerc)
	269	+	let unstakeWxUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["F2AKkA513k5yHEJkLsU6vWxCYYk811GpjLhwEv2WGwZ9", wxLpToWithdraw], nil)
	270	+	if ((unstakeWxUsdnLP == unstakeWxUsdnLP))
	271	+	then {
	272	+	let wxLpFeeTransfer = ScriptTransfer(Address(tw), fee, wxUsdnLP)
	273	+	let wxLpTransfer = ScriptTransfer(i.caller, (wxLpToWithdraw - fee), wxUsdnLP)
	274	+	let updateWxLpStaked = IntegerEntry(keyWXUSDN, (wxUsdnStaked - wxLpToWithdraw))
	275	+	let burnWxLpTci = Burn(wxUsdnLP, am)
	276	+	if ((burnWxLpTci == burnWxLpTci))
	277	+	then [wxLpFeeTransfer, wxLpTransfer, updateWxLpStaked]
	278	+	else throw("Strict value is not equal to itself.")
	279	+	}
	280	+	else throw("Strict value is not equal to itself.")
	281	+	}
	282	+	else if ((id == usdcUsdnLPTCI))
	283	+	then {
	284	+	let usdcUsdnTCI = match assetInfo(usdcUsdnLPTCI) {
	285	+	case q: Asset =>
	286	+	q.quantity
	287	+	case _ =>
	288	+	0
	289	+	}
	290	+	let usdcUsdnStaked = valueOrElse(getInteger(this, keyUSDCUSDN), 0)
	291	+	let singleUsdcLP = fraction(usdcUsdnStaked, def, usdcUsdnTCI)
	292	+	let usdcUsdnLpToWithdraw = fraction(singleUsdcLP, am, def)
	293	+	let fee = fraction(usdcUsdnLpToWithdraw, def, feePerc)
	294	+	let unstakeUsdcUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["EK6N7S38xbtBT3SxAqoGdDLCiX6rojX6G169CnSyuE5", usdcUsdnLpToWithdraw], nil)
	295	+	if ((unstakeUsdcUsdnLP == unstakeUsdcUsdnLP))
	296	+	then {
	297	+	let usdcUsdnLPFee = ScriptTransfer(Address(tw), fee, usdcUsdnLP)
	298	+	let usdcUsdnTransfer = ScriptTransfer(i.caller, (usdcUsdnLpToWithdraw - fee), usdcUsdnLP)
	299	+	let updateUsdcUsdnLpStaked = IntegerEntry(keyUSDCUSDN, (usdcUsdnStaked - usdcUsdnLpToWithdraw))
	300	+	let burnUsdcUsdnLpTci = Burn(usdcUsdnLPTCI, am)
	301	+	if ((burnUsdcUsdnLpTci == burnUsdcUsdnLpTci))
	302	+	then [usdcUsdnLPFee, usdcUsdnTransfer, updateUsdcUsdnLpStaked]
	303	+	else throw("Strict value is not equal to itself.")
	304	+	}
	305	+	else throw("Strict value is not equal to itself.")
	306	+	}
	307	+	else if ((id == usdcUsdtLPTCI))
	308	+	then {
	309	+	let usdcUsdtTci = match assetInfo(usdcUsdnLPTCI) {
	310	+	case q: Asset =>
	311	+	q.quantity
	312	+	case _ =>
	313	+	0
	314	+	}
	315	+	let usdcUsdtStaked = valueOrElse(getInteger(this, keyUSDCUSDT), 0)
	316	+	let singleUsdcUsdt = fraction(usdcUsdtStaked, def, usdcUsdtTci)
	317	+	let usdcUsdtLpToWithdraw = fraction(singleUsdcUsdt, am, def)
	318	+	let fee = fraction(usdcUsdtLpToWithdraw, def, feePerc)
	319	+	let unstakeUsdcUsdtLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["EPhdEfmQaNcHyvDmRGhnLhgcJtKZ2a4k3ZBmKWtAEWyH", usdcUsdtLpToWithdraw], nil)
	320	+	if ((unstakeUsdcUsdtLP == unstakeUsdcUsdtLP))
	321	+	then {
	322	+	let usdcUsdtLPFee = ScriptTransfer(Address(tw), fee, usdcUsdtLP)
	323	+	let usdcUsdtTransfer = ScriptTransfer(i.caller, (usdcUsdtLpToWithdraw - fee), usdcUsdtLP)
	324	+	let updateUsdcUsdtLpStaked = IntegerEntry(keyUSDCUSDT, (usdcUsdtStaked - usdcUsdtLpToWithdraw))
	325	+	let burnWxLpTci = Burn(usdcUsdnLPTCI, am)
	326	+	if ((burnWxLpTci == burnWxLpTci))
	327	+	then [usdcUsdtLPFee, usdcUsdtTransfer, updateUsdcUsdtLpStaked]
	328	+	else throw("Strict value is not equal to itself.")
	329	+	}
	330	+	else throw("Strict value is not equal to itself.")
	331	+	}
	332	+	else if ((id == puzzleUsdnLPTCI))
	333	+	then {
	334	+	let puzzleUsdnTci = match assetInfo(puzzleUsdnLPTCI) {
	335	+	case q: Asset =>
	336	+	q.quantity
	337	+	case _ =>
	338	+	0
	339	+	}
	340	+	let puzzleLPStaked = valueOrElse(getInteger(this, keyPUZZLEUSDN), 0)
	341	+	let singlePuzzleUsdn = fraction(puzzleLPStaked, def, puzzleUsdnTci)
	342	+	let puzzleUsdnWithdraw = fraction(singlePuzzleUsdn, am, def)
	343	+	let fee = fraction(puzzleUsdnWithdraw, def, feePerc)
	344	+	let unstakePuzzleUsdnLP = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "unstake", ["E8zHu33GfcNyGLypX77gZiUXfvuZQeaYmiEfsy7VYNwP", puzzleUsdnWithdraw], nil)
	345	+	if ((unstakePuzzleUsdnLP == unstakePuzzleUsdnLP))
	346	+	then {
	347	+	let puzzleUsdnLPFee = ScriptTransfer(Address(tw), fee, puzzleUsdnLP)
	348	+	let puzzleUsdnTransfer = ScriptTransfer(i.caller, (puzzleUsdnWithdraw - fee), puzzleUsdnLP)
	349	+	let updatePuzzleUsdnLpStaked = IntegerEntry(keyPUZZLEUSDN, (puzzleLPStaked - puzzleUsdnWithdraw))
	350	+	let burnPuzzleTCI = Burn(puzzleUsdnLPTCI, am)
	351	+	if ((burnPuzzleTCI == burnPuzzleTCI))
	352	+	then [puzzleUsdnLPFee, puzzleUsdnTransfer, updatePuzzleUsdnLpStaked]
	353	+	else throw("Strict value is not equal to itself.")
	354	+	}
	355	+	else throw("Strict value is not equal to itself.")
	356	+	}
	357	+	else throw("Invalid asset")
	358	+	}
	359	+
	360	+
	361	+
	362	+	@Callable(i)
222	363		func compoundWxUsdnLP () = {
223	364		let compound = value(i.payments[0])
224	365		let ca = compound.amount
225	366		let isOracle = checkAddress(i.caller.bytes)
226	367		if ((compound.assetId != wxUsdnLP))
227	368		then throw("attach WXUSDNLP tokens only")
228	369		else if (!(isOracle))
229	370		then throw("You are not authotized to call this function")
230	371		else {
231	372		let fromCompound = valueOrElse(getInteger(this, keywxUsdnCompound), 0)
232	373		let totalStaked = valueOrElse(getInteger(this, keyWXUSDN), 0)
233	374		let stakeC = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [compound])
234	375		if ((stakeC == stakeC))
235	376		then {
236	377		let updateState = IntegerEntry(keyWXUSDN, (totalStaked + ca))
237	378		let tc = IntegerEntry(keywxUsdnCompound, (fromCompound + ca))
238	379		[updateState, tc]
239	380		}
240	381		else throw("Strict value is not equal to itself.")
241	382		}
242	383		}
243	384
244	385
245	386
246	387		@Callable(i)
247	388		func compoundUsdtUsdnLP () = {
248	389		let compound = value(i.payments[0])
249	390		let ca = compound.amount
250	391		let isOracle = checkAddress(i.caller.bytes)
251	392		if ((compound.assetId != usdtUsdnLP))
252	393		then throw("attach USDTUSDNLP tokens only")
253	394		else if (!(isOracle))
254	395		then throw("You are not authotized to call this function")
255	396		else {
256	397		let fromCompound = valueOrElse(getInteger(this, keyCompound), 0)
257	398		let totalStaked = valueOrElse(getInteger(this, keyStaked), 0)
258	399		let stakeC = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [compound])
259	400		if ((stakeC == stakeC))
260	401		then {
261	402		let updateState = IntegerEntry(keyStaked, (totalStaked + ca))
262	403		let tc = IntegerEntry(keyCompound, (fromCompound + ca))
263	404		[updateState, tc]
264	405		}
265	406		else throw("Strict value is not equal to itself.")
266	407		}
267	408		}
268	409
269	410
270	411
271	412		@Callable(i)
272	413		func compoundUsdcUsdnLP () = {
273	414		let compound = value(i.payments[0])
274	415		let ca = compound.amount
275	416		let isOracle = checkAddress(i.caller.bytes)
276	417		if ((compound.assetId != usdcUsdnLP))
277	418		then throw("attach USDCUSDNLP tokens only")
278	419		else if (!(isOracle))
279	420		then throw("You are not authotized to call this function")
280	421		else {
281	422		let fromCompound = valueOrElse(getInteger(this, keyUsdcUsdnCompound), 0)
282	423		let totalStaked = valueOrElse(getInteger(this, keyUSDCUSDN), 0)
283	424		let stakeC = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [compound])
284	425		if ((stakeC == stakeC))
285	426		then {
286	427		let updateState = IntegerEntry(keyUSDCUSDN, (totalStaked + ca))
287	428		let tc = IntegerEntry(keyUsdcUsdnCompound, (fromCompound + ca))
288	429		[updateState, tc]
289	430		}
290	431		else throw("Strict value is not equal to itself.")
291	432		}
292	433		}
293	434
294	435
295	436
296	437		@Callable(i)
297	438		func compoundUsdcUsdtLP () = {
298	439		let compound = value(i.payments[0])
299	440		let ca = compound.amount
300	441		let isOracle = checkAddress(i.caller.bytes)
301	442		if ((compound.assetId != usdcUsdtLP))
302	443		then throw("attach USDCUSDTLP tokens only")
303	444		else if (!(isOracle))
304	445		then throw("You are not authotized to call this function")
305	446		else {
306	447		let fromCompound = valueOrElse(getInteger(this, keyUsdcUsdtCompound), 0)
307	448		let totalStaked = valueOrElse(getInteger(this, keyUSDCUSDT), 0)
308	449		let stakeC = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [compound])
309	450		if ((stakeC == stakeC))
310	451		then {
311	452		let updateState = IntegerEntry(keyUSDCUSDT, (totalStaked + ca))
312	453		let tc = IntegerEntry(keyUsdcUsdtCompound, (fromCompound + ca))
313	454		[updateState, tc]
314	455		}
315	456		else throw("Strict value is not equal to itself.")
316	457		}
317	458		}
318	459
319	460
320	461
321	462		@Callable(i)
322	463		func compoundPuzzleUsdnLP () = {
323	464		let compound = value(i.payments[0])
324	465		let ca = compound.amount
325	466		let isOracle = checkAddress(i.caller.bytes)
326	467		if ((compound.assetId != puzzleUsdnLP))
327	468		then throw("attach PUZZLEUSDNLP tokens only")
328	469		else if (!(isOracle))
329	470		then throw("You are not authotized to call this function")
330	471		else {
331	472		let fromCompound = valueOrElse(getInteger(this, keyPuzzleUsdnCompound), 0)
332	473		let totalStaked = valueOrElse(getInteger(this, keyPUZZLEUSDN), 0)
333	474		let stakeC = invoke(Address(base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'), "stake", nil, [compound])
334	475		if ((stakeC == stakeC))
335	476		then {
336	477		let updateState = IntegerEntry(keyPUZZLEUSDN, (totalStaked + ca))
337	478		let tc = IntegerEntry(keyPuzzleUsdnCompound, (fromCompound + ca))
338	479		[updateState, tc]
339	480		}
340	481		else throw("Strict value is not equal to itself.")
341	482		}
342	483		}
343	484
344	485
345	486
346	487		@Callable(i)
347	488		func sponsorBoost () = {
348	489		let pm = value(i.payments[0])
349	490		let lockPeriod = 100
350	491		if ((pm.assetId != wxId))
351	492		then throw("Error")
352	493		else {
353	494		let sponsored = valueOrElse(getInteger(this, keySponsorship), 0)
354	495		let lock = invoke(Address(base58'3PJL8Hn8LACaSBWLQ3UVhctA5cTQLBFwBAP'), "increaseLock", [lockPeriod], [pm])
355	496		if ((lock == lock))
356	497		then {
357	498		let s = IntegerEntry(keySponsorship, (pm.amount + sponsored))
358	499		[s]
359	500		}

github/deemru/w8io/3ef1775 
66.33 ms ◑