tx · 2mQu1Zd2j7zagJ7sL7S2gLTmTpoTfXAQvGWiFMtfg9h2

3NAoJSThEgz12iLrRFSeMZpP1mEYc4QcGa3:  -0.01000000 Waves

2023.12.07 13:58 [2876145] smart account 3NAoJSThEgz12iLrRFSeMZpP1mEYc4QcGa3 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2mQu1Zd2j7zagJ7sL7S2gLTmTpoTfXAQvGWiFMtfg9h2",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1701946677709,
    "version": 2,
    "chainId": 84,
    "sender": "3NAoJSThEgz12iLrRFSeMZpP1mEYc4QcGa3",
    "senderPublicKey": "5TXMdPyvDNfxhdixe86fk7Ya8FScpZGfZ6XNawu8sYK4",
    "proofs": [
        "YeJYwAbAKrDDRhUm8ygX7NxrvkHhpNYzjCrUyg99c55cjfWptFSEtvzuTzD4hTY2Si6pW1Qh9fmEYqTAGXmrx4x"
    ],
    "script": "base64:BgIWCAISBwoFEREICAESAwoBCBIECgIIAQYAC0JBSV9BRERSRVNTAiMzTjl0S2l4enFUWVduRVhReHJEUTVwQlRHdlFkNnNGc3ZtVgAEVFlQRQIPY3Jhc2hFdmFsdWF0aW9uAAdCQUlfRkVFAICt4gQAEUFJX1RPS0VOX0FTU0VUX0lEASCT4XI4cQSbauiaYx8EJLdkU5csPrxmC4N0r2i7JI3iQgELcmVtb3ZlTWFya3MBC21hcmtzU3RyaW5nBAFhCQCwAgIFC21hcmtzU3RyaW5nAAEEAWIJALMCAgUBYQABBQFiAQlwYXJzZUpzb24BBGpzb24EDG1vZGlmaWVkSnNvbgkAsAICBQRqc29uAAEEDW1vZGlmaWVkSnNvbjIJALMCAgUMbW9kaWZpZWRKc29uAAEEBnNwbGl0MQkAtQkCBQ1tb2RpZmllZEpzb24yAgEsBAlrZXlWYWx1ZTEJALUJAgkAkQMCBQZzcGxpdDEAAAIBOgQEa2V5MQkBC3JlbW92ZU1hcmtzAQkAkQMCBQlrZXlWYWx1ZTEAAAQGdmFsdWUxCQELcmVtb3ZlTWFya3MBCQCRAwIFCWtleVZhbHVlMQABBAlrZXlWYWx1ZTIJALUJAgkAkQMCBQZzcGxpdDEAAQIBOgQEa2V5MgkBC3JlbW92ZU1hcmtzAQkAkQMCBQlrZXlWYWx1ZTIAAAQGdmFsdWUyCQELcmVtb3ZlTWFya3MBCQCRAwIFCWtleVZhbHVlMgABBAlrZXlWYWx1ZTMJALUJAgkAkQMCBQZzcGxpdDEAAgIBOgQEa2V5MwkBC3JlbW92ZU1hcmtzAQkAkQMCBQlrZXlWYWx1ZTMAAAQGdmFsdWUzCQELcmVtb3ZlTWFya3MBCQCRAwIFCWtleVZhbHVlMwABCQCVCgMJAMwIAgUEa2V5MQkAzAgCBQZ2YWx1ZTEFA25pbAkAzAgCBQRrZXkyCQDMCAIFBnZhbHVlMgUDbmlsCQDMCAIFBGtleTMJAMwIAgUGdmFsdWUzBQNuaWwDAWkBDHJlZ2lzdGVyRGF0YQULY2xpZW50SW5wdXQNb3Bwb25lbnRJbnB1dAJpZApvcHBBZGRyZXNzB2xndENvbmQEFXNlYXJjaEZvckV4aXN0aW5nRGF0YQQHJG1hdGNoMAkAoggBBQJpZAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAFAXMCDm5vIERhdGEgZXhpc3RzAwkBAiE9AgUVc2VhcmNoRm9yRXhpc3RpbmdEYXRhAg5ubyBEYXRhIGV4aXN0cwkAAgECLVRoZXJlIGlzIGFscmVhZHkgZXhpc3RpbmcgRGF0YSBmb3IgdGhpcyBjYXNlIQQKcGFyYW1ldGVycwkAzAgCBQJpZAkAzAgCBQRUWVBFCQDMCAICFWV2YWx1YXRlZERhdGFDYWxsYmFjawUDbmlsBAZjbGllbnQJAKUIAQgFAWkGY2FsbGVyBAR0eElkCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQDCQAAAgUGY2xpZW50BQpvcHBBZGRyZXNzCQACAQIzRm9yYmlkZGVuOiBTZW5kZXIgYWRkcmVzcyBlcXVhbHMgb3Bwb25lbnRzIGFkZHJlc3MhBAppbnZva2VUYXNrCQD8BwQJAQdBZGRyZXNzAQkA2QQBBQtCQUlfQUREUkVTUwIUcmVnaXN0ZXJUYXNrQ2FsbGJhY2sFCnBhcmFtZXRlcnMJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFEUFJX1RPS0VOX0FTU0VUX0lEBQdCQUlfRkVFBQNuaWwDCQECIT0CBQppbnZva2VUYXNrBQppbnZva2VUYXNrCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQtTdHJpbmdFbnRyeQIFAmlkBQR0eElkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgRfYWdlCQCRAwIFC2NsaWVudElucHV0AAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFAmlkAgFfBQZjbGllbnQCBF9zZXgJAJEDAgULY2xpZW50SW5wdXQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUCaWQCAV8FBmNsaWVudAIHX2RhbWFnZQkAkQMCBQtjbGllbnRJbnB1dAACCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfZmFjMQkAkQMCBQtjbGllbnRJbnB1dAADCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfZmFjMgkAkQMCBQtjbGllbnRJbnB1dAAECQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfZmFjMwkAkQMCBQtjbGllbnRJbnB1dAAFCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfZmFjNAkAkQMCBQtjbGllbnRJbnB1dAAGCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfdmlvMQkAkQMCBQtjbGllbnRJbnB1dAAHCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfdmlvMgkAkQMCBQtjbGllbnRJbnB1dAAICQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfdmlvMwkAkQMCBQtjbGllbnRJbnB1dAAJCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfdmlvNAkAkQMCBQtjbGllbnRJbnB1dAAKCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfY29zdAkAkQMCBQtjbGllbnRJbnB1dAALCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIEX2FnZQkAkQMCBQ1vcHBvbmVudElucHV0AAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFAmlkAgFfBQpvcHBBZGRyZXNzAgRfc2V4CQCRAwIFDW9wcG9uZW50SW5wdXQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUCaWQCAV8FCm9wcEFkZHJlc3MCB19kYW1hZ2UJAJEDAgUNb3Bwb25lbnRJbnB1dAACCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX2ZhYzEJAJEDAgUNb3Bwb25lbnRJbnB1dAADCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX2ZhYzIJAJEDAgUNb3Bwb25lbnRJbnB1dAAECQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX2ZhYzMJAJEDAgUNb3Bwb25lbnRJbnB1dAAFCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX2ZhYzQJAJEDAgUNb3Bwb25lbnRJbnB1dAAGCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX3ZpbzEJAJEDAgUNb3Bwb25lbnRJbnB1dAAHCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX3ZpbzIJAJEDAgUNb3Bwb25lbnRJbnB1dAAICQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX3ZpbzMJAJEDAgUNb3Bwb25lbnRJbnB1dAAJCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX3ZpbzQJAJEDAgUNb3Bwb25lbnRJbnB1dAAKCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX2Nvc3QJAJEDAgUNb3Bwb25lbnRJbnB1dAALCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFAmlkAgRfbGd0BQdsZ3RDb25kCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUCaWQCB19zdGF0dXMCBG9wZW4JAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQJpZAIHX3NlbmRlcgUGY2xpZW50BQNuaWwBaQEVZXZhbHVhdGVkRGF0YUNhbGxiYWNrAQhyZXNwb25zZQQEdHhJZAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkBApwYXJzZWRKc29uCQEJcGFyc2VKc29uAQUIcmVzcG9uc2UEB2NyYXNoSWQJAJEDAggFCnBhcnNlZEpzb24CXzEAAQQPaW5ub2NlbnRBZGRyZXNzCQCRAwIIBQpwYXJzZWRKc29uAl8yAAEEDWd1aWx0eUFkZHJlc3MJAJEDAggFCnBhcnNlZEpzb24CXzMAAQQMUmVnaXN0ZXJUeElkBAckbWF0Y2gwCQCiCAEFB2NyYXNoSWQDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzAg5ubyBEYXRhIGV4aXN0cwMJAAACBQxSZWdpc3RlclR4SWQCDm5vIERhdGEgZXhpc3RzCQACAQIiVGhlcmUgaXMgbm8gRGF0YSBmb3IgdGhpcyBjcmFzaElkIQQGc3RhdHVzBAckbWF0Y2gwCQCiCAEJAKwCAgUHY3Jhc2hJZAIHX3N0YXR1cwMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAFAXMCDm5vIERhdGEgZXhpc3RzAwkAAAIFBnN0YXR1cwIObm8gRGF0YSBleGlzdHMJAAIBAiFUaGVyZSBpcyBubyBzdGF0dXMgZm9yIHRoaXMgY2FzZSEDCQAAAgUGc3RhdHVzAgZjbG9zZWQJAAIBAiVBIGNhc2Ugc2hvdWxkIG5vdCBiZSBwYXllZCBvdXQgdHdpY2UhAwkAAAIFBnN0YXR1cwIJZXZhbHVhdGVkCQACAQIlQSBjYXNlIHNob3VsZCBub3QgYmUgZXZhbHVhdGVkIHR3aWNlIQQeY29zdEVzdGltYXRpb25PZklubm9jZW50UGVyc29uBAckbWF0Y2gwCQCfCAEJAKwCAgkArAICCQCsAgIFB2NyYXNoSWQCAV8FD2lubm9jZW50QWRkcmVzcwIFX2Nvc3QDCQABAgUHJG1hdGNoMAIDSW50BAFzBQckbWF0Y2gwBQFzAg1ObyBkYXRhIEZvdW5kAwkAAAIFHmNvc3RFc3RpbWF0aW9uT2ZJbm5vY2VudFBlcnNvbgINTm8gZGF0YSBGb3VuZAkAAgECJ1RoZXJlIGlzIG5vIGNvc3QgZGF0YSBmb3IgdGhpcyBhZGRyZXNzIQMJAAACBR5jb3N0RXN0aW1hdGlvbk9mSW5ub2NlbnRQZXJzb24A////////////AQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFB2NyYXNoSWQCBV9ldmFsBQR0eElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUHY3Jhc2hJZAIRX2lubm9jZW50X2FkZHJlc3MFD2lubm9jZW50QWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFB2NyYXNoSWQCD19ndWlsdHlfYWRkcmVzcwUNZ3VpbHR5QWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFB2NyYXNoSWQCB19zdGF0dXMCCWV2YWx1YXRlZAUDbmlsCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUHY3Jhc2hJZAIFX2V2YWwFBHR4SWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQdjcmFzaElkAhFfaW5ub2NlbnRfYWRkcmVzcwUPaW5ub2NlbnRBZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUHY3Jhc2hJZAIPX2d1aWx0eV9hZGRyZXNzBQ1ndWlsdHlBZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUHY3Jhc2hJZAIHX3N0YXR1cwIGY2xvc2VkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQkA2QQBBQ9pbm5vY2VudEFkZHJlc3MAgMLXLwUEdW5pdAUDbmlsAWkBDXJlcXVlc3RQYXlvdXQCB2NyYXNoSWQGYW1vdW50BAZzZW5kZXIJAKUIAQgFAWkGY2FsbGVyBAR0eElkCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQEBnN0YXR1cwQHJG1hdGNoMAkAoggBCQCsAgIFB2NyYXNoSWQCB19zdGF0dXMDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzAg5ubyBEYXRhIGV4aXN0cwMJAAACBQZzdGF0dXMCDm5vIERhdGEgZXhpc3RzCQACAQIhVGhlcmUgaXMgbm8gc3RhdHVzIGZvciB0aGlzIGNhc2UhAwkBAiE9AgUGc3RhdHVzAglldmFsdWF0ZWQJAAIBAjZPbmx5IGNhc2VzIHdpdGggZXZhbHVhdGVkIHN0YXR1cyBjYW4gcmVxdWVzdCBhIHBheW91dCEEEGVsaWdpYmxlX2FkZHJlc3MEByRtYXRjaDAJAKIIAQkArAICBQdjcmFzaElkAhFfaW5ub2NlbnRfYWRkcmVzcwMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAFAXMCDm5vIERhdGEgZXhpc3RzAwkAAAIFBnN0YXR1cwIObm8gRGF0YSBleGlzdHMJAAIBAipUaGVyZSBpcyBubyBlbGlnaWJsZSBwZXJzb24gZm9yIHRoaXMgY2FzZSEDCQECIT0CBRBlbGlnaWJsZV9hZGRyZXNzBQZzZW5kZXIJAAIBAihZb3UgYXJlIG5vdCBhbGxvd2VkIHRvIHJlcXVlc3QgYSBwYXlvdXQhCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQdjcmFzaElkAgFfBQZzZW5kZXICBV9jb3N0BQZhbW91bnQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQdjcmFzaElkAgdfc3RhdHVzAgZjbG9zZWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBCQDZBAEFBnNlbmRlcgCAwtcvBQR1bml0BQNuaWwBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5wiAaIQ==",
    "height": 2876145,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3MAAMJYru4pbfhrNCTUkZAhGufHbofgEFJpqJVP5cGUi
