tx · nZ5dojutrrLe6L2pez8Te1wUBGVHN34gbTXkXX2ZZyq

3N6hQF6HBBQ5JCKB8Xs17Q61wkG3VrLvbGd:  -0.10000000 Waves

2021.12.01 02:45 [1814449] smart account 3N6hQF6HBBQ5JCKB8Xs17Q61wkG3VrLvbGd > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "nZ5dojutrrLe6L2pez8Te1wUBGVHN34gbTXkXX2ZZyq",
    "fee": 10000000,
    "feeAssetId": null,
    "timestamp": 1638315907054,
    "version": 2,
    "chainId": 84,
    "sender": "3N6hQF6HBBQ5JCKB8Xs17Q61wkG3VrLvbGd",
    "senderPublicKey": "7Hi4o6vBstRs79NMVMjEove52dmP87RAcvNDAXN8C4Wi",
    "proofs": [
        "5oJSDtEJFwE4G6AtjnFvg7wYHyVF52Gf7KYxbG7xqFRqScG1QkGe5u9jiP7aWsVniWwm9zrraLLdPHiJzmYxNcCD"
    ],
    "script": "base64:AAIFAAAAAAAAA0wIAhIDCgEIEgMKAQgaDAoCYTESBmNhc2lubxoLCgJhMhIFV0FWRVMaDAoCYTMSBm1heEJldBoPCgJhNBIJc2VwYXJhdG9yGhAKAmE1EgpnZXROZXdEZWNrGg0KAmE2EgdnZXREZWNrGgoKAmE3EgRkZWNrGhUKAmE4Eg9nZXRSYW5kb21OdW1iZXIaCwoCYTkSBXNhbHQxGgsKAmIxEgVzYWx0MhoSCgJiMhIMYW5zd2Vyc0NvdW50GgoKAmIzEgRoYXNoGgsKAmI0EgVpbmRleBoKCgJiNRIEcmFuZBodCgJiNhIXZ2V0UHJldmlvdXNSYW5kb21OdW1iZXIaDQoCYjcSB2FkZHJlc3MaDQoCYjgSByRtYXRjaDAaFQoCYjkSD2dldEFtb3VudE9yWmVybxoKCgJjMRIEdGhpcxoJCgJjMhIDa2V5GhAKAmMzEgpnZXRQYXltZW50GgkKAmM0EgNwbXQaEgoCYzUSDGdldENhcmRWYWx1ZRoQCgJjNhIKc3RyaW5nQ2FyZBoPCgJjNxIJZ2V0V2lubmVyGhAKAmM4EgpjYXJkUGxheWVyGhAKAmM5EgpjYXJkQ2FzaW5vGhMKAmQxEg1jYWxsZXJBZGRyZXNzGhYKAmQyEhBnZXRBdmFpbGFibGVEZWNrGhMKAmQzEg1hdmFpbGFibGVQcm9wGhAKAmQ0EgpzdHJpbmdEZWNrGgsKAmQ1EgVyb3VuZBoLCgJkNhIFbWVLZXkaEgoCZDcSDHJvdW5kQmV0c0tleRoQCgJkOBIKY3VyU3VtQmV0cxoSCgJkORIMY3VycmVudERyYXdzGhMKAmUxEg1jdXJyZW50UGxheWVyGhAKAmUyEgpuZXdTdW1CZXRzGgwKAmUzEgZhdkRlY2saGAoCZTQSEmNhcmRQb3NpdGlvblBsYXllchoNCgJlNRIHYXZEZWNrMRoNCgJlNhIHYXZEZWNrMhoYCgJlNxISY2FyZFBvc2l0aW9uQ2FzaW5vGg0KAmU4EgdhdkRlY2szGgwKAmU5EgZ3aW5uZXIaEQoCZjESC3dpdGhkcmF3S2V5GgwKAmYyEgZwbGF5ZXIaDwoCZjMSCWN1clN1bUJldBoMCgJmNBIGdmVyaWZ5AAAADQAAAAACYTECAAAAIzNNdGFDTDR2MWJqVGFiVXFzN29VNG9mUzhmYmFpMzRXTTFpAAAAAAJhMgAAAAAAO5rKAAAAAAACYTMJAABoAAAAAgAAAAAAAAAAZAUAAAACYTIAAAAAAmE0AgAAAAEsAQAAAAJhNQAAAAAJAARMAAAAAgIAAAADMDFDCQAETAAAAAICAAAAAzAyQwkABEwAAAACAgAAAAMwM0MJAARMAAAAAgIAAAADMDRDCQAETAAAAAICAAAAAzA1QwkABEwAAAACAgAAAAMwNkMJAARMAAAAAgIAAAADMDdDCQAETAAAAAICAAAAAzA4QwkABEwAAAACAgAAAAMwOUMJAARMAAAAAgIAAAADMTBDCQAETAAAAAICAAAAAzExQwkABEwAAAACAgAAAAMxMkMJAARMAAAAAgIAAAADMTNDCQAETAAAAAICAAAAAzAxRAkABEwAAAACAgAAAAMwMkQJAARMAAAAAgIAAAADMDNECQAETAAAAAICAAAAAzA0RAkABEwAAAACAgAAAAMwNUQJAARMAAAAAgIAAAADMDZECQAETAAAAAICAAAAAzA3RAkABEwAAAACAgAAAAMwOEQJAARMAAAAAgIAAAADMDlECQAETAAAAAICAAAAAzEwRAkABEwAAAACAgAAAAMxMUQJAARMAAAAAgIAAAADMTJECQAETAAAAAICAAAAAzEzRAkABEwAAAACAgAAAAMwMUgJAARMAAAAAgIAAAADMDJICQAETAAAAAICAAAAAzAzSAkABEwAAAACAgAAAAMwNEgJAARMAAAAAgIAAAADMDVICQAETAAAAAICAAAAAzA2SAkABEwAAAACAgAAAAMwN0gJAARMAAAAAgIAAAADMDhICQAETAAAAAICAAAAAzA5SAkABEwAAAACAgAAAAMxMEgJAARMAAAAAgIAAAADMTFICQAETAAAAAICAAAAAzEySAkABEwAAAACAgAAAAMxM0gJAARMAAAAAgIAAAADMDFTCQAETAAAAAICAAAAAzAyUwkABEwAAAACAgAAAAMwM1MJAARMAAAAAgIAAAADMDRTCQAETAAAAAICAAAAAzA1UwkABEwAAAACAgAAAAMwNlMJAARMAAAAAgIAAAADMDdTCQAETAAAAAICAAAAAzA4UwkABEwAAAACAgAAAAMwOVMJAARMAAAAAgIAAAADMTBTCQAETAAAAAICAAAAAzExUwkABEwAAAACAgAAAAMxMlMJAARMAAAAAgIAAAADMTNTBQAAAANuaWwBAAAAAmE2AAAAAQAAAAJhNwMJAABnAAAAAgAAAAAAAAAAAAkAAZAAAAABBQAAAAJhNwkBAAAAAmE1AAAAAAUAAAACYTcBAAAAAmE4AAAAAwAAAAJhOQAAAAJiMQAAAAJiMgQAAAACYjMJAAH3AAAAAQkAAZsAAAABCQABLAAAAAIFAAAAAmE5BQAAAAJiMQQAAAACYjQJAASxAAAAAQUAAAACYjMEAAAAAmI1CQAAagAAAAIFAAAAAmI0BQAAAAJiMgMJAABmAAAAAgAAAAAAAAAAAAUAAAACYjUJAABkAAAAAgkAAGgAAAACAP//////////BQAAAAJiNQAAAAAAAAAAAQkAAGQAAAACBQAAAAJiNQAAAAAAAAAAAQEAAAACYjYAAAABAAAAAmI3BAAAAAJiOAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAAAmI3AgAAABFfTGFzdFJhbmRvbk51bWJlcgMJAAABAAAAAgUAAAACYjgCAAAAA0ludAQAAAABbgUAAAACYjgJAAGkAAAAAQUAAAABbgUAAAACYjcBAAAAAmI5AAAAAgAAAAJjMQAAAAJjMgQAAAACYjgJAAQaAAAAAgUAAAACYzEFAAAAAmMyAwkAAAEAAAACBQAAAAJiOAIAAAADSW50BAAAAAFhBQAAAAJiOAUAAAABYQAAAAAAAAAAAAEAAAACYzMAAAABAAAAAWkDCQAAAAAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAJAAACAAAAAQIAAAAYUGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBAAAAAJjNAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAACYzQAAAAHYXNzZXRJZAkAAAIAAAABAgAAACdUaGlzIGZ1bmN0aW9uIGFjY2VwdHMgV0FWRVMgdG9rZW5zIG9ubHkIBQAAAAJjNAAAAAZhbW91bnQBAAAAAmM1AAAAAQAAAAJjNgQAAAABcAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABLwAAAAIFAAAAAmM2AAAAAAAAAAACAwkAAAAAAAACBQAAAAFwAAAAAAAAAAABAAAAAAAAAAAUBQAAAAFwAQAAAAJjNwAAAAQAAAACYzgAAAACYzkAAAACZDEAAAACYTEEAAAAAXAJAQAAAAJjNQAAAAEFAAAAAmM4BAAAAAFvCQEAAAACYzUAAAABBQAAAAJjOQMJAABmAAAAAgUAAAABcAUAAAABbwUAAAACZDEFAAAAAmExAQAAAAJkMgAAAAIAAAACYzEAAAACZDMDCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAJjMQUAAAACZDMEAAAAAmQ0CQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAJjMQUAAAACZDMEAAAAAmE3CQAEtQAAAAIFAAAAAmQ0BQAAAAJhNAMJAAAAAAAAAgkAAZAAAAABBQAAAAJhNwAAAAAAAAAAAAkBAAAAAmE1AAAAAAUAAAACYTcJAQAAAAJhNQAAAAAAAAACAAAAAWkBAAAAA2JldAAAAAEAAAACZDUEAAAAAmQxCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAAmQ2BQAAAAJkNQQAAAABcAkBAAAAAmMzAAAAAQUAAAABaQQAAAACZDcJAAEsAAAAAgUAAAACZDUCAAAACF9zdW1CZXRzBAAAAAJkOAkBAAAAAmI5AAAAAgUAAAACYzEFAAAAAmQ3BAAAAAJkOQQAAAACYjgJAAQaAAAAAgUAAAACYzEJAAEsAAAAAgUAAAACZDUCAAAADV9kcmF3U2VxdWVuY2UDCQAAAQAAAAIFAAAAAmI4AgAAAANJbnQEAAAAAWEFAAAAAmI4CQAAZAAAAAIFAAAAAWEAAAAAAAAAAAEAAAAAAAAAAAAEAAAAAmUxBAAAAAJiOAkABB0AAAACBQAAAAJjMQkAASwAAAACBQAAAAJkNQIAAAAHX3BsYXllcgMJAAABAAAAAgUAAAACYjgCAAAABlN0cmluZwQAAAABYQUAAAACYjgFAAAAAWEFAAAABHVuaXQEAAAAAmQzCQABLAAAAAIFAAAAAmQ2AgAAAApfYXZhaWxhYmxlBAAAAAJlMgkAAGQAAAACBQAAAAJkOAUAAAABcAMDCQEAAAAJaXNEZWZpbmVkAAAAAQkABBsAAAACBQAAAAJjMQkAASwAAAACBQAAAAJkNQIAAAAFX3N0b3AGCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAJjMQUAAAACZDUJAAACAAAAAQIAAAAcVGhpcyByb3VuZCBpcyBhbHJlYWR5IHBsYXllZAMDCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAJjMQkAASwAAAACBQAAAAJkNQIAAAAHX3BsYXllcgkBAAAAAiE9AAAAAgUAAAACZTEFAAAAAmQxBwkAAAIAAAABAgAAABVUaGlzIGlzIG5vdCB5b3VyIGdhbWUDCQAAZgAAAAIFAAAAAmUyBQAAAAJhMwkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAACFNYXhpbXVtIGFtb3VudCBvZiBiZXRzIGZvciByb3VuZCAJAAGkAAAAAQUAAAACYTMCAAAAFS4gV2l0aCB5b3VyIGJldCBpdCdzIAkAAaQAAAABBQAAAAJlMgQAAAACZTMJAQAAAAJkMgAAAAIFAAAAAmMxBQAAAAJkMwQAAAACZTQJAQAAAAJhOAAAAAMJAAEsAAAAAgkAASwAAAACBQAAAAJkNgkABLkAAAACBQAAAAJlMwUAAAACYTQFAAAAAmQxCQEAAAACYjYAAAABBQAAAAJkMQkAAZAAAAABBQAAAAJlMwQAAAACYzgJAAGRAAAAAgUAAAACZTMJAABqAAAAAgUAAAACZTQJAAGQAAAAAQUAAAACZTMEAAAAAmU1CQAEUQAAAAIFAAAAAmUzCQAAagAAAAIFAAAAAmU0CQABkAAAAAEFAAAAAmUzBAAAAAJlNgkBAAAAAmE2AAAAAQUAAAACZTUEAAAAAmU3CQEAAAACYTgAAAADCQABLAAAAAIJAAEsAAAAAgUAAAACZDYJAAS5AAAAAgUAAAACZTYFAAAAAmE0BQAAAAJkMQkBAAAAAmI2AAAAAQUAAAACZDEJAAGQAAAAAQUAAAACZTYEAAAAAmM5CQABkQAAAAIFAAAAAmU2CQAAagAAAAIFAAAAAmU3CQABkAAAAAEFAAAAAmU2BAAAAAJlOAkABFEAAAACBQAAAAJlNgkAAGoAAAACBQAAAAJlNwkAAZAAAAABBQAAAAJlNgMJAAAAAAAAAgkBAAAAAmM1AAAAAQUAAAACYzgJAQAAAAJjNQAAAAEFAAAAAmM5CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAAmQzCQAEuQAAAAIFAAAAAmU4BQAAAAJhNAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAAmQ1AgAAAAdfcGxheWVyBQAAAAJkMQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAAmQ2AgAAAAtfc2FsdF9kZWJ1ZwUAAAACZDYJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAACZDYCAAAAEV9MYXN0UmFuZG9uTnVtYmVyBQAAAAJlNwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAAJkNQIAAAAIX3N1bUJldHMFAAAAAmUyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAACZDYCAAAAC19wbGF5ZXJDYXJkBQAAAAJjOAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAAmQ2AgAAAAtfY2FzaW5vQ2FyZAUAAAACYzkJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAACZDUCAAAADV9kcmF3U2VxdWVuY2UJAABkAAAAAgUAAAACZDkAAAAAAAAAAAEFAAAAA25pbAQAAAACZTkJAQAAAAJjNwAAAAQFAAAAAmM4BQAAAAJjOQUAAAACZDEFAAAAAmExCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAAmQzCQAEuQAAAAIFAAAAAmU4BQAAAAJhNAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAAmQ2AgAAAAtfc2FsdF9kZWJ1ZwUAAAACZDYJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACBQAAAAJkNQIAAAAHX3BsYXllcgUAAAACZDEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAACZDYCAAAAEV9MYXN0UmFuZG9uTnVtYmVyBQAAAAJlNwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAAJkNQIAAAAIX3N1bUJldHMFAAAAAmUyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAACZDYCAAAAC19wbGF5ZXJDYXJkBQAAAAJjOAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAAmQ2AgAAAAtfY2FzaW5vQ2FyZAUAAAACYzkJAARMAAAAAgkBAAAADEJvb2xlYW5FbnRyeQAAAAIJAAEsAAAAAgUAAAACZDUCAAAABV9zdG9wBgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAAmQ1AgAAAAdfd2lubmVyBQAAAAJlOQUAAAADbmlsAAAAAWkBAAAACHdpdGhkcmF3AAAAAQAAAAJkNQQAAAACZDEJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAACZDYJAAEsAAAAAgkAASwAAAACBQAAAAJkNQIAAAABXwUAAAACZDEEAAAAAmYxCQABLAAAAAIFAAAAAmQ1AgAAAAlfd2l0aGRyYXcDCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAJjMQUAAAACZjEJAAACAAAAAQIAAAAfWW91IGhhdmUgYWxyZWFkeSBnb3QgeW91ciBwcml6ZQMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAACYzEJAAEsAAAAAgUAAAACZDUCAAAAB193aW5uZXIJAAACAAAAAQIAAAAhVGhlcmUgaXMgbm8gd2lubmVyLCBpdCB3YXMgYSBkcmF3BAAAAAJlOQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAACYzEJAAEsAAAAAgUAAAACZDUCAAAAB193aW5uZXIEAAAAAmYyCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAJjMQkAASwAAAACBQAAAAJkNQIAAAAHX3BsYXllcgQAAAACZjMJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAAAmMxCQABLAAAAAIFAAAAAmQ1AgAAAAhfc3VtQmV0cwMJAAAAAAAAAgUAAAACZjMAAAAAAAAAAAAJAAACAAAAAQIAAAAaWW91IHdvbiBub3RoaW5nIHRoaXMgcm91bmQDAwkAAAAAAAACBQAAAAJlOQUAAAACZDEJAAAAAAAAAgUAAAACZTkFAAAAAmExBwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAJmMQkAAaQAAAABBQAAAAJmMwkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAAmYzBQAAAAR1bml0BQAAAANuaWwDAwkAAAAAAAACBQAAAAJlOQUAAAACZDEJAAAAAAAAAgUAAAACZTkFAAAAAmYyBwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAJmMQkAAaQAAAABCQAAaAAAAAIFAAAAAmYzAAAAAAAAAAACCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkAAGgAAAACBQAAAAJmMwAAAAAAAAAAAgUAAAAEdW5pdAUAAAADbmlsCQAAAgAAAAECAAAAFllvdSBhcmUgbm90IHRoZSB3aW5uZXIAAAABAAAAAnR4AQAAAAJmNAAAAAAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5NPbjqw==",
    "height": 1814449,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 8AVLbMD1iWfvpCvfSWzWiiM4esJu3Z7QbowqX2GJGvga
