tx · H7ZvmpTSvZN6uH3TDXDNmQx13EQjhZCrLSCGFNnKx9KY

3NAoJSThEgz12iLrRFSeMZpP1mEYc4QcGa3:  -0.01000000 Waves

2023.12.07 14:33 [2876177] smart account 3NAoJSThEgz12iLrRFSeMZpP1mEYc4QcGa3 > SELF 0.00000000 Waves

{ "type": 13, "id": "H7ZvmpTSvZN6uH3TDXDNmQx13EQjhZCrLSCGFNnKx9KY", "fee": 1000000, "feeAssetId": null, "timestamp": 1701948799893, "version": 2, "chainId": 84, "sender": "3NAoJSThEgz12iLrRFSeMZpP1mEYc4QcGa3", "senderPublicKey": "5TXMdPyvDNfxhdixe86fk7Ya8FScpZGfZ6XNawu8sYK4", "proofs": [ "5vCHvLnuyouKuWLGtKPkD42v5AfGjinAwW4XWcpNyzcWrhQ6iPKqmZbQqRFueJvboX4524FWsDg1hyS4nxdggKUT" ], "script": "base64:BgIWCAISBwoFEREICAESAwoBCBIECgIIAQcAC0JBSV9BRERSRVNTAiMzTjl0S2l4enFUWVduRVhReHJEUTVwQlRHdlFkNnNGc3ZtVgAEVFlQRQIPY3Jhc2hFdmFsdWF0aW9uAAdCQUlfRkVFAICt4gQAEUFJX1RPS0VOX0FTU0VUX0lEASCT4XI4cQSbauiaYx8EJLdkU5csPrxmC4N0r2i7JI3iQgASVVNEX1RPS0VOX0FTU0VUX0lEASD0y7xo+2oaYWIjSL66wV175dmB7kJoGRUhLW0SJ79srAELcmVtb3ZlTWFya3MBC21hcmtzU3RyaW5nBAFhCQCwAgIFC21hcmtzU3RyaW5nAAEEAWIJALMCAgUBYQABBQFiAQlwYXJzZUpzb24BBGpzb24EDG1vZGlmaWVkSnNvbgkAsAICBQRqc29uAAEEDW1vZGlmaWVkSnNvbjIJALMCAgUMbW9kaWZpZWRKc29uAAEEBnNwbGl0MQkAtQkCBQ1tb2RpZmllZEpzb24yAgEsBAlrZXlWYWx1ZTEJALUJAgkAkQMCBQZzcGxpdDEAAAIBOgQEa2V5MQkBC3JlbW92ZU1hcmtzAQkAkQMCBQlrZXlWYWx1ZTEAAAQGdmFsdWUxCQELcmVtb3ZlTWFya3MBCQCRAwIFCWtleVZhbHVlMQABBAlrZXlWYWx1ZTIJALUJAgkAkQMCBQZzcGxpdDEAAQIBOgQEa2V5MgkBC3JlbW92ZU1hcmtzAQkAkQMCBQlrZXlWYWx1ZTIAAAQGdmFsdWUyCQELcmVtb3ZlTWFya3MBCQCRAwIFCWtleVZhbHVlMgABBAlrZXlWYWx1ZTMJALUJAgkAkQMCBQZzcGxpdDEAAgIBOgQEa2V5MwkBC3JlbW92ZU1hcmtzAQkAkQMCBQlrZXlWYWx1ZTMAAAQGdmFsdWUzCQELcmVtb3ZlTWFya3MBCQCRAwIFCWtleVZhbHVlMwABCQCVCgMJAMwIAgUEa2V5MQkAzAgCBQZ2YWx1ZTEFA25pbAkAzAgCBQRrZXkyCQDMCAIFBnZhbHVlMgUDbmlsCQDMCAIFBGtleTMJAMwIAgUGdmFsdWUzBQNuaWwDAWkBDHJlZ2lzdGVyRGF0YQULY2xpZW50SW5wdXQNb3Bwb25lbnRJbnB1dAJpZApvcHBBZGRyZXNzB2xndENvbmQEFXNlYXJjaEZvckV4aXN0aW5nRGF0YQQHJG1hdGNoMAkAoggBBQJpZAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAFAXMCDm5vIERhdGEgZXhpc3RzAwkBAiE9AgUVc2VhcmNoRm9yRXhpc3RpbmdEYXRhAg5ubyBEYXRhIGV4aXN0cwkAAgECLVRoZXJlIGlzIGFscmVhZHkgZXhpc3RpbmcgRGF0YSBmb3IgdGhpcyBjYXNlIQQKcGFyYW1ldGVycwkAzAgCBQJpZAkAzAgCBQRUWVBFCQDMCAICFWV2YWx1YXRlZERhdGFDYWxsYmFjawUDbmlsBAZjbGllbnQJAKUIAQgFAWkGY2FsbGVyBAR0eElkCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQDCQAAAgUGY2xpZW50BQpvcHBBZGRyZXNzCQACAQIzRm9yYmlkZGVuOiBTZW5kZXIgYWRkcmVzcyBlcXVhbHMgb3Bwb25lbnRzIGFkZHJlc3MhBAppbnZva2VUYXNrCQD8BwQJAQdBZGRyZXNzAQkA2QQBBQtCQUlfQUREUkVTUwIUcmVnaXN0ZXJUYXNrQ2FsbGJhY2sFCnBhcmFtZXRlcnMJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFEUFJX1RPS0VOX0FTU0VUX0lEBQdCQUlfRkVFBQNuaWwDCQECIT0CBQppbnZva2VUYXNrBQppbnZva2VUYXNrCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQtTdHJpbmdFbnRyeQIFAmlkBQR0eElkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgRfYWdlCQCRAwIFC2NsaWVudElucHV0AAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFAmlkAgFfBQZjbGllbnQCBF9zZXgJAJEDAgULY2xpZW50SW5wdXQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUCaWQCAV8FBmNsaWVudAIHX2RhbWFnZQkAkQMCBQtjbGllbnRJbnB1dAACCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfZmFjMQkAkQMCBQtjbGllbnRJbnB1dAADCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfZmFjMgkAkQMCBQtjbGllbnRJbnB1dAAECQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfZmFjMwkAkQMCBQtjbGllbnRJbnB1dAAFCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfZmFjNAkAkQMCBQtjbGllbnRJbnB1dAAGCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfdmlvMQkAkQMCBQtjbGllbnRJbnB1dAAHCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfdmlvMgkAkQMCBQtjbGllbnRJbnB1dAAICQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfdmlvMwkAkQMCBQtjbGllbnRJbnB1dAAJCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfdmlvNAkAkQMCBQtjbGllbnRJbnB1dAAKCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUGY2xpZW50AgVfY29zdAkAkQMCBQtjbGllbnRJbnB1dAALCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIEX2FnZQkAkQMCBQ1vcHBvbmVudElucHV0AAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFAmlkAgFfBQpvcHBBZGRyZXNzAgRfc2V4CQCRAwIFDW9wcG9uZW50SW5wdXQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUCaWQCAV8FCm9wcEFkZHJlc3MCB19kYW1hZ2UJAJEDAgUNb3Bwb25lbnRJbnB1dAACCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX2ZhYzEJAJEDAgUNb3Bwb25lbnRJbnB1dAADCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX2ZhYzIJAJEDAgUNb3Bwb25lbnRJbnB1dAAECQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX2ZhYzMJAJEDAgUNb3Bwb25lbnRJbnB1dAAFCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX2ZhYzQJAJEDAgUNb3Bwb25lbnRJbnB1dAAGCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX3ZpbzEJAJEDAgUNb3Bwb25lbnRJbnB1dAAHCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX3ZpbzIJAJEDAgUNb3Bwb25lbnRJbnB1dAAICQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX3ZpbzMJAJEDAgUNb3Bwb25lbnRJbnB1dAAJCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX3ZpbzQJAJEDAgUNb3Bwb25lbnRJbnB1dAAKCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQJpZAIBXwUKb3BwQWRkcmVzcwIFX2Nvc3QJAJEDAgUNb3Bwb25lbnRJbnB1dAALCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFAmlkAgRfbGd0BQdsZ3RDb25kCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUCaWQCB19zdGF0dXMCBG9wZW4JAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQJpZAIHX3NlbmRlcgUGY2xpZW50BQNuaWwBaQEVZXZhbHVhdGVkRGF0YUNhbGxiYWNrAQhyZXNwb25zZQQEdHhJZAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkBApwYXJzZWRKc29uCQEJcGFyc2VKc29uAQUIcmVzcG9uc2UEB2NyYXNoSWQJAJEDAggFCnBhcnNlZEpzb24CXzEAAQQPaW5ub2NlbnRBZGRyZXNzCQCRAwIIBQpwYXJzZWRKc29uAl8yAAEEDWd1aWx0eUFkZHJlc3MJAJEDAggFCnBhcnNlZEpzb24CXzMAAQQMUmVnaXN0ZXJUeElkBAckbWF0Y2gwCQCiCAEFB2NyYXNoSWQDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzAg5ubyBEYXRhIGV4aXN0cwMJAAACBQxSZWdpc3RlclR4SWQCDm5vIERhdGEgZXhpc3RzCQACAQIiVGhlcmUgaXMgbm8gRGF0YSBmb3IgdGhpcyBjcmFzaElkIQQGc3RhdHVzBAckbWF0Y2gwCQCiCAEJAKwCAgUHY3Jhc2hJZAIHX3N0YXR1cwMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAFAXMCDm5vIERhdGEgZXhpc3RzAwkAAAIFBnN0YXR1cwIObm8gRGF0YSBleGlzdHMJAAIBAiFUaGVyZSBpcyBubyBzdGF0dXMgZm9yIHRoaXMgY2FzZSEDCQAAAgUGc3RhdHVzAgZjbG9zZWQJAAIBAiVBIGNhc2Ugc2hvdWxkIG5vdCBiZSBwYXllZCBvdXQgdHdpY2UhAwkAAAIFBnN0YXR1cwIJZXZhbHVhdGVkCQACAQIlQSBjYXNlIHNob3VsZCBub3QgYmUgZXZhbHVhdGVkIHR3aWNlIQQeY29zdEVzdGltYXRpb25PZklubm9jZW50UGVyc29uBAckbWF0Y2gwCQCfCAEJAKwCAgkArAICCQCsAgIFB2NyYXNoSWQCAV8FD2lubm9jZW50QWRkcmVzcwIFX2Nvc3QDCQABAgUHJG1hdGNoMAIDSW50BAFzBQckbWF0Y2gwBQFzAOz8/////////wEDCQAAAgUeY29zdEVzdGltYXRpb25PZklubm9jZW50UGVyc29uAOz8/////////wEJAAIBAidUaGVyZSBpcyBubyBjb3N0IGRhdGEgZm9yIHRoaXMgYWRkcmVzcyEDCQAAAgUeY29zdEVzdGltYXRpb25PZklubm9jZW50UGVyc29uAP///////////wEJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQdjcmFzaElkAgVfZXZhbAUEdHhJZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFB2NyYXNoSWQCEV9pbm5vY2VudF9hZGRyZXNzBQ9pbm5vY2VudEFkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQdjcmFzaElkAg9fZ3VpbHR5X2FkZHJlc3MFDWd1aWx0eUFkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQdjcmFzaElkAgdfc3RhdHVzAglldmFsdWF0ZWQFA25pbAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFB2NyYXNoSWQCBV9ldmFsBQR0eElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUHY3Jhc2hJZAIRX2lubm9jZW50X2FkZHJlc3MFD2lubm9jZW50QWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFB2NyYXNoSWQCD19ndWlsdHlfYWRkcmVzcwUNZ3VpbHR5QWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFB2NyYXNoSWQCB19zdGF0dXMCBmNsb3NlZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEHQWRkcmVzcwEJANkEAQUPaW5ub2NlbnRBZGRyZXNzBR5jb3N0RXN0aW1hdGlvbk9mSW5ub2NlbnRQZXJzb24FElVTRF9UT0tFTl9BU1NFVF9JRAUDbmlsAWkBDXJlcXVlc3RQYXlvdXQCB2NyYXNoSWQGYW1vdW50BAZzZW5kZXIJAKUIAQgFAWkGY2FsbGVyBAR0eElkCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQEBnN0YXR1cwQHJG1hdGNoMAkAoggBCQCsAgIFB2NyYXNoSWQCB19zdGF0dXMDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzAg5ubyBEYXRhIGV4aXN0cwMJAAACBQZzdGF0dXMCDm5vIERhdGEgZXhpc3RzCQACAQIhVGhlcmUgaXMgbm8gc3RhdHVzIGZvciB0aGlzIGNhc2UhAwkBAiE9AgUGc3RhdHVzAglldmFsdWF0ZWQJAAIBAjZPbmx5IGNhc2VzIHdpdGggZXZhbHVhdGVkIHN0YXR1cyBjYW4gcmVxdWVzdCBhIHBheW91dCEEEGVsaWdpYmxlX2FkZHJlc3MEByRtYXRjaDAJAKIIAQkArAICBQdjcmFzaElkAhFfaW5ub2NlbnRfYWRkcmVzcwMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAFAXMCDm5vIERhdGEgZXhpc3RzAwkAAAIFBnN0YXR1cwIObm8gRGF0YSBleGlzdHMJAAIBAipUaGVyZSBpcyBubyBlbGlnaWJsZSBwZXJzb24gZm9yIHRoaXMgY2FzZSEDCQECIT0CBRBlbGlnaWJsZV9hZGRyZXNzBQZzZW5kZXIJAAIBAihZb3UgYXJlIG5vdCBhbGxvd2VkIHRvIHJlcXVlc3QgYSBwYXlvdXQhCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQdjcmFzaElkAgFfBQZzZW5kZXICBV9jb3N0BQZhbW91bnQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQdjcmFzaElkAgdfc3RhdHVzAgZjbG9zZWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBCQDZBAEFBnNlbmRlcgUGYW1vdW50BRJVU0RfVE9LRU5fQVNTRVRfSUQFA25pbAECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXl4a+oY", "height": 2876177, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 2mQu1Zd2j7zagJ7sL7S2gLTmTpoTfXAQvGWiFMtfg9h2 Next: none Diff:
OldNewDifferences
99
1010 let d = base58'AxGKQRxKo4F2EbhrRq6N2tdLsxtMnpzQsS4QemV6V1W1'
1111
12-func e (f) = {
13- let g = drop(f, 1)
14- let h = dropRight(g, 1)
15- h
12+let e = base58'HUafUdHNmuLduuDkXiR7n6WA3LYf8rY2ySFbjkPWENV9'
13+
14+func f (g) = {
15+ let h = drop(g, 1)
16+ let i = dropRight(h, 1)
17+ i
1618 }
1719
1820
19-func i (j) = {
20- let k = drop(j, 1)
21- let l = dropRight(k, 1)
22- let m = split(l, ",")
23- let n = split(m[0], ":")
24- let o = e(n[0])
25- let p = e(n[1])
26- let q = split(m[1], ":")
27- let r = e(q[0])
28- let s = e(q[1])
29- let t = split(m[2], ":")
30- let u = e(t[0])
31- let v = e(t[1])
32- $Tuple3([o, p], [r, s], [u, v])
21+func j (k) = {
22+ let l = drop(k, 1)
23+ let m = dropRight(l, 1)
24+ let n = split(m, ",")
25+ let o = split(n[0], ":")
26+ let p = f(o[0])
27+ let q = f(o[1])
28+ let r = split(n[1], ":")
29+ let s = f(r[0])
30+ let t = f(r[1])
31+ let u = split(n[2], ":")
32+ let v = f(u[0])
33+ let w = f(u[1])
34+ $Tuple3([p, q], [s, t], [v, w])
3335 }
3436
3537
36-@Callable(w)
37-func registerData (x,y,z,A,B) = {
38- let C = {
39- let D = getString(z)
40- if ($isInstanceOf(D, "String"))
38+@Callable(x)
39+func registerData (y,z,A,B,C) = {
40+ let D = {
41+ let E = getString(A)
42+ if ($isInstanceOf(E, "String"))
4143 then {
42- let E = D
43- E
44+ let F = E
45+ F
4446 }
4547 else "no Data exists"
4648 }
47- if ((C != "no Data exists"))
49+ if ((D != "no Data exists"))
4850 then throw("There is already existing Data for this case!")
4951 else {
50- let F = [z, b, "evaluatedDataCallback"]
51- let G = toString(w.caller)
52- let H = toBase58String(w.transactionId)
53- if ((G == A))
52+ let G = [A, b, "evaluatedDataCallback"]
53+ let H = toString(x.caller)
54+ let I = toBase58String(x.transactionId)
55+ if ((H == B))
5456 then throw("Forbidden: Sender address equals opponents address!")
5557 else {
56- let I = invoke(Address(fromBase58String(a)), "registerTaskCallback", F, [AttachedPayment(d, c)])
57- if ((I != I))
58+ let J = invoke(Address(fromBase58String(a)), "registerTaskCallback", G, [AttachedPayment(d, c)])
59+ if ((J != J))
5860 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)]
61+ else [StringEntry(A, I), IntegerEntry((((A + "_") + H) + "_age"), y[0]), IntegerEntry((((A + "_") + H) + "_sex"), y[1]), IntegerEntry((((A + "_") + H) + "_damage"), y[2]), IntegerEntry((((A + "_") + H) + "_fac1"), y[3]), IntegerEntry((((A + "_") + H) + "_fac2"), y[4]), IntegerEntry((((A + "_") + H) + "_fac3"), y[5]), IntegerEntry((((A + "_") + H) + "_fac4"), y[6]), IntegerEntry((((A + "_") + H) + "_vio1"), y[7]), IntegerEntry((((A + "_") + H) + "_vio2"), y[8]), IntegerEntry((((A + "_") + H) + "_vio3"), y[9]), IntegerEntry((((A + "_") + H) + "_vio4"), y[10]), IntegerEntry((((A + "_") + H) + "_cost"), y[11]), IntegerEntry((((A + "_") + B) + "_age"), z[0]), IntegerEntry((((A + "_") + B) + "_sex"), z[1]), IntegerEntry((((A + "_") + B) + "_damage"), z[2]), IntegerEntry((((A + "_") + B) + "_fac1"), z[3]), IntegerEntry((((A + "_") + B) + "_fac2"), z[4]), IntegerEntry((((A + "_") + B) + "_fac3"), z[5]), IntegerEntry((((A + "_") + B) + "_fac4"), z[6]), IntegerEntry((((A + "_") + B) + "_vio1"), z[7]), IntegerEntry((((A + "_") + B) + "_vio2"), z[8]), IntegerEntry((((A + "_") + B) + "_vio3"), z[9]), IntegerEntry((((A + "_") + B) + "_vio4"), z[10]), IntegerEntry((((A + "_") + B) + "_cost"), z[11]), IntegerEntry((A + "_lgt"), C), StringEntry((A + "_status"), "open"), StringEntry((A + "_sender"), H)]
6062 }
6163 }
6264 }
6365
6466
6567
66-@Callable(w)
67-func evaluatedDataCallback (J) = {
68- let H = toBase58String(w.transactionId)
69- let K = i(J)
70- let L = K._1[1]
71- let M = K._2[1]
72- let N = K._3[1]
73- let O = {
74- let D = getString(L)
75- if ($isInstanceOf(D, "String"))
68+@Callable(x)
69+func evaluatedDataCallback (K) = {
70+ let I = toBase58String(x.transactionId)
71+ let L = j(K)
72+ let M = L._1[1]
73+ let N = L._2[1]
74+ let O = L._3[1]
75+ let P = {
76+ let E = getString(M)
77+ if ($isInstanceOf(E, "String"))
7678 then {
77- let E = D
78- E
79+ let F = E
80+ F
7981 }
8082 else "no Data exists"
8183 }
82- if ((O == "no Data exists"))
84+ if ((P == "no Data exists"))
8385 then throw("There is no Data for this crashId!")
8486 else {
85- let P = {
86- let D = getString((L + "_status"))
87- if ($isInstanceOf(D, "String"))
87+ let Q = {
88+ let E = getString((M + "_status"))
89+ if ($isInstanceOf(E, "String"))
8890 then {
89- let E = D
90- E
91+ let F = E
92+ F
9193 }
9294 else "no Data exists"
9395 }
94- if ((P == "no Data exists"))
96+ if ((Q == "no Data exists"))
9597 then throw("There is no status for this case!")
96- else if ((P == "closed"))
98+ else if ((Q == "closed"))
9799 then throw("A case should not be payed out twice!")
98- else if ((P == "evaluated"))
100+ else if ((Q == "evaluated"))
99101 then throw("A case should not be evaluated twice!")
100102 else {
101- let Q = {
102- let D = getInteger((((L + "_") + M) + "_cost"))
103- if ($isInstanceOf(D, "Int"))
103+ let R = {
104+ let E = getInteger((((M + "_") + N) + "_cost"))
105+ if ($isInstanceOf(E, "Int"))
104106 then {
105- let E = D
106- E
107+ let F = E
108+ F
107109 }
108- else "No data Found"
110+ else -404
109111 }
110- if ((Q == "No data Found"))
112+ if ((R == -404))
111113 then throw("There is no cost data for this address!")
112- else if ((Q == -1))
113- then [StringEntry((L + "_eval"), H), StringEntry((L + "_innocent_address"), M), StringEntry((L + "_guilty_address"), N), StringEntry((L + "_status"), "evaluated")]
114- 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)]
114+ else if ((R == -1))
115+ then [StringEntry((M + "_eval"), I), StringEntry((M + "_innocent_address"), N), StringEntry((M + "_guilty_address"), O), StringEntry((M + "_status"), "evaluated")]
116+ else [StringEntry((M + "_eval"), I), StringEntry((M + "_innocent_address"), N), StringEntry((M + "_guilty_address"), O), StringEntry((M + "_status"), "closed"), ScriptTransfer(Address(fromBase58String(N)), R, e)]
115117 }
116118 }
117119 }
118120
119121
120122
121-@Callable(w)
122-func requestPayout (L,R) = {
123- let S = toString(w.caller)
124- let H = toBase58String(w.transactionId)
125- let P = {
126- let D = getString((L + "_status"))
127- if ($isInstanceOf(D, "String"))
123+@Callable(x)
124+func requestPayout (M,S) = {
125+ let T = toString(x.caller)
126+ let I = toBase58String(x.transactionId)
127+ let Q = {
128+ let E = getString((M + "_status"))
129+ if ($isInstanceOf(E, "String"))
128130 then {
129- let E = D
130- E
131+ let F = E
132+ F
131133 }
132134 else "no Data exists"
133135 }
134- if ((P == "no Data exists"))
136+ if ((Q == "no Data exists"))
135137 then throw("There is no status for this case!")
136- else if ((P != "evaluated"))
138+ else if ((Q != "evaluated"))
137139 then throw("Only cases with evaluated status can request a payout!")
138140 else {
139- let T = {
140- let D = getString((L + "_innocent_address"))
141- if ($isInstanceOf(D, "String"))
141+ let U = {
142+ let E = getString((M + "_innocent_address"))
143+ if ($isInstanceOf(E, "String"))
142144 then {
143- let E = D
144- E
145+ let F = E
146+ F
145147 }
146148 else "no Data exists"
147149 }
148- if ((P == "no Data exists"))
150+ if ((Q == "no Data exists"))
149151 then throw("There is no eligible person for this case!")
150- else if ((T != S))
152+ else if ((U != T))
151153 then throw("You are not allowed to request a payout!")
152- else [IntegerEntry((((L + "_") + S) + "_cost"), R), StringEntry((L + "_status"), "closed"), ScriptTransfer(Address(fromBase58String(S)), 100000000, unit)]
154+ else [IntegerEntry((((M + "_") + T) + "_cost"), S), StringEntry((M + "_status"), "closed"), ScriptTransfer(Address(fromBase58String(T)), S, e)]
153155 }
154156 }
155157
156158
157-@Verifier(U)
158-func V () = sigVerify(U.bodyBytes, U.proofs[0], U.senderPublicKey)
159+@Verifier(V)
160+func W () = sigVerify(V.bodyBytes, V.proofs[0], V.senderPublicKey)
159161
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
12-func e (f) = {
13- let g = drop(f, 1)
14- let h = dropRight(g, 1)
15- h
12+let e = base58'HUafUdHNmuLduuDkXiR7n6WA3LYf8rY2ySFbjkPWENV9'
13+
14+func f (g) = {
15+ let h = drop(g, 1)
16+ let i = dropRight(h, 1)
17+ i
1618 }
1719
1820
19-func i (j) = {
20- let k = drop(j, 1)
21- let l = dropRight(k, 1)
22- let m = split(l, ",")
23- let n = split(m[0], ":")
24- let o = e(n[0])
25- let p = e(n[1])
26- let q = split(m[1], ":")
27- let r = e(q[0])
28- let s = e(q[1])
29- let t = split(m[2], ":")
30- let u = e(t[0])
31- let v = e(t[1])
32- $Tuple3([o, p], [r, s], [u, v])
21+func j (k) = {
22+ let l = drop(k, 1)
23+ let m = dropRight(l, 1)
24+ let n = split(m, ",")
25+ let o = split(n[0], ":")
26+ let p = f(o[0])
27+ let q = f(o[1])
28+ let r = split(n[1], ":")
29+ let s = f(r[0])
30+ let t = f(r[1])
31+ let u = split(n[2], ":")
32+ let v = f(u[0])
33+ let w = f(u[1])
34+ $Tuple3([p, q], [s, t], [v, w])
3335 }
3436
3537
36-@Callable(w)
37-func registerData (x,y,z,A,B) = {
38- let C = {
39- let D = getString(z)
40- if ($isInstanceOf(D, "String"))
38+@Callable(x)
39+func registerData (y,z,A,B,C) = {
40+ let D = {
41+ let E = getString(A)
42+ if ($isInstanceOf(E, "String"))
4143 then {
42- let E = D
43- E
44+ let F = E
45+ F
4446 }
4547 else "no Data exists"
4648 }
47- if ((C != "no Data exists"))
49+ if ((D != "no Data exists"))
4850 then throw("There is already existing Data for this case!")
4951 else {
50- let F = [z, b, "evaluatedDataCallback"]
51- let G = toString(w.caller)
52- let H = toBase58String(w.transactionId)
53- if ((G == A))
52+ let G = [A, b, "evaluatedDataCallback"]
53+ let H = toString(x.caller)
54+ let I = toBase58String(x.transactionId)
55+ if ((H == B))
5456 then throw("Forbidden: Sender address equals opponents address!")
5557 else {
56- let I = invoke(Address(fromBase58String(a)), "registerTaskCallback", F, [AttachedPayment(d, c)])
57- if ((I != I))
58+ let J = invoke(Address(fromBase58String(a)), "registerTaskCallback", G, [AttachedPayment(d, c)])
59+ if ((J != J))
5860 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)]
61+ else [StringEntry(A, I), IntegerEntry((((A + "_") + H) + "_age"), y[0]), IntegerEntry((((A + "_") + H) + "_sex"), y[1]), IntegerEntry((((A + "_") + H) + "_damage"), y[2]), IntegerEntry((((A + "_") + H) + "_fac1"), y[3]), IntegerEntry((((A + "_") + H) + "_fac2"), y[4]), IntegerEntry((((A + "_") + H) + "_fac3"), y[5]), IntegerEntry((((A + "_") + H) + "_fac4"), y[6]), IntegerEntry((((A + "_") + H) + "_vio1"), y[7]), IntegerEntry((((A + "_") + H) + "_vio2"), y[8]), IntegerEntry((((A + "_") + H) + "_vio3"), y[9]), IntegerEntry((((A + "_") + H) + "_vio4"), y[10]), IntegerEntry((((A + "_") + H) + "_cost"), y[11]), IntegerEntry((((A + "_") + B) + "_age"), z[0]), IntegerEntry((((A + "_") + B) + "_sex"), z[1]), IntegerEntry((((A + "_") + B) + "_damage"), z[2]), IntegerEntry((((A + "_") + B) + "_fac1"), z[3]), IntegerEntry((((A + "_") + B) + "_fac2"), z[4]), IntegerEntry((((A + "_") + B) + "_fac3"), z[5]), IntegerEntry((((A + "_") + B) + "_fac4"), z[6]), IntegerEntry((((A + "_") + B) + "_vio1"), z[7]), IntegerEntry((((A + "_") + B) + "_vio2"), z[8]), IntegerEntry((((A + "_") + B) + "_vio3"), z[9]), IntegerEntry((((A + "_") + B) + "_vio4"), z[10]), IntegerEntry((((A + "_") + B) + "_cost"), z[11]), IntegerEntry((A + "_lgt"), C), StringEntry((A + "_status"), "open"), StringEntry((A + "_sender"), H)]
6062 }
6163 }
6264 }
6365
6466
6567
66-@Callable(w)
67-func evaluatedDataCallback (J) = {
68- let H = toBase58String(w.transactionId)
69- let K = i(J)
70- let L = K._1[1]
71- let M = K._2[1]
72- let N = K._3[1]
73- let O = {
74- let D = getString(L)
75- if ($isInstanceOf(D, "String"))
68+@Callable(x)
69+func evaluatedDataCallback (K) = {
70+ let I = toBase58String(x.transactionId)
71+ let L = j(K)
72+ let M = L._1[1]
73+ let N = L._2[1]
74+ let O = L._3[1]
75+ let P = {
76+ let E = getString(M)
77+ if ($isInstanceOf(E, "String"))
7678 then {
77- let E = D
78- E
79+ let F = E
80+ F
7981 }
8082 else "no Data exists"
8183 }
82- if ((O == "no Data exists"))
84+ if ((P == "no Data exists"))
8385 then throw("There is no Data for this crashId!")
8486 else {
85- let P = {
86- let D = getString((L + "_status"))
87- if ($isInstanceOf(D, "String"))
87+ let Q = {
88+ let E = getString((M + "_status"))
89+ if ($isInstanceOf(E, "String"))
8890 then {
89- let E = D
90- E
91+ let F = E
92+ F
9193 }
9294 else "no Data exists"
9395 }
94- if ((P == "no Data exists"))
96+ if ((Q == "no Data exists"))
9597 then throw("There is no status for this case!")
96- else if ((P == "closed"))
98+ else if ((Q == "closed"))
9799 then throw("A case should not be payed out twice!")
98- else if ((P == "evaluated"))
100+ else if ((Q == "evaluated"))
99101 then throw("A case should not be evaluated twice!")
100102 else {
101- let Q = {
102- let D = getInteger((((L + "_") + M) + "_cost"))
103- if ($isInstanceOf(D, "Int"))
103+ let R = {
104+ let E = getInteger((((M + "_") + N) + "_cost"))
105+ if ($isInstanceOf(E, "Int"))
104106 then {
105- let E = D
106- E
107+ let F = E
108+ F
107109 }
108- else "No data Found"
110+ else -404
109111 }
110- if ((Q == "No data Found"))
112+ if ((R == -404))
111113 then throw("There is no cost data for this address!")
112- else if ((Q == -1))
113- then [StringEntry((L + "_eval"), H), StringEntry((L + "_innocent_address"), M), StringEntry((L + "_guilty_address"), N), StringEntry((L + "_status"), "evaluated")]
114- 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)]
114+ else if ((R == -1))
115+ then [StringEntry((M + "_eval"), I), StringEntry((M + "_innocent_address"), N), StringEntry((M + "_guilty_address"), O), StringEntry((M + "_status"), "evaluated")]
116+ else [StringEntry((M + "_eval"), I), StringEntry((M + "_innocent_address"), N), StringEntry((M + "_guilty_address"), O), StringEntry((M + "_status"), "closed"), ScriptTransfer(Address(fromBase58String(N)), R, e)]
115117 }
116118 }
117119 }
118120
119121
120122
121-@Callable(w)
122-func requestPayout (L,R) = {
123- let S = toString(w.caller)
124- let H = toBase58String(w.transactionId)
125- let P = {
126- let D = getString((L + "_status"))
127- if ($isInstanceOf(D, "String"))
123+@Callable(x)
124+func requestPayout (M,S) = {
125+ let T = toString(x.caller)
126+ let I = toBase58String(x.transactionId)
127+ let Q = {
128+ let E = getString((M + "_status"))
129+ if ($isInstanceOf(E, "String"))
128130 then {
129- let E = D
130- E
131+ let F = E
132+ F
131133 }
132134 else "no Data exists"
133135 }
134- if ((P == "no Data exists"))
136+ if ((Q == "no Data exists"))
135137 then throw("There is no status for this case!")
136- else if ((P != "evaluated"))
138+ else if ((Q != "evaluated"))
137139 then throw("Only cases with evaluated status can request a payout!")
138140 else {
139- let T = {
140- let D = getString((L + "_innocent_address"))
141- if ($isInstanceOf(D, "String"))
141+ let U = {
142+ let E = getString((M + "_innocent_address"))
143+ if ($isInstanceOf(E, "String"))
142144 then {
143- let E = D
144- E
145+ let F = E
146+ F
145147 }
146148 else "no Data exists"
147149 }
148- if ((P == "no Data exists"))
150+ if ((Q == "no Data exists"))
149151 then throw("There is no eligible person for this case!")
150- else if ((T != S))
152+ else if ((U != T))
151153 then throw("You are not allowed to request a payout!")
152- else [IntegerEntry((((L + "_") + S) + "_cost"), R), StringEntry((L + "_status"), "closed"), ScriptTransfer(Address(fromBase58String(S)), 100000000, unit)]
154+ else [IntegerEntry((((M + "_") + T) + "_cost"), S), StringEntry((M + "_status"), "closed"), ScriptTransfer(Address(fromBase58String(T)), S, e)]
153155 }
154156 }
155157
156158
157-@Verifier(U)
158-func V () = sigVerify(U.bodyBytes, U.proofs[0], U.senderPublicKey)
159+@Verifier(V)
160+func W () = sigVerify(V.bodyBytes, V.proofs[0], V.senderPublicKey)
159161

github/deemru/w8io/873ac7e 
183.69 ms