tx · 3dYqNsfbEU6cvWZKbthaShNp3R3gRfysbXFUgArsQCpA

3N6hQF6HBBQ5JCKB8Xs17Q61wkG3VrLvbGd:  -0.10000000 Waves

2021.12.02 23:55 [1817166] smart account 3N6hQF6HBBQ5JCKB8Xs17Q61wkG3VrLvbGd > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3dYqNsfbEU6cvWZKbthaShNp3R3gRfysbXFUgArsQCpA",
    "fee": 10000000,
    "feeAssetId": null,
    "timestamp": 1638478658804,
    "version": 2,
    "chainId": 84,
    "sender": "3N6hQF6HBBQ5JCKB8Xs17Q61wkG3VrLvbGd",
    "senderPublicKey": "7Hi4o6vBstRs79NMVMjEove52dmP87RAcvNDAXN8C4Wi",
    "proofs": [
        "2zFoYp4hYt2qguKfaPwduNtsA9vB514e3UdERYXbXdoo1pf1R9Cjw48NpmkarmkeszFgDyNEHFWAU2KGVwsfvfi4"
    ],
    "script": "base64:AAIFAAAAAAAAA1EIAhIDCgEIEgMKAQgSAwoBCBoMCgJhMRIGY2FzaW5vGgsKAmEyEgVXQVZFUxoMCgJhMxIGbWF4QmV0Gg8KAmE0EglzZXBhcmF0b3IaEAoCYTUSCmdldE5ld0RlY2saDQoCYTYSB2dldERlY2saCgoCYTcSBGRlY2saFQoCYTgSD2dldFJhbmRvbU51bWJlchoLCgJhORIFc2FsdDEaCwoCYjESBXNhbHQyGhIKAmIyEgxhbnN3ZXJzQ291bnQaCgoCYjMSBGhhc2gaCwoCYjQSBWluZGV4GgoKAmI1EgRyYW5kGh0KAmI2EhdnZXRQcmV2aW91c1JhbmRvbU51bWJlchoNCgJiNxIHYWRkcmVzcxoNCgJiOBIHJG1hdGNoMBoVCgJiORIPZ2V0QW1vdW50T3JaZXJvGgoKAmMxEgR0aGlzGgkKAmMyEgNrZXkaEAoCYzMSCmdldFBheW1lbnQaCQoCYzQSA3BtdBoSCgJjNRIMZ2V0Q2FyZFZhbHVlGhAKAmM2EgpzdHJpbmdDYXJkGg8KAmM3EglnZXRXaW5uZXIaEAoCYzgSCmNhcmRQbGF5ZXIaEAoCYzkSCmNhcmRDYXNpbm8aEwoCZDESDWNhbGxlckFkZHJlc3MaFgoCZDISEGdldEF2YWlsYWJsZURlY2saEwoCZDMSDWF2YWlsYWJsZVByb3AaEAoCZDQSCnN0cmluZ0RlY2saCwoCZDUSBXJvdW5kGgsKAmQ2EgVtZUtleRoSCgJkNxIMcm91bmRCZXRzS2V5GhAKAmQ4EgpjdXJTdW1CZXRzGhIKAmQ5EgxjdXJyZW50RHJhd3MaEwoCZTESDWN1cnJlbnRQbGF5ZXIaEAoCZTISCm5ld1N1bUJldHMaDAoCZTMSBmF2RGVjaxoYCgJlNBISY2FyZFBvc2l0aW9uUGxheWVyGg0KAmU1EgdhdkRlY2sxGg0KAmU2EgdhdkRlY2syGhgKAmU3EhJjYXJkUG9zaXRpb25DYXNpbm8aDQoCZTgSB2F2RGVjazMaDAoCZTkSBndpbm5lchoRCgJmMRILd2l0aGRyYXdLZXkaDAoCZjISBnBsYXllchoPCgJmMxIJY3VyU3VtQmV0GgwKAmY0EgZ2ZXJpZnkAAAANAAAAAAJhMQIAAAAjM010YUNMNHYxYmpUYWJVcXM3b1U0b2ZTOGZiYWkzNFdNMWkAAAAAAmEyAAAAAAA7msoAAAAAAAJhMwkAAGgAAAACAAAAAAAAAABkBQAAAAJhMgAAAAACYTQCAAAAASwBAAAAAmE1AAAAAAkABEwAAAACAgAAAAMwMUMJAARMAAAAAgIAAAADMDJDCQAETAAAAAICAAAAAzAzQwkABEwAAAACAgAAAAMwNEMJAARMAAAAAgIAAAADMDVDCQAETAAAAAICAAAAAzA2QwkABEwAAAACAgAAAAMwN0MJAARMAAAAAgIAAAADMDhDCQAETAAAAAICAAAAAzA5QwkABEwAAAACAgAAAAMxMEMJAARMAAAAAgIAAAADMTFDCQAETAAAAAICAAAAAzEyQwkABEwAAAACAgAAAAMxM0MJAARMAAAAAgIAAAADMDFECQAETAAAAAICAAAAAzAyRAkABEwAAAACAgAAAAMwM0QJAARMAAAAAgIAAAADMDRECQAETAAAAAICAAAAAzA1RAkABEwAAAACAgAAAAMwNkQJAARMAAAAAgIAAAADMDdECQAETAAAAAICAAAAAzA4RAkABEwAAAACAgAAAAMwOUQJAARMAAAAAgIAAAADMTBECQAETAAAAAICAAAAAzExRAkABEwAAAACAgAAAAMxMkQJAARMAAAAAgIAAAADMTNECQAETAAAAAICAAAAAzAxSAkABEwAAAACAgAAAAMwMkgJAARMAAAAAgIAAAADMDNICQAETAAAAAICAAAAAzA0SAkABEwAAAACAgAAAAMwNUgJAARMAAAAAgIAAAADMDZICQAETAAAAAICAAAAAzA3SAkABEwAAAACAgAAAAMwOEgJAARMAAAAAgIAAAADMDlICQAETAAAAAICAAAAAzEwSAkABEwAAAACAgAAAAMxMUgJAARMAAAAAgIAAAADMTJICQAETAAAAAICAAAAAzEzSAkABEwAAAACAgAAAAMwMVMJAARMAAAAAgIAAAADMDJTCQAETAAAAAICAAAAAzAzUwkABEwAAAACAgAAAAMwNFMJAARMAAAAAgIAAAADMDVTCQAETAAAAAICAAAAAzA2UwkABEwAAAACAgAAAAMwN1MJAARMAAAAAgIAAAADMDhTCQAETAAAAAICAAAAAzA5UwkABEwAAAACAgAAAAMxMFMJAARMAAAAAgIAAAADMTFTCQAETAAAAAICAAAAAzEyUwkABEwAAAACAgAAAAMxM1MFAAAAA25pbAEAAAACYTYAAAABAAAAAmE3AwkAAGcAAAACAAAAAAAAAAAACQABkAAAAAEFAAAAAmE3CQEAAAACYTUAAAAABQAAAAJhNwEAAAACYTgAAAADAAAAAmE5AAAAAmIxAAAAAmIyBAAAAAJiMwkAAfcAAAABCQABmwAAAAEJAAEsAAAAAgUAAAACYTkFAAAAAmIxBAAAAAJiNAkABLEAAAABBQAAAAJiMwQAAAACYjUJAABqAAAAAgUAAAACYjQFAAAAAmIyAwkAAGYAAAACAAAAAAAAAAAABQAAAAJiNQkAAGQAAAACCQAAaAAAAAIA//////////8FAAAAAmI1AAAAAAAAAAABCQAAZAAAAAIFAAAAAmI1AAAAAAAAAAABAQAAAAJiNgAAAAEAAAACYjcEAAAAAmI4CQAEGgAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAACYjcCAAAAEV9MYXN0UmFuZG9uTnVtYmVyAwkAAAEAAAACBQAAAAJiOAIAAAADSW50BAAAAAFuBQAAAAJiOAkAAaQAAAABBQAAAAFuBQAAAAJiNwEAAAACYjkAAAACAAAAAmMxAAAAAmMyBAAAAAJiOAkABBoAAAACBQAAAAJjMQUAAAACYzIDCQAAAQAAAAIFAAAAAmI4AgAAAANJbnQEAAAAAWEFAAAAAmI4BQAAAAFhAAAAAAAAAAAAAQAAAAJjMwAAAAEAAAABaQMJAAAAAAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAkAAAIAAAABAgAAABhQYXltZW50IG11c3QgYmUgYXR0YWNoZWQEAAAAAmM0CQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAJjNAAAAAdhc3NldElkCQAAAgAAAAECAAAAJ1RoaXMgZnVuY3Rpb24gYWNjZXB0cyBXQVZFUyB0b2tlbnMgb25seQgFAAAAAmM0AAAABmFtb3VudAEAAAACYzUAAAABAAAAAmM2BAAAAAFwCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAEvAAAAAgUAAAACYzYAAAAAAAAAAAIDCQAAAAAAAAIFAAAAAXAAAAAAAAAAAAEAAAAAAAAAABQFAAAAAXABAAAAAmM3AAAABAAAAAJjOAAAAAJjOQAAAAJkMQAAAAJhMQQAAAABcAkBAAAAAmM1AAAAAQUAAAACYzgEAAAAAW8JAQAAAAJjNQAAAAEFAAAAAmM5AwkAAGYAAAACBQAAAAFwBQAAAAFvBQAAAAJkMQUAAAACYTEBAAAAAmQyAAAAAgAAAAJjMQAAAAJkMwMJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAAAmMxBQAAAAJkMwQAAAACZDQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAAAmMxBQAAAAJkMwQAAAACYTcJAAS1AAAAAgUAAAACZDQFAAAAAmE0AwkAAAAAAAACCQABkAAAAAEFAAAAAmE3AAAAAAAAAAAACQEAAAACYTUAAAAABQAAAAJhNwkBAAAAAmE1AAAAAAAAAAMAAAABaQEAAAAEbGFsYQAAAAEAAAACZDUJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAETGFsYQIAAAABMQUAAAADbmlsAAAAAWkBAAAAA2JldAAAAAEAAAACZDUEAAAAAmQxCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAAmQ2BQAAAAJkNQQAAAABcAkBAAAAAmMzAAAAAQUAAAABaQQAAAACZDcJAAEsAAAAAgUAAAACZDUCAAAACF9zdW1CZXRzBAAAAAJkOAkBAAAAAmI5AAAAAgUAAAACYzEFAAAAAmQ3BAAAAAJkOQQAAAACYjgJAAQaAAAAAgUAAAACYzEJAAEsAAAAAgUAAAACZDUCAAAADV9kcmF3U2VxdWVuY2UDCQAAAQAAAAIFAAAAAmI4AgAAAANJbnQEAAAAAWEFAAAAAmI4CQAAZAAAAAIFAAAAAWEAAAAAAAAAAAEAAAAAAAAAAAAEAAAAAmUxBAAAAAJiOAkABB0AAAACBQAAAAJjMQkAASwAAAACBQAAAAJkNQIAAAAHX3BsYXllcgMJAAABAAAAAgUAAAACYjgCAAAABlN0cmluZwQAAAABYQUAAAACYjgFAAAAAWEFAAAABHVuaXQEAAAAAmQzCQABLAAAAAIFAAAAAmQ2AgAAAApfYXZhaWxhYmxlBAAAAAJlMgkAAGQAAAACBQAAAAJkOAUAAAABcAMDCQEAAAAJaXNEZWZpbmVkAAAAAQkABBsAAAACBQAAAAJjMQkAASwAAAACBQAAAAJkNQIAAAAFX3N0b3AGCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAJjMQUAAAACZDUJAAACAAAAAQIAAAAcVGhpcyByb3VuZCBpcyBhbHJlYWR5IHBsYXllZAMDCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAJjMQkAASwAAAACBQAAAAJkNQIAAAAHX3BsYXllcgkBAAAAAiE9AAAAAgUAAAACZTEFAAAAAmQxBwkAAAIAAAABAgAAABVUaGlzIGlzIG5vdCB5b3VyIGdhbWUDCQAAZgAAAAIFAAAAAmUyBQAAAAJhMwkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAACFNYXhpbXVtIGFtb3VudCBvZiBiZXRzIGZvciByb3VuZCAJAAGkAAAAAQUAAAACYTMCAAAAFS4gV2l0aCB5b3VyIGJldCBpdCdzIAkAAaQAAAABBQAAAAJlMgQAAAACZTMJAQAAAAJkMgAAAAIFAAAAAmMxBQAAAAJkMwQAAAACZTQJAQAAAAJhOAAAAAMJAAEsAAAAAgkAASwAAAACBQAAAAJkNgkABLkAAAACBQAAAAJlMwUAAAACYTQFAAAAAmQxCQEAAAACYjYAAAABBQAAAAJkMQkAAZAAAAABBQAAAAJlMwQAAAACYzgJAAGRAAAAAgUAAAACZTMJAABqAAAAAgUAAAACZTQJAAGQAAAAAQUAAAACZTMEAAAAAmU1CQAEUQAAAAIFAAAAAmUzCQAAagAAAAIFAAAAAmU0CQABkAAAAAEFAAAAAmUzBAAAAAJlNgkBAAAAAmE2AAAAAQUAAAACZTUEAAAAAmU3CQEAAAACYTgAAAADCQABLAAAAAIJAAEsAAAAAgUAAAACZDYJAAS5AAAAAgUAAAACZTYFAAAAAmE0BQAAAAJkMQkBAAAAAmI2AAAAAQUAAAACZDEJAAGQAAAAAQUAAAACZTYEAAAAAmM5CQABkQAAAAIFAAAAAmU2CQAAagAAAAIFAAAAAmU3CQABkAAAAAEFAAAAAmU2BAAAAAJlOAkABFEAAAACBQAAAAJlNgkAAGoAAAACBQAAAAJlNwkAAZAAAAABBQAAAAJlNgMJAAAAAAAAAgkBAAAAAmM1AAAAAQUAAAACYzgJAQAAAAJjNQAAAAEFAAAAAmM5CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAAmQzCQAEuQAAAAIFAAAAAmU4BQAAAAJhNAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAAmQ1AgAAAAdfcGxheWVyBQAAAAJkMQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAAmQ2AgAAAAtfc2FsdF9kZWJ1ZwUAAAACZDYJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAACZDYCAAAAEV9MYXN0UmFuZG9uTnVtYmVyBQAAAAJlNwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAAJkNQIAAAAIX3N1bUJldHMFAAAAAmUyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAACZDYCAAAAC19wbGF5ZXJDYXJkBQAAAAJjOAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAAmQ2AgAAAAtfY2FzaW5vQ2FyZAUAAAACYzkJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAACZDUCAAAADV9kcmF3U2VxdWVuY2UJAABkAAAAAgUAAAACZDkAAAAAAAAAAAEFAAAAA25pbAQAAAACZTkJAQAAAAJjNwAAAAQFAAAAAmM4BQAAAAJjOQUAAAACZDEFAAAAAmExCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAAmQzCQAEuQAAAAIFAAAAAmU4BQAAAAJhNAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAAmQ2AgAAAAtfc2FsdF9kZWJ1ZwUAAAACZDYJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACBQAAAAJkNQIAAAAHX3BsYXllcgUAAAACZDEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAACZDYCAAAAEV9MYXN0UmFuZG9uTnVtYmVyBQAAAAJlNwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAAJkNQIAAAAIX3N1bUJldHMFAAAAAmUyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAACZDYCAAAAC19wbGF5ZXJDYXJkBQAAAAJjOAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAAmQ2AgAAAAtfY2FzaW5vQ2FyZAUAAAACYzkJAARMAAAAAgkBAAAADEJvb2xlYW5FbnRyeQAAAAIJAAEsAAAAAgUAAAACZDUCAAAABV9zdG9wBgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAAmQ1AgAAAAdfd2lubmVyBQAAAAJlOQUAAAADbmlsAAAAAWkBAAAACHdpdGhkcmF3AAAAAQAAAAJkNQQAAAACZDEJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAACZDYJAAEsAAAAAgkAASwAAAACBQAAAAJkNQIAAAABXwUAAAACZDEEAAAAAmYxCQABLAAAAAIFAAAAAmQ1AgAAAAlfd2l0aGRyYXcDCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAJjMQUAAAACZjEJAAACAAAAAQIAAAAfWW91IGhhdmUgYWxyZWFkeSBnb3QgeW91ciBwcml6ZQMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAACYzEJAAEsAAAAAgUAAAACZDUCAAAAB193aW5uZXIJAAACAAAAAQIAAAAhVGhlcmUgaXMgbm8gd2lubmVyLCBpdCB3YXMgYSBkcmF3BAAAAAJlOQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAACYzEJAAEsAAAAAgUAAAACZDUCAAAAB193aW5uZXIEAAAAAmYyCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAJjMQkAASwAAAACBQAAAAJkNQIAAAAHX3BsYXllcgQAAAACZjMJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAAAmMxCQABLAAAAAIFAAAAAmQ1AgAAAAhfc3VtQmV0cwMJAAAAAAAAAgUAAAACZjMAAAAAAAAAAAAJAAACAAAAAQIAAAAaWW91IHdvbiBub3RoaW5nIHRoaXMgcm91bmQDAwkAAAAAAAACBQAAAAJlOQUAAAACZDEJAAAAAAAAAgUAAAACZTkFAAAAAmExBwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAJmMQkAAaQAAAABBQAAAAJmMwkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAAmYzBQAAAAR1bml0BQAAAANuaWwDAwkAAAAAAAACBQAAAAJlOQUAAAACZDEJAAAAAAAAAgUAAAACZTkFAAAAAmYyBwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAJmMQkAAaQAAAABCQAAaAAAAAIFAAAAAmYzAAAAAAAAAAACCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkAAGgAAAACBQAAAAJmMwAAAAAAAAAAAgUAAAAEdW5pdAUAAAADbmlsCQAAAgAAAAECAAAAFllvdSBhcmUgbm90IHRoZSB3aW5uZXIAAAABAAAAAnR4AQAAAAJmNAAAAAAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5/KQhyw==",
    "height": 1817166,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Dz9sYAqvYNfsoeuJiNBgy8DaXE13QS9K5bxGPSg276Gf
