tx · BtmWorFzu3bCfTSnhE9htB8gL4SsNU9uxmBsw9Df2fR4

3MwR2FzFtbHeds3NzvkbiaYMVNhbtqcfRPU:  -0.01400000 Waves

2019.02.10 21:54 [489427] smart account 3MwR2FzFtbHeds3NzvkbiaYMVNhbtqcfRPU > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BtmWorFzu3bCfTSnhE9htB8gL4SsNU9uxmBsw9Df2fR4",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1549824931444,
    "version": 1,
    "sender": "3MwR2FzFtbHeds3NzvkbiaYMVNhbtqcfRPU",
    "senderPublicKey": "H5rtwGVnkSHDfz6msD7itGURoKMXvvDwPoup1VESxfjJ",
    "proofs": [
        "2g1so2yQ6n2gxVRcUV17NSsw94FEgZZqmnvVw1d55fJ9PcE79XiKDWjqa2YuNjUc4MTVpjU22YkDiuQZ6La9NrqQ"
    ],
    "script": "base64:AQQAAAACbWUIBQAAAAJ0eAAAAAZzZW5kZXIEAAAABm9yYWNsZQkBAAAAB2V4dHJhY3QAAAABCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzTkN6YVlUTkRHdFI4emY5eWZjcWVQRmpDcUZ4OVM1emhzNAQAAAAObWluV2l0aGRyYXdGZWUAAAAAAAAGGoAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAp3aXRoZHJhd1R4BQAAAAckbWF0Y2gwBAAAAAR0eElkCQEAAAAHZXh0cmFjdAAAAAEJAAQdAAAAAgUAAAACbWUJAAEsAAAAAgkAAlgAAAABCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAECAAAACV93aXRoZHJhdwQAAAAHJG1hdGNoMQkAA+gAAAABCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAEDCQAAAQAAAAIFAAAAByRtYXRjaDECAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAACXBheW1lbnRUeAUAAAAHJG1hdGNoMQQAAAASaXNQYXltZW50VG9va1BsYWNlAwkAAAAAAAACBQAAAAR0eElkCQACWAAAAAEIBQAAAAJ0eAAAAAJpZAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAlwYXltZW50VHgAAAAPc2VuZGVyUHVibGljS2V5BwQAAAAHZmVlc0tleQkAASwAAAACCQACWAAAAAEJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAQIAAAAOX3dpdGhkcmF3X2ZlZXMEAAAAC2RhdGFUeHNGZWVzCQEAAAAHZXh0cmFjdAAAAAEJAAQaAAAAAgUAAAACbWUFAAAAB2ZlZXNLZXkEAAAABWd1ZXNzCQEAAAAHZXh0cmFjdAAAAAEJAAQcAAAAAgUAAAACbWUJAAJYAAAAAQkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAABBAAAAAR0eXBlCQAAyQAAAAIFAAAABWd1ZXNzAAAAAAAAAAABBAAAAAN2YWwJAADKAAAAAgUAAAAFZ3Vlc3MAAAAAAAAAAAEEAAAAA2tleQkBAAAAB2V4dHJhY3QAAAABCQAEHQAAAAIFAAAAAm1lCQABLAAAAAIJAAJYAAAAAQkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAABAgAAAAZfcm91bmQEAAAACnZhbENvbXBsZXgJAQAAAAdleHRyYWN0AAAAAQkABBwAAAACBQAAAAZvcmFjbGUFAAAAA2tleQQAAAAFa29lZmYDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAAAAAAAAAAAAAHAAAAAAAAAAAjAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAQAAAAAAAAAABwAAAAAAAAAAAgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAIAAAAAAAAAAAcAAAAAAAAAAAIDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAADAAAAAAAAAAAHAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAABAAAAAAAAAAABwAAAAAAAAAAAwMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAUAAAAAAAAAAAcAAAAAAAAAAAMAAAAAAAAAAAAEAAAADWNvcnJlY3RBbW91bnQJAABlAAAAAgkAAGUAAAACCQAAaAAAAAIIBQAAAAlwYXltZW50VHgAAAAGYW1vdW50BQAAAAVrb2VmZgUAAAALZGF0YVR4c0ZlZXMIBQAAAAp3aXRoZHJhd1R4AAAAA2ZlZQQAAAAKaXNBbW91bnRPawkAAAAAAAACCAUAAAAKd2l0aGRyYXdUeAAAAAZhbW91bnQFAAAADWNvcnJlY3RBbW91bnQEAAAACWlzSW5XYXZlcwMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAp3aXRoZHJhd1R4AAAACmZlZUFzc2V0SWQJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAp3aXRoZHJhd1R4AAAAB2Fzc2V0SWQHAwMFAAAAEmlzUGF5bWVudFRvb2tQbGFjZQUAAAAKaXNBbW91bnRPawcFAAAACWlzSW5XYXZlcwcHAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAA2R0eAUAAAAHJG1hdGNoMAMJAAAAAAAAAgkAAZAAAAABCAUAAAADZHR4AAAABGRhdGEAAAAAAAAAAAIEAAAADWlzRGF0YUNvdW50T2sJAAAAAAAAAgkAAZAAAAABCAUAAAADZHR4AAAABGRhdGEAAAAAAAAAAAIEAAAADnBheW1lbnRUeElkU3RyCQEAAAAJZHJvcFJpZ2h0AAAAAgkBAAAAB2V4dHJhY3QAAAABCAkAAZEAAAACCAUAAAADZHR4AAAABGRhdGEAAAAAAAAAAAAAAAADa2V5AAAAAAAAAAAJBAAAAAdmZWVzS2V5CQABLAAAAAIFAAAADnBheW1lbnRUeElkU3RyAgAAAA5fd2l0aGRyYXdfZmVlcwQAAAAJcGF5bWVudFR4CQAD6AAAAAEJAAJZAAAAAQUAAAAOcGF5bWVudFR4SWRTdHIEAAAAB25ld0ZlZXMJAQAAAAdleHRyYWN0AAAAAQkABBAAAAACCAUAAAADZHR4AAAABGRhdGEFAAAAB2ZlZXNLZXkEAAAAB29sZEZlZXMDCQEAAAAJaXNEZWZpbmVkAAAAAQkABBoAAAACBQAAAAJtZQUAAAAHZmVlc0tleQkBAAAAB2V4dHJhY3QAAAABCQAEGgAAAAIFAAAAAm1lBQAAAAdmZWVzS2V5AAAAAAAAAAAABAAAAAxpc0ZlZUNvcnJlY3QJAAAAAAAAAgUAAAAHbmV3RmVlcwkAAGQAAAACBQAAAAdvbGRGZWVzCAUAAAADZHR4AAAAA2ZlZQQAAAAQd2l0aGRyYXdUeElkVW5pdAkABB0AAAACBQAAAAJtZQUAAAAOcGF5bWVudFR4SWRTdHIEAAAAGWlzUGF5bWVudEFscmVhZHlNZW50aW9uZWQJAQAAAAlpc0RlZmluZWQAAAABBQAAABB3aXRoZHJhd1R4SWRVbml0BAAAABV3aXRoZHJhd1RyYW5zYWN0aW9uSWQJAAJZAAAAAQkBAAAAB2V4dHJhY3QAAAABBQAAABB3aXRoZHJhd1R4SWRVbml0BAAAAAckbWF0Y2gxBQAAAAlwYXltZW50VHgDCQAAAQAAAAIFAAAAByRtYXRjaDECAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAACXBheW1lbnRUeAUAAAAHJG1hdGNoMQQAAAASaXNEdHhTaWduZWRCeVBheWVyCQAB9AAAAAMIBQAAAANkdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAANkdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAAJcGF5bWVudFR4AAAAD3NlbmRlclB1YmxpY0tleQMDAwMDCQEAAAABIQAAAAEFAAAAGWlzUGF5bWVudEFscmVhZHlNZW50aW9uZWQGCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCQAD6AAAAAEFAAAAFXdpdGhkcmF3VHJhbnNhY3Rpb25JZAUAAAASaXNEdHhTaWduZWRCeVBheWVyBwUAAAAMaXNGZWVDb3JyZWN0BwUAAAANaXNEYXRhQ291bnRPawcEAAAABWd1ZXNzCQEAAAAHZXh0cmFjdAAAAAEJAAQcAAAAAgUAAAACbWUFAAAADnBheW1lbnRUeElkU3RyBAAAAAR0eXBlCQAAyQAAAAIFAAAABWd1ZXNzAAAAAAAAAAABBAAAAANrZXkJAQAAAAdleHRyYWN0AAAAAQkABB0AAAACBQAAAAJtZQkAASwAAAACBQAAAA5wYXltZW50VHhJZFN0cgIAAAAGX3JvdW5kBAAAAAloZWlnaHRSZXMJAQAAAAdleHRyYWN0AAAAAQkABBoAAAACBQAAAAZvcmFjbGUJAAEsAAAAAgUAAAADa2V5AgAAAAZoZWlnaHQEAAAACWlzQ2hlYXRlcgkAAGcAAAACCQEAAAAHZXh0cmFjdAAAAAEJAAPpAAAAAQgFAAAACXBheW1lbnRUeAAAAAJpZAUAAAAJaGVpZ2h0UmVzBAAAAAp2YWxDb21wbGV4CQEAAAAHZXh0cmFjdAAAAAEJAAQcAAAAAgUAAAAGb3JhY2xlBQAAAANrZXkEAAAABWtvZWZmAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAAAAAAAAAAAABwAAAAAAAAAAIwMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAEAAAAAAAAAAAcAAAAAAAAAAAIDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAACAAAAAAAAAAAHAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAwAAAAAAAAAABwAAAAAAAAAAAgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAQAAAAAAAAAAAcAAAAAAAAAAAMDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAFAAAAAAAAAAAHAAAAAAAAAAADAAAAAAAAAAAABAAAAAd2YWxSZWFsAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAAAAAAAAAAAABwkAAMoAAAACCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAIAAAAAAAAAAAEDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAABAAAAAAAAAAAHCQAAygAAAAIJAADJAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAAAwAAAAAAAAAAAgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAIAAAAAAAAAAAcJAADKAAAAAgkAAMkAAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAAEAAAAAAAAAAADAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAwAAAAAAAAAABwkAAMoAAAACCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAUAAAAAAAAAAAQDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAEAAAAAAAAAAAHCQAAygAAAAIJAADJAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAABgAAAAAAAAAABQMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAUAAAAAAAAAAAcJAADKAAAAAgkAAMkAAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAAHAAAAAAAAAAAGCQAAAgAAAAECAAAAIEluY29ycmVjdCB0eXBlIG9mIGd1ZXNzIHByb3ZpZGVkBAAAAAVpc1dpbgkAAAAAAAACCQAAygAAAAIFAAAABWd1ZXNzAAAAAAAAAAABBQAAAAd2YWxSZWFsBAAAABJpc01vbmV5U3RpbGxFbm91Z2gJAABmAAAAAgkAAGQAAAACCQAAaAAAAAIIBQAAAAlwYXltZW50VHgAAAAGYW1vdW50BQAAAAVrb2VmZgUAAAAObWluV2l0aGRyYXdGZWUFAAAAB25ld0ZlZXMDAwUAAAAFaXNXaW4FAAAAEmlzTW9uZXlTdGlsbEVub3VnaAcJAQAAAAEhAAAAAQUAAAAJaXNDaGVhdGVyBwcHAwkAAAAAAAACCQABkAAAAAEIBQAAAANkdHgAAAAEZGF0YQAAAAAAAAAAAwQAAAAGbWluQmV0AAAAAAAC+vCABAAAAAltYXhTdW1CZXQAAAAAADuaygAEAAAADnBheW1lbnRUeElkU3RyCQEAAAAHZXh0cmFjdAAAAAEICQABkQAAAAIIBQAAAANkdHgAAAAEZGF0YQAAAAAAAAAAAAAAAANrZXkEAAAACGd1ZXNzU3RyCQEAAAAHZXh0cmFjdAAAAAEJAAQTAAAAAggFAAAAA2R0eAAAAARkYXRhBQAAAA5wYXltZW50VHhJZFN0cgQAAAAPcGF5bWVudFJvdW5kS2V5CQABLAAAAAIFAAAADnBheW1lbnRUeElkU3RyAgAAAAZfcm91bmQEAAAADHBheW1lbnRSb3VuZAkBAAAAB2V4dHJhY3QAAAABCQAEEwAAAAIIBQAAAANkdHgAAAAEZGF0YQUAAAAPcGF5bWVudFJvdW5kS2V5BAAAAApzdW1CZXRzT2xkAwkBAAAACWlzRGVmaW5lZAAAAAEJAAQaAAAAAgUAAAACbWUJAAEsAAAAAgUAAAAMcGF5bWVudFJvdW5kAgAAAAhfYmV0c1N1bQkBAAAAB2V4dHJhY3QAAAABCQAEGgAAAAIFAAAAAm1lCQABLAAAAAIFAAAADHBheW1lbnRSb3VuZAIAAAAIX2JldHNTdW0AAAAAAAAAAAAEAAAACnN1bUJldHNOZXcJAQAAAAdleHRyYWN0AAAAAQkABBAAAAACCAUAAAADZHR4AAAABGRhdGEJAAEsAAAAAgUAAAAMcGF5bWVudFJvdW5kAgAAAAhfYmV0c1N1bQQAAAAZaXNQYXltZW50QWxyZWFkeU1lbnRpb25lZAkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAACbWUFAAAADnBheW1lbnRUeElkU3RyBAAAAAlwYXltZW50VHgJAAPoAAAAAQkAAlkAAAABBQAAAA5wYXltZW50VHhJZFN0cgQAAAAHJG1hdGNoMQUAAAAJcGF5bWVudFR4AwkAAAEAAAACBQAAAAckbWF0Y2gxAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAlwYXltZW50VHgFAAAAByRtYXRjaDEEAAAAEmlzRHR4U2lnbmVkQnlQYXllcgkAAfQAAAADCAUAAAADZHR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAADZHR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAACXBheW1lbnRUeAAAAA9zZW5kZXJQdWJsaWNLZXkDAwkBAAAAASEAAAABBQAAABlpc1BheW1lbnRBbHJlYWR5TWVudGlvbmVkCQAAAAAAAAIFAAAACnN1bUJldHNOZXcJAABlAAAAAgkAAGQAAAACBQAAAApzdW1CZXRzT2xkCAUAAAAJcGF5bWVudFR4AAAABmFtb3VudAgFAAAAA2R0eAAAAANmZWUHAwkAAGYAAAACBQAAAApzdW1CZXRzTmV3BQAAAAltYXhTdW1CZXQGCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAJk1heGltdW0gYW1vdW50IG9mIGJldHMgZm9yIHRoaXMgcm91bmQgCQABpAAAAAEFAAAACW1heFN1bUJldAIAAAAVLiBXaXRoIHlvdXIgYmV0IGl0J3MgCQABpAAAAAEFAAAACnN1bUJldHNOZXcHBwcJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5MIWqyg==",
    "chainId": 84,
    "height": 489427,
    "spentComplexity": 0
}

