tx · EnCdeidiuechoJqQeomZWrcsUp6DE9d14ymzbsUwr7vP

3P7aVqHv6fXkYuS4sRW2K17ENZMsbXi3sPV:  -0.01000000 Waves

2023.11.26 21:54 [3926625] smart account 3P7aVqHv6fXkYuS4sRW2K17ENZMsbXi3sPV > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EnCdeidiuechoJqQeomZWrcsUp6DE9d14ymzbsUwr7vP",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1701024934931,
    "version": 2,
    "chainId": 87,
    "sender": "3P7aVqHv6fXkYuS4sRW2K17ENZMsbXi3sPV",
    "senderPublicKey": "5SevHzYFiymbFWe1GPt6nNYccPnfTbMft1DqZWfRH8GN",
    "proofs": [
        "37EytLYTYFJgQKQHvX9WuAPWJ2drWgWefJ2wUdGWv9CRGzojW5rfWpfLbj1EufvCkoi3Ey9VyruXE6dUsK4BvNDG"
    ],
    "script": "base64:BgIoCAISAwoBCBIECgIIARIECgIIARIDCgEIEgQKAggBEgMKAQESAwoBCC0BFHRyeUdldFN0cmluZ0V4dGVybmFsAgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAnQgCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFhBQckbWF0Y2gwBQFhAgABDXRyeUdldEJvb2xlYW4BA2tleQQHJG1hdGNoMAkAoAgBBQNrZXkDCQABAgUHJG1hdGNoMAIHQm9vbGVhbgQBYgUHJG1hdGNoMAUBYgcBDHRyeUdldFN0cmluZwEDa2V5CQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCBQR0aGlzBQNrZXkBDXRyeUdldEludGVnZXIBA2tleQQHJG1hdGNoMAkAmggCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABCWdldE9yYWNsZQAJAQdBZGRyZXNzAQkA2QQBCQEMdHJ5R2V0U3RyaW5nAQIUc3RhdGljX29yYWNsZUFkZHJlc3MBHnN0YXRpY0tleV90dXJ0bGVTdGFraW5nQWRkcmVzcwACG3N0YXRpY190dXJ0bGVTdGFraW5nQWRkcmVzcwEec3RhdGljS2V5X3R1cnRsZVJlYmlydGhBZGRyZXNzAAIbc3RhdGljX3R1cnRsZVJlYmlydGhBZGRyZXNzARVzdGF0aWNLZXlfcm9wZUFkZHJlc3MAAhJzdGF0aWNfcm9wZUFkZHJlc3MBHHN0YXRpY0tleV9sZXZlbFN5c3RlbUFkZHJlc3MAAhlzdGF0aWNfbGV2ZWxTeXN0ZW1BZGRyZXNzARZzdGF0aWNLZXlfc3BpY2VBc3NldElkAAITc3RhdGljX3NwaWNlQXNzZXRJZAEVc3RhdGljS2V5X21hcmtldHBsYWNlAAIZc3RhdGljX21hcmtldHBsYWNlQWRkcmVzcwEZc3RhdGljS2V5X2NhcGFjaXR5QWRkcmVzcwACFnN0YXRpY19jYXBhY2l0eUFkZHJlc3MBHHN0YXRpY0tleV92ZWdnRmFybWluZ0FkZHJlc3MAAhlzdGF0aWNfdmVnZ0Zhcm1pbmdBZGRyZXNzARFnZXRSZWJpcnRoQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIVc3RhdGljX3JlYmlydGhBZGRyZXNzARNnZXRJbmN1YmF0b3JBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhdzdGF0aWNfaW5jdWJhdG9yQWRkcmVzcwERZ2V0RmFybWluZ0FkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFXN0YXRpY19mYXJtaW5nQWRkcmVzcwESZ2V0R2FtZURhcHBBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhZzdGF0aWNfZ2FtZURhcHBBZGRyZXNzARJnZXRDYXBhY2l0eUFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQAJARlzdGF0aWNLZXlfY2FwYWNpdHlBZGRyZXNzAAEOZ2V0QnVybkFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACEnN0YXRpY19idXJuQWRkcmVzcwESZ2V0QmFieWR1Y2tBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhZzdGF0aWNfYmFieUR1Y2tBZGRyZXNzARJnZXRCcmVlZGluZ0FkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFXN0YXRpY19icmVlZGVyQWRkcmVzcwEQZ2V0TWFzdGVyQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIWc3RhdGljX2NmTWFzdGVyQWRkcmVzcwEXZ2V0VHVydGxlU3Rha2luZ0FkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQAJAR5zdGF0aWNLZXlfdHVydGxlU3Rha2luZ0FkZHJlc3MAARdnZXRUdXJ0bGVSZWJpcnRoQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAkBHnN0YXRpY0tleV90dXJ0bGVSZWJpcnRoQWRkcmVzcwABDmdldFJvcGVBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUACQEVc3RhdGljS2V5X3JvcGVBZGRyZXNzAAEPZ2V0U3BpY2VBc3NldElkAAkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAkBFnN0YXRpY0tleV9zcGljZUFzc2V0SWQAARVnZXRMZXZlbFN5c3RlbUFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQAJARxzdGF0aWNLZXlfbGV2ZWxTeXN0ZW1BZGRyZXNzAAEVZ2V0TWFya2V0UGxhY2VBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUACQEVc3RhdGljS2V5X21hcmtldHBsYWNlAAEVZ2V0VmVnZ0Zhcm1pbmdBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUACQEcc3RhdGljS2V5X3ZlZ2dGYXJtaW5nQWRkcmVzcwAACHdBY2NQS2V5CQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCCQEJZ2V0T3JhY2xlAAIPc3RhdGljX3dhcnNQS2V5AhtzdGF0aWNfd2Fyc1BLZXkgbm90IGRlZmluZWQAD3NjQ2FuVXNlQ291cG9ucwkAzAgCCQERZ2V0UmViaXJ0aEFkZHJlc3MACQDMCAIJARNnZXRJbmN1YmF0b3JBZGRyZXNzAAkAzAgCCQERZ2V0RmFybWluZ0FkZHJlc3MACQDMCAIJARJnZXRHYW1lRGFwcEFkZHJlc3MACQDMCAIJARJnZXRCYWJ5ZHVja0FkZHJlc3MACQDMCAIJARJnZXRCcmVlZGluZ0FkZHJlc3MACQDMCAIJARdnZXRUdXJ0bGVTdGFraW5nQWRkcmVzcwAJAMwIAgkBF2dldFR1cnRsZVJlYmlydGhBZGRyZXNzAAkAzAgCCQEOZ2V0Um9wZUFkZHJlc3MACQDMCAIJARVnZXRMZXZlbFN5c3RlbUFkZHJlc3MACQDMCAIJARVnZXRNYXJrZXRQbGFjZUFkZHJlc3MACQDMCAIJARJnZXRDYXBhY2l0eUFkZHJlc3MACQDMCAIFBHRoaXMFA25pbAEQY291cG9uc1VzZXJTcGVuZAEEdXNlcgkArAICBQR1c2VyAgZfc3BlbmQBEWNvdXBvbnNVc2VyQWN0aXZlAQR1c2VyCQCsAgIFBHVzZXICB19hY3RpdmUBFGNvdXBvbnNVc2VyQWN0aXZlT2xkAQR1c2VyCQCsAgIJARFjb3Vwb25zVXNlckFjdGl2ZQEFBHVzZXICBF9vbGQBEGNvdXBvbnNTcGVuZE9uU2MBAnNjCQCsAgIFAnNjAg9fc3BlbmRfYnlfdXNpbmcBHWFjdGlvblBlckFkZHJlc3NQZXJVc2VyUGVyRGF5BAR1c2VyBmFjdGlvbgtkYXBwQWRkcmVzcwNkYXkJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgULZGFwcEFkZHJlc3MCAV8FBmFjdGlvbgIBXwUEdXNlcgIBXwUDZGF5AghfYWN0aW9ucwEjYWN0aW9uUGVyQWRkcmVzc1BlclVzZXJMYXN0Q2hlY2tEYXkCBHVzZXIGYWN0aW9uCQCsAgIJAKwCAgkArAICBQZhY3Rpb24CAV8FBHVzZXICEl9hY3Rpb25zX2NoZWNrX2RheQEjYWN0aW9uUGVyQWRkcmVzc1BlclVzZXJBbW91bnRJbkFSb3cCBHVzZXIGYWN0aW9uCQCsAgIJAKwCAgkArAICBQZhY3Rpb24CAV8FBHVzZXICFl9hY3Rpb25zX2Ftb3VudF9pbl9yb3cBDnVzZXJFeHBlcmllbmNlAQR1c2VyCQCsAgIFBHVzZXICC19leHBlcmllbmNlARJhZGRDb3Vwb25zSW50ZXJuYWwCBHVzZXIGYW1vdW50BAZrZXlPbGQJARRjb3Vwb25zVXNlckFjdGl2ZU9sZAEFBHVzZXIEA2tleQkBEWNvdXBvbnNVc2VyQWN0aXZlAQUEdXNlcgQKY291cG9uc09sZAkBDXRyeUdldEludGVnZXIBBQNrZXkEB2NvdXBvbnMJAGQCBQpjb3Vwb25zT2xkBQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFBmtleU9sZAUKY291cG9uc09sZAkAzAgCCQEMSW50ZWdlckVudHJ5AgUDa2V5BQdjb3Vwb25zBQNuaWwACXN0YXJ0VHNNcwCAiNj6qzEBF2NhbGN1bGF0ZURheXNTaW5jZVN0YXJ0AAQEZGlmZgkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQlzdGFydFRzTXMECmRheXNQYXNzZWQJAGkCBQRkaWZmCQBoAgCAowUA6AcFCmRheXNQYXNzZWQBEGhhc0RvbmVUYXNrN0RheXMFA2RheQdhZGRyZXNzCmFjdGlvbk5hbWUMcmV3YXJkQW1vdW50EnJld2FyZEFtb3VudFdlZWtseQQRdXNlckV4cGVyaWVuY2VLZXkJAQ51c2VyRXhwZXJpZW5jZQEFB2FkZHJlc3MED3VzZXJFeHBUaWxsZGF0ZQkBDXRyeUdldEludGVnZXIBBRF1c2VyRXhwZXJpZW5jZUtleQQLY2hlY2tEYXlLZXkJASNhY3Rpb25QZXJBZGRyZXNzUGVyVXNlckxhc3RDaGVja0RheQIFB2FkZHJlc3MFCmFjdGlvbk5hbWUEDGRheXNJblJvd0tleQkBI2FjdGlvblBlckFkZHJlc3NQZXJVc2VyQW1vdW50SW5BUm93AgUHYWRkcmVzcwUKYWN0aW9uTmFtZQQMbGFzdENoZWNrRGF5CQENdHJ5R2V0SW50ZWdlcgEFC2NoZWNrRGF5S2V5BAlkYXlzSW5Sb3cJAQ10cnlHZXRJbnRlZ2VyAQUMZGF5c0luUm93S2V5BA9kYXlzSW5Sb3dVcGRhdGUDCQAAAgUMbGFzdENoZWNrRGF5CQBlAgUDZGF5AAEJAGQCBQlkYXlzSW5Sb3cAAQMJAGYCCQBlAgUDZGF5AAEFDGxhc3RDaGVja0RheQABAAAEEmxhc3RDaGVja0RheVVwZGF0ZQUDZGF5BAZyZXdhcmQDCQAAAgUPZGF5c0luUm93VXBkYXRlAAcJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwUScmV3YXJkQW1vdW50V2Vla2x5CQEPZ2V0U3BpY2VBc3NldElkAAkAzAgCCQEMSW50ZWdlckVudHJ5AgUMZGF5c0luUm93S2V5AAAFA25pbAkAzAgCCQEMSW50ZWdlckVudHJ5AgUMZGF5c0luUm93S2V5BQ9kYXlzSW5Sb3dVcGRhdGUFA25pbAkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQtjaGVja0RheUtleQUSbGFzdENoZWNrRGF5VXBkYXRlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB2FkZHJlc3MFDHJld2FyZEFtb3VudAkBD2dldFNwaWNlQXNzZXRJZAAJAMwIAgkBDEludGVnZXJFbnRyeQIFEXVzZXJFeHBlcmllbmNlS2V5CQBkAgUPdXNlckV4cFRpbGxkYXRlAAEFA25pbAUGcmV3YXJkAQlwYXlBY3Rpb24ECmFjdGlvbk5hbWULdXNlckFkZHJlc3MGYW1vdW50A2RheQQLY29tcG9zZWRLZXkDCQENdHJ5R2V0Qm9vbGVhbgEJAKwCAgkArAICAgVUQVNLXwUKYWN0aW9uTmFtZQIGX0VWRVJZBQphY3Rpb25OYW1lCQCsAgIJAKwCAgUKYWN0aW9uTmFtZQIBXwkApAMBBQZhbW91bnQDCQENdHJ5R2V0Qm9vbGVhbgEJAKwCAgIFVEFTS18FC2NvbXBvc2VkS2V5CQEQaGFzRG9uZVRhc2s3RGF5cwUFA2RheQkApQgBBQt1c2VyQWRkcmVzcwULY29tcG9zZWRLZXkJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICBVRBU0tfBQtjb21wb3NlZEtleQINX1JFV0FSRF9EQUlMWQkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIFVEFTS18FC2NvbXBvc2VkS2V5Ag5fUkVXQVJEX1dFRUtMWQUDbmlsARRyZWNvcmRBY3Rpb25JbnRlcm5hbAMKYWN0aW9uTmFtZQ1hZGRyZXNzQ2FsbGVyB2FkZHJlc3MDCQEBIQEJAQ9jb250YWluc0VsZW1lbnQCBQ9zY0NhblVzZUNvdXBvbnMFDWFkZHJlc3NDYWxsZXIJAAIBAj1DUkE6IE9ubHkgY2VydGFpbiBzbWFydCBjb250cmFjdHMgY2FuIHVzZSB0aGlzIHJld2FyZCBtb2R1bGUhBANkYXkJARdjYWxjdWxhdGVEYXlzU2luY2VTdGFydAAECWFjdGlvbktleQkBHWFjdGlvblBlckFkZHJlc3NQZXJVc2VyUGVyRGF5BAkApQgBBQdhZGRyZXNzBQphY3Rpb25OYW1lCQClCAEFDWFkZHJlc3NDYWxsZXIJAKQDAQUDZGF5BAx0b3RhbEFjdGlvbnMJAGQCCQENdHJ5R2V0SW50ZWdlcgEFCWFjdGlvbktleQABCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFCWFjdGlvbktleQUMdG90YWxBY3Rpb25zBQNuaWwJAQlwYXlBY3Rpb24EBQphY3Rpb25OYW1lBQdhZGRyZXNzBQx0b3RhbEFjdGlvbnMFA2RheQcBaQEPY29uZmlndXJlT3JhY2xlAQZvcmFjbGUDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAg9DQ086IGFkbWluIG9ubHkJAMwIAgkBC1N0cmluZ0VudHJ5AgIUc3RhdGljX29yYWNsZUFkZHJlc3MFBm9yYWNsZQUDbmlsAWkBCmFkZENvdXBvbnMCBHVzZXIGYW1vdW50AwMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkBAiE9AggFAWkPY2FsbGVyUHVibGljS2V5BQh3QWNjUEtleQcJAAIBAg9DQUM6IGFkbWluIG9ubHkDCQBnAgUGYW1vdW50AICt4gQJAM4IAgkBFHJlY29yZEFjdGlvbkludGVybmFsAwIMVkVHRzEwMDAwMDAwBQR0aGlzCQERQGV4dHJOYXRpdmUoMTA2MikBBQR1c2VyCQESYWRkQ291cG9uc0ludGVybmFsAgUEdXNlcgUGYW1vdW50AwkAZwIFBmFtb3VudACgwh4JAM4IAgkBFHJlY29yZEFjdGlvbkludGVybmFsAwIKVkVHRzUwMDAwMAUEdGhpcwkBEUBleHRyTmF0aXZlKDEwNjIpAQUEdXNlcgkBEmFkZENvdXBvbnNJbnRlcm5hbAIFBHVzZXIFBmFtb3VudAkBEmFkZENvdXBvbnNJbnRlcm5hbAIFBHVzZXIFBmFtb3VudAFpARFhZGRDb3Vwb25zRmFybWluZwIEdXNlcgZhbW91bnQDCQECIT0CCAUBaQZjYWxsZXIJARVnZXRWZWdnRmFybWluZ0FkZHJlc3MACQACAQIbTWV0aG9kIG9ubHkgZm9yIGZhcm1pbmcgc2MhCQESYWRkQ291cG9uc0ludGVybmFsAgUEdXNlcgUGYW1vdW50AWkBD2FkZENvdXBvbnNCYXRjaAEFYmF0Y2gDAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQECIT0CCAUBaQ9jYWxsZXJQdWJsaWNLZXkFCHdBY2NQS2V5BwkAAgECD0NBQzogYWRtaW4gb25seQQLY291cG9uc0xpc3QJALUJAgUFYmF0Y2gCATsKAQxoYW5kbGVDb3Vwb24CA2FjYwZjb3Vwb24ECnNwbGl0QXJyYXkJALUJAgUGY291cG9uAgE6BAR1c2VyCQCRAwIFCnNwbGl0QXJyYXkAAAQGYW1vdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKc3BsaXRBcnJheQABBAhidXJuQ2FsbAkA/AcECQEOZ2V0QnVybkFkZHJlc3MAAgxidXJuQnlJbnZva2UJAMwIAgUGYW1vdW50BQNuaWwFA25pbAMJAAACBQhidXJuQ2FsbAUIYnVybkNhbGwDCQBnAgUGYW1vdW50AICt4gQJAM4IAgkAzggCBQNhY2MJARRyZWNvcmRBY3Rpb25JbnRlcm5hbAMCDFZFR0cxMDAwMDAwMAUEdGhpcwkBEUBleHRyTmF0aXZlKDEwNjIpAQUEdXNlcgkBEmFkZENvdXBvbnNJbnRlcm5hbAIFBHVzZXIFBmFtb3VudAMJAGcCBQZhbW91bnQAoMIeCQDOCAIJAM4IAgUDYWNjCQEUcmVjb3JkQWN0aW9uSW50ZXJuYWwDAgpWRUdHNTAwMDAwBQR0aGlzCQERQGV4dHJOYXRpdmUoMTA2MikBBQR1c2VyCQESYWRkQ291cG9uc0ludGVybmFsAgUEdXNlcgUGYW1vdW50CQDOCAIFA2FjYwkBEmFkZENvdXBvbnNJbnRlcm5hbAIFBHVzZXIFBmFtb3VudAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgoAAiRsBQtjb3Vwb25zTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMaGFuZGxlQ291cG9uAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQBaQEIQ0ZSZWZ1bmQCCXJlY2lwaWVudAZhbW91bnQECWNmQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNTMpAggFAWkGY2FsbGVyAgpDRl9BRERSRVNTBANrZXkJAKwCAgkArAICAgJmXwUJY2ZBZGRyZXNzAg5fc3Rha2VfYWRkcmVzcwQMc3Rha2VBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA1MykCCQEQZ2V0TWFzdGVyQWRkcmVzcwAFA2tleQMJAQIhPQIFDHN0YWtlQWRkcmVzcwkApQgBCAUBaQZjYWxsZXIJAAIBAiZDQ1I6IFRoaXMgaXMgc29tZXRoaW5nIGZpc2h5IGdvaW5nIG9uIQkBEmFkZENvdXBvbnNJbnRlcm5hbAIFCXJlY2lwaWVudAUGYW1vdW50AWkBCnVzZUNvdXBvbnMBEWFtb3VudFRyeWluZ1RvUGF5BAppbnZva2luZ1NjCAUBaQZjYWxsZXIDCQBmAgAABRFhbW91bnRUcnlpbmdUb1BheQkAAgECL0NVQzogT25seSBwb3NpdGl2ZSBhbW91bnQgb2YgbW9uZXkgY2FuIGJlIHBhaWQhAwkBASEBCQEPY29udGFpbnNFbGVtZW50AgUPc2NDYW5Vc2VDb3Vwb25zBQppbnZva2luZ1NjCQACAQI9Q1VDOiBPbmx5IGNlcnRhaW4gc21hcnQgY29udHJhY3RzIGNhbiB1c2UgdGhpcyBjb3Vwb24gbW9kdWxlIQQEdXNlcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIECWtleUFjdGl2ZQkBEWNvdXBvbnNVc2VyQWN0aXZlAQUEdXNlcgQQYXZhaWxhYmxlQ291cG9ucwkBDXRyeUdldEludGVnZXIBBQlrZXlBY3RpdmUDCQBmAgAABRBhdmFpbGFibGVDb3Vwb25zCQACAQIOQ1VDOiBHZXQgcmVrdCEECWxlZnRUb1BheQMJAGYCBRFhbW91bnRUcnlpbmdUb1BheQUQYXZhaWxhYmxlQ291cG9ucwkAZQIFEWFtb3VudFRyeWluZ1RvUGF5BRBhdmFpbGFibGVDb3Vwb25zAAAECmFtb3VudFBhaWQJAGUCBRFhbW91bnRUcnlpbmdUb1BheQUJbGVmdFRvUGF5BBRhdmFpbGFibGVDb3Vwb25zTGVmdAkAZQIFEGF2YWlsYWJsZUNvdXBvbnMFCmFtb3VudFBhaWQDCQBmAgAABRRhdmFpbGFibGVDb3Vwb25zTGVmdAkAAgECGkNVQzogWW91IHRyeSB0byBvdmVyc3BlbmQhBAhrZXlTcGVuZAkBEGNvdXBvbnNVc2VyU3BlbmQBBQR1c2VyBAZrZXlPbGQJARRjb3Vwb25zVXNlckFjdGl2ZU9sZAEFBHVzZXIECmtleVNwZW5kU2MJARBjb3Vwb25zU3BlbmRPblNjAQkApQgBCAUBaQZjYWxsZXIEBXRvcFVwCQD8BwQJARVnZXRWZWdnRmFybWluZ0FkZHJlc3MAAgt0b3BVcFJld2FyZAkAzAgCBQphbW91bnRQYWlkBQNuaWwFA25pbAMJAAACBQV0b3BVcAUFdG9wVXAECnRvdGFsU3BlbmQJAGQCCQENdHJ5R2V0SW50ZWdlcgEFCGtleVNwZW5kBQphbW91bnRQYWlkBAx0b3RhbFNwZW5kU2MJAGQCCQENdHJ5R2V0SW50ZWdlcgEFCmtleVNwZW5kU2MFCmFtb3VudFBhaWQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUIa2V5U3BlbmQFCnRvdGFsU3BlbmQJAMwIAgkBDEludGVnZXJFbnRyeQIFBmtleU9sZAUQYXZhaWxhYmxlQ291cG9ucwkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5QWN0aXZlBRRhdmFpbGFibGVDb3Vwb25zTGVmdAkAzAgCCQEMSW50ZWdlckVudHJ5AgUKa2V5U3BlbmRTYwUMdG90YWxTcGVuZFNjBQNuaWwFCmFtb3VudFBhaWQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEMcmVjb3JkQWN0aW9uAQphY3Rpb25OYW1lCQEUcmVjb3JkQWN0aW9uSW50ZXJuYWwDBQphY3Rpb25OYW1lCAUBaQZjYWxsZXIIBQFpDG9yaWdpbkNhbGxlcgCb4gGX",
    "height": 3926625,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BMVuH2iwUjCwnTsWFcnchNp6aTychUBx4vVaYZu3ZcDN
