tx · BDFs5ipHmHPQhEhdLEJr4PSWWBPtwsWJXK3nnXW59LZC

3MwR2FzFtbHeds3NzvkbiaYMVNhbtqcfRPU:  -0.01400000 Waves

2019.02.12 09:52 [491578] smart account 3MwR2FzFtbHeds3NzvkbiaYMVNhbtqcfRPU > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BDFs5ipHmHPQhEhdLEJr4PSWWBPtwsWJXK3nnXW59LZC",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1549954370026,
    "version": 1,
    "sender": "3MwR2FzFtbHeds3NzvkbiaYMVNhbtqcfRPU",
    "senderPublicKey": "H5rtwGVnkSHDfz6msD7itGURoKMXvvDwPoup1VESxfjJ",
    "proofs": [
        "4ANxWEnxQpd1pRo5sLmtWL6FD9WvoAwhBAfgbxsoZabrzCwPHdMCzevasM1PQjXyQq45HkMZHbS5KfdQb28PpJfj"
    ],
    "script": "base64:AQQAAAACbWUIBQAAAAJ0eAAAAAZzZW5kZXIEAAAABm9yYWNsZQkBAAAAB2V4dHJhY3QAAAABCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzTkN6YVlUTkRHdFI4emY5eWZjcWVQRmpDcUZ4OVM1emhzNAQAAAAObWluV2l0aGRyYXdGZWUAAAAAAAAHoSAEAAAAEHJlZ2lzdGVyQmV0VHhGZWUAAAAAAAAHoSAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAp3aXRoZHJhd1R4BQAAAAckbWF0Y2gwBAAAAAR0eElkCQEAAAAHZXh0cmFjdAAAAAEJAAQdAAAAAgUAAAACbWUJAAEsAAAAAgkAAlgAAAABCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAECAAAACV93aXRoZHJhdwQAAAAHJG1hdGNoMQkAA+gAAAABCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAEDCQAAAQAAAAIFAAAAByRtYXRjaDECAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAACXBheW1lbnRUeAUAAAAHJG1hdGNoMQQAAAASaXNQYXltZW50VG9va1BsYWNlAwkAAAAAAAACBQAAAAR0eElkCQACWAAAAAEIBQAAAAJ0eAAAAAJpZAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAlwYXltZW50VHgAAAAPc2VuZGVyUHVibGljS2V5BwQAAAAHZmVlc0tleQkAASwAAAACCQACWAAAAAEJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAQIAAAAOX3dpdGhkcmF3X2ZlZXMEAAAAC2RhdGFUeHNGZWVzCQEAAAAHZXh0cmFjdAAAAAEJAAQaAAAAAgUAAAACbWUFAAAAB2ZlZXNLZXkEAAAABWd1ZXNzCQEAAAAHZXh0cmFjdAAAAAEJAAQcAAAAAgUAAAACbWUJAAJYAAAAAQkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAABBAAAAAR0eXBlCQAAyQAAAAIFAAAABWd1ZXNzAAAAAAAAAAABBAAAAAN2YWwJAADKAAAAAgUAAAAFZ3Vlc3MAAAAAAAAAAAEEAAAAA2tleQkBAAAAB2V4dHJhY3QAAAABCQAEHQAAAAIFAAAAAm1lCQABLAAAAAIJAAJYAAAAAQkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAABAgAAAAZfcm91bmQEAAAACnZhbENvbXBsZXgJAQAAAAdleHRyYWN0AAAAAQkABBwAAAACBQAAAAZvcmFjbGUFAAAAA2tleQQAAAAFa29lZmYDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAAAAAAAAAAAAAHAAAAAAAAAAAjAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAQAAAAAAAAAABwAAAAAAAAAAAgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAIAAAAAAAAAAAcAAAAAAAAAAAIDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAADAAAAAAAAAAAHAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAABAAAAAAAAAAABwAAAAAAAAAAAwMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAUAAAAAAAAAAAcAAAAAAAAAAAMAAAAAAAAAAAAEAAAADWNvcnJlY3RBbW91bnQJAABlAAAAAgkAAGUAAAACCQAAaAAAAAIJAABlAAAAAggFAAAACXBheW1lbnRUeAAAAAZhbW91bnQFAAAAEHJlZ2lzdGVyQmV0VHhGZWUFAAAABWtvZWZmBQAAAAtkYXRhVHhzRmVlcwgFAAAACndpdGhkcmF3VHgAAAADZmVlBAAAAAlpc0luV2F2ZXMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAUAAAAKd2l0aGRyYXdUeAAAAApmZWVBc3NldElkCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAUAAAAKd2l0aGRyYXdUeAAAAAdhc3NldElkBwMDAwUAAAASaXNQYXltZW50VG9va1BsYWNlBgkAAAIAAAABAgAAABBUaGVyZSB3YXMgbm8gYmV0AwkAAAAAAAACCAUAAAAKd2l0aGRyYXdUeAAAAAZhbW91bnQFAAAADWNvcnJlY3RBbW91bnQGCQAAAgAAAAEJAAEsAAAAAgIAAAAnQW1vdW50IGlzIGluY29ycmVjdC4gQ29ycmVjdCBhbW91bnQgaXMgCQABpAAAAAEFAAAADWNvcnJlY3RBbW91bnQHAwMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAp3aXRoZHJhd1R4AAAACmZlZUFzc2V0SWQJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAp3aXRoZHJhd1R4AAAAB2Fzc2V0SWQHBgkAAAIAAAABAgAAACFXaXRoZHJhdyBhbmQgZmVlIG11c3QgYmUgaW4gV0FWRVMHBwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAPRGF0YVRyYW5zYWN0aW9uBAAAAANkdHgFAAAAByRtYXRjaDADCQAAAAAAAAIJAAGQAAAAAQgFAAAAA2R0eAAAAARkYXRhAAAAAAAAAAACBAAAAA1pc0RhdGFDb3VudE9rCQAAAAAAAAIJAAGQAAAAAQgFAAAAA2R0eAAAAARkYXRhAAAAAAAAAAACBAAAAA5wYXltZW50VHhJZFN0cgkBAAAACWRyb3BSaWdodAAAAAIJAQAAAAdleHRyYWN0AAAAAQgJAAGRAAAAAggFAAAAA2R0eAAAAARkYXRhAAAAAAAAAAAAAAAAA2tleQAAAAAAAAAACQQAAAAHZmVlc0tleQkAASwAAAACBQAAAA5wYXltZW50VHhJZFN0cgIAAAAOX3dpdGhkcmF3X2ZlZXMEAAAACXBheW1lbnRUeAkAA+gAAAABCQACWQAAAAEFAAAADnBheW1lbnRUeElkU3RyBAAAAAduZXdGZWVzCQEAAAAHZXh0cmFjdAAAAAEJAAQQAAAAAggFAAAAA2R0eAAAAARkYXRhBQAAAAdmZWVzS2V5BAAAAAtvbGRGZWVzVW5pdAkABBoAAAACBQAAAAJtZQUAAAAHZmVlc0tleQQAAAAHb2xkRmVlcwMJAQAAAAlpc0RlZmluZWQAAAABBQAAAAtvbGRGZWVzVW5pdAkBAAAAB2V4dHJhY3QAAAABBQAAAAtvbGRGZWVzVW5pdAAAAAAAAAAAAAQAAAAMaXNGZWVDb3JyZWN0CQAAAAAAAAIFAAAAB25ld0ZlZXMJAABkAAAAAgUAAAAHb2xkRmVlcwgFAAAAA2R0eAAAAANmZWUEAAAAEHdpdGhkcmF3VHhJZFVuaXQJAAQdAAAAAgUAAAACbWUFAAAADnBheW1lbnRUeElkU3RyBAAAABlpc1BheW1lbnRBbHJlYWR5TWVudGlvbmVkCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAAQd2l0aGRyYXdUeElkVW5pdAQAAAAVd2l0aGRyYXdUcmFuc2FjdGlvbklkCQACWQAAAAEJAQAAAAdleHRyYWN0AAAAAQUAAAAQd2l0aGRyYXdUeElkVW5pdAQAAAAHJG1hdGNoMQUAAAAJcGF5bWVudFR4AwkAAAEAAAACBQAAAAckbWF0Y2gxAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAlwYXltZW50VHgFAAAAByRtYXRjaDEEAAAAEmlzRHR4U2lnbmVkQnlQYXllcgkAAfQAAAADCAUAAAADZHR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAADZHR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAACXBheW1lbnRUeAAAAA9zZW5kZXJQdWJsaWNLZXkDAwMDAwkAAAAAAAACCQAEJAAAAAEIBQAAAAlwYXltZW50VHgAAAAJcmVjaXBpZW50BQAAAAJtZQMJAQAAAAEhAAAAAQUAAAAZaXNQYXltZW50QWxyZWFkeU1lbnRpb25lZAYJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAAPoAAAAAQUAAAAVd2l0aGRyYXdUcmFuc2FjdGlvbklkBwUAAAASaXNEdHhTaWduZWRCeVBheWVyBwUAAAAMaXNGZWVDb3JyZWN0BwUAAAANaXNEYXRhQ291bnRPawcEAAAABWd1ZXNzCQEAAAAHZXh0cmFjdAAAAAEJAAQcAAAAAgUAAAACbWUFAAAADnBheW1lbnRUeElkU3RyBAAAAAR0eXBlCQAAyQAAAAIFAAAABWd1ZXNzAAAAAAAAAAABBAAAAANrZXkJAQAAAAdleHRyYWN0AAAAAQkABB0AAAACBQAAAAJtZQkAASwAAAACBQAAAA5wYXltZW50VHhJZFN0cgIAAAAGX3JvdW5kBAAAAAppdHNUb29MYXRlCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAJtZQkAASwAAAACBQAAAANrZXkCAAAABV9zdG9wBAAAAAp2YWxDb21wbGV4CQEAAAAHZXh0cmFjdAAAAAEJAAQcAAAAAgUAAAAGb3JhY2xlBQAAAANrZXkEAAAABWtvZWZmAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAAAAAAAAAAAABwAAAAAAAAAAIwMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAEAAAAAAAAAAAcAAAAAAAAAAAIDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAACAAAAAAAAAAAHAAAAAAAAAAACAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAwAAAAAAAAAABwAAAAAAAAAAAgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAQAAAAAAAAAAAcAAAAAAAAAAAMDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAFAAAAAAAAAAAHAAAAAAAAAAADAAAAAAAAAAAABAAAAAd2YWxSZWFsAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAAAAAAAAAAAABwkAAMoAAAACCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAIAAAAAAAAAAAEDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAABAAAAAAAAAAAHCQAAygAAAAIJAADJAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAAAwAAAAAAAAAAAgMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAIAAAAAAAAAAAcJAADKAAAAAgkAAMkAAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAAEAAAAAAAAAAADAwkAAAAAAAACBQAAAAR0eXBlCQAAygAAAAIJAAGaAAAAAQAAAAAAAAAAAwAAAAAAAAAABwkAAMoAAAACCQAAyQAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAUAAAAAAAAAAAQDCQAAAAAAAAIFAAAABHR5cGUJAADKAAAAAgkAAZoAAAABAAAAAAAAAAAEAAAAAAAAAAAHCQAAygAAAAIJAADJAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAABgAAAAAAAAAABQMJAAAAAAAAAgUAAAAEdHlwZQkAAMoAAAACCQABmgAAAAEAAAAAAAAAAAUAAAAAAAAAAAcJAADKAAAAAgkAAMkAAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAAHAAAAAAAAAAAGCQAAAgAAAAECAAAAIEluY29ycmVjdCB0eXBlIG9mIGd1ZXNzIHByb3ZpZGVkBAAAAAVpc1dpbgkAAAAAAAACCQAAygAAAAIFAAAABWd1ZXNzAAAAAAAAAAABBQAAAAd2YWxSZWFsBAAAABJpc01vbmV5U3RpbGxFbm91Z2gJAABmAAAAAgkAAGQAAAACCQAAaAAAAAIJAABlAAAAAggFAAAACXBheW1lbnRUeAAAAAZhbW91bnQFAAAAEHJlZ2lzdGVyQmV0VHhGZWUFAAAABWtvZWZmBQAAAA5taW5XaXRoZHJhd0ZlZQUAAAAHbmV3RmVlcwMDBQAAAAVpc1dpbgUAAAASaXNNb25leVN0aWxsRW5vdWdoBwkBAAAAASEAAAABBQAAAAppdHNUb29MYXRlBwcHAwkAAAAAAAACCQABkAAAAAEIBQAAAANkdHgAAAAEZGF0YQAAAAAAAAAAAwQAAAAGbWluQmV0AAAAAAAC+vCABAAAAAltYXhTdW1CZXQAAAAAADuaygAEAAAADnBheW1lbnRUeElkU3RyCQEAAAAHZXh0cmFjdAAAAAEICQABkQAAAAIIBQAAAANkdHgAAAAEZGF0YQAAAAAAAAAAAAAAAANrZXkEAAAACGd1ZXNzU3RyCQEAAAAHZXh0cmFjdAAAAAEJAAQTAAAAAggFAAAAA2R0eAAAAARkYXRhBQAAAA5wYXltZW50VHhJZFN0cgQAAAAPcGF5bWVudFJvdW5kS2V5CQABLAAAAAIFAAAADnBheW1lbnRUeElkU3RyAgAAAAZfcm91bmQEAAAADHBheW1lbnRSb3VuZAkBAAAAB2V4dHJhY3QAAAABCQAEEwAAAAIIBQAAAANkdHgAAAAEZGF0YQUAAAAPcGF5bWVudFJvdW5kS2V5BAAAAApzdW1CZXRzT2xkAwkBAAAACWlzRGVmaW5lZAAAAAEJAAQaAAAAAgUAAAACbWUJAAEsAAAAAgUAAAAMcGF5bWVudFJvdW5kAgAAAAhfYmV0c1N1bQkBAAAAB2V4dHJhY3QAAAABCQAEGgAAAAIFAAAAAm1lCQABLAAAAAIFAAAADHBheW1lbnRSb3VuZAIAAAAIX2JldHNTdW0AAAAAAAAAAAAEAAAACnN1bUJldHNOZXcJAQAAAAdleHRyYWN0AAAAAQkABBAAAAACCAUAAAADZHR4AAAABGRhdGEJAAEsAAAAAgUAAAAMcGF5bWVudFJvdW5kAgAAAAhfYmV0c1N1bQQAAAAZaXNQYXltZW50QWxyZWFkeU1lbnRpb25lZAkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAACbWUFAAAADnBheW1lbnRUeElkU3RyBAAAAAlwYXltZW50VHgJAAPoAAAAAQkAAlkAAAABBQAAAA5wYXltZW50VHhJZFN0cgQAAAAHJG1hdGNoMQUAAAAJcGF5bWVudFR4AwkAAAEAAAACBQAAAAckbWF0Y2gxAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAlwYXltZW50VHgFAAAAByRtYXRjaDEEAAAAEmlzRHR4U2lnbmVkQnlQYXllcgkAAfQAAAADCAUAAAADZHR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAADZHR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAACXBheW1lbnRUeAAAAA9zZW5kZXJQdWJsaWNLZXkEAAAADmNvcnJlY3RTdW1CZXRzCQAAZQAAAAIJAABkAAAAAgUAAAAKc3VtQmV0c09sZAgFAAAACXBheW1lbnRUeAAAAAZhbW91bnQIBQAAAANkdHgAAAADZmVlAwMDAwkAAAAAAAACCQAEJAAAAAEIBQAAAAlwYXltZW50VHgAAAAJcmVjaXBpZW50BQAAAAJtZQkBAAAAASEAAAABBQAAABlpc1BheW1lbnRBbHJlYWR5TWVudGlvbmVkBwMJAAAAAAAAAgUAAAAKc3VtQmV0c05ldwUAAAAOY29ycmVjdFN1bUJldHMGCQAAAgAAAAEJAAEsAAAAAgIAAAAlV3JvbmcgdmFsdWUgZm9yIFN1bSBvZiBCZXRzLiBNdXN0IGJlIAkAAaQAAAABBQAAAA5jb3JyZWN0U3VtQmV0cwcDCQAAZgAAAAIFAAAACW1heFN1bUJldAUAAAAKc3VtQmV0c05ldwYJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAhTWF4aW11bSBhbW91bnQgb2YgYmV0cyBmb3Igcm91bmQgCQABpAAAAAEFAAAACW1heFN1bUJldAIAAAAVLiBXaXRoIHlvdXIgYmV0IGl0J3MgCQABpAAAAAEFAAAACnN1bUJldHNOZXcHAwkAAAAAAAACCAUAAAADZHR4AAAAA2ZlZQUAAAAQcmVnaXN0ZXJCZXRUeEZlZQYJAAACAAAAAQkAASwAAAACAgAAADFGZWUgb2YgYmV0IHJlZ2lzdHJhdGlvbiBkYXRhIHRyYW5zYWN0aW9uIG11c3QgYmUgCQABpAAAAAEFAAAAEHJlZ2lzdGVyQmV0VHhGZWUHBwcJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5zemhUw==",
    "chainId": 84,
    "height": 491578,
    "spentComplexity": 0
}