Next: Dz9sYAqvYNfsoeuJiNBgy8DaXE13QS9K5bxGPSg276Gf

Diff: 
Old
New
Differences
74
74
 
    then {
75
75
 
        let stringDeck = getStringValue(this, availableProp)
76
76
 
        let deck = split(stringDeck, separator)
77
-
        getDeck(deck)
77
+
        if ((size(deck) == 0))
78
+
            then getNewDeck()
79
+
            else deck
78
80
 
        }
79
81
 
    else getNewDeck()
80
-
81
-
82
-
func getPlayerCardAndUpdateDeck (meKey,callerAddress,deck) = {
83
-
    let avDeck2 = getDeck(deck)
84
-
    let cardPosition = getRandomNumber(((meKey + makeString(avDeck2, separator)) + callerAddress), getPreviousRandomNumber(callerAddress), size(avDeck2))
85
-
    let card = avDeck2[(cardPosition % size(avDeck2))]
86
-
    let avDeck3 = removeByIndex(avDeck2, (cardPosition % size(avDeck2)))
87
-
    $Tuple2(card, avDeck3)
88
-
    }
89
82
 
90
83
 
91
84
 
@Callable(i)
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let casino = "3MtaCL4v1bjTabUqs7oU4ofS8fbai34WM1i"
5
5
 