View: original | compacted
Prev: A4jmJ1bbSkjoFxw1U9Z7gJXypBFDR7CE23HcXwHeDFKH
Next: 5jMqWNVuyt1WoyYge8GsrsMJivpcQoUKpPhZGPvwbDQR

Diff: 
Old
New
Differences
56
56
 
                    then extract(getInteger(me, feesKey))
57
57
 
                    else 0
58
58
 
                let isFeeCorrect = (newFees == (oldFees + dtx.fee))
59
-
                let isPaymentAlreadyMentioned = isDefined(getString(me, paymentTxIdStr))
60
-
                let withdrawTransactionId = fromBase58String(extract(getString(me, paymentTxIdStr)))
61
-
                let isWithdrawExist = isDefined(transactionById(withdrawTransactionId))
59
+
                let withdrawTxIdUnit = getString(me, paymentTxIdStr)
60
+
                let isPaymentAlreadyMentioned = isDefined(withdrawTxIdUnit)
61
+
                let withdrawTransactionId = fromBase58String(extract(withdrawTxIdUnit))
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
-
                            else !(isWithdrawExist))
67
+
                            else !(isDefined(transactionById(withdrawTransactionId))))
68
68
 
                            then isDtxSignedByPayer
69
69
 
                            else false)
70
70
 
                            then isFeeCorrect