Next: H7ZvmpTSvZN6uH3TDXDNmQx13EQjhZCrLSCGFNnKx9KY

Diff: 

OldNewDifferences
5050             let F = [z, b, "evaluatedDataCallback"]
5151             let G = toString(w.caller)
5252             let H = toBase58String(w.transactionId)
53-            let I = invoke(Address(fromBase58String(a)), "registerTaskCallback", F, [AttachedPayment(d, c)])
54-            if ((I != I))
55-                then throw("Strict value is not equal to itself.")
56-                else [StringEntry(z, H), IntegerEntry((((z + "_") + G) + "_age"), x[0]), IntegerEntry((((z + "_") + G) + "_sex"), x[1]), IntegerEntry((((z + "_") + G) + "_damage"), x[2]), IntegerEntry((((z + "_") + G) + "_fac1"), x[3]), IntegerEntry((((z + "_") + G) + "_fac2"), x[4]), IntegerEntry((((z + "_") + G) + "_fac3"), x[5]), IntegerEntry((((z + "_") + G) + "_fac4"), x[6]), IntegerEntry((((z + "_") + G) + "_vio1"), x[7]), IntegerEntry((((z + "_") + G) + "_vio2"), x[8]), IntegerEntry((((z + "_") + G) + "_vio3"), x[9]), IntegerEntry((((z + "_") + G) + "_vio4"), x[10]), IntegerEntry((((z + "_") + G) + "_cost"), x[11]), IntegerEntry((((z + "_") + A) + "_age"), y[0]), IntegerEntry((((z + "_") + A) + "_sex"), y[1]), IntegerEntry((((z + "_") + A) + "_damage"), y[2]), IntegerEntry((((z + "_") + A) + "_fac1"), y[3]), IntegerEntry((((z + "_") + A) + "_fac2"), y[4]), IntegerEntry((((z + "_") + A) + "_fac3"), y[5]), IntegerEntry((((z + "_") + A) + "_fac4"), y[6]), IntegerEntry((((z + "_") + A) + "_vio1"), y[7]), IntegerEntry((((z + "_") + A) + "_vio2"), y[8]), IntegerEntry((((z + "_") + A) + "_vio3"), y[9]), IntegerEntry((((z + "_") + A) + "_vio4"), y[10]), IntegerEntry((((z + "_") + A) + "_cost"), y[11]), IntegerEntry((z + "_lgt"), B), StringEntry((z + "_status"), "open"), StringEntry((z + "_sender"), G)]
53+            if ((G == A))
54+                then throw("Forbidden: Sender address equals opponents address!")
55+                else {
56+                    let I = invoke(Address(fromBase58String(a)), "registerTaskCallback", F, [AttachedPayment(d, c)])
57+                    if ((I != I))
58+                        then throw("Strict value is not equal to itself.")
59+                        else [StringEntry(z, H), IntegerEntry((((z + "_") + G) + "_age"), x[0]), IntegerEntry((((z + "_") + G) + "_sex"), x[1]), IntegerEntry((((z + "_") + G) + "_damage"), x[2]), IntegerEntry((((z + "_") + G) + "_fac1"), x[3]), IntegerEntry((((z + "_") + G) + "_fac2"), x[4]), IntegerEntry((((z + "_") + G) + "_fac3"), x[5]), IntegerEntry((((z + "_") + G) + "_fac4"), x[6]), IntegerEntry((((z + "_") + G) + "_vio1"), x[7]), IntegerEntry((((z + "_") + G) + "_vio2"), x[8]), IntegerEntry((((z + "_") + G) + "_vio3"), x[9]), IntegerEntry((((z + "_") + G) + "_vio4"), x[10]), IntegerEntry((((z + "_") + G) + "_cost"), x[11]), IntegerEntry((((z + "_") + A) + "_age"), y[0]), IntegerEntry((((z + "_") + A) + "_sex"), y[1]), IntegerEntry((((z + "_") + A) + "_damage"), y[2]), IntegerEntry((((z + "_") + A) + "_fac1"), y[3]), IntegerEntry((((z + "_") + A) + "_fac2"), y[4]), IntegerEntry((((z + "_") + A) + "_fac3"), y[5]), IntegerEntry((((z + "_") + A) + "_fac4"), y[6]), IntegerEntry((((z + "_") + A) + "_vio1"), y[7]), IntegerEntry((((z + "_") + A) + "_vio2"), y[8]), IntegerEntry((((z + "_") + A) + "_vio3"), y[9]), IntegerEntry((((z + "_") + A) + "_vio4"), y[10]), IntegerEntry((((z + "_") + A) + "_cost"), y[11]), IntegerEntry((z + "_lgt"), B), StringEntry((z + "_status"), "open"), StringEntry((z + "_sender"), G)]
60+                    }
5761             }
5862     }
5963 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let a = "3N9tKixzqTYWnEXQxrDQ5pBTGvQd6sFsvmV"
55 
66 let b = "crashEvaluation"
77 
88 let c = 10000000
99 
1010 let d = base58'AxGKQRxKo4F2EbhrRq6N2tdLsxtMnpzQsS4QemV6V1W1'
1111 
1212 func e (f) = {
1313     let g = drop(f, 1)
1414     let h = dropRight(g, 1)
1515     h
1616     }
1717 
1818 
1919 func i (j) = {
2020     let k = drop(j, 1)
2121     let l = dropRight(k, 1)
2222     let m = split(l, ",")
2323     let n = split(m[0], ":")
2424     let o = e(n[0])
2525     let p = e(n[1])
2626     let q = split(m[1], ":")
2727     let r = e(q[0])
2828     let s = e(q[1])
2929     let t = split(m[2], ":")
3030     let u = e(t[0])
3131     let v = e(t[1])
3232     $Tuple3([o, p], [r, s], [u, v])
3333     }
3434 
3535 
3636 @Callable(w)
3737 func registerData (x,y,z,A,B) = {
3838     let C = {
3939         let D = getString(z)
4040         if ($isInstanceOf(D, "String"))
4141             then {
4242                 let E = D
4343                 E
4444                 }
4545             else "no Data exists"
4646         }
4747     if ((C != "no Data exists"))
4848         then throw("There is already existing Data for this case!")
4949         else {
5050             let F = [z, b, "evaluatedDataCallback"]
5151             let G = toString(w.caller)
5252             let H = toBase58String(w.transactionId)
53-            let I = invoke(Address(fromBase58String(a)), "registerTaskCallback", F, [AttachedPayment(d, c)])
54-            if ((I != I))
55-                then throw("Strict value is not equal to itself.")
56-                else [StringEntry(z, H), IntegerEntry((((z + "_") + G) + "_age"), x[0]), IntegerEntry((((z + "_") + G) + "_sex"), x[1]), IntegerEntry((((z + "_") + G) + "_damage"), x[2]), IntegerEntry((((z + "_") + G) + "_fac1"), x[3]), IntegerEntry((((z + "_") + G) + "_fac2"), x[4]), IntegerEntry((((z + "_") + G) + "_fac3"), x[5]), IntegerEntry((((z + "_") + G) + "_fac4"), x[6]), IntegerEntry((((z + "_") + G) + "_vio1"), x[7]), IntegerEntry((((z + "_") + G) + "_vio2"), x[8]), IntegerEntry((((z + "_") + G) + "_vio3"), x[9]), IntegerEntry((((z + "_") + G) + "_vio4"), x[10]), IntegerEntry((((z + "_") + G) + "_cost"), x[11]), IntegerEntry((((z + "_") + A) + "_age"), y[0]), IntegerEntry((((z + "_") + A) + "_sex"), y[1]), IntegerEntry((((z + "_") + A) + "_damage"), y[2]), IntegerEntry((((z + "_") + A) + "_fac1"), y[3]), IntegerEntry((((z + "_") + A) + "_fac2"), y[4]), IntegerEntry((((z + "_") + A) + "_fac3"), y[5]), IntegerEntry((((z + "_") + A) + "_fac4"), y[6]), IntegerEntry((((z + "_") + A) + "_vio1"), y[7]), IntegerEntry((((z + "_") + A) + "_vio2"), y[8]), IntegerEntry((((z + "_") + A) + "_vio3"), y[9]), IntegerEntry((((z + "_") + A) + "_vio4"), y[10]), IntegerEntry((((z + "_") + A) + "_cost"), y[11]), IntegerEntry((z + "_lgt"), B), StringEntry((z + "_status"), "open"), StringEntry((z + "_sender"), G)]
53+            if ((G == A))
54+                then throw("Forbidden: Sender address equals opponents address!")
55+                else {
56+                    let I = invoke(Address(fromBase58String(a)), "registerTaskCallback", F, [AttachedPayment(d, c)])
57+                    if ((I != I))
58+                        then throw("Strict value is not equal to itself.")
59+                        else [StringEntry(z, H), IntegerEntry((((z + "_") + G) + "_age"), x[0]), IntegerEntry((((z + "_") + G) + "_sex"), x[1]), IntegerEntry((((z + "_") + G) + "_damage"), x[2]), IntegerEntry((((z + "_") + G) + "_fac1"), x[3]), IntegerEntry((((z + "_") + G) + "_fac2"), x[4]), IntegerEntry((((z + "_") + G) + "_fac3"), x[5]), IntegerEntry((((z + "_") + G) + "_fac4"), x[6]), IntegerEntry((((z + "_") + G) + "_vio1"), x[7]), IntegerEntry((((z + "_") + G) + "_vio2"), x[8]), IntegerEntry((((z + "_") + G) + "_vio3"), x[9]), IntegerEntry((((z + "_") + G) + "_vio4"), x[10]), IntegerEntry((((z + "_") + G) + "_cost"), x[11]), IntegerEntry((((z + "_") + A) + "_age"), y[0]), IntegerEntry((((z + "_") + A) + "_sex"), y[1]), IntegerEntry((((z + "_") + A) + "_damage"), y[2]), IntegerEntry((((z + "_") + A) + "_fac1"), y[3]), IntegerEntry((((z + "_") + A) + "_fac2"), y[4]), IntegerEntry((((z + "_") + A) + "_fac3"), y[5]), IntegerEntry((((z + "_") + A) + "_fac4"), y[6]), IntegerEntry((((z + "_") + A) + "_vio1"), y[7]), IntegerEntry((((z + "_") + A) + "_vio2"), y[8]), IntegerEntry((((z + "_") + A) + "_vio3"), y[9]), IntegerEntry((((z + "_") + A) + "_vio4"), y[10]), IntegerEntry((((z + "_") + A) + "_cost"), y[11]), IntegerEntry((z + "_lgt"), B), StringEntry((z + "_status"), "open"), StringEntry((z + "_sender"), G)]
60+                    }
5761             }
5862     }
5963 
6064 
6165 
6266 @Callable(w)
6367 func evaluatedDataCallback (J) = {
6468     let H = toBase58String(w.transactionId)
6569     let K = i(J)
6670     let L = K._1[1]
6771     let M = K._2[1]
6872     let N = K._3[1]
6973     let O = {
7074         let D = getString(L)
7175         if ($isInstanceOf(D, "String"))
7276             then {
7377                 let E = D
7478                 E
7579                 }
7680             else "no Data exists"
7781         }
7882     if ((O == "no Data exists"))
7983         then throw("There is no Data for this crashId!")
8084         else {
8185             let P = {
8286                 let D = getString((L + "_status"))
8387                 if ($isInstanceOf(D, "String"))
8488                     then {
8589                         let E = D
8690                         E
8791                         }
8892                     else "no Data exists"
8993                 }
9094             if ((P == "no Data exists"))
9195                 then throw("There is no status for this case!")
9296                 else if ((P == "closed"))
9397                     then throw("A case should not be payed out twice!")
9498                     else if ((P == "evaluated"))
9599                         then throw("A case should not be evaluated twice!")
96100                         else {
97101                             let Q = {
98102                                 let D = getInteger((((L + "_") + M) + "_cost"))
99103                                 if ($isInstanceOf(D, "Int"))
100104                                     then {
101105                                         let E = D
102106                                         E
103107                                         }
104108                                     else "No data Found"
105109                                 }
106110                             if ((Q == "No data Found"))
107111                                 then throw("There is no cost data for this address!")
108112                                 else if ((Q == -1))
109113                                     then [StringEntry((L + "_eval"), H), StringEntry((L + "_innocent_address"), M), StringEntry((L + "_guilty_address"), N), StringEntry((L + "_status"), "evaluated")]
110114                                     else [StringEntry((L + "_eval"), H), StringEntry((L + "_innocent_address"), M), StringEntry((L + "_guilty_address"), N), StringEntry((L + "_status"), "closed"), ScriptTransfer(Address(fromBase58String(M)), 100000000, unit)]
111115                             }
112116             }
113117     }
114118 
115119 
116120 
117121 @Callable(w)
118122 func requestPayout (L,R) = {
119123     let S = toString(w.caller)
120124     let H = toBase58String(w.transactionId)
121125     let P = {
122126         let D = getString((L + "_status"))
123127         if ($isInstanceOf(D, "String"))
124128             then {
125129                 let E = D
126130                 E
127131                 }
128132             else "no Data exists"
129133         }
130134     if ((P == "no Data exists"))
131135         then throw("There is no status for this case!")
132136         else if ((P != "evaluated"))
133137             then throw("Only cases with evaluated status can request a payout!")
134138             else {
135139                 let T = {
136140                     let D = getString((L + "_innocent_address"))
137141                     if ($isInstanceOf(D, "String"))
138142                         then {
139143                             let E = D
140144                             E
141145                             }
142146                         else "no Data exists"
143147                     }
144148                 if ((P == "no Data exists"))
145149                     then throw("There is no eligible person for this case!")
146150                     else if ((T != S))
147151                         then throw("You are not allowed to request a payout!")
148152                         else [IntegerEntry((((L + "_") + S) + "_cost"), R), StringEntry((L + "_status"), "closed"), ScriptTransfer(Address(fromBase58String(S)), 100000000, unit)]
149153                 }
150154     }
151155 
152156 
153157 @Verifier(U)
154158 func V () = sigVerify(U.bodyBytes, U.proofs[0], U.senderPublicKey)
155159 
github/deemru/w8io/873ac7e 
31.42 ms ◑