Next: GbfKAiNbtSjMixwysgPdqsLmiP37bnyfYAGtpSo6hsZv

Diff: 
Old
New
Differences
1
-
{-# STDLIB_VERSION 5 #-}
1
+
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
let Scale = 100000000
4
+
func tryGetStringExternal (address,key) = match getString(address, key) {
5
+
    case a: String => 
6
+
        a
7
+
    case _ => 
8
+
        ""
9
+
}
10
+
11
+
12
+
func tryGetBoolean (key) = match getBoolean(key) {
13
+
    case b: Boolean => 
14
+
        b
15
+
    case _ => 
16
+
        false
17
+
}
18
+
19
+
20
+
func tryGetString (key) = tryGetStringExternal(this, key)
21
+
5
22
 
6
23
 
func tryGetInteger (key) = match getInteger(this, key) {
7
24
 
    case b: Int => 
11
28
 
}
12
29
 
13
30
 
14
-
func tryGetStringExternal (address,key) = match getString(address, key) {
15
-
    case a: String => 
16
-
        a
17
-
    case _ => 
18
-
        ""
19
-
}
31
+
func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
20
32
 
21
33
 
22
-
func tryGetString (key) = tryGetStringExternal(this, key)
34
+
func staticKey_turtleStakingAddress () = "static_turtleStakingAddress"
23
35
 
24
36
 
25
-
func staticKey_oracleAddress () = "static_oracleAddress"
37
+
func staticKey_turtleRebirthAddress () = "static_turtleRebirthAddress"
26
38
 
27
39
 
28
-
func staticKey_eggAssetId () = "static_eggAssetId"
40
+
func staticKey_ropeAddress () = "static_ropeAddress"
29
41
 
30
42
 
31
-
func staticKey_burnAddress () = "static_burnAddress"
43
+
func staticKey_levelSystemAddress () = "static_levelSystemAddress"
32
44
 
33
45
 
34
-
func staticKey_extraFee () = "static_extraFee"
46
+
func staticKey_spiceAssetId () = "static_spiceAssetId"
35
47
 
36
48
 
37
-
func staticKey_feeAggregator () = "static_feeAggregator"
49
+
func staticKey_marketplace () = "static_marketplaceAddress"
38
50
 
39
51
 
40
-
func staticKey_incubatorAddress () = "static_incubatorAddress"
52
+
func staticKey_capacityAddress () = "static_capacityAddress"
41
53
 
42
54
 
43
-
func staticKey_breederAddress () = "static_breederAddress"
55
+
func staticKey_veggFarmingAddress () = "static_veggFarmingAddress"
44
56
 
45
57
 
46
-
func staticKey_refContractAddress () = "static_refContractAddress"
58
+
func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))
47
59
 