74
74
 
                            then {
75
75
 
                                let guess = extract(getBinary(me, paymentTxIdStr))
76
76
 
                                let type = take(guess, 1)
77
-
                                let val = drop(guess, 1)
78
77
 
                                let key = extract(getString(me, (paymentTxIdStr + "_round")))
78
+
                                let heightRes = extract(getInteger(oracle, (key + "height")))
79
+
                                let isCheater = (extract(transactionHeightById(paymentTx.id)) >= heightRes)
79
80
 
                                let valComplex = extract(getBinary(oracle, key))
80
81
 
                                let koeff = if ((type == drop(toBytes(0), 7)))
81
82
 
                                    then 35
90
91
 
                                                    else if ((type == drop(toBytes(5), 7)))
91
92
 
                                                        then 3
92
93
 
                                                        else 0
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)))
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
-
                                                        else toBytes(38)
107
-
                                let isWin = if ((val == valReal))
108
-
                                    then (val != toBytes(38))
109
-
                                    else false
106
+
                                                        else throw("Incorrect type of guess provided")
107
+
                                let isWin = (drop(guess, 1) == valReal)
110
108
 
                                let isMoneyStillEnough = (((paymentTx.amount * koeff) + minWithdrawFee) > newFees)
111
-
                                if (isWin)