View: original | compacted
Prev: 8Ys4geCLmhMuMsMePPTcSHn2dv7ApYBeoeBk7akcyto6
Next: B7XboCLWGEZEALiaT6tJSMqQy6j6UZoD7dN3oQxJrdCT

Diff: 
Old
New
Differences
33
33
 
                                        then 3
34
34
 
                                        else 0
35
35
 
                let correctAmount = ((((paymentTx.amount - registerBetTxFee) * koeff) - dataTxsFees) - withdrawTx.fee)
36
-
                let isAmountOk = (withdrawTx.amount == correctAmount)
37
36
 
                let isInWaves = if (!(isDefined(withdrawTx.feeAssetId)))
38
37
 
                    then !(isDefined(withdrawTx.assetId))
39
38
 
                    else false
40
-
                if (if (isPaymentTookPlace)
41
-
                    then isAmountOk
39
+
                if (if (if (isPaymentTookPlace)
40
+
                    then true
41
+
                    else throw("There was no bet"))
42
+
                    then if ((withdrawTx.amount == correctAmount))
43
+
                        then true
44
+
                        else throw(("Amount is incorrect. Correct amount is " + toString(correctAmount)))
42
45
 
                    else false)
43
-
                    then isInWaves
46
+
                    then if (if (!(isDefined(withdrawTx.feeAssetId)))
47
+
                        then !(isDefined(withdrawTx.assetId))
48
+
                        else false)
49
+
                        then true
50
+
                        else throw("Withdraw and fee must be in WAVES")
44
51
 
                    else false
45
52
 
            case _ => 
46
53
 
                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 = 500000
6
6
 
let registerBetTxFee = 500000
7
7
 
match tx {
8
8
 
    case withdrawTx: TransferTransaction => 
9
9
 
        let txId = extract(getString(me, (toBase58String(tx.proofs[1]) + "_withdraw")))
10
10
 
        match transactionById(tx.proofs[1]) {
11
11
 
            case paymentTx: TransferTransaction => 
12
12
 
                let isPaymentTookPlace = if ((txId == toBase58String(tx.id)))
13
13
 
                    then sigVerify(tx.bodyBytes, tx.proofs[0], paymentTx.senderPublicKey)
14
14
 
                    else false
15
15
 
                let feesKey = (toBase58String(tx.proofs[1]) + "_withdraw_fees")
16
16
 
                let dataTxsFees = extract(getInteger(me, feesKey))
17
17
 
                let guess = extract(getBinary(me, toBase58String(tx.proofs[1])))
18
18
 
                let type = take(guess, 1)
19
19
 
                let val = drop(guess, 1)
20
20
 
                let key = extract(getString(me, (toBase58String(tx.proofs[1]) + "_round")))
21
21
 
                let valComplex = extract(getBinary(oracle, key))
22
22
 
                let koeff = if ((type == drop(toBytes(0), 7)))
23
23
 
                    then 35
24
24
 
                    else if ((type == drop(toBytes(1), 7)))
25
25
 
                        then 2
26
26
 
                        else if ((type == drop(toBytes(2), 7)))
27
27
 
                            then 2
28
28
 
                            else if ((type == drop(toBytes(3), 7)))
29
29
 
                                then 2
30
30
 
                                else if ((type == drop(toBytes(4), 7)))
31
31
 
                                    then 3
32
32
 
                                    else if ((type == drop(toBytes(5), 7)))
33
33
 
                                        then 3
34
34
 
                                        else 0
35
35
 
                let correctAmount = ((((paymentTx.amount - registerBetTxFee) * koeff) - dataTxsFees) - withdrawTx.fee)
36
-
                let isAmountOk = (withdrawTx.amount == correctAmount)
37
36
 
                let isInWaves = if (!(isDefined(withdrawTx.feeAssetId)))
38
37
 
                    then !(isDefined(withdrawTx.assetId))
39
38
 
                    else false
40
-
                if (if (isPaymentTookPlace)
41
-
                    then isAmountOk
39
+
                if (if (if (isPaymentTookPlace)
40
+
                    then true
41
+
                    else throw("There was no bet"))
42
+
                    then if ((withdrawTx.amount == correctAmount))
43
+
                        then true
44
+
                        else throw(("Amount is incorrect. Correct amount is " + toString(correctAmount)))
42
45
 
                    else false)
43
-
                    then isInWaves
46
+
                    then if (if (!(isDefined(withdrawTx.feeAssetId)))
47
+
                        then !(isDefined(withdrawTx.assetId))
48
+
                        else false)
49
+
                        then true
50
+
                        else throw("Withdraw and fee must be in WAVES")
44
51
 
                    else false
45
52
 
            case _ => 
46
53
 
                false
47
54
 
        }
48
55
 
    case dtx: DataTransaction => 
49
56
 
        if ((size(dtx.data) == 2))
50
57
 
            then {
51
58
 
                let isDataCountOk = (size(dtx.data) == 2)
52
59
 
                let paymentTxIdStr = dropRight(extract(dtx.data[0].key), 9)
53
60
 
                let feesKey = (paymentTxIdStr + "_withdraw_fees")
54
61
 
                let paymentTx = transactionById(fromBase58String(paymentTxIdStr))
55
62
 
                let newFees = extract(getInteger(dtx.data, feesKey))
56
63
 
                let oldFeesUnit = getInteger(me, feesKey)
57
64
 
                let oldFees = if (isDefined(oldFeesUnit))
58
65
 
                    then extract(oldFeesUnit)
59
66
 
                    else 0
60
67
 
                let isFeeCorrect = (newFees == (oldFees + dtx.fee))
61
68
 
                let withdrawTxIdUnit = getString(me, paymentTxIdStr)
62
69
 
                let isPaymentAlreadyMentioned = isDefined(withdrawTxIdUnit)
63
70
 
                let withdrawTransactionId = fromBase58String(extract(withdrawTxIdUnit))
64
71
 
                match paymentTx {
65
72
 
                    case paymentTx: TransferTransaction => 
66
73
 
                        let isDtxSignedByPayer = sigVerify(dtx.bodyBytes, dtx.proofs[0], paymentTx.senderPublicKey)
67
74
 
                        if (if (if (if (if ((addressFromRecipient(paymentTx.recipient) == me))
68
75
 
                            then if (!(isPaymentAlreadyMentioned))
69
76
 
                                then true
70
77
 
                                else !(isDefined(transactionById(withdrawTransactionId)))
71
78
 
                            else false)
72
79
 
                            then isDtxSignedByPayer
73
80
 
                            else false)
74
81
 
                            then isFeeCorrect
75
82
 
                            else false)
76
83
 
                            then isDataCountOk
77
84
 
                            else false)
78
85
 
                            then {
79
86
 
                                let guess = extract(getBinary(me, paymentTxIdStr))
80
87
 
                                let type = take(guess, 1)
81
88
 
                                let key = extract(getString(me, (paymentTxIdStr + "_round")))
82
89
 
                                let itsTooLate = isDefined(getString(me, (key + "_stop")))
83
90
 
                                let valComplex = extract(getBinary(oracle, key))
84
91
 
                                let koeff = if ((type == drop(toBytes(0), 7)))
85
92
 
                                    then 35
86
93
 
                                    else if ((type == drop(toBytes(1), 7)))
87
94
 
                                        then 2
88
95
 
                                        else if ((type == drop(toBytes(2), 7)))
89
96
 
                                            then 2
90
97
 
                                            else if ((type == drop(toBytes(3), 7)))
91
98
 
                                                then 2
92
99
 
                                                else if ((type == drop(toBytes(4), 7)))
93
100
 
                                                    then 3
94
101
 
                                                    else if ((type == drop(toBytes(5), 7)))
95
102
 
                                                        then 3
96
103
 
                                                        else 0
97
104
 
                                let valReal = if ((type == drop(toBytes(0), 7)))
98
105
 
                                    then drop(take(valComplex, 2), 1)
99
106
 
                                    else if ((type == drop(toBytes(1), 7)))
100
107
 
                                        then drop(take(valComplex, 3), 2)
101
108
 
                                        else if ((type == drop(toBytes(2), 7)))
102
109
 
                                            then drop(take(valComplex, 4), 3)
103
110
 
                                            else if ((type == drop(toBytes(3), 7)))
104
111
 
                                                then drop(take(valComplex, 5), 4)
105
112
 
                                                else if ((type == drop(toBytes(4), 7)))
106
113
 
                                                    then drop(take(valComplex, 6), 5)
107
114
 
                                                    else if ((type == drop(toBytes(5), 7)))
108
115
 
                                                        then drop(take(valComplex, 7), 6)
109
116
 
                                                        else throw("Incorrect type of guess provided")
110
117
 
                                let isWin = (drop(guess, 1) == valReal)
111
118
 
                                let isMoneyStillEnough = ((((paymentTx.amount - registerBetTxFee) * koeff) + minWithdrawFee) > newFees)
112
119
 
                                if (if (isWin)
113
120
 
                                    then isMoneyStillEnough
114
121
 
                                    else false)
115
122
 
                                    then !(itsTooLate)
116
123
 
                                    else false
117
124
 
                                }
118
125
 
                            else false
119
126
 
                    case _ => 
120
127
 
                        false
121
128
 
                }
122
129
 
                }
123
130
 
            else if ((size(dtx.data) == 3))
124
131
 
                then {
125
132
 
                    let minBet = 50000000
126
133
 
                    let maxSumBet = 1000000000
127
134
 
                    let paymentTxIdStr = extract(dtx.data[0].key)
128
135
 
                    let guessStr = extract(getString(dtx.data, paymentTxIdStr))
129
136
 
                    let paymentRoundKey = (paymentTxIdStr + "_round")
130
137
 
                    let paymentRound = extract(getString(dtx.data, paymentRoundKey))
131
138
 
                    let sumBetsOld = if (isDefined(getInteger(me, (paymentRound + "_betsSum"))))
132
139
 
                        then extract(getInteger(me, (paymentRound + "_betsSum")))
133
140
 
                        else 0
134
141
 
                    let sumBetsNew = extract(getInteger(dtx.data, (paymentRound + "_betsSum")))
135
142
 
                    let isPaymentAlreadyMentioned = isDefined(getString(me, paymentTxIdStr))
136
143
 
                    let paymentTx = transactionById(fromBase58String(paymentTxIdStr))
137
144
 
                    match paymentTx {
138
145
 
                        case paymentTx: TransferTransaction => 
139
146
 
                            let isDtxSignedByPayer = sigVerify(dtx.bodyBytes, dtx.proofs[0], paymentTx.senderPublicKey)
140
147
 
                            let correctSumBets = ((sumBetsOld + paymentTx.amount) - dtx.fee)
141
148
 
                            if (if (if (if ((addressFromRecipient(paymentTx.recipient) == me))
142
149
 
                                then !(isPaymentAlreadyMentioned)
143
150
 
                                else false)
144
151
 
                                then if ((sumBetsNew == correctSumBets))
145
152
 
                                    then true
146
153
 
                                    else throw(("Wrong value for Sum of Bets. Must be " + toString(correctSumBets)))
147
154
 
                                else false)
148
155
 
                                then if ((maxSumBet > sumBetsNew))
149
156
 
                                    then true
150
157
 
                                    else throw(((("Maximum amount of bets for round " + toString(maxSumBet)) + ". With your bet it's ") + toString(sumBetsNew)))
151
158
 
                                else false)
152
159
 
                                then if ((dtx.fee == registerBetTxFee))
153
160
 
                                    then true
154
161
 
                                    else throw(("Fee of bet registration data transaction must be " + toString(registerBetTxFee)))
155
162
 
                                else false
156
163
 
                        case _ => 
157
164
 
                            false
158
165
 
                    }
159
166
 
                    }
160
167
 
                else false
161
168
 
    case _ => 
162
169
 
        sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
163
170
 
}

github/deemru/w8io/169f3d6 
43.05 ms ◑