w8 · tx · 8EZ···4ju

tx · 8EZWkwkYnkPHupby9TdbF1qkJotZxmbsx1JtRCkEQ4ju

3N4Z7j4oSNfJVUtP4kmMKbhZD5n4xPFpPAu:  -0.01400000 Waves

2019.02.02 00:40 [476469] smart account 3N4Z7j4oSNfJVUtP4kmMKbhZD5n4xPFpPAu > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "8EZWkwkYnkPHupby9TdbF1qkJotZxmbsx1JtRCkEQ4ju",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1549057228083,
    "version": 1,
    "sender": "3N4Z7j4oSNfJVUtP4kmMKbhZD5n4xPFpPAu",
    "senderPublicKey": "F3DbYSfYZz6arcD6Mst8HdWScxTeWvTvatC7jp4DGryX",
    "proofs": [
        "2sZTnohPLrsxeHLPegjxoYJY4uavg2cq2UhfFktb1h33dPD8gBh28sETesUubTRqCQJU8svPBGxCMKmmpcFUbnyC"
    ],
    "script": "base64:AQQAAAACbWUIBQAAAAJ0eAAAAAZzZW5kZXIEAAAABm9yYWNsZQkBAAAAB2V4dHJhY3QAAAABCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzTkN6YVlUTkRHdFI4emY5eWZjcWVQRmpDcUZ4OVM1emhzNAQAAAAJZGF0YVR4RmVlAAAAAAAAD0JABAAAAAckbWF0Y2gwBQAAAAJ0eAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAATVHJhbnNmZXJUcmFuc2FjdGlvbgQAAAAKd2l0aGRyYXdUeAUAAAAHJG1hdGNoMAQAAAAEdHhJZAkBAAAAB2V4dHJhY3QAAAABCQAEHQAAAAIFAAAAAm1lCQACWAAAAAEJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAQQAAAAHJG1hdGNoMQkAA+gAAAABCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAEDCQAAAQAAAAIFAAAAByRtYXRjaDECAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAACXBheW1lbnRUeAUAAAAHJG1hdGNoMQQAAAASaXNQYXltZW50VG9va1BsYWNlAwkAAAAAAAACBQAAAAR0eElkCQACWAAAAAEIBQAAAAJ0eAAAAAJpZAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAlwYXltZW50VHgAAAAPc2VuZGVyUHVibGljS2V5BwQAAAADYXR0CAUAAAAJcGF5bWVudFR4AAAACmF0dGFjaG1lbnQEAAAABHR5cGUJAQAAAA5kcm9wUmlnaHRCeXRlcwAAAAIJAQAAAA50YWtlUmlnaHRCeXRlcwAAAAIFAAAAA2F0dAAAAAAAAAAAAgAAAAAAAAAAAQQAAAADdmFsCQEAAAAOdGFrZVJpZ2h0Qnl0ZXMAAAACBQAAAANhdHQAAAAAAAAAAAEEAAAAA2tleQkBAAAADmRyb3BSaWdodEJ5dGVzAAAAAgUAAAADYXR0AAAAAAAAAAACBAAAAAp2YWxDb21wbGV4CQEAAAAHZXh0cmFjdAAAAAEJAAQcAAAAAgUAAAAGb3JhY2xlCQACWAAAAAEFAAAAA2tleQQAAAAFa29lZmYDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAAAAAAAAAAAAAHAAAAAAAAAAAjAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAQAAAAAAAAAABwAAAAAAAAAAAQMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAIAAAAAAAAAAAcAAAAAAAAAAAEDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAADAAAAAAAAAAAHAAAAAAAAAAABAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAABAAAAAAAAAAABwAAAAAAAAAAAgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAUAAAAAAAAAAAcAAAAAAAAAAAIAAAAAAAAAAAAEAAAACmlzQW1vdW50T2sJAAAAAAAAAggFAAAACndpdGhkcmF3VHgAAAAGYW1vdW50CQAAZQAAAAIJAABlAAAAAgkAAGgAAAACCAUAAAAJcGF5bWVudFR4AAAABmFtb3VudAUAAAAFa29lZmYFAAAACWRhdGFUeEZlZQgFAAAACndpdGhkcmF3VHgAAAADZmVlBAAAAAlpc0luV2F2ZXMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAUAAAAKd2l0aGRyYXdUeAAAAApmZWVBc3NldElkCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAUAAAAKd2l0aGRyYXdUeAAAAAdhc3NldElkBwMDBQAAABJpc1BheW1lbnRUb29rUGxhY2UFAAAACmlzQW1vdW50T2sHBQAAAAlpc0luV2F2ZXMHBwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAPRGF0YVRyYW5zYWN0aW9uBAAAAANkdHgFAAAAByRtYXRjaDAEAAAADnBheW1lbnRUeElkU3RyCQEAAAAHZXh0cmFjdAAAAAEICQABkQAAAAIIBQAAAANkdHgAAAAEZGF0YQAAAAAAAAAAAAAAAANrZXkEAAAAB2ZlZXNLZXkJAAEsAAAAAgUAAAAOcGF5bWVudFR4SWRTdHICAAAABV9mZWVzBAAAAAlwYXltZW50VHgJAAPoAAAAAQkAAlkAAAABBQAAAA5wYXltZW50VHhJZFN0cgQAAAAHbmV3RmVlcwkBAAAAB2V4dHJhY3QAAAABCQAEEAAAAAIIBQAAAANkdHgAAAAEZGF0YQUAAAAHZmVlc0tleQQAAAAHb2xkRmVlcwMJAQAAAAlpc0RlZmluZWQAAAABCQAEGgAAAAIFAAAAAm1lBQAAAAdmZWVzS2V5CQEAAAAHZXh0cmFjdAAAAAEJAAQaAAAAAgUAAAACbWUFAAAAB2ZlZXNLZXkAAAAAAAAAAAAEAAAADGlzRmVlQ29ycmVjdAkAAAAAAAACBQAAAAduZXdGZWVzCQAAZAAAAAIFAAAAB29sZEZlZXMIBQAAAANkdHgAAAADZmVlBAAAABlpc1BheW1lbnRBbHJlYWR5TWVudGlvbmVkCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAJtZQUAAAAOcGF5bWVudFR4SWRTdHIEAAAAFXdpdGhkcmF3VHJhbnNhY3Rpb25JZAkAAlkAAAABCQEAAAAHZXh0cmFjdAAAAAEJAAQdAAAAAgUAAAACbWUFAAAADnBheW1lbnRUeElkU3RyBAAAAA9pc1dpdGhkcmF3RXhpc3QJAQAAAAlpc0RlZmluZWQAAAABCQAD6AAAAAEFAAAAFXdpdGhkcmF3VHJhbnNhY3Rpb25JZAQAAAAHJG1hdGNoMQUAAAAJcGF5bWVudFR4AwkAAAEAAAACBQAAAAckbWF0Y2gxAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAlwYXltZW50VHgFAAAAByRtYXRjaDEEAAAAEmlzRHR4U2lnbmVkQnlQYXllcgkAAfQAAAADCAUAAAADZHR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAADZHR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAACXBheW1lbnRUeAAAAA9zZW5kZXJQdWJsaWNLZXkDAwMDCQEAAAABIQAAAAEFAAAAGWlzUGF5bWVudEFscmVhZHlNZW50aW9uZWQGCQEAAAABIQAAAAEFAAAAD2lzV2l0aGRyYXdFeGlzdAUAAAASaXNEdHhTaWduZWRCeVBheWVyBwUAAAAMaXNGZWVDb3JyZWN0BwQAAAADYXR0CAUAAAAJcGF5bWVudFR4AAAACmF0dGFjaG1lbnQEAAAABHR5cGUJAQAAAA5kcm9wUmlnaHRCeXRlcwAAAAIJAQAAAA50YWtlUmlnaHRCeXRlcwAAAAIFAAAAA2F0dAAAAAAAAAAAAgAAAAAAAAAAAQQAAAADdmFsCQEAAAAOdGFrZVJpZ2h0Qnl0ZXMAAAACBQAAAANhdHQAAAAAAAAAAAEEAAAAA2tleQkBAAAADmRyb3BSaWdodEJ5dGVzAAAAAgUAAAADYXR0AAAAAAAAAAACBAAAAAloZWlnaHRSZXMJAQAAAAdleHRyYWN0AAAAAQkABBoAAAACBQAAAAZvcmFjbGUJAAEsAAAAAgkAAlgAAAABBQAAAANrZXkCAAAABmhlaWdodAQAAAAJaXNDaGVhdGVyCQAAZwAAAAIJAQAAAAdleHRyYWN0AAAAAQkAA+kAAAABCAUAAAAJcGF5bWVudFR4AAAAAmlkBQAAAAloZWlnaHRSZXMEAAAACnZhbENvbXBsZXgJAQAAAAdleHRyYWN0AAAAAQkABBwAAAACBQAAAAZvcmFjbGUJAAJYAAAAAQUAAAADa2V5BAAAAAVrb2VmZgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAAAAAAAAAAAAAcAAAAAAAAAACMDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAABAAAAAAAAAAAHAAAAAAAAAAABAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAgAAAAAAAAAABwAAAAAAAAAAAQMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAMAAAAAAAAAAAcAAAAAAAAAAAEDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAEAAAAAAAAAAAHAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAABQAAAAAAAAAABwAAAAAAAAAAAgAAAAAAAAAAAAQAAAADdmVyCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAEEAAAAB3ZhbFJlYWwDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAAAAAAAAAAAAAHCQAAygAAAAIJAADJAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAAAgAAAAAAAAAAAQMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAEAAAAAAAAAAAcJAADKAAAAAgkAAMkAAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAADAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAgAAAAAAAAAABwkAAMoAAAACCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAQAAAAAAAAAAAMDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAADAAAAAAAAAAAHCQAAygAAAAIJAADJAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAABQAAAAAAAAAABAMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAQAAAAAAAAAAAcJAADKAAAAAgkAAMkAAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAAGAAAAAAAAAAAFAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAABQAAAAAAAAAABwkAAMoAAAACCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAcAAAAAAAAAAAUJAAGaAAAAAQAAAAAAAAAAJgQAAAAFaXNXaW4DCQAAAAAAAAIFAAAAA3ZhbAUAAAAHdmFsUmVhbAkBAAAAAiE9AAAAAgUAAAADdmFsCQABmgAAAAEAAAAAAAAAACYHAwUAAAAFaXNXaW4JAQAAAAEhAAAAAQUAAAAJaXNDaGVhdGVyBwcHCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tlef36YYw=",
    "chainId": 84,
    "height": 476469,
    "spentComplexity": 0
}