Next: 22efvLwL6mvigxDy8pVp1cXt7J2sjskUcPNDr6uXZiZm

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
77
 
        if ((size(deck) == 0))
78
78
 
            then getNewDeck()
79
79
 
            else deck
80
80
 
        }
81
81
 
    else getNewDeck()
82
82
 
83
83
 
84
84
 
@Callable(i)
85
85
 
func lala (round) = [StringEntry("Lala", "1")]
86
86
 
87
87
 
88
88
 
89
89
 
@Callable(i)
90
90
 
func bet (round) = {
91
91
 
    let callerAddress = toBase58String(i.caller.bytes)
92
92
 
    let meKey = round
93
93
 
    let p = getPayment(i)
94
94
 
    let roundBetsKey = (round + "_sumBets")
95
95
 
    let curSumBets = getAmountOrZero(c1, roundBetsKey)
96
96
 
    let currentDraws =     match getInteger(c1, (round + "_drawSequence")) {
97
97
 
        case a: Int => 
98
98
 
            (a + 1)
99
99
 
        case _ => 
100
100
 
            0
101
101
 
    }
102
102
 
    let currentPlayer =     match getString(c1, (round + "_player")) {
103
103
 
        case a: String => 
104
104
 
            a
105
105
 
        case _ => 
106
106
 
            unit
107
107
 
    }
108
108
 
    let availableProp = (meKey + "_available")
109
109
 
    let newSumBets = (curSumBets + p)
110
110
 
    if (if (isDefined(getBoolean(c1, (round + "_stop"))))
111
111
 
        then true
112
112
 
        else isDefined(getString(c1, round)))
113
113
 
        then throw("This round is already played")
114
114
 
        else if (if (isDefined(getString(c1, (round + "_player"))))
115
115
 
            then (currentPlayer != callerAddress)
116
116
 
            else false)
117
117
 
            then throw("This is not your game")
118
118
 
            else if ((newSumBets > maxBet))
119
119
 
                then throw(((("Maximum amount of bets for round " + toString(maxBet)) + ". With your bet it's ") + toString(newSumBets)))
120
120
 
                else {
121
121
 
                    let avDeck = getAvailableDeck(c1, availableProp)
122
122
 
                    let cardPositionPlayer = getRandomNumber(((meKey + makeString(avDeck, separator)) + callerAddress), getPreviousRandomNumber(callerAddress), size(avDeck))
123
123
 
                    let cardPlayer = avDeck[(cardPositionPlayer % size(avDeck))]
124
124
 
                    let avDeck1 = removeByIndex(avDeck, (cardPositionPlayer % size(avDeck)))
125
125
 
                    let avDeck2 = getDeck(avDeck1)
126
126
 
                    let cardPositionCasino = getRandomNumber(((meKey + makeString(avDeck2, separator)) + callerAddress), getPreviousRandomNumber(callerAddress), size(avDeck2))
127
127
 
                    let cardCasino = avDeck2[(cardPositionCasino % size(avDeck2))]
128
128
 
                    let avDeck3 = removeByIndex(avDeck2, (cardPositionCasino % size(avDeck2)))
129
129
 
                    if ((getCardValue(cardPlayer) == getCardValue(cardCasino)))
130
130
 
                        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))]
