tx · FrzYyNDfE7qTFC7Kv3qv9McMVJNjoS7cs7U7CnhjCAf1

3NAoJSThEgz12iLrRFSeMZpP1mEYc4QcGa3:  -0.01000000 Waves

2023.11.26 18:04 [2860523] smart account 3NAoJSThEgz12iLrRFSeMZpP1mEYc4QcGa3 > SELF 0.00000000 Waves

{ "type": 13, "id": "FrzYyNDfE7qTFC7Kv3qv9McMVJNjoS7cs7U7CnhjCAf1", "fee": 1000000, "feeAssetId": null, "timestamp": 1701011093672, "version": 2, "chainId": 84, "sender": "3NAoJSThEgz12iLrRFSeMZpP1mEYc4QcGa3", "senderPublicKey": "5TXMdPyvDNfxhdixe86fk7Ya8FScpZGfZ6XNawu8sYK4", "proofs": [ "3kzSgjAQUC6RqMbQbUFgxLgx1toPz3zP2z85hvBfFw8jAWto3uWiTXU2PRwmFrWDh1b7MdfeD5KZnjzHnuF2aor3" ], "script": "base64:BgIfCAISBwoFEREICAESAwoBCBIGCgQICAgIEgUKAwgBCAQAC0JBSV9BRERSRVNTAiMzTjl0S2l4enFUWVduRVhReHJEUTVwQlRHdlFkNnNGc3ZtVgARQUlfVE9LRU5fQVNTRVRfSUQBIJPhcjhxBJtq6JpjHwQkt2RTlyw+vGYLg3SvaLskjeJCAQtyZW1vdmVNYXJrcwELbWFya3NTdHJpbmcEAWEJALACAgULbWFya3NTdHJpbmcAAQQBYgkAswICBQFhAAEFAWIBCXBhcnNlSnNvbgEEanNvbgQMbW9kaWZpZWRKc29uCQCwAgIFBGpzb24AAQQNbW9kaWZpZWRKc29uMgkAswICBQxtb2RpZmllZEpzb24AAQQGc3BsaXQxCQC1CQIFDW1vZGlmaWVkSnNvbjICASwECWtleVZhbHVlMQkAtQkCCQCRAwIFBnNwbGl0MQAAAgE6BARrZXkxCQELcmVtb3ZlTWFya3MBCQCRAwIFCWtleVZhbHVlMQAABAZ2YWx1ZTEJAQtyZW1vdmVNYXJrcwEJAJEDAgUJa2V5VmFsdWUxAAEECWtleVZhbHVlMgkAtQkCCQCRAwIFBnNwbGl0MQABAgE6BARrZXkyCQELcmVtb3ZlTWFya3MBCQCRAwIFCWtleVZhbHVlMgAABAZ2YWx1ZTIJAQtyZW1vdmVNYXJrcwEJAJEDAgUJa2V5VmFsdWUyAAEECWtleVZhbHVlMwkAtQkCCQCRAwIFBnNwbGl0MQACAgE6BARrZXkzCQELcmVtb3ZlTWFya3MBCQCRAwIFCWtleVZhbHVlMgAABAZ2YWx1ZTMJAQtyZW1vdmVNYXJrcwEJAJEDAgUJa2V5VmFsdWUyAAEJAJUKAwkAzAgCBQRrZXkxCQDMCAIFBnZhbHVlMQUDbmlsCQDMCAIFBGtleTIJAMwIAgUGdmFsdWUyBQNuaWwJAMwIAgUEa2V5MwkAzAgCBQZ2YWx1ZTMFA25pbAQBaQEMcmVnaXN0ZXJEYXRhBQtjbGllbnRJbnB1dA1vcHBvbmVudElucHV0AmlkCm9wcEFkZHJlc3MHbGd0Q29uZAQVc2VhcmNoRm9yRXhpc3RpbmdEYXRhBAckbWF0Y2gwCQCiCAEFAmlkAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAUBcwIObm8gRGF0YSBleGlzdHMDCQECIT0CBRVzZWFyY2hGb3JFeGlzdGluZ0RhdGECDm5vIERhdGEgZXhpc3RzCQACAQItVGhlcmUgaXMgYWxyZWFkeSBleGlzdGluZyBEYXRhIGZvciB0aGlzIGNhc2UhBAZjbGllbnQJAKUIAQgFAWkGY2FsbGVyBAR0eElkCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgUCaWQFBHR4SWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHR4SWQCAV8FBmNsaWVudAIEX2FnZQkAkQMCBQtjbGllbnRJbnB1dAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQR0eElkAgFfBQZjbGllbnQCBF9zZXgJAJEDAgULY2xpZW50SW5wdXQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEdHhJZAIBXwUGY2xpZW50AgdfZGFtYWdlCQCRAwIFC2NsaWVudElucHV0AAIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHR4SWQCAV8FBmNsaWVudAIFX2ZhYzEJAJEDAgULY2xpZW50SW5wdXQAAwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEdHhJZAIBXwUGY2xpZW50AgVfZmFjMgkAkQMCBQtjbGllbnRJbnB1dAAECQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQR0eElkAgFfBQZjbGllbnQCBV9mYWMzCQCRAwIFC2NsaWVudElucHV0AAUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHR4SWQCAV8FBmNsaWVudAIFX2ZhYzQJAJEDAgULY2xpZW50SW5wdXQABgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEdHhJZAIBXwUGY2xpZW50AgVfdmlvMQkAkQMCBQtjbGllbnRJbnB1dAAHCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQR0eElkAgFfBQZjbGllbnQCBV92aW8yCQCRAwIFC2NsaWVudElucHV0AAgJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHR4SWQCAV8FBmNsaWVudAIFX3ZpbzMJAJEDAgULY2xpZW50SW5wdXQACQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEdHhJZAIBXwUGY2xpZW50AgVfdmlvNAkAkQMCBQtjbGllbnRJbnB1dAAKCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQR0eElkAgFfBQZjbGllbnQCBV9jb3N0CQCRAwIFC2NsaWVudElucHV0AAsJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHR4SWQCAV8FCm9wcEFkZHJlc3MCBF9hZ2UJAJEDAgUNb3Bwb25lbnRJbnB1dAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQR0eElkAgFfBQpvcHBBZGRyZXNzAgRfc2V4CQCRAwIFDW9wcG9uZW50SW5wdXQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEdHhJZAIBXwUKb3BwQWRkcmVzcwIHX2RhbWFnZQkAkQMCBQ1vcHBvbmVudElucHV0AAIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHR4SWQCAV8FCm9wcEFkZHJlc3MCBV9mYWMxCQCRAwIFDW9wcG9uZW50SW5wdXQAAwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEdHhJZAIBXwUKb3BwQWRkcmVzcwIFX2ZhYzIJAJEDAgUNb3Bwb25lbnRJbnB1dAAECQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQR0eElkAgFfBQpvcHBBZGRyZXNzAgVfZmFjMwkAkQMCBQ1vcHBvbmVudElucHV0AAUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHR4SWQCAV8FCm9wcEFkZHJlc3MCBV9mYWM0CQCRAwIFDW9wcG9uZW50SW5wdXQABgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEdHhJZAIBXwUKb3BwQWRkcmVzcwIFX3ZpbzEJAJEDAgUNb3Bwb25lbnRJbnB1dAAHCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQR0eElkAgFfBQpvcHBBZGRyZXNzAgVfdmlvMgkAkQMCBQ1vcHBvbmVudElucHV0AAgJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHR4SWQCAV8FCm9wcEFkZHJlc3MCBV92aW8zCQCRAwIFDW9wcG9uZW50SW5wdXQACQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEdHhJZAIBXwUKb3BwQWRkcmVzcwIFX3ZpbzQJAJEDAgUNb3Bwb25lbnRJbnB1dAAKCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQR0eElkAgFfBQpvcHBBZGRyZXNzAgVfY29zdAkAkQMCBQ1vcHBvbmVudElucHV0AAsJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUCaWQCBF9sZ3QFB2xndENvbmQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQJpZAIHX3N0YXR1cwIEb3BlbgUDbmlsAWkBFWV2YWx1YXRlZERhdGFDYWxsYmFjawEIcmVzcG9uc2UEBHR4SWQJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAQKcGFyc2VkSnNvbgkBCXBhcnNlSnNvbgEFCHJlc3BvbnNlBAdjcmFzaElkCQCRAwIIBQpwYXJzZWRKc29uAl8xAAEED2lubm9jZW50QWRkcmVzcwkAkQMCCAUKcGFyc2VkSnNvbgJfMgABBA1ndWlsdHlBZGRyZXNzCQCRAwIIBQpwYXJzZWRKc29uAl8zAAEEDFJlZ2lzdGVyVHhJZAQHJG1hdGNoMAkAoggBBQdjcmFzaElkAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAUBcwIObm8gRGF0YSBleGlzdHMDCQAAAgUMUmVnaXN0ZXJUeElkAg5ubyBEYXRhIGV4aXN0cwkAAgECIlRoZXJlIGlzIG5vIERhdGEgZm9yIHRoaXMgY3Jhc2hJZCEEHmNvc3RFc3RpbWF0aW9uT2ZJbm5vY2VudFBlcnNvbgQHJG1hdGNoMAkAnwgBCQCsAgIJAKwCAgkArAICBQxSZWdpc3RlclR4SWQCAV8FD2lubm9jZW50QWRkcmVzcwIFX2Nvc3QDCQABAgUHJG1hdGNoMAIDSW50BAFzBQckbWF0Y2gwBQFzAg1ObyBkYXRhIEZvdW5kAwkAAAIFHmNvc3RFc3RpbWF0aW9uT2ZJbm5vY2VudFBlcnNvbgINTm8gZGF0YSBGb3VuZAkAAgECIlRoZXJlIGlzIG5vIGRhdGEgZm9yIHRoaXMgYWRkcmVzcyEDCQAAAgUeY29zdEVzdGltYXRpb25PZklubm9jZW50UGVyc29uAP///////////wEJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQdjcmFzaElkAgVfZXZhbAUEdHhJZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFB2NyYXNoSWQCEV9pbm5vY2VudF9hZGRyZXNzBQ9pbm5vY2VudEFkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQdjcmFzaElkAg9fZ3VpbHR5X2FkZHJlc3MFDWd1aWx0eUFkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQdjcmFzaElkAgdfc3RhdHVzAglldmFsdWF0ZWQFA25pbAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFB2NyYXNoSWQCBV9ldmFsBQR0eElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUHY3Jhc2hJZAIRX2lubm9jZW50X2FkZHJlc3MFD2lubm9jZW50QWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFB2NyYXNoSWQCD19ndWlsdHlfYWRkcmVzcwUNZ3VpbHR5QWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFB2NyYXNoSWQCB19zdGF0dXMCBmNsb3NlZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEHQWRkcmVzcwEJANkEAQUPaW5ub2NlbnRBZGRyZXNzAIDC1y8FBHVuaXQFA25pbAFpAQ1ldmFsdWF0ZWREYXRhBA1wcmVkaWN0aW9uX2lkD3Blcl9vbmVfYWRkcmVzcw9wZXJfdHdvX2FkZHJlc3MVZ3VpbHR5X3BlcnNvbl9hZGRyZXNzBAR0eElkCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgUNcHJlZGljdGlvbl9pZAUEdHhJZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBHR4SWQCB19ndWlsdHkFFWd1aWx0eV9wZXJzb25fYWRkcmVzcwUDbmlsAWkBDXJlcXVlc3RQYXlvdXQDCXByZWRfdHhJZAZhbW91bnQCaWQEBmNsaWVudAkApQgBCAUBaQZjYWxsZXIEBHR4SWQJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFAmlkAg9fcmVxdWVzdF9wYXlvdXQFBHR4SWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEdHhJZAIHX2Ftb3VudAUGYW1vdW50CQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUEdHhJZAIOX3ByZWRpY3Rpb25faWQFCXByZWRfdHhJZAUDbmlsAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleVnde6c=", "height": 2860523, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: CaKWhUsAsyTQLa8YrkUgsChEhwu7ScwE8rxY3xj1ttaN Next: BkVWUdsQ7JYxnNSBQC4rv1kZgMWPBgGeXmi2d41GYYvo Diff:
OldNewDifferences
44 let BAI_ADDRESS = "3N9tKixzqTYWnEXQxrDQ5pBTGvQd6sFsvmV"
55
66 let AI_TOKEN_ASSET_ID = base58'AxGKQRxKo4F2EbhrRq6N2tdLsxtMnpzQsS4QemV6V1W1'
7+
8+func removeMarks (marksString) = {
9+ let a = drop(marksString, 1)
10+ let b = dropRight(a, 1)
11+ b
12+ }
13+
14+
15+func parseJson (json) = {
16+ let modifiedJson = drop(json, 1)
17+ let modifiedJson2 = dropRight(modifiedJson, 1)
18+ let split1 = split(modifiedJson2, ",")
19+ let keyValue1 = split(split1[0], ":")
20+ let key1 = removeMarks(keyValue1[0])
21+ let value1 = removeMarks(keyValue1[1])
22+ let keyValue2 = split(split1[1], ":")
23+ let key2 = removeMarks(keyValue2[0])
24+ let value2 = removeMarks(keyValue2[1])
25+ let keyValue3 = split(split1[2], ":")
26+ let key3 = removeMarks(keyValue2[0])
27+ let value3 = removeMarks(keyValue2[1])
28+ $Tuple3([key1, value1], [key2, value2], [key3, value3])
29+ }
30+
731
832 @Callable(i)
933 func registerData (clientInput,opponentInput,id,oppAddress,lgtCond) = {
1842 else {
1943 let client = toString(i.caller)
2044 let txId = toBase58String(i.transactionId)
21-[StringEntry(id, txId), IntegerEntry((((txId + "_") + client) + "_age"), clientInput[0]), IntegerEntry((((txId + "_") + client) + "_sex"), clientInput[1]), IntegerEntry((((txId + "_") + client) + "_damage"), clientInput[2]), IntegerEntry((((txId + "_") + client) + "_fac1"), clientInput[3]), IntegerEntry((((txId + "_") + client) + "_fac2"), clientInput[4]), IntegerEntry((((txId + "_") + client) + "_fac3"), clientInput[5]), IntegerEntry((((txId + "_") + client) + "_fac4"), clientInput[6]), IntegerEntry((((txId + "_") + client) + "_vio1"), clientInput[7]), IntegerEntry((((txId + "_") + client) + "_vio2"), clientInput[8]), IntegerEntry((((txId + "_") + client) + "_vio3"), clientInput[9]), IntegerEntry((((txId + "_") + client) + "_vio4"), clientInput[10]), IntegerEntry((((txId + "_") + client) + "_cost"), clientInput[11]), IntegerEntry((((txId + "_") + oppAddress) + "_age"), opponentInput[0]), IntegerEntry((((txId + "_") + oppAddress) + "_sex"), opponentInput[1]), IntegerEntry((((txId + "_") + oppAddress) + "_damage"), opponentInput[2]), IntegerEntry((((txId + "_") + oppAddress) + "_fac1"), opponentInput[3]), IntegerEntry((((txId + "_") + oppAddress) + "_fac2"), opponentInput[4]), IntegerEntry((((txId + "_") + oppAddress) + "_fac3"), opponentInput[5]), IntegerEntry((((txId + "_") + oppAddress) + "_fac4"), opponentInput[6]), IntegerEntry((((txId + "_") + oppAddress) + "_vio1"), opponentInput[7]), IntegerEntry((((txId + "_") + oppAddress) + "_vio2"), opponentInput[8]), IntegerEntry((((txId + "_") + oppAddress) + "_vio3"), opponentInput[9]), IntegerEntry((((txId + "_") + oppAddress) + "_vio4"), opponentInput[10]), IntegerEntry((((txId + "_") + oppAddress) + "_cost"), opponentInput[11]), IntegerEntry((txId + "_lgt"), lgtCond)]
45+[StringEntry(id, txId), IntegerEntry((((txId + "_") + client) + "_age"), clientInput[0]), IntegerEntry((((txId + "_") + client) + "_sex"), clientInput[1]), IntegerEntry((((txId + "_") + client) + "_damage"), clientInput[2]), IntegerEntry((((txId + "_") + client) + "_fac1"), clientInput[3]), IntegerEntry((((txId + "_") + client) + "_fac2"), clientInput[4]), IntegerEntry((((txId + "_") + client) + "_fac3"), clientInput[5]), IntegerEntry((((txId + "_") + client) + "_fac4"), clientInput[6]), IntegerEntry((((txId + "_") + client) + "_vio1"), clientInput[7]), IntegerEntry((((txId + "_") + client) + "_vio2"), clientInput[8]), IntegerEntry((((txId + "_") + client) + "_vio3"), clientInput[9]), IntegerEntry((((txId + "_") + client) + "_vio4"), clientInput[10]), IntegerEntry((((txId + "_") + client) + "_cost"), clientInput[11]), IntegerEntry((((txId + "_") + oppAddress) + "_age"), opponentInput[0]), IntegerEntry((((txId + "_") + oppAddress) + "_sex"), opponentInput[1]), IntegerEntry((((txId + "_") + oppAddress) + "_damage"), opponentInput[2]), IntegerEntry((((txId + "_") + oppAddress) + "_fac1"), opponentInput[3]), IntegerEntry((((txId + "_") + oppAddress) + "_fac2"), opponentInput[4]), IntegerEntry((((txId + "_") + oppAddress) + "_fac3"), opponentInput[5]), IntegerEntry((((txId + "_") + oppAddress) + "_fac4"), opponentInput[6]), IntegerEntry((((txId + "_") + oppAddress) + "_vio1"), opponentInput[7]), IntegerEntry((((txId + "_") + oppAddress) + "_vio2"), opponentInput[8]), IntegerEntry((((txId + "_") + oppAddress) + "_vio3"), opponentInput[9]), IntegerEntry((((txId + "_") + oppAddress) + "_vio4"), opponentInput[10]), IntegerEntry((((txId + "_") + oppAddress) + "_cost"), opponentInput[11]), IntegerEntry((id + "_lgt"), lgtCond), StringEntry((id + "_status"), "open")]
46+ }
47+ }
48+
49+
50+
51+@Callable(i)
52+func evaluatedDataCallback (response) = {
53+ let txId = toBase58String(i.transactionId)
54+ let parsedJson = parseJson(response)
55+ let crashId = parsedJson._1[1]
56+ let innocentAddress = parsedJson._2[1]
57+ let guiltyAddress = parsedJson._3[1]
58+ let RegisterTxId = match getString(crashId) {
59+ case s: String =>
60+ s
61+ case _ =>
62+ "no Data exists"
63+ }
64+ if ((RegisterTxId == "no Data exists"))
65+ then throw("There is no Data for this crashId!")
66+ else {
67+ let costEstimationOfInnocentPerson = match getInteger((((RegisterTxId + "_") + innocentAddress) + "_cost")) {
68+ case s: Int =>
69+ s
70+ case _ =>
71+ "No data Found"
72+ }
73+ if ((costEstimationOfInnocentPerson == "No data Found"))
74+ then throw("There is no data for this address!")
75+ else if ((costEstimationOfInnocentPerson == -1))
76+ then [StringEntry((crashId + "_eval"), txId), StringEntry((crashId + "_innocent_address"), innocentAddress), StringEntry((crashId + "_guilty_address"), guiltyAddress), StringEntry((crashId + "_status"), "evaluated")]
77+ else [StringEntry((crashId + "_eval"), txId), StringEntry((crashId + "_innocent_address"), innocentAddress), StringEntry((crashId + "_guilty_address"), guiltyAddress), StringEntry((crashId + "_status"), "closed"), ScriptTransfer(Address(fromBase58String(innocentAddress)), 100000000, unit)]
2278 }
2379 }
2480
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let BAI_ADDRESS = "3N9tKixzqTYWnEXQxrDQ5pBTGvQd6sFsvmV"
55
66 let AI_TOKEN_ASSET_ID = base58'AxGKQRxKo4F2EbhrRq6N2tdLsxtMnpzQsS4QemV6V1W1'
7+
8+func removeMarks (marksString) = {
9+ let a = drop(marksString, 1)
10+ let b = dropRight(a, 1)
11+ b
12+ }
13+
14+
15+func parseJson (json) = {
16+ let modifiedJson = drop(json, 1)
17+ let modifiedJson2 = dropRight(modifiedJson, 1)
18+ let split1 = split(modifiedJson2, ",")
19+ let keyValue1 = split(split1[0], ":")
20+ let key1 = removeMarks(keyValue1[0])
21+ let value1 = removeMarks(keyValue1[1])
22+ let keyValue2 = split(split1[1], ":")
23+ let key2 = removeMarks(keyValue2[0])
24+ let value2 = removeMarks(keyValue2[1])
25+ let keyValue3 = split(split1[2], ":")
26+ let key3 = removeMarks(keyValue2[0])
27+ let value3 = removeMarks(keyValue2[1])
28+ $Tuple3([key1, value1], [key2, value2], [key3, value3])
29+ }
30+
731
832 @Callable(i)
933 func registerData (clientInput,opponentInput,id,oppAddress,lgtCond) = {
1034 let searchForExistingData = match getString(id) {
1135 case s: String =>
1236 s
1337 case _ =>
1438 "no Data exists"
1539 }
1640 if ((searchForExistingData != "no Data exists"))
1741 then throw("There is already existing Data for this case!")
1842 else {
1943 let client = toString(i.caller)
2044 let txId = toBase58String(i.transactionId)
21-[StringEntry(id, txId), IntegerEntry((((txId + "_") + client) + "_age"), clientInput[0]), IntegerEntry((((txId + "_") + client) + "_sex"), clientInput[1]), IntegerEntry((((txId + "_") + client) + "_damage"), clientInput[2]), IntegerEntry((((txId + "_") + client) + "_fac1"), clientInput[3]), IntegerEntry((((txId + "_") + client) + "_fac2"), clientInput[4]), IntegerEntry((((txId + "_") + client) + "_fac3"), clientInput[5]), IntegerEntry((((txId + "_") + client) + "_fac4"), clientInput[6]), IntegerEntry((((txId + "_") + client) + "_vio1"), clientInput[7]), IntegerEntry((((txId + "_") + client) + "_vio2"), clientInput[8]), IntegerEntry((((txId + "_") + client) + "_vio3"), clientInput[9]), IntegerEntry((((txId + "_") + client) + "_vio4"), clientInput[10]), IntegerEntry((((txId + "_") + client) + "_cost"), clientInput[11]), IntegerEntry((((txId + "_") + oppAddress) + "_age"), opponentInput[0]), IntegerEntry((((txId + "_") + oppAddress) + "_sex"), opponentInput[1]), IntegerEntry((((txId + "_") + oppAddress) + "_damage"), opponentInput[2]), IntegerEntry((((txId + "_") + oppAddress) + "_fac1"), opponentInput[3]), IntegerEntry((((txId + "_") + oppAddress) + "_fac2"), opponentInput[4]), IntegerEntry((((txId + "_") + oppAddress) + "_fac3"), opponentInput[5]), IntegerEntry((((txId + "_") + oppAddress) + "_fac4"), opponentInput[6]), IntegerEntry((((txId + "_") + oppAddress) + "_vio1"), opponentInput[7]), IntegerEntry((((txId + "_") + oppAddress) + "_vio2"), opponentInput[8]), IntegerEntry((((txId + "_") + oppAddress) + "_vio3"), opponentInput[9]), IntegerEntry((((txId + "_") + oppAddress) + "_vio4"), opponentInput[10]), IntegerEntry((((txId + "_") + oppAddress) + "_cost"), opponentInput[11]), IntegerEntry((txId + "_lgt"), lgtCond)]
45+[StringEntry(id, txId), IntegerEntry((((txId + "_") + client) + "_age"), clientInput[0]), IntegerEntry((((txId + "_") + client) + "_sex"), clientInput[1]), IntegerEntry((((txId + "_") + client) + "_damage"), clientInput[2]), IntegerEntry((((txId + "_") + client) + "_fac1"), clientInput[3]), IntegerEntry((((txId + "_") + client) + "_fac2"), clientInput[4]), IntegerEntry((((txId + "_") + client) + "_fac3"), clientInput[5]), IntegerEntry((((txId + "_") + client) + "_fac4"), clientInput[6]), IntegerEntry((((txId + "_") + client) + "_vio1"), clientInput[7]), IntegerEntry((((txId + "_") + client) + "_vio2"), clientInput[8]), IntegerEntry((((txId + "_") + client) + "_vio3"), clientInput[9]), IntegerEntry((((txId + "_") + client) + "_vio4"), clientInput[10]), IntegerEntry((((txId + "_") + client) + "_cost"), clientInput[11]), IntegerEntry((((txId + "_") + oppAddress) + "_age"), opponentInput[0]), IntegerEntry((((txId + "_") + oppAddress) + "_sex"), opponentInput[1]), IntegerEntry((((txId + "_") + oppAddress) + "_damage"), opponentInput[2]), IntegerEntry((((txId + "_") + oppAddress) + "_fac1"), opponentInput[3]), IntegerEntry((((txId + "_") + oppAddress) + "_fac2"), opponentInput[4]), IntegerEntry((((txId + "_") + oppAddress) + "_fac3"), opponentInput[5]), IntegerEntry((((txId + "_") + oppAddress) + "_fac4"), opponentInput[6]), IntegerEntry((((txId + "_") + oppAddress) + "_vio1"), opponentInput[7]), IntegerEntry((((txId + "_") + oppAddress) + "_vio2"), opponentInput[8]), IntegerEntry((((txId + "_") + oppAddress) + "_vio3"), opponentInput[9]), IntegerEntry((((txId + "_") + oppAddress) + "_vio4"), opponentInput[10]), IntegerEntry((((txId + "_") + oppAddress) + "_cost"), opponentInput[11]), IntegerEntry((id + "_lgt"), lgtCond), StringEntry((id + "_status"), "open")]
46+ }
47+ }
48+
49+
50+
51+@Callable(i)
52+func evaluatedDataCallback (response) = {
53+ let txId = toBase58String(i.transactionId)
54+ let parsedJson = parseJson(response)
55+ let crashId = parsedJson._1[1]
56+ let innocentAddress = parsedJson._2[1]
57+ let guiltyAddress = parsedJson._3[1]
58+ let RegisterTxId = match getString(crashId) {
59+ case s: String =>
60+ s
61+ case _ =>
62+ "no Data exists"
63+ }
64+ if ((RegisterTxId == "no Data exists"))
65+ then throw("There is no Data for this crashId!")
66+ else {
67+ let costEstimationOfInnocentPerson = match getInteger((((RegisterTxId + "_") + innocentAddress) + "_cost")) {
68+ case s: Int =>
69+ s
70+ case _ =>
71+ "No data Found"
72+ }
73+ if ((costEstimationOfInnocentPerson == "No data Found"))
74+ then throw("There is no data for this address!")
75+ else if ((costEstimationOfInnocentPerson == -1))
76+ then [StringEntry((crashId + "_eval"), txId), StringEntry((crashId + "_innocent_address"), innocentAddress), StringEntry((crashId + "_guilty_address"), guiltyAddress), StringEntry((crashId + "_status"), "evaluated")]
77+ else [StringEntry((crashId + "_eval"), txId), StringEntry((crashId + "_innocent_address"), innocentAddress), StringEntry((crashId + "_guilty_address"), guiltyAddress), StringEntry((crashId + "_status"), "closed"), ScriptTransfer(Address(fromBase58String(innocentAddress)), 100000000, unit)]
2278 }
2379 }
2480
2581
2682
2783 @Callable(i)
2884 func evaluatedData (prediction_id,per_one_address,per_two_address,guilty_person_address) = {
2985 let txId = toBase58String(i.transactionId)
3086 [StringEntry(prediction_id, txId), StringEntry((txId + "_guilty"), guilty_person_address)]
3187 }
3288
3389
3490
3591 @Callable(i)
3692 func requestPayout (pred_txId,amount,id) = {
3793 let client = toString(i.caller)
3894 let txId = toBase58String(i.transactionId)
3995 [StringEntry((id + "_request_payout"), txId), IntegerEntry((txId + "_amount"), amount), StringEntry((txId + "_prediction_id"), pred_txId)]
4096 }
4197
4298
4399 @Verifier(tx)
44100 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
45101

github/deemru/w8io/026f985 
29.06 ms