109
+
                                if (if (isWin)
112
110
 
                                    then isMoneyStillEnough
111
+
                                    else false)
112
+
                                    then !(isCheater)
113
113
 
                                    else false
114
114
 
                                }
115
115
 
                            else false
119
119
 
                }
120
120
 
            else if ((size(dtx.data) == 3))
121
121
 
                then {
122
+
                    let minBet = 50000000
123
+
                    let maxSumBet = 1000000000
122
124
 
                    let paymentTxIdStr = extract(dtx.data[0].key)
123
125
 
                    let guessStr = extract(getString(dtx.data, paymentTxIdStr))
124
126
 
                    let paymentRoundKey = (paymentTxIdStr + "_round")
132
134
 
                    match paymentTx {
133
135
 
                        case paymentTx: TransferTransaction => 
134
136
 
                            let isDtxSignedByPayer = sigVerify(dtx.bodyBytes, dtx.proofs[0], paymentTx.senderPublicKey)
135
-
                            if (!(isPaymentAlreadyMentioned))
137
+
                            if (if (!(isPaymentAlreadyMentioned))
136
138
 
                                then (sumBetsNew == ((sumBetsOld + paymentTx.amount) - dtx.fee))
139
+
                                else false)
140
+
                                then if ((sumBetsNew > maxSumBet))
141
+
                                    then true
142
+
                                    else throw(((("Maximum amount of bets for this round " + toString(maxSumBet)) + ". With your bet it's ") + toString(sumBetsNew)))
137
143
 
                                else false
138
144
 
                        case _ => 
139
145
 
                            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 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
-
                let isPaymentAlreadyMentioned = isDefined(getString(me, paymentTxIdStr))
60
-
                let withdrawTransactionId = fromBase58String(extract(getString(me, paymentTxIdStr)))
61
-
                let isWithdrawExist = isDefined(transactionById(withdrawTransactionId))
59
+
                let withdrawTxIdUnit = getString(me, paymentTxIdStr)
60
+
                let isPaymentAlreadyMentioned = isDefined(withdrawTxIdUnit)
61
+
                let withdrawTransactionId = fromBase58String(extract(withdrawTxIdUnit))
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
-
                            else !(isWithdrawExist))
67
+
                            else !(isDefined(transactionById(withdrawTransactionId))))
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
-
                                let val = drop(guess, 1)