6
6
 
let WAVES = 1000000000
7
7
 
8
8
 
let maxBet = (100 * WAVES)
9
9
 
10
10
 
let separator = ","
11
11
 
12
12
 
func getNewDeck () = ["01C", "02C", "03C", "04C", "05C", "06C", "07C", "08C", "09C", "10C", "11C", "12C", "13C", "01D", "02D", "03D", "04D", "05D", "06D", "07D", "08D", "09D", "10D", "11D", "12D", "13D", "01H", "02H", "03H", "04H", "05H", "06H", "07H", "08H", "09H", "10H", "11H", "12H", "13H", "01S", "02S", "03S", "04S", "05S", "06S", "07S", "08S", "09S", "10S", "11S", "12S", "13S"]
13
13
 
14
14
 
15
15
 
func getDeck (deck) = if ((0 >= size(deck)))
16
16
 
    then getNewDeck()
17
17
 
    else deck
18
18
 
19
19
 
20
20
 
func getRandomNumber (salt1,salt2,answersCount) = {
21
21
 
    let hash = sha256(toBytes((salt1 + salt2)))
22
22
 
    let index = toInt(hash)
23
23
 
    let rand = (index % answersCount)
24
24
 
    if ((0 > rand))
25
25
 
        then ((-1 * rand) + 1)
26
26
 
        else (rand + 1)
27
27
 
    }