View: original | compacted
Prev: 3X7wuLDxxvMuHR6Nc7MnRqDUEtsGw1fPstywUcTo2AZh
Next: JQB4vaxzgHpfvbh81EKej12RTL1MeHkkAqrFvYuQCsD

Diff: 
Old New Differences
43 43          }
44 44      case dtx: DataTransaction => 
45 45          let paymentTxIdStr = extract(dtx.data[0].key)
46 +         let feesKey = (paymentTxIdStr + "_fees")
46 47          let paymentTx = transactionById(fromBase58String(paymentTxIdStr))
47 -         let isFeeCorrect = (dataTxFee >= dtx.fee)
48 +         let newFees = extract(getInteger(dtx.data, feesKey))
49 +         let oldFees = if (isDefined(getInteger(me, feesKey)))
50 +             then extract(getInteger(me, feesKey))
51 +             else 0
52 +         let isFeeCorrect = (newFees == (oldFees + dtx.fee))
48 53          let isPaymentAlreadyMentioned = isDefined(getString(me, paymentTxIdStr))
49 54          let withdrawTransactionId = fromBase58String(extract(getString(me, paymentTxIdStr)))
50 55          let isWithdrawExist = isDefined(transactionById(withdrawTransactionId))
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 1 #-}
2 2  {-# CONTENT_TYPE EXPRESSION #-}
3 3  let me = tx.sender
4 4  let oracle = extract(addressFromString("3NCzaYTNDGtR8zf9yfcqePFjCqFx9S5zhs4"))
5 5  let dataTxFee = 1000000
6 6  match tx {
7 7      case withdrawTx: TransferTransaction => 
8 8          let txId = extract(getString(me, toBase58String(tx.proofs[1])))
9 9          match transactionById(tx.proofs[1]) {
10 10              case paymentTx: TransferTransaction => 
11 11                  let isPaymentTookPlace = if ((txId == toBase58String(tx.id)))
12 12                      then sigVerify(tx.bodyBytes, tx.proofs[0], paymentTx.senderPublicKey)
13 13                      else false
14 14                  let att = paymentTx.attachment
15 15                  let type = dropRightBytes(takeRightBytes(att, 2), 1)
16 16                  let val = takeRightBytes(att, 1)
17 17                  let key = dropRightBytes(att, 2)
18 18                  let valComplex = extract(getBinary(oracle, toBase58String(key)))
19 19                  let koeff = if ((type == drop(toBytes(0), 7)))
20 20                      then 35
21 21                      else if ((type == drop(toBytes(1), 7)))
22 22                          then 1
23 23                          else if ((type == drop(toBytes(2), 7)))
24 24                              then 1
25 25                              else if ((type == drop(toBytes(3), 7)))
26 26                                  then 1
27 27                                  else if ((type == drop(toBytes(4), 7)))
28 28                                      then 2
29 29                                      else if ((type == drop(toBytes(5), 7)))
30 30                                          then 2
31 31                                          else 0
32 32                  let isAmountOk = (withdrawTx.amount == (((paymentTx.amount * koeff) - dataTxFee) - withdrawTx.fee))
33 33                  let isInWaves = if (!(isDefined(withdrawTx.feeAssetId)))
34 34                      then !(isDefined(withdrawTx.assetId))
35 35                      else false
36 36                  if (if (isPaymentTookPlace)
37 37                      then isAmountOk
38 38                      else false)
39 39                      then isInWaves
40 40                      else false
41 41              case _ => 
42 42                  false
43 43          }
44 44      case dtx: DataTransaction => 
45 45          let paymentTxIdStr = extract(dtx.data[0].key)
46 +         let feesKey = (paymentTxIdStr + "_fees")
46 47          let paymentTx = transactionById(fromBase58String(paymentTxIdStr))
47 -         let isFeeCorrect = (dataTxFee >= dtx.fee)
48 +         let newFees = extract(getInteger(dtx.data, feesKey))
49 +         let oldFees = if (isDefined(getInteger(me, feesKey)))
50 +             then extract(getInteger(me, feesKey))
51 +             else 0
52 +         let isFeeCorrect = (newFees == (oldFees + dtx.fee))
48 53          let isPaymentAlreadyMentioned = isDefined(getString(me, paymentTxIdStr))
49 54          let withdrawTransactionId = fromBase58String(extract(getString(me, paymentTxIdStr)))
50 55          let isWithdrawExist = isDefined(transactionById(withdrawTransactionId))
51 56          match paymentTx {
52 57              case paymentTx: TransferTransaction => 
53 58                  let isDtxSignedByPayer = sigVerify(dtx.bodyBytes, dtx.proofs[0], paymentTx.senderPublicKey)
54 59                  if (if (if (if (!(isPaymentAlreadyMentioned))
55 60                      then true
56 61                      else !(isWithdrawExist))
57 62                      then isDtxSignedByPayer
58 63                      else false)
59 64                      then isFeeCorrect
60 65                      else false)
61 66                      then {
62 67                          let att = paymentTx.attachment
63 68                          let type = dropRightBytes(takeRightBytes(att, 2), 1)
64 69                          let val = takeRightBytes(att, 1)
65 70                          let key = dropRightBytes(att, 2)
66 71                          let heightRes = extract(getInteger(oracle, (toBase58String(key) + "height")))
67 72                          let isCheater = (extract(transactionHeightById(paymentTx.id)) >= heightRes)
68 73                          let valComplex = extract(getBinary(oracle, toBase58String(key)))
69 74                          let koeff = if ((type == drop(toBytes(0), 7)))
70 75                              then 35
71 76                              else if ((type == drop(toBytes(1), 7)))
72 77                                  then 1
73 78                                  else if ((type == drop(toBytes(2), 7)))
74 79                                      then 1
75 80                                      else if ((type == drop(toBytes(3), 7)))
76 81                                          then 1
77 82                                          else if ((type == drop(toBytes(4), 7)))
78 83                                              then 2
79 84                                              else if ((type == drop(toBytes(5), 7)))
80 85                                                  then 2
81 86                                                  else 0
82 87                          let ver = take(valComplex, 1)
83 88                          let valReal = if ((type == drop(toBytes(0), 7)))
84 89                              then drop(take(valComplex, 2), 1)
85 90                              else if ((type == drop(toBytes(1), 7)))
86 91                                  then drop(take(valComplex, 3), 2)
87 92                                  else if ((type == drop(toBytes(2), 7)))
88 93                                      then drop(take(valComplex, 4), 3)
89 94                                      else if ((type == drop(toBytes(3), 7)))
90 95                                          then drop(take(valComplex, 5), 4)
91 96                                          else if ((type == drop(toBytes(4), 7)))
92 97                                              then drop(take(valComplex, 6), 5)
93 98                                              else if ((type == drop(toBytes(5), 7)))
94 99                                                  then drop(take(valComplex, 7), 5)
95 100                                                  else toBytes(38)
96 101                          let isWin = if ((val == valReal))
97 102                              then (val != toBytes(38))
98 103                              else false
99 104                          if (isWin)
100 105                              then !(isCheater)
101 106                              else false
102 107                          }
103 108                      else false
104 109              case _ => 
105 110                  false
106 111          }
107 112      case _ => 
108 113          sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
109 114  }

Old	New		Differences
43	43		}
44	44		case dtx: DataTransaction =>
45	45		let paymentTxIdStr = extract(dtx.data[0].key)
	46	+	let feesKey = (paymentTxIdStr + "_fees")