48
60
 
49
-
func staticKey_couponsAddress () = "static_couponsAddress"
61
+
func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_incubatorAddress")))
50
62
 
51
63
 
52
-
func staticKey_accBoosterAddress () = "static_accBoosterAddress"
64
+
func getFarmingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_farmingAddress")))
53
65
 
54
66
 
55
-
func staticKey_veggPerchFee () = "static_veggPerchFee"
67
+
func getGameDappAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_gameDappAddress")))
56
68
 
57
69
 
58
-
func rewardClaimedKey (address) = (toString(address) + "_claimed")
70
+
func getCapacityAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_capacityAddress())))
59
71
 
60
72
 
61
-
func totalStakedKey () = "total_staked"
73
+
func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_burnAddress")))
62
74
 
63
75
 
64
-
func totalStakedUserKey (address) = ("total_staked_" + address)
76
+
func getBabyduckAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_babyDuckAddress")))
65
77
 
66
78
 
67
-
let keyGlobalLastInterest = "global_lastCheck_interest"
68
-
69
-
func keyLastCheckInterest (address) = (toString(address) + "_lastCheck_interest")
79
+
func getBreedingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_breederAddress")))
70
80
 
71
81
 
72
-
let keyGlobalEarned = "global_earnings"
73
-
74
-
func getOracle () = Address(fromBase58String(tryGetString(staticKey_oracleAddress())))
82
+
func getMasterAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_cfMasterAddress")))
75
83
 
76
84
 
77
-
func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_eggAssetId()))
85
+
func getTurtleStakingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleStakingAddress())))
78
86
 
79
87
 
80
-
func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_burnAddress())))
88
+
func getTurtleRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleRebirthAddress())))
81
89
 
82
90
 
83
-
func getFeeAggregator () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_feeAggregator())))
91
+
func getRopeAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_ropeAddress())))
84
92
 
85
93
 
86
-
func getBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_breederAddress())))
94
+
func getSpiceAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_spiceAssetId()))
87
95
 
88
96
 
89
-
func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_incubatorAddress())))
97
+
func getLevelSystemAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_levelSystemAddress())))
90
98
 
91
99
 
92
-
func getRefContractAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_refContractAddress())))
100
+
func getMarketPlaceAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_marketplace())))
93
101
 
94
102
 
95
-
func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_couponsAddress())))
103
+
func getVeggFarmingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_veggFarmingAddress())))
96
104
 
97
105
 
98
-
func getAccBoosterAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_accBoosterAddress())))
106
+
let wAccPKey = fromBase58String(valueOrErrorMessage(getString(getOracle(), "static_warsPKey"), "static_warsPKey not defined"))
107
+
108
+
let scCanUseCoupons = [getRebirthAddress(), getIncubatorAddress(), getFarmingAddress(), getGameDappAddress(), getBabyduckAddress(), getBreedingAddress(), getTurtleStakingAddress(), getTurtleRebirthAddress(), getRopeAddress(), getLevelSystemAddress(), getMarketPlaceAddress(), getCapacityAddress(), this]
109
+
110
+
func couponsUserSpend (user) = (user + "_spend")
99
111
 
100
112
 
101
-
func checkAdditionalPayment (payment) = if (isDefined(payment.assetId))
102
-
    then throw("FCAP: Please attach waves")
103
-
    else {
104
-
        let feeAmount = getIntegerValue(getOracle(), staticKey_extraFee())
105
-
        if ((payment.amount != feeAmount))
106
-
            then throw((("FCAP: Please attach exactly " + toString(feeAmount)) + " amount of wavelets"))
107
-
            else [ScriptTransfer(getFeeAggregator(), feeAmount, unit)]
108
-
        }