28
28
 
29
29
 
30
30
 
func getPreviousRandomNumber (address) = match getInteger(this, (address + "_LastRandonNumber")) {
31
31
 
    case n: Int => 
32
32
 
        toString(n)
33
33
 
    case _ => 
34
34
 
        address
35
35
 
}
36
36
 
37
37
 
38
38
 
func getAmountOrZero (this,key) = match getInteger(this, key) {
39
39
 
    case a: Int => 
40
40
 
        a
41
41
 
    case _ => 
42
42
 
        0
43
43
 
}
44
44
 
45
45
 
46
46
 
func getPayment (i) = if ((size(i.payments) == 0))
47
47
 
    then throw("Payment must be attached")
48
48
 
    else {
49
49
 
        let pmt = i.payments[0]
50
50
 
        if (isDefined(pmt.assetId))
51
51
 
            then throw("This function accepts WAVES tokens only")
52
52
 
            else pmt.amount
53
53
 
        }
54
54
 
55
55
 
56
56
 
func getCardValue (stringCard) = {
57
57
 
    let p = parseIntValue(take(stringCard, 2))
58
58
 
    if ((p == 1))
59
59
 
        then 20
60
60
 
        else p
61
61
 
    }
62
62
 
63
63
 
64
64
 
func getWinner (cardPlayer,cardCasino,callerAddress,casino) = {
65
65
 
    let p = getCardValue(cardPlayer)
66
66
 
    let o = getCardValue(cardCasino)
67
67
 
    if ((p > o))
68
68
 
        then callerAddress
69
69
 
        else casino
70
70
 
    }
