w8 · tx · A4j···FKH

tx · A4jmJ1bbSkjoFxw1U9Z7gJXypBFDR7CE23HcXwHeDFKH

3MwR2FzFtbHeds3NzvkbiaYMVNhbtqcfRPU:  -0.01400000 Waves

2019.02.10 20:55 [489374] smart account 3MwR2FzFtbHeds3NzvkbiaYMVNhbtqcfRPU > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "A4jmJ1bbSkjoFxw1U9Z7gJXypBFDR7CE23HcXwHeDFKH",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1549821417027,
    "version": 1,
    "sender": "3MwR2FzFtbHeds3NzvkbiaYMVNhbtqcfRPU",
    "senderPublicKey": "H5rtwGVnkSHDfz6msD7itGURoKMXvvDwPoup1VESxfjJ",
    "proofs": [
        "2FJMwMvFCmFJECWNdReyxw2UbyEzb1FLsursWYZxj47VLimwtKTZBAgdrtjkcrKcdh57Yj61RE3wkWkksv1dDkvL"
    ],
    "script": "base64:AQQAAAACbWUIBQAAAAJ0eAAAAAZzZW5kZXIEAAAABm9yYWNsZQkBAAAAB2V4dHJhY3QAAAABCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzTkN6YVlUTkRHdFI4emY5eWZjcWVQRmpDcUZ4OVM1emhzNAQAAAAObWluV2l0aGRyYXdGZWUAAAAAAAAGGoAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAp3aXRoZHJhd1R4BQAAAAckbWF0Y2gwBAAAAAR0eElkCQEAAAAHZXh0cmFjdAAAAAEJAAQdAAAAAgUAAAACbWUJAAEsAAAAAgkAAlgAAAABCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAECAAAACV93aXRoZHJhdwQAAAAHJG1hdGNoMQkAA+gAAAABCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAEDCQAAAQAAAAIFAAAAByRtYXRjaDECAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAACXBheW1lbnRUeAUAAAAHJG1hdGNoMQQAAAASaXNQYXltZW50VG9va1BsYWNlAwkAAAAAAAACBQAAAAR0eElkCQACWAAAAAEIBQAAAAJ0eAAAAAJpZAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAlwYXltZW50VHgAAAAPc2VuZGVyUHVibGljS2V5BwQAAAAHZmVlc0tleQkAASwAAAACCQACWAAAAAEJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAQIAAAAOX3dpdGhkcmF3X2ZlZXMEAAAAC2RhdGFUeHNGZWVzCQEAAAAHZXh0cmFjdAAAAAEJAAQaAAAAAgUAAAACbWUFAAAAB2ZlZXNLZXkEAAAABWd1ZXNzCQEAAAAHZXh0cmFjdAAAAAEJAAQcAAAAAgUAAAACbWUJAAJYAAAAAQkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAABBAAAAAR0eXBlCQAAyQAAAAIFAAAABWd1ZXNzAAAAAAAAAAABBAAAAAN2YWwJAADKAAAAAgUAAAAFZ3Vlc3MAAAAAAAAAAAEEAAAAA2tleQkBAAAAB2V4dHJhY3QAAAABCQAEHQAAAAIFAAAAAm1lCQABLAAAAAIJAAJYAAAAAQkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAABAgAAAAZfcm91bmQEAAAACnZhbENvbXBsZXgJAQAAAAdleHRyYWN0AAAAAQkABBwAAAACBQAAAAZvcmFjbGUFAAAAA2tleQQAAAAFa29lZmYDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAAAAAAAAAAAAAHAAAAAAAAAAAjAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAQAAAAAAAAAABwAAAAAAAAAAAgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAIAAAAAAAAAAAcAAAAAAAAAAAIDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAADAAAAAAAAAAAHAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAABAAAAAAAAAAABwAAAAAAAAAAAwMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAUAAAAAAAAAAAcAAAAAAAAAAAMAAAAAAAAAAAAEAAAADWNvcnJlY3RBbW91bnQJAABlAAAAAgkAAGUAAAACCQAAaAAAAAIIBQAAAAlwYXltZW50VHgAAAAGYW1vdW50BQAAAAVrb2VmZgUAAAALZGF0YVR4c0ZlZXMIBQAAAAp3aXRoZHJhd1R4AAAAA2ZlZQQAAAAKaXNBbW91bnRPawkAAAAAAAACCAUAAAAKd2l0aGRyYXdUeAAAAAZhbW91bnQFAAAADWNvcnJlY3RBbW91bnQEAAAACWlzSW5XYXZlcwMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAp3aXRoZHJhd1R4AAAACmZlZUFzc2V0SWQJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAp3aXRoZHJhd1R4AAAAB2Fzc2V0SWQHAwMFAAAAEmlzUGF5bWVudFRvb2tQbGFjZQUAAAAKaXNBbW91bnRPawcFAAAACWlzSW5XYXZlcwcHAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAA2R0eAUAAAAHJG1hdGNoMAMJAAAAAAAAAgkAAZAAAAABCAUAAAADZHR4AAAABGRhdGEAAAAAAAAAAAIEAAAADWlzRGF0YUNvdW50T2sJAAAAAAAAAgkAAZAAAAABCAUAAAADZHR4AAAABGRhdGEAAAAAAAAAAAIEAAAADnBheW1lbnRUeElkU3RyCQEAAAAJZHJvcFJpZ2h0AAAAAgkBAAAAB2V4dHJhY3QAAAABCAkAAZEAAAACCAUAAAADZHR4AAAABGRhdGEAAAAAAAAAAAAAAAADa2V5AAAAAAAAAAAJBAAAAAdmZWVzS2V5CQABLAAAAAIFAAAADnBheW1lbnRUeElkU3RyAgAAAA5fd2l0aGRyYXdfZmVlcwQAAAAJcGF5bWVudFR4CQAD6AAAAAEJAAJZAAAAAQUAAAAOcGF5bWVudFR4SWRTdHIEAAAAB25ld0ZlZXMJAQAAAAdleHRyYWN0AAAAAQkABBAAAAACCAUAAAADZHR4AAAABGRhdGEFAAAAB2ZlZXNLZXkEAAAAB29sZEZlZXMDCQEAAAAJaXNEZWZpbmVkAAAAAQkABBoAAAACBQAAAAJtZQUAAAAHZmVlc0tleQkBAAAAB2V4dHJhY3QAAAABCQAEGgAAAAIFAAAAAm1lBQAAAAdmZWVzS2V5AAAAAAAAAAAABAAAAAxpc0ZlZUNvcnJlY3QJAAAAAAAAAgUAAAAHbmV3RmVlcwkAAGQAAAACBQAAAAdvbGRGZWVzCAUAAAADZHR4AAAAA2ZlZQQAAAAZaXNQYXltZW50QWxyZWFkeU1lbnRpb25lZAkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAACbWUFAAAADnBheW1lbnRUeElkU3RyBAAAABV3aXRoZHJhd1RyYW5zYWN0aW9uSWQJAAJZAAAAAQkBAAAAB2V4dHJhY3QAAAABCQAEHQAAAAIFAAAAAm1lBQAAAA5wYXltZW50VHhJZFN0cgQAAAAPaXNXaXRoZHJhd0V4aXN0CQEAAAAJaXNEZWZpbmVkAAAAAQkAA+gAAAABBQAAABV3aXRoZHJhd1RyYW5zYWN0aW9uSWQEAAAAByRtYXRjaDEFAAAACXBheW1lbnRUeAMJAAABAAAAAgUAAAAHJG1hdGNoMQIAAAATVHJhbnNmZXJUcmFuc2FjdGlvbgQAAAAJcGF5bWVudFR4BQAAAAckbWF0Y2gxBAAAABJpc0R0eFNpZ25lZEJ5UGF5ZXIJAAH0AAAAAwgFAAAAA2R0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAA2R0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAlwYXltZW50VHgAAAAPc2VuZGVyUHVibGljS2V5AwMDAwMJAQAAAAEhAAAAAQUAAAAZaXNQYXltZW50QWxyZWFkeU1lbnRpb25lZAYJAQAAAAEhAAAAAQUAAAAPaXNXaXRoZHJhd0V4aXN0BQAAABJpc0R0eFNpZ25lZEJ5UGF5ZXIHBQAAAAxpc0ZlZUNvcnJlY3QHBQAAAA1pc0RhdGFDb3VudE9rBwQAAAAFZ3Vlc3MJAQAAAAdleHRyYWN0AAAAAQkABBwAAAACBQAAAAJtZQUAAAAOcGF5bWVudFR4SWRTdHIEAAAABHR5cGUJAADJAAAAAgUAAAAFZ3Vlc3MAAAAAAAAAAAEEAAAAA3ZhbAkAAMoAAAACBQAAAAVndWVzcwAAAAAAAAAAAQQAAAADa2V5CQEAAAAHZXh0cmFjdAAAAAEJAAQdAAAAAgUAAAACbWUJAAEsAAAAAgUAAAAOcGF5bWVudFR4SWRTdHICAAAABl9yb3VuZAQAAAAKdmFsQ29tcGxleAkBAAAAB2V4dHJhY3QAAAABCQAEHAAAAAIFAAAABm9yYWNsZQUAAAADa2V5BAAAAAVrb2VmZgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAAAAAAAAAAAAAcAAAAAAAAAACMDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAABAAAAAAAAAAAHAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAgAAAAAAAAAABwAAAAAAAAAAAgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAMAAAAAAAAAAAcAAAAAAAAAAAIDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAEAAAAAAAAAAAHAAAAAAAAAAADAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAABQAAAAAAAAAABwAAAAAAAAAAAwAAAAAAAAAAAAQAAAADdmVyCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAEEAAAAB3ZhbFJlYWwDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAAAAAAAAAAAAAHCQAAygAAAAIJAADJAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAAAgAAAAAAAAAAAQMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAEAAAAAAAAAAAcJAADKAAAAAgkAAMkAAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAADAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAgAAAAAAAAAABwkAAMoAAAACCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAQAAAAAAAAAAAMDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAADAAAAAAAAAAAHCQAAygAAAAIJAADJAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAABQAAAAAAAAAABAMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAQAAAAAAAAAAAcJAADKAAAAAgkAAMkAAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAAGAAAAAAAAAAAFAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAABQAAAAAAAAAABwkAAMoAAAACCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAcAAAAAAAAAAAYJAAGaAAAAAQAAAAAAAAAAJgQAAAAFaXNXaW4DCQAAAAAAAAIFAAAAA3ZhbAUAAAAHdmFsUmVhbAkBAAAAAiE9AAAAAgUAAAADdmFsCQABmgAAAAEAAAAAAAAAACYHBAAAABJpc01vbmV5U3RpbGxFbm91Z2gJAABmAAAAAgkAAGQAAAACCQAAaAAAAAIIBQAAAAlwYXltZW50VHgAAAAGYW1vdW50BQAAAAVrb2VmZgUAAAAObWluV2l0aGRyYXdGZWUFAAAAB25ld0ZlZXMDBQAAAAVpc1dpbgUAAAASaXNNb25leVN0aWxsRW5vdWdoBwcHAwkAAAAAAAACCQABkAAAAAEIBQAAAANkdHgAAAAEZGF0YQAAAAAAAAAAAwQAAAAOcGF5bWVudFR4SWRTdHIJAQAAAAdleHRyYWN0AAAAAQgJAAGRAAAAAggFAAAAA2R0eAAAAARkYXRhAAAAAAAAAAAAAAAAA2tleQQAAAAIZ3Vlc3NTdHIJAQAAAAdleHRyYWN0AAAAAQkABBMAAAACCAUAAAADZHR4AAAABGRhdGEFAAAADnBheW1lbnRUeElkU3RyBAAAAA9wYXltZW50Um91bmRLZXkJAAEsAAAAAgUAAAAOcGF5bWVudFR4SWRTdHICAAAABl9yb3VuZAQAAAAMcGF5bWVudFJvdW5kCQEAAAAHZXh0cmFjdAAAAAEJAAQTAAAAAggFAAAAA2R0eAAAAARkYXRhBQAAAA9wYXltZW50Um91bmRLZXkEAAAACnN1bUJldHNPbGQDCQEAAAAJaXNEZWZpbmVkAAAAAQkABBoAAAACBQAAAAJtZQkAASwAAAACBQAAAAxwYXltZW50Um91bmQCAAAACF9iZXRzU3VtCQEAAAAHZXh0cmFjdAAAAAEJAAQaAAAAAgUAAAACbWUJAAEsAAAAAgUAAAAMcGF5bWVudFJvdW5kAgAAAAhfYmV0c1N1bQAAAAAAAAAAAAQAAAAKc3VtQmV0c05ldwkBAAAAB2V4dHJhY3QAAAABCQAEEAAAAAIIBQAAAANkdHgAAAAEZGF0YQkAASwAAAACBQAAAAxwYXltZW50Um91bmQCAAAACF9iZXRzU3VtBAAAABlpc1BheW1lbnRBbHJlYWR5TWVudGlvbmVkCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAJtZQUAAAAOcGF5bWVudFR4SWRTdHIEAAAACXBheW1lbnRUeAkAA+gAAAABCQACWQAAAAEFAAAADnBheW1lbnRUeElkU3RyBAAAAAckbWF0Y2gxBQAAAAlwYXltZW50VHgDCQAAAQAAAAIFAAAAByRtYXRjaDECAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAACXBheW1lbnRUeAUAAAAHJG1hdGNoMQQAAAASaXNEdHhTaWduZWRCeVBheWVyCQAB9AAAAAMIBQAAAANkdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAANkdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAAJcGF5bWVudFR4AAAAD3NlbmRlclB1YmxpY0tleQMJAQAAAAEhAAAAAQUAAAAZaXNQYXltZW50QWxyZWFkeU1lbnRpb25lZAkAAAAAAAACBQAAAApzdW1CZXRzTmV3CQAAZQAAAAIJAABkAAAAAgUAAAAKc3VtQmV0c09sZAgFAAAACXBheW1lbnRUeAAAAAZhbW91bnQIBQAAAANkdHgAAAADZmVlBwcHCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tleV6Wmcg=",
    "chainId": 84,
    "height": 489374,
    "spentComplexity": 0
}