113
+
func couponsUserActive (user) = (user + "_active")
109
114
 
110
115
 
111
-
func asInt (value) = match value {
112
-
    case int: Int => 
113
-
        int
114
-
    case _ => 
115
-
        throw("FAI: wrong type, expected: Int")
116
-
}
116
+
func couponsUserActiveOld (user) = (couponsUserActive(user) + "_old")
117
117
 
118
118
 
119
-
func claimStakingResult (address) = {
120
-
    let currentInterest = tryGetInteger(keyGlobalLastInterest)
121
-
    let lastCheckInterest = tryGetInteger(keyLastCheckInterest(address))
122
-
    let stakedAmount = tryGetInteger(totalStakedUserKey(toString(address)))
123
-
    let reward = if ((lastCheckInterest > 0))
124
-
        then fraction((currentInterest - lastCheckInterest), stakedAmount, Scale)
125
-
        else 0
126
-
    let invokeResult = if ((reward > 0))
127
-
        then invoke(getCouponsAddress(), "addCouponsFarming", [toString(address), reward], nil)
128
-
        else unit
129
-
    if ((invokeResult == invokeResult))
130
-
        then [IntegerEntry(keyLastCheckInterest(address), currentInterest), IntegerEntry(rewardClaimedKey(address), (tryGetInteger(rewardClaimedKey(address)) + reward))]
131
-
        else throw("Strict value is not equal to itself.")
119
+
func couponsSpendOnSc (sc) = (sc + "_spend_by_using")
120
+
121
+
122
+
func actionPerAddressPerUserPerDay (user,action,dappAddress,day) = (((((((dappAddress + "_") + action) + "_") + user) + "_") + day) + "_actions")
123
+
124
+
125
+
func actionPerAddressPerUserLastCheckDay (user,action) = (((action + "_") + user) + "_actions_check_day")
126
+
127
+
128
+
func actionPerAddressPerUserAmountInARow (user,action) = (((action + "_") + user) + "_actions_amount_in_row")
129
+
130
+
131
+
func userExperience (user) = (user + "_experience")
132
+
133
+
134
+
func addCouponsInternal (user,amount) = {
135
+
    let keyOld = couponsUserActiveOld(user)
136
+
    let key = couponsUserActive(user)
137
+
    let couponsOld = tryGetInteger(key)
138
+
    let coupons = (couponsOld + amount)
139
+
[IntegerEntry(keyOld, couponsOld), IntegerEntry(key, coupons)]
132
140
 
    }
133
141
 
134
142
 
135
-
func handleStakingTopUp (amount) = {
136
-
    let currentInterest = tryGetInteger(keyGlobalLastInterest)
137
-
    let totalStakedAmount = tryGetInteger(totalStakedKey())
138
-
    let interestDelta = if ((totalStakedAmount > 0))
139
-
        then fraction(amount, Scale, totalStakedAmount)
140
-
        else 0
141
-
[IntegerEntry(keyGlobalEarned, (tryGetInteger(keyGlobalEarned) + amount)), IntegerEntry(keyGlobalLastInterest, (currentInterest + interestDelta))]
143
+
let startTsMs = 1695427200000
144
+
145
+
func calculateDaysSinceStart () = {
146
+
    let diff = (lastBlock.timestamp - startTsMs)
147
+
    let daysPassed = (diff / (86400 * 1000))
148
+
    daysPassed
142
149
 
    }
143
150
 
144
151
 
145
-
func asBoolean (value) = match value {
146
-
    case boolean: Boolean => 
147
-
        boolean
148
-
    case _ => 
149
-
        throw("FAB: wrong type, expected: Boolean")
150
-
}
151
-
152
-
153
-
func calculatePerchPrice (address) = {
154
-
    let hasArtefactStaked = tryGetStringExternal(getAccBoosterAddress(), (("ART-XMISTL_" + address) + "_owner"))
155
-
    let perchPrice = getIntegerValue(getOracle(), staticKey_veggPerchFee())
156
-
    if ((hasArtefactStaked == ""))
157
-
        then perchPrice
158
-
        else perchPrice
152
+
func hasDoneTask7Days (day,address,actionName,rewardAmount,rewardAmountWeekly) = {
153
+
    let userExperienceKey = userExperience(address)
154
+
    let userExpTilldate = tryGetInteger(userExperienceKey)
155
+
    let checkDayKey = actionPerAddressPerUserLastCheckDay(address, actionName)
156
+
    let daysInRowKey = actionPerAddressPerUserAmountInARow(address, actionName)
157
+
    let lastCheckDay = tryGetInteger(checkDayKey)
158
+
    let daysInRow = tryGetInteger(daysInRowKey)
159
+
    let daysInRowUpdate = if ((lastCheckDay == (day - 1)))
160
+
        then (daysInRow + 1)
161
+
        else if (((day - 1) > lastCheckDay))
162
+
            then 1
163
+
            else 0
164
+
    let lastCheckDayUpdate = day
165
+
    let reward = if ((daysInRowUpdate == 7))
166
+
        then [ScriptTransfer(addressFromStringValue(address), rewardAmountWeekly, getSpiceAssetId()), IntegerEntry(daysInRowKey, 0)]
167
+
        else [IntegerEntry(daysInRowKey, daysInRowUpdate)]
168
+
    ([IntegerEntry(checkDayKey, lastCheckDayUpdate), ScriptTransfer(addressFromStringValue(address), rewardAmount, getSpiceAssetId()), IntegerEntry(userExperienceKey, (userExpTilldate + 1))] ++ reward)
159
169
 
    }
160
170
 
161
171
 
162
-
func getAssetOrigin (generation) = if ((generation == "G"))
163
-
    then getIncubatorAddress()
164
-
    else getBreederAddress()
165
-
166
-
167
-
func getAssetRarity (genotype,generation) = {
168
-
    let quantity = valueOrErrorMessage(getInteger(getAssetOrigin(generation), (("stats_" + genotype) + "_quantity")), (("stats_" + genotype) + "_quantity not found"))
169
-
    let power = pow((10000 / quantity), 4, 5, 1, 2, FLOOR)
170
-
    if ((power > 0))
171
-
        then power
172
-
        else 2
172
+
func payAction (actionName,userAddress,amount,day) = {
173
+
    let composedKey = if (tryGetBoolean((("TASK_" + actionName) + "_EVERY")))
174
+
        then actionName
175
+
        else ((actionName + "_") + toString(amount))
176
+
    if (tryGetBoolean(("TASK_" + composedKey)))
177
+
        then hasDoneTask7Days(day, toString(userAddress), composedKey, tryGetInteger((("TASK_" + composedKey) + "_REWARD_DAILY")), tryGetInteger((("TASK_" + composedKey) + "_REWARD_WEEKLY")))
178
+
        else nil
173
179
 
    }
174
180
 
175
181
 
176
-
func asString (value) = match value {
177
-
    case string: String => 
178
-
        string
179
-
    case _ => 
180
-
        throw("FAS: wrong type, expected: String")
181
-
}
182
+
func recordActionInternal (actionName,addressCaller,address) = if (!(containsElement(scCanUseCoupons, addressCaller)))
183
+
    then throw("CRA: Only certain smart contracts can use this reward module!")
184
+
    else {
185
+
        let day = calculateDaysSinceStart()
186
+
        let actionKey = actionPerAddressPerUserPerDay(toString(address), actionName, toString(addressCaller), toString(day))
187
+
        let totalActions = (tryGetInteger(actionKey) + 1)
188
+
        ([IntegerEntry(actionKey, totalActions)] ++ payAction(actionName, address, totalActions, day))
189
+
        }
182
190
 
183
191
 
184
192
 
@Callable(i)
185
193
 
func configureOracle (oracle) = if ((i.caller != this))
186
-
    then throw("ICU: admin only")
194
+
    then throw("CCO: admin only")
187
195
 
    else [StringEntry("static_oracleAddress", oracle)]
188
196
 
189
197
 
190
198
 
191
199
 
@Callable(i)
192
-
func calculateFarmPower (assetId) = if (!(if ((value(assetInfo(fromBase58String(assetId))).issuer == getBreederAddress()))
193
-
    then true
194
-
    else (value(assetInfo(fromBase58String(assetId))).issuer == getIncubatorAddress())))
195
-
    then throw("This does not seem like a valid Duck!")
200
+
func addCoupons (user,amount) = if (if ((i.caller != this))
201
+
    then (i.callerPublicKey != wAccPKey)
202
+
    else false)
203
+
    then throw("CAC: admin only")
204
+
    else if ((amount >= 10000000))
205
+
        then (recordActionInternal("VEGG10000000", this, addressFromStringValue(user)) ++ addCouponsInternal(user, amount))
206
+
        else if ((amount >= 500000))
207
+
            then (recordActionInternal("VEGG500000", this, addressFromStringValue(user)) ++ addCouponsInternal(user, amount))
208
+
            else addCouponsInternal(user, amount)
209
+
210
+
211
+
212
+
@Callable(i)
213
+
func addCouponsFarming (user,amount) = if ((i.caller != getVeggFarmingAddress()))
214
+
    then throw("Method only for farming sc!")
215
+
    else addCouponsInternal(user, amount)
216
+
217
+
218
+
219
+
@Callable(i)
220
+
func addCouponsBatch (batch) = if (if ((i.caller != this))
221
+
    then (i.callerPublicKey != wAccPKey)
222
+
    else false)
223
+
    then throw("CAC: admin only")
196
224
 
    else {
197
-
        let assetName = value(assetInfo(fromBase58String(assetId))).name
198
-
        let gen = takeRight(assetName, 1)
199
-
        let genotype = split(dropRight(drop(assetName, 5), 3), "")
200
-
        func uniqueArrayFilter (accum,nextGen) =         if (!(containsElement(accum, nextGen)))
201
-
            then (accum :+ nextGen)
202
-
            else accum
225
+
        let couponsList = split(batch, ";")
226
+
        func handleCoupon (acc,coupon) =         {
227
+
            let splitArray = split(coupon, ":")
228
+
            let user = splitArray[0]
229
+
            let amount = parseIntValue(splitArray[1])
230
+
            let burnCall = invoke(getBurnAddress(), "burnByInvoke", [amount], nil)
231
+
            if ((burnCall == burnCall))
232
+
                then if ((amount >= 10000000))
233
+
                    then ((acc ++ recordActionInternal("VEGG10000000", this, addressFromStringValue(user))) ++ addCouponsInternal(user, amount))
234
+
                    else if ((amount >= 500000))
235
+
                        then ((acc ++ recordActionInternal("VEGG500000", this, addressFromStringValue(user))) ++ addCouponsInternal(user, amount))
236
+
                        else (acc ++ addCouponsInternal(user, amount))
237
+
                else throw("Strict value is not equal to itself.")
238
+
            }
203
239
 
204
-
        let uniqueList = {
205
-
            let $l = genotype
206
-
            let $s = size($l)
207
-
            let $acc0 = nil
208
-
            func $f0_1 ($a,$i) =             if (($i >= $s))
209
-
                then $a
210
-
                else uniqueArrayFilter($a, $l[$i])
240
+
        let $l = couponsList
241
+
        let $s = size($l)
242
+
        let $acc0 = nil
243
+
        func $f0_1 ($a,$i) =         if (($i >= $s))
244
+
            then $a
245
+
            else handleCoupon($a, $l[$i])
211
246
 
212
-
            func $f0_2 ($a,$i) =             if (($i >= $s))
213
-
                then $a
214
-
                else throw("List size exceeds 8")
247
+
        func $f0_2 ($a,$i) =         if (($i >= $s))
248
+
            then $a
249
+
            else throw("List size exceeds 20")
215
250
 
216
-
            $f0_2($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)
217
-
            }
218
-
        let totalGenes = if ((gen == "U"))
219
-
            then 8
220
-
            else size(uniqueList)
221
-
        let power = pow(15, 1, totalGenes, 0, 2, DOWN)
222
-
        let multiplier = (((height - 3750000) * 100) / (((60 * 24) * 30) * 3))
223
-
        let finalPower = ((power * multiplier) / 100)
224
-
        $Tuple2([IntegerEntry(("DEBUG_" + assetName), finalPower), IntegerEntry(("DEBUG_COEFFICIENT_" + assetName), multiplier)], finalPower)
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)
225
252
 
        }
226
253
 
227
254
 
228
255
 
229
256
 
@Callable(i)
230
-
func calculateFarmPowerAssetName (assetName) = {
231
-
    let gen = takeRight(assetName, 1)
232
-
    let genotype = split(dropRight(drop(assetName, 5), 3), "")
233
-
    func uniqueArrayFilter (accum,nextGen) =     if (!(containsElement(accum, nextGen)))
234
-
        then (accum :+ nextGen)
235
-
        else accum
236
-
237
-
    let uniqueList = {
238
-
        let $l = genotype
239
-
        let $s = size($l)
240
-
        let $acc0 = nil
241
-
        func $f0_1 ($a,$i) =         if (($i >= $s))
242
-
            then $a
243
-
            else uniqueArrayFilter($a, $l[$i])
244
-
245
-
        func $f0_2 ($a,$i) =         if (($i >= $s))
246
-
            then $a
247
-
            else throw("List size exceeds 8")
248
-
249
-
        $f0_2($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)
250
-
        }
251
-
    let totalGenes = if ((gen == "U"))
252
-
        then 8
253
-
        else size(uniqueList)
254
-
    let power = pow(15, 1, totalGenes, 0, 1, DOWN)
255
-
    let multiplier = (((height - 3750000) * 100) / (((60 * 24) * 30) * 3))
256
-
    let finalPower = ((power * multiplier) / 100)
257
-
    $Tuple2([IntegerEntry(("DEBUG_" + assetName), finalPower), IntegerEntry(("DEBUG_COEFFICIENT_" + assetName), multiplier)], finalPower)
257
+
func CFRefund (recipient,amount) = {
258
+
    let cfAddress = getStringValue(i.caller, "CF_ADDRESS")
259
+
    let key = (("f_" + cfAddress) + "_stake_address")
260
+
    let stakeAddress = getStringValue(getMasterAddress(), key)
261
+
    if ((stakeAddress != toString(i.caller)))
262
+
        then throw("CCR: This is something fishy going on!")
263
+
        else addCouponsInternal(recipient, amount)
258
264
 
    }
259
265
 
260
266
 
261
267
 
262
268
 
@Callable(i)
263
-
func buyPerch (colorI,refererAddress) = {
264
-
    let validPayment = checkAdditionalPayment(i.payments[0])
265
-
    if ((validPayment == validPayment))
266
-
        then {
267
-
            let color = if ((colorI == "U"))
268
-
                then "B"
269
-
                else colorI
270
-
            if ((0 > value(indexOf(["B", "R", "G", "Y"], color))))
271
-
                then throw("you need to set color properly")
272
-
                else {
273
-
                    let exactPrice = calculatePerchPrice(toString(i.caller))
274
-
                    let firstPayment = if ((size(i.payments) == 2))
275
-
                        then value(i.payments[1])
276
-
                        else value(i.payments[0])
277
-
                    if ((firstPayment.assetId != getEggAssetId()))
278
-
                        then throw(("FBP: You can attach only EGG tokens with the following asset id: " + toBase58String(getEggAssetId())))
279
-
                        else if ((firstPayment.amount != exactPrice))
280
-
                            then throw(((("FBP: To buy a perch you currently need the following amount of EGGlets: " + toString(exactPrice)) + " ") + toString(i.caller)))
269
+
func useCoupons (amountTryingToPay) = {
270
+
    let invokingSc = i.caller
271
+
    if ((0 > amountTryingToPay))
272
+
        then throw("CUC: Only positive amount of money can be paid!")
273
+
        else if (!(containsElement(scCanUseCoupons, invokingSc)))
274
+
            then throw("CUC: Only certain smart contracts can use this coupon module!")
275
+
            else {
276
+
                let user = toString(i.originCaller)
277
+
                let keyActive = couponsUserActive(user)
278
+
                let availableCoupons = tryGetInteger(keyActive)
279
+
                if ((0 > availableCoupons))
280
+
                    then throw("CUC: Get rekt!")
281
+
                    else {
282
+
                        let leftToPay = if ((amountTryingToPay > availableCoupons))
283
+
                            then (amountTryingToPay - availableCoupons)
284
+
                            else 0
285
+
                        let amountPaid = (amountTryingToPay - leftToPay)
286
+
                        let availableCouponsLeft = (availableCoupons - amountPaid)
287
+
                        if ((0 > availableCouponsLeft))
288
+
                            then throw("CUC: You try to overspend!")
281
289
 
                            else {
282
-
                                let toBurn = exactPrice
283
-
                                let burnCall = invoke(getBurnAddress(), "burnAttachedPayments", nil, [AttachedPayment(getEggAssetId(), toBurn)])
284
-
                                if ((burnCall == burnCall))
290
+
                                let keySpend = couponsUserSpend(user)
291
+
                                let keyOld = couponsUserActiveOld(user)
292
+
                                let keySpendSc = couponsSpendOnSc(toString(i.caller))
293
+
                                let topUp = invoke(getVeggFarmingAddress(), "topUpReward", [amountPaid], nil)
294
+
                                if ((topUp == topUp))
285
295
 
                                    then {
286
-
                                        let perchAmountKey = ((("address_" + toString(i.caller)) + "_perchesAvailable_") + color)
287
-
                                        let perchAmount = tryGetInteger(perchAmountKey)
288
-
                                        ([IntegerEntry(perchAmountKey, (perchAmount + 1))] ++ validPayment)
296
+
                                        let totalSpend = (tryGetInteger(keySpend) + amountPaid)
297
+
                                        let totalSpendSc = (tryGetInteger(keySpendSc) + amountPaid)
298
+
                                        $Tuple2([IntegerEntry(keySpend, totalSpend), IntegerEntry(keyOld, availableCoupons), IntegerEntry(keyActive, availableCouponsLeft), IntegerEntry(keySpendSc, totalSpendSc)], amountPaid)
289
299
 
                                        }
290
300
 
                                    else throw("Strict value is not equal to itself.")
291
301
 
                                }
292
-
                    }
293
-
            }
294
-
        else throw("Strict value is not equal to itself.")
302
+
                        }
303
+
                }
295
304
 
    }
296
305
 
297
306
 
298
307
 
299
308
 
@Callable(i)
300
-
func stakeNFT (jColor) = {
301
-
    let validPayment = checkAdditionalPayment(i.payments[0])
302
-
    if ((validPayment == validPayment))
303
-
        then {
304
-
            let pmt = value(i.payments[1])
305
-
            let assetId = value(pmt.assetId)
306
-
            let assetName = value(value(assetInfo(assetId)).name)
307
-
            let isJackpot = (takeRight(assetName, 1) == "U")
308
-
            let rarity = if (isJackpot)
309
-
                then 100
310
-
                else {
311
-
                    let generation = take(takeRight(assetName, 2), 1)
312
-
                    let farmGen = asString(invoke(getBreederAddress(), "getGenFromName", [assetName], nil))
313
-
                    if ((farmGen == farmGen))
314
-
                        then getAssetRarity(farmGen, generation)
315
-
                        else throw("Strict value is not equal to itself.")
316
-
                    }
317
-
            if ((70 > rarity))
318
-
                then throw("Only ducks with a rarity above 70 can be locked!")
319
-
                else {
320
-
                    let address = toString(i.caller)
321
-
                    let color = if (isJackpot)
322
-
                        then jColor
323
-
                        else takeRight(assetName, 1)
324
-
                    let availablePerches = tryGetInteger(((("address_" + address) + "_perchesAvailable_") + color))
325
-
                    if ((pmt.amount != 1))
326
-
                        then throw("NFT is not attached")
327
-
                        else if ((0 >= availablePerches))
328
-
                            then throw(("no perch available for the type " + color))
329
-
                            else {
330
-
                                let farmingPower = asInt(invoke(this, "calculateFarmPower", [toBase58String(assetId)], nil))
331
-
                                if ((farmingPower == farmingPower))
332
-
                                    then (([IntegerEntry(totalStakedKey(), (tryGetInteger(totalStakedKey()) + farmingPower)), IntegerEntry(totalStakedUserKey(address), (tryGetInteger(totalStakedUserKey(address)) + farmingPower)), IntegerEntry(((("address_" + address) + "_perchesAvailable_") + color), (availablePerches - 1)), StringEntry((toBase58String(assetId) + "_owner"), address), IntegerEntry((toBase58String(assetId) + "_power"), farmingPower), IntegerEntry((((("assetId_" + toBase58String(assetId)) + "_owner_") + address) + "_power"), farmingPower)] ++ claimStakingResult(i.caller)) ++ validPayment)
333
-
                                    else throw("Strict value is not equal to itself.")
334
-
                                }
335
-
                    }
336
-
            }
337
-
        else throw("Strict value is not equal to itself.")
338
-
    }
339
-
340
-
341
-
342
-
@Callable(i)
343
-
func topUpReward (amount) = if ((i.caller != getCouponsAddress()))
344
-
    then throw("VFTUP: Only couponsdapp can do topup!")
345
-
    else {
346
-
        let resHandleStaking = handleStakingTopUp(amount)
347
-
        $Tuple2(resHandleStaking, true)
348
-
        }
349
-
350
-
351
-
352
-
@Callable(i)
353
-
func claimReward () = {
354
-
    let validPayment = checkAdditionalPayment(i.payments[0])
355
-
    if ((validPayment == validPayment))
356
-
        then if ((size(i.payments) > 1))
357
-
            then throw("Please don't add extra payments")
358
-
            else (claimStakingResult(i.caller) ++ validPayment)
359
-
        else throw("Strict value is not equal to itself.")
360
-
    }
309
+
func recordAction (actionName) = recordActionInternal(actionName, i.caller, i.originCaller)
361
310
 
362
311
 

Full: 
Old
New
Differences
1
-
{-# STDLIB_VERSION 5 #-}
1
+
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
let Scale = 100000000
4
+
func tryGetStringExternal (address,key) = match getString(address, key) {
5
+
    case a: String => 
6
+
        a
7
+
    case _ => 
8
+
        ""
9
+
}
10
+
11
+
12
+
func tryGetBoolean (key) = match getBoolean(key) {
13
+
    case b: Boolean => 
14
+
        b
15
+
    case _ => 
16
+
        false
17
+
}
18
+
19
+
20
+
func tryGetString (key) = tryGetStringExternal(this, key)
21
+
5
22
 
6
23
 
func tryGetInteger (key) = match getInteger(this, key) {
7
24
 
    case b: Int => 
8
25
 
        b
9
26
 
    case _ => 
10
27
 
        0
11
28
 
}
12
29
 
13
30
 
14
-
func tryGetStringExternal (address,key) = match getString(address, key) {
15
-
    case a: String => 
16
-
        a
17
-
    case _ => 
18
-
        ""
19
-
}
31
+
func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
20
32
 
21
33
 
22
-
func tryGetString (key) = tryGetStringExternal(this, key)
34
+
func staticKey_turtleStakingAddress () = "static_turtleStakingAddress"
23
35
 
24
36
 
25
-
func staticKey_oracleAddress () = "static_oracleAddress"
37
+
func staticKey_turtleRebirthAddress () = "static_turtleRebirthAddress"
26
38
 
27
39
 
28
-
func staticKey_eggAssetId () = "static_eggAssetId"
40
+
func staticKey_ropeAddress () = "static_ropeAddress"
29
41
 
30
42
 
31
-
func staticKey_burnAddress () = "static_burnAddress"
43
+
func staticKey_levelSystemAddress () = "static_levelSystemAddress"
32
44
 
33
45
 
34
-
func staticKey_extraFee () = "static_extraFee"
46
+
func staticKey_spiceAssetId () = "static_spiceAssetId"
35
47
 
36
48
 
37
-
func staticKey_feeAggregator () = "static_feeAggregator"
49
+
func staticKey_marketplace () = "static_marketplaceAddress"
38
50
 
39
51
 
40
-
func staticKey_incubatorAddress () = "static_incubatorAddress"
52
+
func staticKey_capacityAddress () = "static_capacityAddress"
41
53
 
42
54
 
43
-
func staticKey_breederAddress () = "static_breederAddress"
55
+
func staticKey_veggFarmingAddress () = "static_veggFarmingAddress"
44
56
 
45
57
 
46
-
func staticKey_refContractAddress () = "static_refContractAddress"
58
+
func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))
47
59
 
48
60
 
49
-
func staticKey_couponsAddress () = "static_couponsAddress"
61
+
func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_incubatorAddress")))
50
62
 
51
63
 
52
-
func staticKey_accBoosterAddress () = "static_accBoosterAddress"
64
+
func getFarmingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_farmingAddress")))
53
65
 
54
66
 
55
-
func staticKey_veggPerchFee () = "static_veggPerchFee"
67
+
func getGameDappAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_gameDappAddress")))
56
68
 
57
69
 
58
-
func rewardClaimedKey (address) = (toString(address) + "_claimed")
70
+
func getCapacityAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_capacityAddress())))
59
71
 
60
72
 
61
-
func totalStakedKey () = "total_staked"
73
+
func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_burnAddress")))
62
74
 
63
75
 
64
-
func totalStakedUserKey (address) = ("total_staked_" + address)
76
+
func getBabyduckAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_babyDuckAddress")))
65
77
 
66
78
 
67
-
let keyGlobalLastInterest = "global_lastCheck_interest"
68
-
69
-
func keyLastCheckInterest (address) = (toString(address) + "_lastCheck_interest")
79
+
func getBreedingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_breederAddress")))
70
80
 
71
81
 
72
-
let keyGlobalEarned = "global_earnings"
73
-
74
-
func getOracle () = Address(fromBase58String(tryGetString(staticKey_oracleAddress())))
82
+
func getMasterAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_cfMasterAddress")))
75
83
 
76
84
 
77
-
func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_eggAssetId()))
85
+
func getTurtleStakingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleStakingAddress())))
78
86
 