71
71
 
72
72
 
73
73
 
func getAvailableDeck (this,availableProp) = if (isDefined(getString(this, availableProp)))
74
74
 
    then {
75
75
 
        let stringDeck = getStringValue(this, availableProp)
76
76
 
        let deck = split(stringDeck, separator)
77
-
        getDeck(deck)
77
+
        if ((size(deck) == 0))
78
+
            then getNewDeck()
79
+
            else deck
78
80
 
        }
79
81
 
    else getNewDeck()
80
-
81
-
82
-
func getPlayerCardAndUpdateDeck (meKey,callerAddress,deck) = {
83
-
    let avDeck2 = getDeck(deck)
84
-
    let cardPosition = getRandomNumber(((meKey + makeString(avDeck2, separator)) + callerAddress), getPreviousRandomNumber(callerAddress), size(avDeck2))
85
-
    let card = avDeck2[(cardPosition % size(avDeck2))]
86
-
    let avDeck3 = removeByIndex(avDeck2, (cardPosition % size(avDeck2)))
87
-
    $Tuple2(card, avDeck3)
88
-
    }
89
82
 
90
83
 
91
84
 
@Callable(i)
92
85
 
func bet (round) = {
93
86
 
    let callerAddress = toBase58String(i.caller.bytes)
94
87
 
    let meKey = round
95
88
 
    let p = getPayment(i)
96
89
 
    let roundBetsKey = (round + "_sumBets")
97
90
 
    let curSumBets = getAmountOrZero(c1, roundBetsKey)
98
91
 
    let currentDraws =     match getInteger(c1, (round + "_drawSequence")) {
99
92
 
        case a: Int => 
100
93
 
            (a + 1)
101
94
 
        case _ => 
102
95
 
            0
103
96
 
    }
104
97
 
    let currentPlayer =     match getString(c1, (round + "_player")) {
105
98
 
        case a: String => 
106
99
 
            a
107
100
 
        case _ => 
108
101
 
            unit
109
102
 
    }
110
103
 
    let availableProp = (meKey + "_available")
111
104
 
    let newSumBets = (curSumBets + p)
112
105
 
    if (if (isDefined(getBoolean(c1, (round + "_stop"))))
113
106
 
        then true
114
107
 
        else isDefined(getString(c1, round)))
115
108
 
        then throw("This round is already played")
116
109
 
        else if (if (isDefined(getString(c1, (round + "_player"))))
117
110
 
            then (currentPlayer != callerAddress)
118
111
 
            else false)
119
112
 
            then throw("This is not your game")
120
113
 
            else if ((newSumBets > maxBet))
121
114
 
                then throw(((("Maximum amount of bets for round " + toString(maxBet)) + ". With your bet it's ") + toString(newSumBets)))
122
115
 
                else {
123
116
 
                    let avDeck = getAvailableDeck(c1, availableProp)
124
117
 
                    let cardPositionPlayer = getRandomNumber(((meKey + makeString(avDeck, separator)) + callerAddress), getPreviousRandomNumber(callerAddress), size(avDeck))
125
118
 
                    let cardPlayer = avDeck[(cardPositionPlayer % size(avDeck))]
126
119
 
                    let avDeck1 = removeByIndex(avDeck, (cardPositionPlayer % size(avDeck)))
127
120
 
                    let avDeck2 = getDeck(avDeck1)
128
121
 
                    let cardPositionCasino = getRandomNumber(((meKey + makeString(avDeck2, separator)) + callerAddress), getPreviousRandomNumber(callerAddress), size(avDeck2))
129
122
 
                    let cardCasino = avDeck2[(cardPositionCasino % size(avDeck2))]
130
123
 
                    let avDeck3 = removeByIndex(avDeck2, (cardPositionCasino % size(avDeck2)))
131
124
 
                    if ((getCardValue(cardPlayer) == getCardValue(cardCasino)))
132
125
 
                        then [StringEntry(availableProp, makeString(avDeck3, separator)), StringEntry((round + "_player"), callerAddress), StringEntry((meKey + "_salt_debug"), meKey), IntegerEntry((meKey + "_LastRandonNumber"), cardPositionCasino), IntegerEntry((round + "_sumBets"), newSumBets), StringEntry((meKey + "_playerCard"), cardPlayer), StringEntry((meKey + "_casinoCard"), cardCasino), IntegerEntry((round + "_drawSequence"), (currentDraws + 1))]
133
126
 
                        else {
134
127
 
                            let winner = getWinner(cardPlayer, cardCasino, callerAddress, casino)
135
128
 
[StringEntry(availableProp, makeString(avDeck3, separator)), StringEntry((meKey + "_salt_debug"), meKey), StringEntry((round + "_player"), callerAddress), IntegerEntry((meKey + "_LastRandonNumber"), cardPositionCasino), IntegerEntry((round + "_sumBets"), newSumBets), StringEntry((meKey + "_playerCard"), cardPlayer), StringEntry((meKey + "_casinoCard"), cardCasino), BooleanEntry((round + "_stop"), true), StringEntry((round + "_winner"), winner)]
136
129
 
                            }
137
130
 
                    }
138
131
 
    }