46	47		let paymentTx = transactionById(fromBase58String(paymentTxIdStr))
47		-	let isFeeCorrect = (dataTxFee >= dtx.fee)
	48	+	let newFees = extract(getInteger(dtx.data, feesKey))
	49	+	let oldFees = if (isDefined(getInteger(me, feesKey)))
	50	+	then extract(getInteger(me, feesKey))
	51	+	else 0
	52	+	let isFeeCorrect = (newFees == (oldFees + dtx.fee))
48	53		let isPaymentAlreadyMentioned = isDefined(getString(me, paymentTxIdStr))
49	54		let withdrawTransactionId = fromBase58String(extract(getString(me, paymentTxIdStr)))
50	55		let isWithdrawExist = isDefined(transactionById(withdrawTransactionId))

Old	New		Differences
1	1		{-# STDLIB_VERSION 1 #-}
2	2		{-# CONTENT_TYPE EXPRESSION #-}
3	3		let me = tx.sender
4	4		let oracle = extract(addressFromString("3NCzaYTNDGtR8zf9yfcqePFjCqFx9S5zhs4"))
5	5		let dataTxFee = 1000000
6	6		match tx {
7	7		case withdrawTx: TransferTransaction =>
8	8		let txId = extract(getString(me, toBase58String(tx.proofs[1])))
9	9		match transactionById(tx.proofs[1]) {
10	10		case paymentTx: TransferTransaction =>
11	11		let isPaymentTookPlace = if ((txId == toBase58String(tx.id)))
12	12		then sigVerify(tx.bodyBytes, tx.proofs[0], paymentTx.senderPublicKey)
13	13		else false
14	14		let att = paymentTx.attachment
15	15		let type = dropRightBytes(takeRightBytes(att, 2), 1)
16	16		let val = takeRightBytes(att, 1)
17	17		let key = dropRightBytes(att, 2)
18	18		let valComplex = extract(getBinary(oracle, toBase58String(key)))
19	19		let koeff = if ((type == drop(toBytes(0), 7)))
20	20		then 35
21	21		else if ((type == drop(toBytes(1), 7)))
22	22		then 1
23	23		else if ((type == drop(toBytes(2), 7)))
24	24		then 1
25	25		else if ((type == drop(toBytes(3), 7)))
26	26		then 1
27	27		else if ((type == drop(toBytes(4), 7)))
28	28		then 2
29	29		else if ((type == drop(toBytes(5), 7)))
30	30		then 2
31	31		else 0
32	32		let isAmountOk = (withdrawTx.amount == (((paymentTx.amount * koeff) - dataTxFee) - withdrawTx.fee))
33	33		let isInWaves = if (!(isDefined(withdrawTx.feeAssetId)))
34	34		then !(isDefined(withdrawTx.assetId))
35	35		else false
36	36		if (if (isPaymentTookPlace)
37	37		then isAmountOk
38	38		else false)
39	39		then isInWaves
40	40		else false
41	41		case _ =>
42	42		false
43	43		}
44	44		case dtx: DataTransaction =>
45	45		let paymentTxIdStr = extract(dtx.data[0].key)
	46	+	let feesKey = (paymentTxIdStr + "_fees")
46	47		let paymentTx = transactionById(fromBase58String(paymentTxIdStr))
47		-	let isFeeCorrect = (dataTxFee >= dtx.fee)
	48	+	let newFees = extract(getInteger(dtx.data, feesKey))
	49	+	let oldFees = if (isDefined(getInteger(me, feesKey)))
	50	+	then extract(getInteger(me, feesKey))
	51	+	else 0
	52	+	let isFeeCorrect = (newFees == (oldFees + dtx.fee))
48	53		let isPaymentAlreadyMentioned = isDefined(getString(me, paymentTxIdStr))
49	54		let withdrawTransactionId = fromBase58String(extract(getString(me, paymentTxIdStr)))
50	55		let isWithdrawExist = isDefined(transactionById(withdrawTransactionId))
51	56		match paymentTx {
52	57		case paymentTx: TransferTransaction =>
53	58		let isDtxSignedByPayer = sigVerify(dtx.bodyBytes, dtx.proofs[0], paymentTx.senderPublicKey)
54	59		if (if (if (if (!(isPaymentAlreadyMentioned))
55	60		then true
56	61		else !(isWithdrawExist))
57	62		then isDtxSignedByPayer
58	63		else false)
59	64		then isFeeCorrect
60	65		else false)
61	66		then {
62	67		let att = paymentTx.attachment
63	68		let type = dropRightBytes(takeRightBytes(att, 2), 1)
64	69		let val = takeRightBytes(att, 1)
65	70		let key = dropRightBytes(att, 2)
66	71		let heightRes = extract(getInteger(oracle, (toBase58String(key) + "height")))
67	72		let isCheater = (extract(transactionHeightById(paymentTx.id)) >= heightRes)
68	73		let valComplex = extract(getBinary(oracle, toBase58String(key)))
69	74		let koeff = if ((type == drop(toBytes(0), 7)))
70	75		then 35
71	76		else if ((type == drop(toBytes(1), 7)))
72	77		then 1
73	78		else if ((type == drop(toBytes(2), 7)))
74	79		then 1
75	80		else if ((type == drop(toBytes(3), 7)))
76	81		then 1
77	82		else if ((type == drop(toBytes(4), 7)))
78	83		then 2
79	84		else if ((type == drop(toBytes(5), 7)))
80	85		then 2
81	86		else 0
82	87		let ver = take(valComplex, 1)
83	88		let valReal = if ((type == drop(toBytes(0), 7)))
84	89		then drop(take(valComplex, 2), 1)
85	90		else if ((type == drop(toBytes(1), 7)))
86	91		then drop(take(valComplex, 3), 2)
87	92		else if ((type == drop(toBytes(2), 7)))
88	93		then drop(take(valComplex, 4), 3)
89	94		else if ((type == drop(toBytes(3), 7)))
90	95		then drop(take(valComplex, 5), 4)
91	96		else if ((type == drop(toBytes(4), 7)))
92	97		then drop(take(valComplex, 6), 5)
93	98		else if ((type == drop(toBytes(5), 7)))
94	99		then drop(take(valComplex, 7), 5)
95	100		else toBytes(38)
96	101		let isWin = if ((val == valReal))
97	102		then (val != toBytes(38))
98	103		else false
99	104		if (isWin)
100	105		then !(isCheater)
101	106		else false
102	107		}
103	108		else false
104	109		case _ =>
105	110		false
106	111		}
107	112		case _ =>
108	113		sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
109	114		}

github/deemru/w8io/169f3d6 
101.70 ms ◑