View: original | compacted
Prev: 29NsE2S2L5qNifqjjgAKdwW6XHovfAbifj2RbYq4XUAH
Next: BtmWorFzu3bCfTSnhE9htB8gL4SsNU9uxmBsw9Df2fR4

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 minWithdrawFee = 400000
6 6  match tx {
7 7      case withdrawTx: TransferTransaction => 
8 8          let txId = extract(getString(me, (toBase58String(tx.proofs[1]) + "_withdraw")))
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 feesKey = (toBase58String(tx.proofs[1]) + "_withdraw_fees")
15 15                  let dataTxsFees = extract(getInteger(me, feesKey))
16 16                  let guess = extract(getBinary(me, toBase58String(tx.proofs[1])))
17 17                  let type = take(guess, 1)
18 18                  let val = drop(guess, 1)
19 19                  let key = extract(getString(me, (toBase58String(tx.proofs[1]) + "_round")))
20 20                  let valComplex = extract(getBinary(oracle, 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 2
25 25                          else if ((type == drop(toBytes(2), 7)))
26 26                              then 2
27 27                              else if ((type == drop(toBytes(3), 7)))
28 28                                  then 2
29 29                                  else if ((type == drop(toBytes(4), 7)))
30 30                                      then 3
31 31                                      else if ((type == drop(toBytes(5), 7)))
32 32                                          then 3
33 33                                          else 0
34 34                  let correctAmount = (((paymentTx.amount * koeff) - dataTxsFees) - withdrawTx.fee)
35 35                  let isAmountOk = (withdrawTx.amount == correctAmount)
36 36                  let isInWaves = if (!(isDefined(withdrawTx.feeAssetId)))
37 37                      then !(isDefined(withdrawTx.assetId))
38 38                      else false
39 39                  if (if (isPaymentTookPlace)
40 40                      then isAmountOk
41 41                      else false)
42 42                      then isInWaves
43 43                      else false
44 44              case _ => 
45 45                  false
46 46          }
47 47      case dtx: DataTransaction => 
48 48          if ((size(dtx.data) == 2))
49 49              then {
50 50                  let isDataCountOk = (size(dtx.data) == 2)
51 51                  let paymentTxIdStr = dropRight(extract(dtx.data[0].key), 9)
52 52                  let feesKey = (paymentTxIdStr + "_withdraw_fees")
53 53                  let paymentTx = transactionById(fromBase58String(paymentTxIdStr))
54 54                  let newFees = extract(getInteger(dtx.data, feesKey))
55 55                  let oldFees = if (isDefined(getInteger(me, feesKey)))
56 56                      then extract(getInteger(me, feesKey))
57 57                      else 0
58 58                  let isFeeCorrect = (newFees == (oldFees + dtx.fee))
59 59                  let isPaymentAlreadyMentioned = isDefined(getString(me, paymentTxIdStr))
60 60                  let withdrawTransactionId = fromBase58String(extract(getString(me, paymentTxIdStr)))
61 61                  let isWithdrawExist = isDefined(transactionById(withdrawTransactionId))
62 62                  match paymentTx {
63 63                      case paymentTx: TransferTransaction => 
64 64                          let isDtxSignedByPayer = sigVerify(dtx.bodyBytes, dtx.proofs[0], paymentTx.senderPublicKey)
65 65                          if (if (if (if (if (!(isPaymentAlreadyMentioned))
66 66                              then true
67 67                              else !(isWithdrawExist))
68 68                              then isDtxSignedByPayer
69 69                              else false)
70 70                              then isFeeCorrect
71 71                              else false)
72 72                              then isDataCountOk
73 73                              else false)
74 74                              then {
75 75                                  let guess = extract(getBinary(me, paymentTxIdStr))
76 76                                  let type = take(guess, 1)
77 77                                  let val = drop(guess, 1)
78 78                                  let key = extract(getString(me, (paymentTxIdStr + "_round")))
79 79                                  let valComplex = extract(getBinary(oracle, key))
80 80                                  let koeff = if ((type == drop(toBytes(0), 7)))
81 81                                      then 35
82 82                                      else if ((type == drop(toBytes(1), 7)))
83 83                                          then 2
84 84                                          else if ((type == drop(toBytes(2), 7)))
85 85                                              then 2
86 86                                              else if ((type == drop(toBytes(3), 7)))
87 87                                                  then 2
88 88                                                  else if ((type == drop(toBytes(4), 7)))
89 89                                                      then 3
90 90                                                      else if ((type == drop(toBytes(5), 7)))
91 91                                                          then 3
92 92                                                          else 0
93 93                                  let ver = take(valComplex, 1)
94 94                                  let valReal = if ((type == drop(toBytes(0), 7)))
95 95                                      then drop(take(valComplex, 2), 1)
96 96                                      else if ((type == drop(toBytes(1), 7)))
97 97                                          then drop(take(valComplex, 3), 2)
98 98                                          else if ((type == drop(toBytes(2), 7)))
99 99                                              then drop(take(valComplex, 4), 3)
100 100                                              else if ((type == drop(toBytes(3), 7)))
101 101                                                  then drop(take(valComplex, 5), 4)
102 102                                                  else if ((type == drop(toBytes(4), 7)))
103 103                                                      then drop(take(valComplex, 6), 5)
104 104                                                      else if ((type == drop(toBytes(5), 7)))
105 105                                                          then drop(take(valComplex, 7), 6)
106 106                                                          else toBytes(38)
107 107                                  let isWin = if ((val == valReal))
108 108                                      then (val != toBytes(38))
109 109                                      else false
110 110                                  let isMoneyStillEnough = (((paymentTx.amount * koeff) + minWithdrawFee) > newFees)
111 111                                  if (isWin)
112 112                                      then isMoneyStillEnough
113 113                                      else false
114 114                                  }
115 115                              else false
116 116                      case _ => 
117 117                          false
118 118                  }
119 119                  }
120 120              else if ((size(dtx.data) == 3))
121 121                  then {
122 122                      let paymentTxIdStr = extract(dtx.data[0].key)
123 123                      let guessStr = extract(getString(dtx.data, paymentTxIdStr))
124 124                      let paymentRoundKey = (paymentTxIdStr + "_round")
125 125                      let paymentRound = extract(getString(dtx.data, paymentRoundKey))
126 126                      let sumBetsOld = if (isDefined(getInteger(me, (paymentRound + "_betsSum"))))
127 127                          then extract(getInteger(me, (paymentRound + "_betsSum")))
128 128                          else 0
129 129                      let sumBetsNew = extract(getInteger(dtx.data, (paymentRound + "_betsSum")))
130 130                      let isPaymentAlreadyMentioned = isDefined(getString(me, paymentTxIdStr))
131 131                      let paymentTx = transactionById(fromBase58String(paymentTxIdStr))
132 132                      match paymentTx {
133 133                          case paymentTx: TransferTransaction => 
134 134                              let isDtxSignedByPayer = sigVerify(dtx.bodyBytes, dtx.proofs[0], paymentTx.senderPublicKey)
135 135                              if (!(isPaymentAlreadyMentioned))
136 136                                  then (sumBetsNew == ((sumBetsOld + paymentTx.amount) - dtx.fee))
137 137                                  else false
138 138                          case _ => 
139 139                              false
140 140                      }
141 141                      }
142 142                  else false
143 143      case _ => 
144 144          sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
145 145  }

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 minWithdrawFee = 400000
6	6	match tx {
7	7	case withdrawTx: TransferTransaction =>
8	8	let txId = extract(getString(me, (toBase58String(tx.proofs[1]) + "_withdraw")))
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 feesKey = (toBase58String(tx.proofs[1]) + "_withdraw_fees")
15	15	let dataTxsFees = extract(getInteger(me, feesKey))
16	16	let guess = extract(getBinary(me, toBase58String(tx.proofs[1])))
17	17	let type = take(guess, 1)
18	18	let val = drop(guess, 1)
19	19	let key = extract(getString(me, (toBase58String(tx.proofs[1]) + "_round")))
20	20	let valComplex = extract(getBinary(oracle, 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 2
25	25	else if ((type == drop(toBytes(2), 7)))
26	26	then 2
27	27	else if ((type == drop(toBytes(3), 7)))
28	28	then 2
29	29	else if ((type == drop(toBytes(4), 7)))
30	30	then 3
31	31	else if ((type == drop(toBytes(5), 7)))
32	32	then 3
33	33	else 0
34	34	let correctAmount = (((paymentTx.amount * koeff) - dataTxsFees) - withdrawTx.fee)
35	35	let isAmountOk = (withdrawTx.amount == correctAmount)
36	36	let isInWaves = if (!(isDefined(withdrawTx.feeAssetId)))
37	37	then !(isDefined(withdrawTx.assetId))
38	38	else false
39	39	if (if (isPaymentTookPlace)
40	40	then isAmountOk
41	41	else false)
42	42	then isInWaves
43	43	else false
44	44	case _ =>
45	45	false
46	46	}
47	47	case dtx: DataTransaction =>
48	48	if ((size(dtx.data) == 2))
49	49	then {
50	50	let isDataCountOk = (size(dtx.data) == 2)
51	51	let paymentTxIdStr = dropRight(extract(dtx.data[0].key), 9)
52	52	let feesKey = (paymentTxIdStr + "_withdraw_fees")
53	53	let paymentTx = transactionById(fromBase58String(paymentTxIdStr))
54	54	let newFees = extract(getInteger(dtx.data, feesKey))
55	55	let oldFees = if (isDefined(getInteger(me, feesKey)))
56	56	then extract(getInteger(me, feesKey))
57	57	else 0
58	58	let isFeeCorrect = (newFees == (oldFees + dtx.fee))
59	59	let isPaymentAlreadyMentioned = isDefined(getString(me, paymentTxIdStr))
60	60	let withdrawTransactionId = fromBase58String(extract(getString(me, paymentTxIdStr)))
61	61	let isWithdrawExist = isDefined(transactionById(withdrawTransactionId))
62	62	match paymentTx {
63	63	case paymentTx: TransferTransaction =>
64	64	let isDtxSignedByPayer = sigVerify(dtx.bodyBytes, dtx.proofs[0], paymentTx.senderPublicKey)
65	65	if (if (if (if (if (!(isPaymentAlreadyMentioned))
66	66	then true
67	67	else !(isWithdrawExist))
68	68	then isDtxSignedByPayer
69	69	else false)
70	70	then isFeeCorrect
71	71	else false)
72	72	then isDataCountOk
73	73	else false)
74	74	then {
75	75	let guess = extract(getBinary(me, paymentTxIdStr))
76	76	let type = take(guess, 1)
77	77	let val = drop(guess, 1)
78	78	let key = extract(getString(me, (paymentTxIdStr + "_round")))
79	79	let valComplex = extract(getBinary(oracle, key))
80	80	let koeff = if ((type == drop(toBytes(0), 7)))
81	81	then 35
82	82	else if ((type == drop(toBytes(1), 7)))
83	83	then 2
84	84	else if ((type == drop(toBytes(2), 7)))
85	85	then 2
86	86	else if ((type == drop(toBytes(3), 7)))
87	87	then 2
88	88	else if ((type == drop(toBytes(4), 7)))
89	89	then 3
90	90	else if ((type == drop(toBytes(5), 7)))
91	91	then 3
92	92	else 0
93	93	let ver = take(valComplex, 1)
94	94	let valReal = if ((type == drop(toBytes(0), 7)))
95	95	then drop(take(valComplex, 2), 1)
96	96	else if ((type == drop(toBytes(1), 7)))
97	97	then drop(take(valComplex, 3), 2)
98	98	else if ((type == drop(toBytes(2), 7)))
99	99	then drop(take(valComplex, 4), 3)
100	100	else if ((type == drop(toBytes(3), 7)))
101	101	then drop(take(valComplex, 5), 4)
102	102	else if ((type == drop(toBytes(4), 7)))
103	103	then drop(take(valComplex, 6), 5)
104	104	else if ((type == drop(toBytes(5), 7)))
105	105	then drop(take(valComplex, 7), 6)
106	106	else toBytes(38)
107	107	let isWin = if ((val == valReal))
108	108	then (val != toBytes(38))
109	109	else false
110	110	let isMoneyStillEnough = (((paymentTx.amount * koeff) + minWithdrawFee) > newFees)
111	111	if (isWin)
112	112	then isMoneyStillEnough
113	113	else false
114	114	}
115	115	else false
116	116	case _ =>
117	117	false
118	118	}
119	119	}
120	120	else if ((size(dtx.data) == 3))
121	121	then {
122	122	let paymentTxIdStr = extract(dtx.data[0].key)
123	123	let guessStr = extract(getString(dtx.data, paymentTxIdStr))
124	124	let paymentRoundKey = (paymentTxIdStr + "_round")
125	125	let paymentRound = extract(getString(dtx.data, paymentRoundKey))
126	126	let sumBetsOld = if (isDefined(getInteger(me, (paymentRound + "_betsSum"))))
127	127	then extract(getInteger(me, (paymentRound + "_betsSum")))
128	128	else 0
129	129	let sumBetsNew = extract(getInteger(dtx.data, (paymentRound + "_betsSum")))
130	130	let isPaymentAlreadyMentioned = isDefined(getString(me, paymentTxIdStr))
131	131	let paymentTx = transactionById(fromBase58String(paymentTxIdStr))
132	132	match paymentTx {
133	133	case paymentTx: TransferTransaction =>
134	134	let isDtxSignedByPayer = sigVerify(dtx.bodyBytes, dtx.proofs[0], paymentTx.senderPublicKey)
135	135	if (!(isPaymentAlreadyMentioned))
136	136	then (sumBetsNew == ((sumBetsOld + paymentTx.amount) - dtx.fee))
137	137	else false
138	138	case _ =>
139	139	false
140	140	}
141	141	}
142	142	else false
143	143	case _ =>
144	144	sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
145	145	}

github/deemru/w8io/169f3d6 
48.66 ms ◑