79
87
 
80
-
func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_burnAddress())))
88
+
func getTurtleRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleRebirthAddress())))
81
89
 
82
90
 
83
-
func getFeeAggregator () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_feeAggregator())))
91
+
func getRopeAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_ropeAddress())))
84
92
 
85
93
 
86
-
func getBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_breederAddress())))
94
+
func getSpiceAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_spiceAssetId()))
87
95
 
88
96
 
89
-
func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_incubatorAddress())))
97
+
func getLevelSystemAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_levelSystemAddress())))
90
98
 
91
99
 
92
-
func getRefContractAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_refContractAddress())))
100
+
func getMarketPlaceAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_marketplace())))
93
101
 
94
102
 
95
-
func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_couponsAddress())))
103
+
func getVeggFarmingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_veggFarmingAddress())))
96
104
 
97
105
 
98
-
func getAccBoosterAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_accBoosterAddress())))
106
+
let wAccPKey = fromBase58String(valueOrErrorMessage(getString(getOracle(), "static_warsPKey"), "static_warsPKey not defined"))
107
+
108
+
let scCanUseCoupons = [getRebirthAddress(), getIncubatorAddress(), getFarmingAddress(), getGameDappAddress(), getBabyduckAddress(), getBreedingAddress(), getTurtleStakingAddress(), getTurtleRebirthAddress(), getRopeAddress(), getLevelSystemAddress(), getMarketPlaceAddress(), getCapacityAddress(), this]
109
+
110
+
func couponsUserSpend (user) = (user + "_spend")
99
111
 
