w8 · tx · AGW···LVh

tx · AGWp3BzVw5j5E7CYUMgbE6RzrnvMfWkM1YCdNqjNkLVh

3N4Z7j4oSNfJVUtP4kmMKbhZD5n4xPFpPAu:  -0.01400000 Waves

2019.02.02 01:26 [476520] smart account 3N4Z7j4oSNfJVUtP4kmMKbhZD5n4xPFpPAu > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "AGWp3BzVw5j5E7CYUMgbE6RzrnvMfWkM1YCdNqjNkLVh",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1549060007547,
    "version": 1,
    "sender": "3N4Z7j4oSNfJVUtP4kmMKbhZD5n4xPFpPAu",
    "senderPublicKey": "F3DbYSfYZz6arcD6Mst8HdWScxTeWvTvatC7jp4DGryX",
    "proofs": [
        "3JCHR1PFzRm1CFA2jKhgSgGgZPTGA3uikEMApthSXe3KrsBF3RYViDqm5rvXpPzFeiGEoA1VzwuofXsE55jwNjKh"
    ],
    "script": "base64:AQQAAAACbWUIBQAAAAJ0eAAAAAZzZW5kZXIEAAAABm9yYWNsZQkBAAAAB2V4dHJhY3QAAAABCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzTkN6YVlUTkRHdFI4emY5eWZjcWVQRmpDcUZ4OVM1emhzNAQAAAAJZGF0YVR4RmVlAAAAAAAAD0JABAAAAAckbWF0Y2gwBQAAAAJ0eAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAATVHJhbnNmZXJUcmFuc2FjdGlvbgQAAAAKd2l0aGRyYXdUeAUAAAAHJG1hdGNoMAQAAAAEdHhJZAkBAAAAB2V4dHJhY3QAAAABCQAEHQAAAAIFAAAAAm1lCQACWAAAAAEJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAQQAAAAHJG1hdGNoMQkAA+gAAAABCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAEDCQAAAQAAAAIFAAAAByRtYXRjaDECAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAACXBheW1lbnRUeAUAAAAHJG1hdGNoMQQAAAASaXNQYXltZW50VG9va1BsYWNlAwkAAAAAAAACBQAAAAR0eElkCQACWAAAAAEIBQAAAAJ0eAAAAAJpZAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAlwYXltZW50VHgAAAAPc2VuZGVyUHVibGljS2V5BwQAAAADYXR0CAUAAAAJcGF5bWVudFR4AAAACmF0dGFjaG1lbnQEAAAAB2ZlZXNLZXkJAAEsAAAAAgkAAlgAAAABCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAECAAAABV9mZWVzBAAAAAtkYXRhVHhzRmVlcwkBAAAAB2V4dHJhY3QAAAABCQAEGgAAAAIFAAAAAm1lBQAAAAdmZWVzS2V5BAAAAAR0eXBlCQEAAAAOZHJvcFJpZ2h0Qnl0ZXMAAAACCQEAAAAOdGFrZVJpZ2h0Qnl0ZXMAAAACBQAAAANhdHQAAAAAAAAAAAIAAAAAAAAAAAEEAAAAA3ZhbAkBAAAADnRha2VSaWdodEJ5dGVzAAAAAgUAAAADYXR0AAAAAAAAAAABBAAAAANrZXkJAQAAAA5kcm9wUmlnaHRCeXRlcwAAAAIFAAAAA2F0dAAAAAAAAAAAAgQAAAAKdmFsQ29tcGxleAkBAAAAB2V4dHJhY3QAAAABCQAEHAAAAAIFAAAABm9yYWNsZQkAAlgAAAABBQAAAANrZXkEAAAABWtvZWZmAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAAAAAAAAAAAABwAAAAAAAAAAIwMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAEAAAAAAAAAAAcAAAAAAAAAAAEDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAACAAAAAAAAAAAHAAAAAAAAAAABAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAwAAAAAAAAAABwAAAAAAAAAAAQMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAQAAAAAAAAAAAcAAAAAAAAAAAIDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAFAAAAAAAAAAAHAAAAAAAAAAACAAAAAAAAAAAABAAAAA1jb3JyZWN0QW1vdW50CQAAZQAAAAIJAABlAAAAAgkAAGgAAAACCAUAAAAJcGF5bWVudFR4AAAABmFtb3VudAUAAAAFa29lZmYFAAAAC2RhdGFUeHNGZWVzCAUAAAAKd2l0aGRyYXdUeAAAAANmZWUEAAAACmlzQW1vdW50T2sJAAAAAAAAAggFAAAACndpdGhkcmF3VHgAAAAGYW1vdW50BQAAAA1jb3JyZWN0QW1vdW50BAAAAAlpc0luV2F2ZXMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAUAAAAKd2l0aGRyYXdUeAAAAApmZWVBc3NldElkCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAUAAAAKd2l0aGRyYXdUeAAAAAdhc3NldElkBwMDBQAAABJpc1BheW1lbnRUb29rUGxhY2UFAAAACmlzQW1vdW50T2sHBQAAAAlpc0luV2F2ZXMHBwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAPRGF0YVRyYW5zYWN0aW9uBAAAAANkdHgFAAAAByRtYXRjaDAEAAAADnBheW1lbnRUeElkU3RyCQEAAAAHZXh0cmFjdAAAAAEICQABkQAAAAIIBQAAAANkdHgAAAAEZGF0YQAAAAAAAAAAAAAAAANrZXkEAAAAB2ZlZXNLZXkJAAEsAAAAAgUAAAAOcGF5bWVudFR4SWRTdHICAAAABV9mZWVzBAAAAAlwYXltZW50VHgJAAPoAAAAAQkAAlkAAAABBQAAAA5wYXltZW50VHhJZFN0cgQAAAAHbmV3RmVlcwkBAAAAB2V4dHJhY3QAAAABCQAEEAAAAAIIBQAAAANkdHgAAAAEZGF0YQUAAAAHZmVlc0tleQQAAAAHb2xkRmVlcwMJAQAAAAlpc0RlZmluZWQAAAABCQAEGgAAAAIFAAAAAm1lBQAAAAdmZWVzS2V5CQEAAAAHZXh0cmFjdAAAAAEJAAQaAAAAAgUAAAACbWUFAAAAB2ZlZXNLZXkAAAAAAAAAAAAEAAAADGlzRmVlQ29ycmVjdAkAAAAAAAACBQAAAAduZXdGZWVzCQAAZAAAAAIFAAAAB29sZEZlZXMIBQAAAANkdHgAAAADZmVlBAAAABlpc1BheW1lbnRBbHJlYWR5TWVudGlvbmVkCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAJtZQUAAAAOcGF5bWVudFR4SWRTdHIEAAAAFXdpdGhkcmF3VHJhbnNhY3Rpb25JZAkAAlkAAAABCQEAAAAHZXh0cmFjdAAAAAEJAAQdAAAAAgUAAAACbWUFAAAADnBheW1lbnRUeElkU3RyBAAAAA9pc1dpdGhkcmF3RXhpc3QJAQAAAAlpc0RlZmluZWQAAAABCQAD6AAAAAEFAAAAFXdpdGhkcmF3VHJhbnNhY3Rpb25JZAQAAAAHJG1hdGNoMQUAAAAJcGF5bWVudFR4AwkAAAEAAAACBQAAAAckbWF0Y2gxAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAlwYXltZW50VHgFAAAAByRtYXRjaDEEAAAAEmlzRHR4U2lnbmVkQnlQYXllcgkAAfQAAAADCAUAAAADZHR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAADZHR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAACXBheW1lbnRUeAAAAA9zZW5kZXJQdWJsaWNLZXkDAwMDCQEAAAABIQAAAAEFAAAAGWlzUGF5bWVudEFscmVhZHlNZW50aW9uZWQGCQEAAAABIQAAAAEFAAAAD2lzV2l0aGRyYXdFeGlzdAUAAAASaXNEdHhTaWduZWRCeVBheWVyBwUAAAAMaXNGZWVDb3JyZWN0BwQAAAADYXR0CAUAAAAJcGF5bWVudFR4AAAACmF0dGFjaG1lbnQEAAAABHR5cGUJAQAAAA5kcm9wUmlnaHRCeXRlcwAAAAIJAQAAAA50YWtlUmlnaHRCeXRlcwAAAAIFAAAAA2F0dAAAAAAAAAAAAgAAAAAAAAAAAQQAAAADdmFsCQEAAAAOdGFrZVJpZ2h0Qnl0ZXMAAAACBQAAAANhdHQAAAAAAAAAAAEEAAAAA2tleQkBAAAADmRyb3BSaWdodEJ5dGVzAAAAAgUAAAADYXR0AAAAAAAAAAACBAAAAAloZWlnaHRSZXMJAQAAAAdleHRyYWN0AAAAAQkABBoAAAACBQAAAAZvcmFjbGUJAAEsAAAAAgkAAlgAAAABBQAAAANrZXkCAAAABmhlaWdodAQAAAAJaXNDaGVhdGVyCQAAZwAAAAIJAQAAAAdleHRyYWN0AAAAAQkAA+kAAAABCAUAAAAJcGF5bWVudFR4AAAAAmlkBQAAAAloZWlnaHRSZXMEAAAACnZhbENvbXBsZXgJAQAAAAdleHRyYWN0AAAAAQkABBwAAAACBQAAAAZvcmFjbGUJAAJYAAAAAQUAAAADa2V5BAAAAAVrb2VmZgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAAAAAAAAAAAAAcAAAAAAAAAACMDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAABAAAAAAAAAAAHAAAAAAAAAAABAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAgAAAAAAAAAABwAAAAAAAAAAAQMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAMAAAAAAAAAAAcAAAAAAAAAAAEDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAEAAAAAAAAAAAHAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAABQAAAAAAAAAABwAAAAAAAAAAAgAAAAAAAAAAAAQAAAADdmVyCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAEEAAAAB3ZhbFJlYWwDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAAAAAAAAAAAAAHCQAAygAAAAIJAADJAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAAAgAAAAAAAAAAAQMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAEAAAAAAAAAAAcJAADKAAAAAgkAAMkAAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAADAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAgAAAAAAAAAABwkAAMoAAAACCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAQAAAAAAAAAAAMDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAADAAAAAAAAAAAHCQAAygAAAAIJAADJAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAABQAAAAAAAAAABAMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAQAAAAAAAAAAAcJAADKAAAAAgkAAMkAAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAAGAAAAAAAAAAAFAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAABQAAAAAAAAAABwkAAMoAAAACCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAcAAAAAAAAAAAUJAAGaAAAAAQAAAAAAAAAAJgQAAAAFaXNXaW4DCQAAAAAAAAIFAAAAA3ZhbAUAAAAHdmFsUmVhbAkBAAAAAiE9AAAAAgUAAAADdmFsCQABmgAAAAEAAAAAAAAAACYHBQAAAAVpc1dpbgcHCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tleTfAO7E=",
    "chainId": 84,
    "height": 476520,
    "spentComplexity": 0
}

View: original | compacted
Prev: GYZdGnxcgVnTyx8THzAAydexTYgSWp9wrfgTVNZbkaPt
Next: 5X3A6RPnJeAwhsomMXoNbb8igbGMSmw9XffeHo2xrH2T

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

Old	New		Differences
31	31		else if ((type == drop(toBytes(5), 7)))
32	32		then 2
33	33		else 0
34		-	let isAmountOk = (withdrawTx.amount == (((paymentTx.amount * koeff) - dataTxsFees) - withdrawTx.fee))
	34	+	let correctAmount = (((paymentTx.amount * koeff) - dataTxsFees) - withdrawTx.fee)
	35	+	let isAmountOk = (withdrawTx.amount == correctAmount)
35	36		let isInWaves = if (!(isDefined(withdrawTx.feeAssetId)))
36	37		then !(isDefined(withdrawTx.assetId))
37	38		else false

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

github/deemru/w8io/6500d08 
28.13 ms ◑