tx · 9TjD14MtXaNDSbiHWg9h75bkEY4yYNj3757ZqsXSQd8A

3MwR2FzFtbHeds3NzvkbiaYMVNhbtqcfRPU:  -0.01400000 Waves

2019.02.12 09:29 [491556] smart account 3MwR2FzFtbHeds3NzvkbiaYMVNhbtqcfRPU > SELF 0.00000000 Waves

{ "type": 13, "id": "9TjD14MtXaNDSbiHWg9h75bkEY4yYNj3757ZqsXSQd8A", "fee": 1400000, "feeAssetId": null, "timestamp": 1549952918047, "version": 1, "sender": "3MwR2FzFtbHeds3NzvkbiaYMVNhbtqcfRPU", "senderPublicKey": "H5rtwGVnkSHDfz6msD7itGURoKMXvvDwPoup1VESxfjJ", "proofs": [ "5EnnxtDDGpuiiYYZCtWHqgwzpcwR2Kgvcn7SMH1q1u3Sj7aEg7pXk7gndrjx2MJZFdNRfYmd9UREzXLW6mKBvFXU" ], "script": "base64:AQQAAAACbWUIBQAAAAJ0eAAAAAZzZW5kZXIEAAAABm9yYWNsZQkBAAAAB2V4dHJhY3QAAAABCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzTkN6YVlUTkRHdFI4emY5eWZjcWVQRmpDcUZ4OVM1emhzNAQAAAAObWluV2l0aGRyYXdGZWUAAAAAAAAHoSAEAAAAEHJlZ2lzdGVyQmV0VHhGZWUAAAAAAAAHoSAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAp3aXRoZHJhd1R4BQAAAAckbWF0Y2gwBAAAAAR0eElkCQEAAAAHZXh0cmFjdAAAAAEJAAQdAAAAAgUAAAACbWUJAAEsAAAAAgkAAlgAAAABCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAECAAAACV93aXRoZHJhdwQAAAAHJG1hdGNoMQkAA+gAAAABCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAEDCQAAAQAAAAIFAAAAByRtYXRjaDECAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAACXBheW1lbnRUeAUAAAAHJG1hdGNoMQQAAAASaXNQYXltZW50VG9va1BsYWNlAwkAAAAAAAACBQAAAAR0eElkCQACWAAAAAEIBQAAAAJ0eAAAAAJpZAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAlwYXltZW50VHgAAAAPc2VuZGVyUHVibGljS2V5BwQAAAAHZmVlc0tleQkAASwAAAACCQACWAAAAAEJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAQIAAAAOX3dpdGhkcmF3X2ZlZXMEAAAAC2RhdGFUeHNGZWVzCQEAAAAHZXh0cmFjdAAAAAEJAAQaAAAAAgUAAAACbWUFAAAAB2ZlZXNLZXkEAAAABWd1ZXNzCQEAAAAHZXh0cmFjdAAAAAEJAAQcAAAAAgUAAAACbWUJAAJYAAAAAQkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAABBAAAAAR0eXBlCQAAyQAAAAIFAAAABWd1ZXNzAAAAAAAAAAABBAAAAAN2YWwJAADKAAAAAgUAAAAFZ3Vlc3MAAAAAAAAAAAEEAAAAA2tleQkBAAAAB2V4dHJhY3QAAAABCQAEHQAAAAIFAAAAAm1lCQABLAAAAAIJAAJYAAAAAQkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAABAgAAAAZfcm91bmQEAAAACnZhbENvbXBsZXgJAQAAAAdleHRyYWN0AAAAAQkABBwAAAACBQAAAAZvcmFjbGUFAAAAA2tleQQAAAAFa29lZmYDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAAAAAAAAAAAAAHAAAAAAAAAAAjAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAQAAAAAAAAAABwAAAAAAAAAAAgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAIAAAAAAAAAAAcAAAAAAAAAAAIDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAADAAAAAAAAAAAHAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAABAAAAAAAAAAABwAAAAAAAAAAAwMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAUAAAAAAAAAAAcAAAAAAAAAAAMAAAAAAAAAAAAEAAAADWNvcnJlY3RBbW91bnQJAABlAAAAAgkAAGUAAAACCQAAaAAAAAIIBQAAAAlwYXltZW50VHgAAAAGYW1vdW50BQAAAAVrb2VmZgUAAAALZGF0YVR4c0ZlZXMIBQAAAAp3aXRoZHJhd1R4AAAAA2ZlZQQAAAAKaXNBbW91bnRPawkAAAAAAAACCAUAAAAKd2l0aGRyYXdUeAAAAAZhbW91bnQFAAAADWNvcnJlY3RBbW91bnQEAAAACWlzSW5XYXZlcwMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAp3aXRoZHJhd1R4AAAACmZlZUFzc2V0SWQJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAp3aXRoZHJhd1R4AAAAB2Fzc2V0SWQHAwMFAAAAEmlzUGF5bWVudFRvb2tQbGFjZQUAAAAKaXNBbW91bnRPawcFAAAACWlzSW5XYXZlcwcHAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAA2R0eAUAAAAHJG1hdGNoMAMJAAAAAAAAAgkAAZAAAAABCAUAAAADZHR4AAAABGRhdGEAAAAAAAAAAAIEAAAADWlzRGF0YUNvdW50T2sJAAAAAAAAAgkAAZAAAAABCAUAAAADZHR4AAAABGRhdGEAAAAAAAAAAAIEAAAADnBheW1lbnRUeElkU3RyCQEAAAAJZHJvcFJpZ2h0AAAAAgkBAAAAB2V4dHJhY3QAAAABCAkAAZEAAAACCAUAAAADZHR4AAAABGRhdGEAAAAAAAAAAAAAAAADa2V5AAAAAAAAAAAJBAAAAAdmZWVzS2V5CQABLAAAAAIFAAAADnBheW1lbnRUeElkU3RyAgAAAA5fd2l0aGRyYXdfZmVlcwQAAAAJcGF5bWVudFR4CQAD6AAAAAEJAAJZAAAAAQUAAAAOcGF5bWVudFR4SWRTdHIEAAAAB25ld0ZlZXMJAQAAAAdleHRyYWN0AAAAAQkABBAAAAACCAUAAAADZHR4AAAABGRhdGEFAAAAB2ZlZXNLZXkEAAAAC29sZEZlZXNVbml0CQAEGgAAAAIFAAAAAm1lBQAAAAdmZWVzS2V5BAAAAAdvbGRGZWVzAwkBAAAACWlzRGVmaW5lZAAAAAEFAAAAC29sZEZlZXNVbml0CQEAAAAHZXh0cmFjdAAAAAEFAAAAC29sZEZlZXNVbml0AAAAAAAAAAAABAAAAAxpc0ZlZUNvcnJlY3QJAAAAAAAAAgUAAAAHbmV3RmVlcwkAAGQAAAACBQAAAAdvbGRGZWVzCAUAAAADZHR4AAAAA2ZlZQQAAAAQd2l0aGRyYXdUeElkVW5pdAkABB0AAAACBQAAAAJtZQUAAAAOcGF5bWVudFR4SWRTdHIEAAAAGWlzUGF5bWVudEFscmVhZHlNZW50aW9uZWQJAQAAAAlpc0RlZmluZWQAAAABBQAAABB3aXRoZHJhd1R4SWRVbml0BAAAABV3aXRoZHJhd1RyYW5zYWN0aW9uSWQJAAJZAAAAAQkBAAAAB2V4dHJhY3QAAAABBQAAABB3aXRoZHJhd1R4SWRVbml0BAAAAAckbWF0Y2gxBQAAAAlwYXltZW50VHgDCQAAAQAAAAIFAAAAByRtYXRjaDECAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAACXBheW1lbnRUeAUAAAAHJG1hdGNoMQQAAAASaXNEdHhTaWduZWRCeVBheWVyCQAB9AAAAAMIBQAAAANkdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAANkdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAAJcGF5bWVudFR4AAAAD3NlbmRlclB1YmxpY0tleQMDAwMDCQAAAAAAAAIJAAQkAAAAAQgFAAAACXBheW1lbnRUeAAAAAlyZWNpcGllbnQFAAAAAm1lAwkBAAAAASEAAAABBQAAABlpc1BheW1lbnRBbHJlYWR5TWVudGlvbmVkBgkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQkAA+gAAAABBQAAABV3aXRoZHJhd1RyYW5zYWN0aW9uSWQHBQAAABJpc0R0eFNpZ25lZEJ5UGF5ZXIHBQAAAAxpc0ZlZUNvcnJlY3QHBQAAAA1pc0RhdGFDb3VudE9rBwQAAAAFZ3Vlc3MJAQAAAAdleHRyYWN0AAAAAQkABBwAAAACBQAAAAJtZQUAAAAOcGF5bWVudFR4SWRTdHIEAAAABHR5cGUJAADJAAAAAgUAAAAFZ3Vlc3MAAAAAAAAAAAEEAAAAA2tleQkBAAAAB2V4dHJhY3QAAAABCQAEHQAAAAIFAAAAAm1lCQABLAAAAAIFAAAADnBheW1lbnRUeElkU3RyAgAAAAZfcm91bmQEAAAACml0c1Rvb0xhdGUJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAAAm1lCQABLAAAAAIFAAAAA2tleQIAAAAFX3N0b3AEAAAACnZhbENvbXBsZXgJAQAAAAdleHRyYWN0AAAAAQkABBwAAAACBQAAAAZvcmFjbGUFAAAAA2tleQQAAAAFa29lZmYDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAAAAAAAAAAAAAHAAAAAAAAAAAjAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAQAAAAAAAAAABwAAAAAAAAAAAgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAIAAAAAAAAAAAcAAAAAAAAAAAIDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAADAAAAAAAAAAAHAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAABAAAAAAAAAAABwAAAAAAAAAAAwMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAUAAAAAAAAAAAcAAAAAAAAAAAMAAAAAAAAAAAAEAAAAB3ZhbFJlYWwDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAAAAAAAAAAAAAHCQAAygAAAAIJAADJAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAAAgAAAAAAAAAAAQMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAEAAAAAAAAAAAcJAADKAAAAAgkAAMkAAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAADAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAgAAAAAAAAAABwkAAMoAAAACCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAQAAAAAAAAAAAMDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAADAAAAAAAAAAAHCQAAygAAAAIJAADJAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAABQAAAAAAAAAABAMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAQAAAAAAAAAAAcJAADKAAAAAgkAAMkAAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAAGAAAAAAAAAAAFAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAABQAAAAAAAAAABwkAAMoAAAACCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAcAAAAAAAAAAAYJAAACAAAAAQIAAAAgSW5jb3JyZWN0IHR5cGUgb2YgZ3Vlc3MgcHJvdmlkZWQEAAAABWlzV2luCQAAAAAAAAIJAADKAAAAAgUAAAAFZ3Vlc3MAAAAAAAAAAAEFAAAAB3ZhbFJlYWwEAAAAEmlzTW9uZXlTdGlsbEVub3VnaAkAAGYAAAACCQAAZAAAAAIJAABoAAAAAggFAAAACXBheW1lbnRUeAAAAAZhbW91bnQFAAAABWtvZWZmBQAAAA5taW5XaXRoZHJhd0ZlZQUAAAAHbmV3RmVlcwMDBQAAAAVpc1dpbgUAAAASaXNNb25leVN0aWxsRW5vdWdoBwkBAAAAASEAAAABBQAAAAppdHNUb29MYXRlBwcHAwkAAAAAAAACCQABkAAAAAEIBQAAAANkdHgAAAAEZGF0YQAAAAAAAAAAAwQAAAAGbWluQmV0AAAAAAAC+vCABAAAAAltYXhTdW1CZXQAAAAAADuaygAEAAAADnBheW1lbnRUeElkU3RyCQEAAAAHZXh0cmFjdAAAAAEICQABkQAAAAIIBQAAAANkdHgAAAAEZGF0YQAAAAAAAAAAAAAAAANrZXkEAAAACGd1ZXNzU3RyCQEAAAAHZXh0cmFjdAAAAAEJAAQTAAAAAggFAAAAA2R0eAAAAARkYXRhBQAAAA5wYXltZW50VHhJZFN0cgQAAAAPcGF5bWVudFJvdW5kS2V5CQABLAAAAAIFAAAADnBheW1lbnRUeElkU3RyAgAAAAZfcm91bmQEAAAADHBheW1lbnRSb3VuZAkBAAAAB2V4dHJhY3QAAAABCQAEEwAAAAIIBQAAAANkdHgAAAAEZGF0YQUAAAAPcGF5bWVudFJvdW5kS2V5BAAAAApzdW1CZXRzT2xkAwkBAAAACWlzRGVmaW5lZAAAAAEJAAQaAAAAAgUAAAACbWUJAAEsAAAAAgUAAAAMcGF5bWVudFJvdW5kAgAAAAhfYmV0c1N1bQkBAAAAB2V4dHJhY3QAAAABCQAEGgAAAAIFAAAAAm1lCQABLAAAAAIFAAAADHBheW1lbnRSb3VuZAIAAAAIX2JldHNTdW0AAAAAAAAAAAAEAAAACnN1bUJldHNOZXcJAQAAAAdleHRyYWN0AAAAAQkABBAAAAACCAUAAAADZHR4AAAABGRhdGEJAAEsAAAAAgUAAAAMcGF5bWVudFJvdW5kAgAAAAhfYmV0c1N1bQQAAAAZaXNQYXltZW50QWxyZWFkeU1lbnRpb25lZAkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAACbWUFAAAADnBheW1lbnRUeElkU3RyBAAAAAlwYXltZW50VHgJAAPoAAAAAQkAAlkAAAABBQAAAA5wYXltZW50VHhJZFN0cgQAAAAHJG1hdGNoMQUAAAAJcGF5bWVudFR4AwkAAAEAAAACBQAAAAckbWF0Y2gxAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAlwYXltZW50VHgFAAAAByRtYXRjaDEEAAAAEmlzRHR4U2lnbmVkQnlQYXllcgkAAfQAAAADCAUAAAADZHR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAADZHR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAACXBheW1lbnRUeAAAAA9zZW5kZXJQdWJsaWNLZXkEAAAADmNvcnJlY3RTdW1CZXRzCQAAZQAAAAIJAABkAAAAAgUAAAAKc3VtQmV0c09sZAgFAAAACXBheW1lbnRUeAAAAAZhbW91bnQIBQAAAANkdHgAAAADZmVlAwMDAwkAAAAAAAACCQAEJAAAAAEIBQAAAAlwYXltZW50VHgAAAAJcmVjaXBpZW50BQAAAAJtZQkBAAAAASEAAAABBQAAABlpc1BheW1lbnRBbHJlYWR5TWVudGlvbmVkBwMJAAAAAAAAAgUAAAAKc3VtQmV0c05ldwUAAAAOY29ycmVjdFN1bUJldHMGCQAAAgAAAAEJAAEsAAAAAgIAAAAlV3JvbmcgdmFsdWUgZm9yIFN1bSBvZiBCZXRzLiBNdXN0IGJlIAkAAaQAAAABBQAAAA5jb3JyZWN0U3VtQmV0cwcJAABmAAAAAgUAAAAJbWF4U3VtQmV0BQAAAApzdW1CZXRzTmV3BwMJAAAAAAAAAggFAAAAA2R0eAAAAANmZWUFAAAAEHJlZ2lzdGVyQmV0VHhGZWUGCQABLAAAAAIJAAACAAAAAQIAAAAxRmVlIG9mIGJldCByZWdpc3RyYXRpb24gZGF0YSB0cmFuc2FjdGlvbiBtdXN0IGJlIAkAAaQAAAABBQAAABByZWdpc3RlckJldFR4RmVlBwcHCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tleQOoejI=", "chainId": 84, "height": 491556, "spentComplexity": 0 } View: original | compacted Prev: 2J8tAzvvQ3SaBkLdkMybBdgPmUBizRN6D2aNSu2aXhmq Next: CupePerrro6a2mYSoMhiY4wRCnywEq52sE5WD5Ui9KK1 Diff:
OldNewDifferences
22 {-# CONTENT_TYPE EXPRESSION #-}
33 let me = tx.sender
44 let oracle = extract(addressFromString("3NCzaYTNDGtR8zf9yfcqePFjCqFx9S5zhs4"))
5-let minWithdrawFee = 400000
5+let minWithdrawFee = 500000
6+let registerBetTxFee = 500000
67 match tx {
78 case withdrawTx: TransferTransaction =>
89 let txId = extract(getString(me, (toBase58String(tx.proofs[1]) + "_withdraw")))
137138 case paymentTx: TransferTransaction =>
138139 let isDtxSignedByPayer = sigVerify(dtx.bodyBytes, dtx.proofs[0], paymentTx.senderPublicKey)
139140 let correctSumBets = ((sumBetsOld + paymentTx.amount) - dtx.fee)
140- if (if (if ((addressFromRecipient(paymentTx.recipient) == me))
141+ if (if (if (if ((addressFromRecipient(paymentTx.recipient) == me))
141142 then !(isPaymentAlreadyMentioned)
142143 else false)
143- then (sumBetsNew == correctSumBets)
144+ then if ((sumBetsNew == correctSumBets))
145+ then true
146+ else throw(("Wrong value for Sum of Bets. Must be " + toString(correctSumBets)))
144147 else false)
145148 then (maxSumBet > sumBetsNew)
149+ else false)
150+ then if ((dtx.fee == registerBetTxFee))
151+ then true
152+ else (throw("Fee of bet registration data transaction must be ") + toString(registerBetTxFee))
146153 else false
147154 case _ =>
148155 false
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 1 #-}
22 {-# CONTENT_TYPE EXPRESSION #-}
33 let me = tx.sender
44 let oracle = extract(addressFromString("3NCzaYTNDGtR8zf9yfcqePFjCqFx9S5zhs4"))
5-let minWithdrawFee = 400000
5+let minWithdrawFee = 500000
6+let registerBetTxFee = 500000
67 match tx {
78 case withdrawTx: TransferTransaction =>
89 let txId = extract(getString(me, (toBase58String(tx.proofs[1]) + "_withdraw")))
910 match transactionById(tx.proofs[1]) {
1011 case paymentTx: TransferTransaction =>
1112 let isPaymentTookPlace = if ((txId == toBase58String(tx.id)))
1213 then sigVerify(tx.bodyBytes, tx.proofs[0], paymentTx.senderPublicKey)
1314 else false
1415 let feesKey = (toBase58String(tx.proofs[1]) + "_withdraw_fees")
1516 let dataTxsFees = extract(getInteger(me, feesKey))
1617 let guess = extract(getBinary(me, toBase58String(tx.proofs[1])))
1718 let type = take(guess, 1)
1819 let val = drop(guess, 1)
1920 let key = extract(getString(me, (toBase58String(tx.proofs[1]) + "_round")))
2021 let valComplex = extract(getBinary(oracle, key))
2122 let koeff = if ((type == drop(toBytes(0), 7)))
2223 then 35
2324 else if ((type == drop(toBytes(1), 7)))
2425 then 2
2526 else if ((type == drop(toBytes(2), 7)))
2627 then 2
2728 else if ((type == drop(toBytes(3), 7)))
2829 then 2
2930 else if ((type == drop(toBytes(4), 7)))
3031 then 3
3132 else if ((type == drop(toBytes(5), 7)))
3233 then 3
3334 else 0
3435 let correctAmount = (((paymentTx.amount * koeff) - dataTxsFees) - withdrawTx.fee)
3536 let isAmountOk = (withdrawTx.amount == correctAmount)
3637 let isInWaves = if (!(isDefined(withdrawTx.feeAssetId)))
3738 then !(isDefined(withdrawTx.assetId))
3839 else false
3940 if (if (isPaymentTookPlace)
4041 then isAmountOk
4142 else false)
4243 then isInWaves
4344 else false
4445 case _ =>
4546 false
4647 }
4748 case dtx: DataTransaction =>
4849 if ((size(dtx.data) == 2))
4950 then {
5051 let isDataCountOk = (size(dtx.data) == 2)
5152 let paymentTxIdStr = dropRight(extract(dtx.data[0].key), 9)
5253 let feesKey = (paymentTxIdStr + "_withdraw_fees")
5354 let paymentTx = transactionById(fromBase58String(paymentTxIdStr))
5455 let newFees = extract(getInteger(dtx.data, feesKey))
5556 let oldFeesUnit = getInteger(me, feesKey)
5657 let oldFees = if (isDefined(oldFeesUnit))
5758 then extract(oldFeesUnit)
5859 else 0
5960 let isFeeCorrect = (newFees == (oldFees + dtx.fee))
6061 let withdrawTxIdUnit = getString(me, paymentTxIdStr)
6162 let isPaymentAlreadyMentioned = isDefined(withdrawTxIdUnit)
6263 let withdrawTransactionId = fromBase58String(extract(withdrawTxIdUnit))
6364 match paymentTx {
6465 case paymentTx: TransferTransaction =>
6566 let isDtxSignedByPayer = sigVerify(dtx.bodyBytes, dtx.proofs[0], paymentTx.senderPublicKey)
6667 if (if (if (if (if ((addressFromRecipient(paymentTx.recipient) == me))
6768 then if (!(isPaymentAlreadyMentioned))
6869 then true
6970 else !(isDefined(transactionById(withdrawTransactionId)))
7071 else false)
7172 then isDtxSignedByPayer
7273 else false)
7374 then isFeeCorrect
7475 else false)
7576 then isDataCountOk
7677 else false)
7778 then {
7879 let guess = extract(getBinary(me, paymentTxIdStr))
7980 let type = take(guess, 1)
8081 let key = extract(getString(me, (paymentTxIdStr + "_round")))
8182 let itsTooLate = isDefined(getString(me, (key + "_stop")))
8283 let valComplex = extract(getBinary(oracle, key))
8384 let koeff = if ((type == drop(toBytes(0), 7)))
8485 then 35
8586 else if ((type == drop(toBytes(1), 7)))
8687 then 2
8788 else if ((type == drop(toBytes(2), 7)))
8889 then 2
8990 else if ((type == drop(toBytes(3), 7)))
9091 then 2
9192 else if ((type == drop(toBytes(4), 7)))
9293 then 3
9394 else if ((type == drop(toBytes(5), 7)))
9495 then 3
9596 else 0
9697 let valReal = if ((type == drop(toBytes(0), 7)))
9798 then drop(take(valComplex, 2), 1)
9899 else if ((type == drop(toBytes(1), 7)))
99100 then drop(take(valComplex, 3), 2)
100101 else if ((type == drop(toBytes(2), 7)))
101102 then drop(take(valComplex, 4), 3)
102103 else if ((type == drop(toBytes(3), 7)))
103104 then drop(take(valComplex, 5), 4)
104105 else if ((type == drop(toBytes(4), 7)))
105106 then drop(take(valComplex, 6), 5)
106107 else if ((type == drop(toBytes(5), 7)))
107108 then drop(take(valComplex, 7), 6)
108109 else throw("Incorrect type of guess provided")
109110 let isWin = (drop(guess, 1) == valReal)
110111 let isMoneyStillEnough = (((paymentTx.amount * koeff) + minWithdrawFee) > newFees)
111112 if (if (isWin)
112113 then isMoneyStillEnough
113114 else false)
114115 then !(itsTooLate)
115116 else false
116117 }
117118 else false
118119 case _ =>
119120 false
120121 }
121122 }
122123 else if ((size(dtx.data) == 3))
123124 then {
124125 let minBet = 50000000
125126 let maxSumBet = 1000000000
126127 let paymentTxIdStr = extract(dtx.data[0].key)
127128 let guessStr = extract(getString(dtx.data, paymentTxIdStr))
128129 let paymentRoundKey = (paymentTxIdStr + "_round")
129130 let paymentRound = extract(getString(dtx.data, paymentRoundKey))
130131 let sumBetsOld = if (isDefined(getInteger(me, (paymentRound + "_betsSum"))))
131132 then extract(getInteger(me, (paymentRound + "_betsSum")))
132133 else 0
133134 let sumBetsNew = extract(getInteger(dtx.data, (paymentRound + "_betsSum")))
134135 let isPaymentAlreadyMentioned = isDefined(getString(me, paymentTxIdStr))
135136 let paymentTx = transactionById(fromBase58String(paymentTxIdStr))
136137 match paymentTx {
137138 case paymentTx: TransferTransaction =>
138139 let isDtxSignedByPayer = sigVerify(dtx.bodyBytes, dtx.proofs[0], paymentTx.senderPublicKey)
139140 let correctSumBets = ((sumBetsOld + paymentTx.amount) - dtx.fee)
140- if (if (if ((addressFromRecipient(paymentTx.recipient) == me))
141+ if (if (if (if ((addressFromRecipient(paymentTx.recipient) == me))
141142 then !(isPaymentAlreadyMentioned)
142143 else false)
143- then (sumBetsNew == correctSumBets)
144+ then if ((sumBetsNew == correctSumBets))
145+ then true
146+ else throw(("Wrong value for Sum of Bets. Must be " + toString(correctSumBets)))
144147 else false)
145148 then (maxSumBet > sumBetsNew)
149+ else false)
150+ then if ((dtx.fee == registerBetTxFee))
151+ then true
152+ else (throw("Fee of bet registration data transaction must be ") + toString(registerBetTxFee))
146153 else false
147154 case _ =>
148155 false
149156 }
150157 }
151158 else false
152159 case _ =>
153160 sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
154161 }

github/deemru/w8io/169f3d6 
47.94 ms