100
112
 
101
-
func checkAdditionalPayment (payment) = if (isDefined(payment.assetId))
102
-
    then throw("FCAP: Please attach waves")
103
-
    else {
104
-
        let feeAmount = getIntegerValue(getOracle(), staticKey_extraFee())
105
-
        if ((payment.amount != feeAmount))
106
-
            then throw((("FCAP: Please attach exactly " + toString(feeAmount)) + " amount of wavelets"))
107
-
            else [ScriptTransfer(getFeeAggregator(), feeAmount, unit)]
108
-
        }
113
+
func couponsUserActive (user) = (user + "_active")
109
114
 
110
115
 
111
-
func asInt (value) = match value {
112
-
    case int: Int => 
113
-
        int
114
-
    case _ => 
115
-
        throw("FAI: wrong type, expected: Int")
116
-
}
116
+
func couponsUserActiveOld (user) = (couponsUserActive(user) + "_old")
117
117
 
118
118
 
119
-
func claimStakingResult (address) = {
120
-
    let currentInterest = tryGetInteger(keyGlobalLastInterest)
121
-
    let lastCheckInterest = tryGetInteger(keyLastCheckInterest(address))
122
-
    let stakedAmount = tryGetInteger(totalStakedUserKey(toString(address)))
123
-
    let reward = if ((lastCheckInterest > 0))
124
-
        then fraction((currentInterest - lastCheckInterest), stakedAmount, Scale)
125
-
        else 0
126
-
    let invokeResult = if ((reward > 0))
127
-
        then invoke(getCouponsAddress(), "addCouponsFarming", [toString(address), reward], nil)
128
-
        else unit
129
-
    if ((invokeResult == invokeResult))
130
-
        then [IntegerEntry(keyLastCheckInterest(address), currentInterest), IntegerEntry(rewardClaimedKey(address), (tryGetInteger(rewardClaimedKey(address)) + reward))]
131
-
        else throw("Strict value is not equal to itself.")
119
+
func couponsSpendOnSc (sc) = (sc + "_spend_by_using")
120
+
121
+
122
+
func actionPerAddressPerUserPerDay (user,action,dappAddress,day) = (((((((dappAddress + "_") + action) + "_") + user) + "_") + day) + "_actions")
123
+
124
+
125
+
func actionPerAddressPerUserLastCheckDay (user,action) = (((action + "_") + user) + "_actions_check_day")
126
+
127
+
128
+
func actionPerAddressPerUserAmountInARow (user,action) = (((action + "_") + user) + "_actions_amount_in_row")
129
+
130
+
131
+
func userExperience (user) = (user + "_experience")
132
+
133
+
134
+
func addCouponsInternal (user,amount) = {
135
+
    let keyOld = couponsUserActiveOld(user)
136
+
    let key = couponsUserActive(user)
137
+
    let couponsOld = tryGetInteger(key)
138
+
    let coupons = (couponsOld + amount)
139
+
[IntegerEntry(keyOld, couponsOld), IntegerEntry(key, coupons)]
132
140
 
    }
133
141
 
134
142
 
135
-
func handleStakingTopUp (amount) = {
136
-
    let currentInterest = tryGetInteger(keyGlobalLastInterest)
137
-
    let totalStakedAmount = tryGetInteger(totalStakedKey())
138
-
    let interestDelta = if ((totalStakedAmount > 0))
139
-
        then fraction(amount, Scale, totalStakedAmount)
140
-
        else 0
141
-
[IntegerEntry(keyGlobalEarned, (tryGetInteger(keyGlobalEarned) + amount)), IntegerEntry(keyGlobalLastInterest, (currentInterest + interestDelta))]
143
+
let startTsMs = 1695427200000
144
+
145
+
func calculateDaysSinceStart () = {
146
+
    let diff = (lastBlock.timestamp - startTsMs)
147
+
    let daysPassed = (diff / (86400 * 1000))
148
+
    daysPassed
142
149
 
    }
143
150
 
144
151
 
145
-
func asBoolean (value) = match value {
146
-
    case boolean: Boolean => 
147
-
        boolean
148
-
    case _ => 
149
-
        throw("FAB: wrong type, expected: Boolean")
150
-
}
151
-
152
-
153
-
func calculatePerchPrice (address) = {
154
-
    let hasArtefactStaked = tryGetStringExternal(getAccBoosterAddress(), (("ART-XMISTL_" + address) + "_owner"))
155
-
    let perchPrice = getIntegerValue(getOracle(), staticKey_veggPerchFee())
156
-
    if ((hasArtefactStaked == ""))
157
-
        then perchPrice
158
-
        else perchPrice
152
+
func hasDoneTask7Days (day,address,actionName,rewardAmount,rewardAmountWeekly) = {
153
+
    let userExperienceKey = userExperience(address)
154
+
    let userExpTilldate = tryGetInteger(userExperienceKey)
155
+
    let checkDayKey = actionPerAddressPerUserLastCheckDay(address, actionName)
156
+
    let daysInRowKey = actionPerAddressPerUserAmountInARow(address, actionName)
157
+
    let lastCheckDay = tryGetInteger(checkDayKey)
158
+
    let daysInRow = tryGetInteger(daysInRowKey)
159
+
    let daysInRowUpdate = if ((lastCheckDay == (day - 1)))
160
+
        then (daysInRow + 1)
161
+
        else if (((day - 1) > lastCheckDay))
162
+
            then 1
163
+
            else 0
164
+
    let lastCheckDayUpdate = day
165
+
    let reward = if ((daysInRowUpdate == 7))
166
+
        then [ScriptTransfer(addressFromStringValue(address), rewardAmountWeekly, getSpiceAssetId()), IntegerEntry(daysInRowKey, 0)]
167
+
        else [IntegerEntry(daysInRowKey, daysInRowUpdate)]
168
+
    ([IntegerEntry(checkDayKey, lastCheckDayUpdate), ScriptTransfer(addressFromStringValue(address), rewardAmount, getSpiceAssetId()), IntegerEntry(userExperienceKey, (userExpTilldate + 1))] ++ reward)
159
169
 
    }
160
170
 
161
171
 
162
-
func getAssetOrigin (generation) = if ((generation == "G"))
163
-
    then getIncubatorAddress()
164
-
    else getBreederAddress()
165
-
166
-
167
-
func getAssetRarity (genotype,generation) = {
168
-
    let quantity = valueOrErrorMessage(getInteger(getAssetOrigin(generation), (("stats_" + genotype) + "_quantity")), (("stats_" + genotype) + "_quantity not found"))
169
-
    let power = pow((10000 / quantity), 4, 5, 1, 2, FLOOR)
170
-
    if ((power > 0))
171
-
        then power
172
-
        else 2
172
+
func payAction (actionName,userAddress,amount,day) = {
173
+
    let composedKey = if (tryGetBoolean((("TASK_" + actionName) + "_EVERY")))
174
+
        then actionName
175
+
        else ((actionName + "_") + toString(amount))
176
+
    if (tryGetBoolean(("TASK_" + composedKey)))
177
+
        then hasDoneTask7Days(day, toString(userAddress), composedKey, tryGetInteger((("TASK_" + composedKey) + "_REWARD_DAILY")), tryGetInteger((("TASK_" + composedKey) + "_REWARD_WEEKLY")))
178
+
        else nil
173
179
 
    }
174
180
 
175
181
 
176
-
func asString (value) = match value {
177
-
    case string: String => 
178
-
        string
179
-
    case _ => 
180
-
        throw("FAS: wrong type, expected: String")
181
-
}
182
+
func recordActionInternal (actionName,addressCaller,address) = if (!(containsElement(scCanUseCoupons, addressCaller)))
183
+
    then throw("CRA: Only certain smart contracts can use this reward module!")
184
+
    else {
185
+
        let day = calculateDaysSinceStart()
186
+
        let actionKey = actionPerAddressPerUserPerDay(toString(address), actionName, toString(addressCaller), toString(day))
187
+
        let totalActions = (tryGetInteger(actionKey) + 1)
188
+
        ([IntegerEntry(actionKey, totalActions)] ++ payAction(actionName, address, totalActions, day))
189
+
        }
182
190
 
183
191
 
184
192
 
@Callable(i)
185
193
 
func configureOracle (oracle) = if ((i.caller != this))
186
-
    then throw("ICU: admin only")
194
+
    then throw("CCO: admin only")
187
195
 
    else [StringEntry("static_oracleAddress", oracle)]
188
196
 
189
197
 
190
198
 
191
199
 
@Callable(i)
192
-
func calculateFarmPower (assetId) = if (!(if ((value(assetInfo(fromBase58String(assetId))).issuer == getBreederAddress()))
193
-
    then true
194
-
    else (value(assetInfo(fromBase58String(assetId))).issuer == getIncubatorAddress())))
195
-
    then throw("This does not seem like a valid Duck!")
200
+
func addCoupons (user,amount) = if (if ((i.caller != this))
201
+
    then (i.callerPublicKey != wAccPKey)
202
+
    else false)
203
+
    then throw("CAC: admin only")
204
+
    else if ((amount >= 10000000))
205
+
        then (recordActionInternal("VEGG10000000", this, addressFromStringValue(user)) ++ addCouponsInternal(user, amount))
206
+
        else if ((amount >= 500000))
207
+
            then (recordActionInternal("VEGG500000", this, addressFromStringValue(user)) ++ addCouponsInternal(user, amount))
208
+
            else addCouponsInternal(user, amount)
209
+
210
+
211
+
212
+
@Callable(i)
213
+
func addCouponsFarming (user,amount) = if ((i.caller != getVeggFarmingAddress()))
214
+
    then throw("Method only for farming sc!")
215
+
    else addCouponsInternal(user, amount)
216
+
217
+
218
+
219
+
@Callable(i)
220
+
func addCouponsBatch (batch) = if (if ((i.caller != this))
221
+
    then (i.callerPublicKey != wAccPKey)
222
+
    else false)
223
+
    then throw("CAC: admin only")
196
224
 
    else {
197
-
        let assetName = value(assetInfo(fromBase58String(assetId))).name
198
-
        let gen = takeRight(assetName, 1)
199
-
        let genotype = split(dropRight(drop(assetName, 5), 3), "")
200
-
        func uniqueArrayFilter (accum,nextGen) =         if (!(containsElement(accum, nextGen)))
201
-
            then (accum :+ nextGen)
202
-
            else accum
225
+
        let couponsList = split(batch, ";")
226
+
        func handleCoupon (acc,coupon) =         {
227
+
            let splitArray = split(coupon, ":")
228
+
            let user = splitArray[0]
229
+
            let amount = parseIntValue(splitArray[1])
230
+
            let burnCall = invoke(getBurnAddress(), "burnByInvoke", [amount], nil)
231
+
            if ((burnCall == burnCall))
232
+
                then if ((amount >= 10000000))
233
+
                    then ((acc ++ recordActionInternal("VEGG10000000", this, addressFromStringValue(user))) ++ addCouponsInternal(user, amount))
234
+
                    else if ((amount >= 500000))
235
+
                        then ((acc ++ recordActionInternal("VEGG500000", this, addressFromStringValue(user))) ++ addCouponsInternal(user, amount))
236
+
                        else (acc ++ addCouponsInternal(user, amount))
237
+
                else throw("Strict value is not equal to itself.")
238
+
            }
203
239
 
204
-
        let uniqueList = {
205
-
            let $l = genotype
206
-
            let $s = size($l)
207
-
            let $acc0 = nil
208
-
            func $f0_1 ($a,$i) =             if (($i >= $s))
209
-
                then $a
210
-
                else uniqueArrayFilter($a, $l[$i])
240
+
        let $l = couponsList
241
+
        let $s = size($l)
242
+
        let $acc0 = nil
243
+
        func $f0_1 ($a,$i) =         if (($i >= $s))
244
+
            then $a
245
+
            else handleCoupon($a, $l[$i])
211
246
 
212
-
            func $f0_2 ($a,$i) =             if (($i >= $s))
213
-
                then $a
214
-
                else throw("List size exceeds 8")
247
+
        func $f0_2 ($a,$i) =         if (($i >= $s))
248
+
            then $a
249
+
            else throw("List size exceeds 20")
215
250
 
216
-
            $f0_2($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)
217
-
            }
218
-
        let totalGenes = if ((gen == "U"))
219
-
            then 8
220
-
            else size(uniqueList)
221
-
        let power = pow(15, 1, totalGenes, 0, 2, DOWN)
222
-
        let multiplier = (((height - 3750000) * 100) / (((60 * 24) * 30) * 3))
223
-
        let finalPower = ((power * multiplier) / 100)
224
-
        $Tuple2([IntegerEntry(("DEBUG_" + assetName), finalPower), IntegerEntry(("DEBUG_COEFFICIENT_" + assetName), multiplier)], finalPower)
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)
225
252
 
        }
226
253
 
227
254
 
228
255
 
229
256
 
@Callable(i)
230
-
func calculateFarmPowerAssetName (assetName) = {
231
-
    let gen = takeRight(assetName, 1)
232
-
    let genotype = split(dropRight(drop(assetName, 5), 3), "")
233
-
    func uniqueArrayFilter (accum,nextGen) =     if (!(containsElement(accum, nextGen)))
234
-
        then (accum :+ nextGen)
235
-
        else accum
236
-
237
-
    let uniqueList = {
238
-
        let $l = genotype
239
-
        let $s = size($l)
240
-
        let $acc0 = nil
241
-
        func $f0_1 ($a,$i) =         if (($i >= $s))
242
-
            then $a
243
-
            else uniqueArrayFilter($a, $l[$i])
244
-
245
-
        func $f0_2 ($a,$i) =         if (($i >= $s))
246
-
            then $a
247
-
            else throw("List size exceeds 8")
248
-
249
-
        $f0_2($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)
250
-
        }
251
-
    let totalGenes = if ((gen == "U"))
252
-
        then 8
253
-
        else size(uniqueList)
254
-
    let power = pow(15, 1, totalGenes, 0, 1, DOWN)
255
-
    let multiplier = (((height - 3750000) * 100) / (((60 * 24) * 30) * 3))
256
-
    let finalPower = ((power * multiplier) / 100)
257
-
    $Tuple2([IntegerEntry(("DEBUG_" + assetName), finalPower), IntegerEntry(("DEBUG_COEFFICIENT_" + assetName), multiplier)], finalPower)
257
+
func CFRefund (recipient,amount) = {
258
+
    let cfAddress = getStringValue(i.caller, "CF_ADDRESS")
259
+
    let key = (("f_" + cfAddress) + "_stake_address")
260
+
    let stakeAddress = getStringValue(getMasterAddress(), key)
261
+
    if ((stakeAddress != toString(i.caller)))
262
+
        then throw("CCR: This is something fishy going on!")
263
+
        else addCouponsInternal(recipient, amount)
258
264
 
    }
259
265
 
260
266
 
261
267
 
262
268
 
@Callable(i)
263
-
func buyPerch (colorI,refererAddress) = {
264
-
    let validPayment = checkAdditionalPayment(i.payments[0])
265
-
    if ((validPayment == validPayment))
266
-
        then {
267
-
            let color = if ((colorI == "U"))
268
-
                then "B"
269
-
                else colorI
270
-
            if ((0 > value(indexOf(["B", "R", "G", "Y"], color))))
271
-
                then throw("you need to set color properly")
272
-
                else {
273
-
                    let exactPrice = calculatePerchPrice(toString(i.caller))
274
-
                    let firstPayment = if ((size(i.payments) == 2))
275
-
                        then value(i.payments[1])
276
-
                        else value(i.payments[0])
277
-
                    if ((firstPayment.assetId != getEggAssetId()))
278
-
                        then throw(("FBP: You can attach only EGG tokens with the following asset id: " + toBase58String(getEggAssetId())))
279
-
                        else if ((firstPayment.amount != exactPrice))
280
-
                            then throw(((("FBP: To buy a perch you currently need the following amount of EGGlets: " + toString(exactPrice)) + " ") + toString(i.caller)))
269
+
func useCoupons (amountTryingToPay) = {
270
+
    let invokingSc = i.caller
271
+
    if ((0 > amountTryingToPay))
272
+
        then throw("CUC: Only positive amount of money can be paid!")
273
+
        else if (!(containsElement(scCanUseCoupons, invokingSc)))
274
+
            then throw("CUC: Only certain smart contracts can use this coupon module!")
275
+
            else {
276
+
                let user = toString(i.originCaller)
277
+
                let keyActive = couponsUserActive(user)
278
+
                let availableCoupons = tryGetInteger(keyActive)
279
+
                if ((0 > availableCoupons))
280
+
                    then throw("CUC: Get rekt!")
281
+
                    else {
282
+
                        let leftToPay = if ((amountTryingToPay > availableCoupons))
283
+
                            then (amountTryingToPay - availableCoupons)
284
+
                            else 0
285
+
                        let amountPaid = (amountTryingToPay - leftToPay)
286
+
                        let availableCouponsLeft = (availableCoupons - amountPaid)
287
+
                        if ((0 > availableCouponsLeft))
288
+
                            then throw("CUC: You try to overspend!")
281
289
 
                            else {
282
-
                                let toBurn = exactPrice
283
-
                                let burnCall = invoke(getBurnAddress(), "burnAttachedPayments", nil, [AttachedPayment(getEggAssetId(), toBurn)])
284
-
                                if ((burnCall == burnCall))
290
+
                                let keySpend = couponsUserSpend(user)
291
+
                                let keyOld = couponsUserActiveOld(user)
292
+
                                let keySpendSc = couponsSpendOnSc(toString(i.caller))
293
+
                                let topUp = invoke(getVeggFarmingAddress(), "topUpReward", [amountPaid], nil)
294
+
                                if ((topUp == topUp))
285
295
 
                                    then {
286
-
                                        let perchAmountKey = ((("address_" + toString(i.caller)) + "_perchesAvailable_") + color)
287
-
                                        let perchAmount = tryGetInteger(perchAmountKey)
288
-
                                        ([IntegerEntry(perchAmountKey, (perchAmount + 1))] ++ validPayment)
296
+
                                        let totalSpend = (tryGetInteger(keySpend) + amountPaid)
297
+
                                        let totalSpendSc = (tryGetInteger(keySpendSc) + amountPaid)
298
+
                                        $Tuple2([IntegerEntry(keySpend, totalSpend), IntegerEntry(keyOld, availableCoupons), IntegerEntry(keyActive, availableCouponsLeft), IntegerEntry(keySpendSc, totalSpendSc)], amountPaid)
289
299
 
                                        }
290
300
 
                                    else throw("Strict value is not equal to itself.")
291
301
 
                                }
292
-
                    }
293
-
            }
294
-
        else throw("Strict value is not equal to itself.")
302
+
                        }
303
+
                }
295
304
 
    }
296
305
 
297
306
 
298
307
 
299
308
 
@Callable(i)
300
-
func stakeNFT (jColor) = {
301
-
    let validPayment = checkAdditionalPayment(i.payments[0])
302
-
    if ((validPayment == validPayment))
303
-
        then {
304
-
            let pmt = value(i.payments[1])
305
-
            let assetId = value(pmt.assetId)
306
-
            let assetName = value(value(assetInfo(assetId)).name)
307
-
            let isJackpot = (takeRight(assetName, 1) == "U")
308
-
            let rarity = if (isJackpot)
309
-
                then 100
310
-
                else {
311
-
                    let generation = take(takeRight(assetName, 2), 1)
312
-
                    let farmGen = asString(invoke(getBreederAddress(), "getGenFromName", [assetName], nil))
313
-
                    if ((farmGen == farmGen))
314
-
                        then getAssetRarity(farmGen, generation)
315
-
                        else throw("Strict value is not equal to itself.")
316
-
                    }
317
-
            if ((70 > rarity))
318
-
                then throw("Only ducks with a rarity above 70 can be locked!")
319
-
                else {
320
-
                    let address = toString(i.caller)
321
-
                    let color = if (isJackpot)
322
-
                        then jColor
323
-
                        else takeRight(assetName, 1)
324
-
                    let availablePerches = tryGetInteger(((("address_" + address) + "_perchesAvailable_") + color))
325
-
                    if ((pmt.amount != 1))
326
-
                        then throw("NFT is not attached")
327
-
                        else if ((0 >= availablePerches))
328
-
                            then throw(("no perch available for the type " + color))
329
-
                            else {
330
-
                                let farmingPower = asInt(invoke(this, "calculateFarmPower", [toBase58String(assetId)], nil))
331
-
                                if ((farmingPower == farmingPower))
332
-
                                    then (([IntegerEntry(totalStakedKey(), (tryGetInteger(totalStakedKey()) + farmingPower)), IntegerEntry(totalStakedUserKey(address), (tryGetInteger(totalStakedUserKey(address)) + farmingPower)), IntegerEntry(((("address_" + address) + "_perchesAvailable_") + color), (availablePerches - 1)), StringEntry((toBase58String(assetId) + "_owner"), address), IntegerEntry((toBase58String(assetId) + "_power"), farmingPower), IntegerEntry((((("assetId_" + toBase58String(assetId)) + "_owner_") + address) + "_power"), farmingPower)] ++ claimStakingResult(i.caller)) ++ validPayment)
333
-
                                    else throw("Strict value is not equal to itself.")
334
-
                                }
335
-
                    }
336
-
            }
337
-
        else throw("Strict value is not equal to itself.")
338
-
    }
339
-
340
-
341
-
342
-
@Callable(i)
343
-
func topUpReward (amount) = if ((i.caller != getCouponsAddress()))
344
-
    then throw("VFTUP: Only couponsdapp can do topup!")
345
-
    else {
346
-
        let resHandleStaking = handleStakingTopUp(amount)
347
-
        $Tuple2(resHandleStaking, true)
348
-
        }
349
-
350
-
351
-
352
-
@Callable(i)
353
-
func claimReward () = {
354
-
    let validPayment = checkAdditionalPayment(i.payments[0])
355
-
    if ((validPayment == validPayment))
356
-
        then if ((size(i.payments) > 1))
357
-
            then throw("Please don't add extra payments")
358
-
            else (claimStakingResult(i.caller) ++ validPayment)
359
-
        else throw("Strict value is not equal to itself.")
360
-
    }
309
+
func recordAction (actionName) = recordActionInternal(actionName, i.caller, i.originCaller)
361
310
 
362
311
 

github/deemru/w8io/3ef1775 
81.31 ms ◑