78
77
 
                                let key = extract(getString(me, (paymentTxIdStr + "_round")))
78
+
                                let heightRes = extract(getInteger(oracle, (key + "height")))
79
+
                                let isCheater = (extract(transactionHeightById(paymentTx.id)) >= heightRes)
79
80
 
                                let valComplex = extract(getBinary(oracle, key))
80
81
 
                                let koeff = if ((type == drop(toBytes(0), 7)))
81
82
 
                                    then 35
82
83
 
                                    else if ((type == drop(toBytes(1), 7)))
83
84
 
                                        then 2
84
85
 
                                        else if ((type == drop(toBytes(2), 7)))
85
86
 
                                            then 2
86
87
 
                                            else if ((type == drop(toBytes(3), 7)))
87
88
 
                                                then 2
88
89
 
                                                else if ((type == drop(toBytes(4), 7)))
89
90
 
                                                    then 3
90
91
 
                                                    else if ((type == drop(toBytes(5), 7)))
91
92
 
                                                        then 3
92
93
 
                                                        else 0
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
-
                                                        else toBytes(38)
107
-
                                let isWin = if ((val == valReal))
108
-
                                    then (val != toBytes(38))
109
-
                                    else false
106
+
                                                        else throw("Incorrect type of guess provided")
107
+
                                let isWin = (drop(guess, 1) == valReal)