131
131
 
                        else {
132
132
 
                            let winner = getWinner(cardPlayer, cardCasino, callerAddress, casino)
133
133
 
[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)]
134
134
 
                            }
135
135
 
                    }
136
136
 
    }
137
137
 
138
138
 
139
139
 
140
140
 
@Callable(i)
141
141
 
func withdraw (round) = {
142
142
 
    let callerAddress = toBase58String(i.caller.bytes)
143
143
 
    let meKey = ((round + "_") + callerAddress)
144
144
 
    let withdrawKey = (round + "_withdraw")
145
145
 
    if (isDefined(getString(c1, withdrawKey)))
146
146
 
        then throw("You have already got your prize")
147
147
 
        else if (!(isDefined(getString(c1, (round + "_winner")))))
148
148
 
            then throw("There is no winner, it was a draw")
149
149
 
            else {
150
150
 
                let winner = getStringValue(c1, (round + "_winner"))
151
151
 
                let player = getStringValue(c1, (round + "_player"))
152
152
 
                let curSumBet = getIntegerValue(c1, (round + "_sumBets"))
153
153
 
                if ((curSumBet == 0))
154
154
 
                    then throw("You won nothing this round")
155
155
 
                    else if (if ((winner == callerAddress))
156
156
 
                        then (winner == casino)
157
157
 
                        else false)
158
158
 
                        then [StringEntry(withdrawKey, toString(curSumBet)), ScriptTransfer(i.caller, curSumBet, unit)]
159
159
 
                        else if (if ((winner == callerAddress))
160
160
 
                            then (winner == player)
161
161
 
                            else false)
162
162
 
                            then [StringEntry(withdrawKey, toString((curSumBet * 2))), ScriptTransfer(i.caller, (curSumBet * 2), unit)]
163
163
 
                            else throw("You are not the winner")
164
164
 
                }
165
165
 
    }
166
166
 
167
167
 
168
168
 
@Verifier(tx)
169
169
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
170
170
 

github/deemru/w8io/169f3d6 
39.20 ms ◑