139
132
 
140
133
 
141
134
 
142
135
 
@Callable(i)
143
136
 
func withdraw (round) = {
144
137
 
    let callerAddress = toBase58String(i.caller.bytes)
145
138
 
    let meKey = ((round + "_") + callerAddress)
146
139
 
    let withdrawKey = (round + "_withdraw")
147
140
 
    if (isDefined(getString(c1, withdrawKey)))
148
141
 
        then throw("You have already got your prize")
149
142
 
        else if (!(isDefined(getString(c1, (round + "_winner")))))
150
143
 
            then throw("There is no winner, it was a draw")
151
144
 
            else {
152
145
 
                let winner = getStringValue(c1, (round + "_winner"))
153
146
 
                let player = getStringValue(c1, (round + "_player"))
154
147
 
                let curSumBet = getIntegerValue(c1, (round + "_sumBets"))
155
148
 
                if ((curSumBet == 0))
156
149
 
                    then throw("You won nothing this round")
157
150
 
                    else if (if ((winner == callerAddress))
158
151
 
                        then (winner == casino)
159
152
 
                        else false)
160
153
 
                        then [StringEntry(withdrawKey, toString(curSumBet)), ScriptTransfer(i.caller, curSumBet, unit)]
161
154
 
                        else if (if ((winner == callerAddress))
162
155
 
                            then (winner == player)
163
156
 
                            else false)
164
157
 
                            then [StringEntry(withdrawKey, toString((curSumBet * 2))), ScriptTransfer(i.caller, (curSumBet * 2), unit)]
165
158
 
                            else throw("You are not the winner")
166
159
 
                }
167
160
 
    }
168
161
 
169
162
 
170
163
 
@Verifier(tx)
171
164
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
172
165
 

github/deemru/w8io/169f3d6 
37.88 ms ◑