110
108
 
                                let isMoneyStillEnough = (((paymentTx.amount * koeff) + minWithdrawFee) > newFees)
111
-
                                if (isWin)
109
+
                                if (if (isWin)
112
110
 
                                    then isMoneyStillEnough
111
+
                                    else false)
112
+
                                    then !(isCheater)
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
+
                    let minBet = 50000000
123
+
                    let maxSumBet = 1000000000
122
124
 
                    let paymentTxIdStr = extract(dtx.data[0].key)
123
125
 
                    let guessStr = extract(getString(dtx.data, paymentTxIdStr))
124
126
 
                    let paymentRoundKey = (paymentTxIdStr + "_round")
125
127
 
                    let paymentRound = extract(getString(dtx.data, paymentRoundKey))
126
128
 
                    let sumBetsOld = if (isDefined(getInteger(me, (paymentRound + "_betsSum"))))
127
129
 
                        then extract(getInteger(me, (paymentRound + "_betsSum")))
128
130
 
                        else 0
129
131
 
                    let sumBetsNew = extract(getInteger(dtx.data, (paymentRound + "_betsSum")))
130
132
 
                    let isPaymentAlreadyMentioned = isDefined(getString(me, paymentTxIdStr))
131
133
 
                    let paymentTx = transactionById(fromBase58String(paymentTxIdStr))
132
134
 
                    match paymentTx {
133
135
 
                        case paymentTx: TransferTransaction => 
134
136
 
                            let isDtxSignedByPayer = sigVerify(dtx.bodyBytes, dtx.proofs[0], paymentTx.senderPublicKey)
135
-
                            if (!(isPaymentAlreadyMentioned))
137
+
                            if (if (!(isPaymentAlreadyMentioned))
136
138
 
                                then (sumBetsNew == ((sumBetsOld + paymentTx.amount) - dtx.fee))
139
+
                                else false)
140
+
                                then if ((sumBetsNew > maxSumBet))
141
+
                                    then true
142
+
                                    else throw(((("Maximum amount of bets for this round " + toString(maxSumBet)) + ". With your bet it's ") + toString(sumBetsNew)))
137
143
 
                                else false
138
144
 
                        case _ => 
139
145
 
                            false
140
146
 
                    }
141
147
 
                    }
142
148
 
                else false
143
149
 
    case _ => 
144
150
 
        sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
145
151
 
}

github/deemru/w8io/169f3d6 
65.99 ms ◑