tx · Vzswnt7gd2A5f1f7uwyfSoRmTwGhiLfkLkfqHH6kP2E

3N18S8xfWJYHVuGfJcpcPVh7LsnqR9hKTcc:  -0.01400000 Waves

2019.09.08 12:30 [666918] smart account 3N18S8xfWJYHVuGfJcpcPVh7LsnqR9hKTcc > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Vzswnt7gd2A5f1f7uwyfSoRmTwGhiLfkLkfqHH6kP2E",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1567935022111,
    "version": 1,
    "sender": "3N18S8xfWJYHVuGfJcpcPVh7LsnqR9hKTcc",
    "senderPublicKey": "9cETBksYN8YMHGvDB6BEqmH9HScpCMBRZwnjCviRQ9aA",
    "proofs": [
        "2tFPz6YgYyXcV8XWe23ipw4BJL5VaE1ywNE586yd1eHTCG9v52KKt38combPhBf3MmjpYSpPYfgmQWHRF1Ea9PVb"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAATAAAAAAVQUklDRQAAAAAABfXhAAAAAAALUEFURU5UUFJJQ0UAAAAAAAvrwgAAAAAABk9SQUNMRQIAAAAjM012aXNEZkE2dk5nNGk2aUtZV1o4Yld2eVA0aW1mQmI5ZXEAAAAAA1dJTgIAAAADV0lOAAAAAARMT1NFAgAAAARMT1NFAAAAAAROT05FAgAAAARub25lAQAAAA5nZXROdW1iZXJCeUtleQAAAAEAAAADa2V5BAAAAANudW0EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAFAAAAA251bQEAAAALZ2V0U3RyQnlLZXkAAAABAAAAA2tleQQAAAADc3RyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBQAAAANzdHIBAAAAEXZhbGlkYXRlVHdvQ29vcmRzAAAABAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgMJAABmAAAAAgUAAAACeDEFAAAAAngyBwMDCQAAAAAAAAIFAAAAAngxBQAAAAJ4MgkAAGYAAAACBQAAAAJ5MQUAAAACeTIHBwYBAAAADnZhbGlkYXRlQ29vcmRzAAAADAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgAAAAJ4MwAAAAJ5MwAAAAJ4NAAAAAJ5NAAAAAJ4NQAAAAJ5NQAAAAJ4NgAAAAJ5NgMJAQAAAAEhAAAAAQkBAAAAEXZhbGlkYXRlVHdvQ29vcmRzAAAABAUAAAACeDEFAAAAAnkxBQAAAAJ4MgUAAAACeTIHAwkBAAAAASEAAAABCQEAAAARdmFsaWRhdGVUd29Db29yZHMAAAAEBQAAAAJ4MgUAAAACeTIFAAAAAngzBQAAAAJ5MwcDCQEAAAABIQAAAAEJAQAAABF2YWxpZGF0ZVR3b0Nvb3JkcwAAAAQFAAAAAngzBQAAAAJ5MwUAAAACeDQFAAAAAnk0BwMJAQAAAAEhAAAAAQkBAAAAEXZhbGlkYXRlVHdvQ29vcmRzAAAABAUAAAACeDQFAAAAAnk0BQAAAAJ4NQUAAAACeTUHAwkBAAAAASEAAAABCQEAAAARdmFsaWRhdGVUd29Db29yZHMAAAAEBQAAAAJ4NQUAAAACeTUFAAAAAng2BQAAAAJ5NgcGAQAAABBnZW5LZXlGcm9tQ29vcmRzAAAADAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgAAAAJ4MwAAAAJ5MwAAAAJ4NAAAAAJ5NAAAAAJ4NQAAAAJ5NQAAAAJ4NgAAAAJ5NgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABpAAAAAEFAAAAAngxAgAAAAEsCQABpAAAAAEFAAAAAnkxAgAAAAE7CQABpAAAAAEFAAAAAngyAgAAAAEsCQABpAAAAAEFAAAAAnkyAgAAAAE7CQABpAAAAAEFAAAAAngzAgAAAAEsCQABpAAAAAEFAAAAAnkzAgAAAAE7CQABpAAAAAEFAAAAAng0AgAAAAEsCQABpAAAAAEFAAAAAnk0AgAAAAE7CQABpAAAAAEFAAAAAng1AgAAAAEsCQABpAAAAAEFAAAAAnk1AgAAAAE7CQABpAAAAAEFAAAAAng2AgAAAAEsCQABpAAAAAEFAAAAAnk2AQAAABFnZXRLZXlCYWxhbmNlVXNlcgAAAAEAAAAHYWNjb3VudAkAASwAAAACBQAAAAdhY2NvdW50AgAAAAhfYmFsYW5jZQEAAAATZ2V0VmFsdWVCYWxhbmNlVXNlcgAAAAEAAAAHYWNjb3VudAkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAEWdldEtleUJhbGFuY2VVc2VyAAAAAQUAAAAHYWNjb3VudAEAAAAOZ2V0S2V5V2luQ291bnQAAAABAAAABHVzZXIJAAEsAAAAAgUAAAAEdXNlcgIAAAAHX3dpbmNudAEAAAAQZ2V0VmFsdWVXaW5Db3VudAAAAAEAAAAEdXNlcgkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAADmdldEtleVdpbkNvdW50AAAAAQUAAAAEdXNlcgEAAAAPZ2V0S2V5TG9zZUNvdW50AAAAAQAAAAR1c2VyCQABLAAAAAIFAAAABHVzZXICAAAACF9sb3NlY250AQAAABFnZXRWYWx1ZUxvc2VDb3VudAAAAAEAAAAEdXNlcgkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAD2dldEtleUxvc2VDb3VudAAAAAEFAAAABHVzZXIBAAAACmdldEtleUdhbWUAAAABAAAABGdhbWUJAAEsAAAAAgIAAAAFZ2FtZV8FAAAABGdhbWUBAAAADGdldFZhbHVlR2FtZQAAAAEAAAAEZ2FtZQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAACmdldEtleUdhbWUAAAABBQAAAARnYW1lAAAABAAAAAFpAQAAAAZwYXRlbnQAAAAMAAAAAngxAAAAAnkxAAAAAngyAAAAAnkyAAAAAngzAAAAAnkzAAAAAng0AAAAAnk0AAAAAng1AAAAAnk1AAAAAng2AAAAAnk2BAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAgY2FuIHVzZSBXQVZFUyBvbmx5IGF0IHRoZSBtb21lbnQEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMDCQEAAAACIT0AAAACCAUAAAADcG10AAAABmFtb3VudAUAAAAFUFJJQ0UJAAACAAAAAQIAAAAwcHVyY2hhc2UgYW1vdW50IGNhbm5vdCBiZSBub3QgZXF1YWwgdG8gdGhlIHByaWNlAwkBAAAAASEAAAABCQEAAAAOdmFsaWRhdGVDb29yZHMAAAAMBQAAAAJ4MQUAAAACeTEFAAAAAngyBQAAAAJ5MgUAAAACeDMFAAAAAnkzBQAAAAJ4NAUAAAACeTQFAAAAAng1BQAAAAJ5NQUAAAACeDYFAAAAAnk2CQAAAgAAAAECAAAAGWludmFsaWQgY29vcmRpbmF0ZXMgb3JkZXIDCQEAAAACIT0AAAACCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAQZ2VuS2V5RnJvbUNvb3JkcwAAAAwFAAAAAngxBQAAAAJ5MQUAAAACeDIFAAAAAnkyBQAAAAJ4MwUAAAACeTMFAAAAAng0BQAAAAJ5NAUAAAACeDUFAAAAAnk1BQAAAAJ4NgUAAAACeTYFAAAABE5PTkUJAAACAAAAAQIAAAAddGhpcyBwYXRlbnQgaXMgYWxyZWFkeSBleGlzdHMJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABBnZW5LZXlGcm9tQ29vcmRzAAAADAUAAAACeDEFAAAAAnkxBQAAAAJ4MgUAAAACeTIFAAAAAngzBQAAAAJ5MwUAAAACeDQFAAAAAnk0BQAAAAJ4NQUAAAACeTUFAAAAAng2BQAAAAJ5NgUAAAALdXNlckFkZHJlc3MFAAAAA25pbAAAAAFpAQAAAAlidXlQYXRlbnQAAAAMAAAAAngxAAAAAnkxAAAAAngyAAAAAnkyAAAAAngzAAAAAnkzAAAAAng0AAAAAnk0AAAAAng1AAAAAnk1AAAAAng2AAAAAnk2BAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAgY2FuIHVzZSBXQVZFUyBvbmx5IGF0IHRoZSBtb21lbnQEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAEnBhdGVudE93bmVyQWRkcmVzcwkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEGdlbktleUZyb21Db29yZHMAAAAMBQAAAAJ4MQUAAAACeTEFAAAAAngyBQAAAAJ5MgUAAAACeDMFAAAAAnkzBQAAAAJ4NAUAAAACeTQFAAAAAng1BQAAAAJ5NQUAAAACeDYFAAAAAnk2AwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAAC1BBVEVOVFBSSUNFCQAAAgAAAAECAAAAMHB1cmNoYXNlIGFtb3VudCBjYW5ub3QgYmUgbm90IGVxdWFsIHRvIHRoZSBwcmljZQMJAQAAAAEhAAAAAQkBAAAADnZhbGlkYXRlQ29vcmRzAAAADAUAAAACeDEFAAAAAnkxBQAAAAJ4MgUAAAACeTIFAAAAAngzBQAAAAJ5MwUAAAACeDQFAAAAAnk0BQAAAAJ4NQUAAAACeTUFAAAAAng2BQAAAAJ5NgkAAAIAAAABAgAAABlpbnZhbGlkIGNvb3JkaW5hdGVzIG9yZGVyAwkAAAAAAAACBQAAABJwYXRlbnRPd25lckFkZHJlc3MFAAAABE5PTkUJAAACAAAAAQIAAAAXdGhlcmUgaXMgbm8gc3VjaCBwYXRlbnQDCQAAAAAAAAIFAAAAEnBhdGVudE93bmVyQWRkcmVzcwUAAAALdXNlckFkZHJlc3MJAAACAAAAAQIAAAAeeW91IGNhbm5vdCBidXkgeW91ciBvd24gcGF0ZW50CQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAQZ2VuS2V5RnJvbUNvb3JkcwAAAAwFAAAAAngxBQAAAAJ5MQUAAAACeDIFAAAAAnkyBQAAAAJ4MwUAAAACeTMFAAAAAng0BQAAAAJ5NAUAAAACeDUFAAAAAnk1BQAAAAJ4NgUAAAACeTYFAAAAC3VzZXJBZGRyZXNzCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAARZ2V0S2V5QmFsYW5jZVVzZXIAAAABBQAAABJwYXRlbnRPd25lckFkZHJlc3MJAABkAAAAAgkBAAAAE2dldFZhbHVlQmFsYW5jZVVzZXIAAAABBQAAABJwYXRlbnRPd25lckFkZHJlc3MIBQAAAANwbXQAAAAGYW1vdW50BQAAAANuaWwAAAABaQEAAAAId2l0aGRyYXcAAAAABAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAdiYWxhbmNlCQEAAAATZ2V0VmFsdWVCYWxhbmNlVXNlcgAAAAEFAAAAC3VzZXJBZGRyZXNzAwkAAGcAAAACAAAAAAAAAAAABQAAAAdiYWxhbmNlCQAAAgAAAAECAAAAFGluc3VmZmljaWVudCBiYWxhbmNlCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEWdldEtleUJhbGFuY2VVc2VyAAAAAQUAAAALdXNlckFkZHJlc3MAAAAAAAAAAAAFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAAC3VzZXJBZGRyZXNzBQAAAAdiYWxhbmNlBQAAAAR1bml0BQAAAANuaWwAAAABaQEAAAAKZ2FtZVJlcG9ydAAAAAMAAAAEZ2FtZQAAAAZ3aW5uZXIAAAAFbG9zZXIEAAAADG9yYWNsZUFkZHJlcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAAiE9AAAAAgUAAAAMb3JhY2xlQWRkcmVzBQAAAAZPUkFDTEUJAAACAAAAAQIAAAAqb25seSBvcmFjbGUgY2FuIGluZm9ybSBhYm91dCBnYW1lcyByZXN1bHRzAwkAAAAAAAACBQAAAAZ3aW5uZXIFAAAABWxvc2VyCQAAAgAAAAECAAAAIndpbm5lciBhbmQgbG9zZXIgbXVzdCBiZSBkaWZmZXJlbnQDCQEAAAACIT0AAAACCQEAAAAMZ2V0VmFsdWVHYW1lAAAAAQUAAAAEZ2FtZQUAAAAETk9ORQkAAAIAAAABAgAAACF0aGlzIGdhbWUgaGFzIGFscmVhZHkgYmVlbiBwbGF5ZWQJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAApnZXRLZXlHYW1lAAAAAQUAAAAEZ2FtZQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAGd2lubmVyAgAAAAUtV0lOOwUAAAAFbG9zZXICAAAABS1MT1NFCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5V2luQ291bnQAAAABBQAAAAZ3aW5uZXIJAABkAAAAAgkBAAAAEGdldFZhbHVlV2luQ291bnQAAAABBQAAAAZ3aW5uZXIAAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA9nZXRLZXlMb3NlQ291bnQAAAABBQAAAAVsb3NlcgkAAGQAAAACCQEAAAARZ2V0VmFsdWVMb3NlQ291bnQAAAABBQAAAAVsb3NlcgAAAAAAAAAAAQUAAAADbmlsAAAAAPKxcdI=",
    "chainId": 84,
    "height": 666918,
    "spentComplexity": 0
}

View: original | compacted
Prev: 6SqBpdzyNuRDS4TWdbwA4nC4TLXyGre3hzDEQDrUepJv
Next: 5kXvuNXuHnR48SPhf4ffSCSz5SDzhS1g8ehCzuPDv7fg

Diff: 
Old
New
Differences
84
84
 
func J (G) = g(I(G))
85
85
 
86
86
 
87
-
@Callable(K)
87
+
func K (L) = ("game_" + L)
88
+
89
+
90
+
func M (L) = l(K(L))
91
+
92
+
93
+
@Callable(N)
88
94
 
func patent (o,p,q,r,t,u,v,w,x,y,z,A) = {
89
-
    let L = extract(K.payment)
90
-
    if (isDefined(L.assetId))
95
+
    let O = extract(N.payment)
96
+
    if (isDefined(O.assetId))
91
97
 
        then throw("can use WAVES only at the moment")
92
98
 
        else {
93
-
            let M = toBase58String(K.caller.bytes)
94
-
            if ((L.amount != a))
99
+
            let P = toBase58String(N.caller.bytes)
100
+
            if ((O.amount != a))
95
101
 
                then throw("purchase amount cannot be not equal to the price")
96
102
 
                else if (!(s(o, p, q, r, t, u, v, w, x, y, z, A)))
97
103
 
                    then throw("invalid coordinates order")
98
104
 
                    else if ((l(B(o, p, q, r, t, u, v, w, x, y, z, A)) != f))
99
105
 
                        then throw("this patent is already exists")
100
-
                        else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), M)])
106
+
                        else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), P)])
101
107
 
            }
102
108
 
    }
103
109
 
104
110
 
105
111
 
106
-
@Callable(K)
112
+
@Callable(N)
107
113
 
func buyPatent (o,p,q,r,t,u,v,w,x,y,z,A) = {
108
-
    let L = extract(K.payment)
109
-
    if (isDefined(L.assetId))
114
+
    let O = extract(N.payment)
115
+
    if (isDefined(O.assetId))
110
116
 
        then throw("can use WAVES only at the moment")
111
117
 
        else {
112
-
            let M = toBase58String(K.caller.bytes)
113
-
            let N = l(B(o, p, q, r, t, u, v, w, x, y, z, A))
114
-
            if ((L.amount != b))
118
+
            let P = toBase58String(N.caller.bytes)
119
+
            let Q = l(B(o, p, q, r, t, u, v, w, x, y, z, A))
120
+
            if ((O.amount != b))
115
121
 
                then throw("purchase amount cannot be not equal to the price")
116
122
 
                else if (!(s(o, p, q, r, t, u, v, w, x, y, z, A)))
117
123
 
                    then throw("invalid coordinates order")
118
-
                    else if ((N == f))
124
+
                    else if ((Q == f))
119
125
 
                        then throw("there is no such patent")
120
-
                        else if ((N == M))
126
+
                        else if ((Q == P))
121
127
 
                            then throw("you cannot buy your own patent")
122
-
                            else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), M), DataEntry(C(N), (E(N) + L.amount))])
128
+
                            else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), P), DataEntry(C(Q), (E(Q) + O.amount))])
123
129
 
            }
124
130
 
    }
125
131
 
126
132
 
127
133
 
128
-
@Callable(K)
134
+
@Callable(N)
129
135
 
func withdraw () = {
130
-
    let M = toBase58String(K.caller.bytes)
131
-
    let O = E(M)
132
-
    if ((0 >= O))
136
+
    let P = toBase58String(N.caller.bytes)
137
+
    let R = E(P)
138
+
    if ((0 >= R))
133
139
 
        then throw("insufficient balance")
134
-
        else ScriptResult(WriteSet([DataEntry(C(M), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(M), O, unit)]))
140
+
        else ScriptResult(WriteSet([DataEntry(C(P), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(P), R, unit)]))
135
141
 
    }
136
142
 
137
143
 
138
144
 
139
-
@Callable(K)
140
-
func gameReport (P,Q,R) = {
141
-
    let S = toBase58String(K.caller.bytes)
142
-
    if ((S != c))
145
+
@Callable(N)
146
+
func gameReport (L,S,T) = {
147
+
    let U = toBase58String(N.caller.bytes)
148
+
    if ((U != c))
143
149
 
        then throw("only oracle can inform about games results")
144
-
        else if ((Q == R))
150
+
        else if ((S == T))
145
151
 
            then throw("winner and loser must be different")
146
-
            else if ((l(P) != f))
152
+
            else if ((M(L) != f))
147
153
 
                then throw("this game has already been played")
148
-
                else WriteSet([DataEntry(("game_" + P), (((Q + "-WIN;") + R) + "-LOSE")), DataEntry(F(Q), (H(Q) + 1)), DataEntry(I(R), (J(R) + 1))])
154
+
                else WriteSet([DataEntry(K(L), (((S + "-WIN;") + T) + "-LOSE")), DataEntry(F(S), (H(S) + 1)), DataEntry(I(T), (J(T) + 1))])
149
155
 
    }
150
156
 
151
157
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 3 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = 100000000
5
5
 
6
6
 
let b = 200000000
7
7
 
8
8
 
let c = "3MvisDfA6vNg4i6iKYWZ8bWvyP4imfBb9eq"
9
9
 
10
10
 
let d = "WIN"
11
11
 
12
12
 
let e = "LOSE"
13
13
 
14
14
 
let f = "none"
15
15
 
16
16
 
func g (h) = {
17
17
 
    let i = {
18
18
 
        let j = getInteger(this, h)
19
19
 
        if ($isInstanceOf(j, "Int"))
20
20
 
            then {
21
21
 
                let k = j
22
22
 
                k
23
23
 
                }
24
24
 
            else 0
25
25
 
        }
26
26
 
    i
27
27
 
    }
28
28
 
29
29
 
30
30
 
func l (h) = {
31
31
 
    let m = {
32
32
 
        let j = getString(this, h)
33
33
 
        if ($isInstanceOf(j, "String"))
34
34
 
            then {
35
35
 
                let k = j
36
36
 
                k
37
37
 
                }
38
38
 
            else f
39
39
 
        }
40
40
 
    m
41
41
 
    }
42
42
 
43
43
 
44
44
 
func n (o,p,q,r) = if ((o > q))
45
45
 
    then false
46
46
 
    else if (if ((o == q))
47
47
 
        then (p > r)
48
48
 
        else false)
49
49
 
        then false
50
50
 
        else true
51
51
 
52
52
 
53
53
 
func s (o,p,q,r,t,u,v,w,x,y,z,A) = if (!(n(o, p, q, r)))
54
54
 
    then false
55
55
 
    else if (!(n(q, r, t, u)))
56
56
 
        then false
57
57
 
        else if (!(n(t, u, v, w)))
58
58
 
            then false
59
59
 
            else if (!(n(v, w, x, y)))
60
60
 
                then false
61
61
 
                else if (!(n(x, y, z, A)))
62
62
 
                    then false
63
63
 
                    else true
64
64
 
65
65
 
66
66
 
func B (o,p,q,r,t,u,v,w,x,y,z,A) = ((((((((((((((((((((((toString(o) + ",") + toString(p)) + ";") + toString(q)) + ",") + toString(r)) + ";") + toString(t)) + ",") + toString(u)) + ";") + toString(v)) + ",") + toString(w)) + ";") + toString(x)) + ",") + toString(y)) + ";") + toString(z)) + ",") + toString(A))
67
67
 
68
68
 
69
69
 
func C (D) = (D + "_balance")
70
70
 
71
71
 
72
72
 
func E (D) = g(C(D))
73
73
 
74
74
 
75
75
 
func F (G) = (G + "_wincnt")
76
76
 
77
77
 
78
78
 
func H (G) = g(F(G))
79
79
 
80
80
 
81
81
 
func I (G) = (G + "_losecnt")
82
82
 
83
83
 
84
84
 
func J (G) = g(I(G))
85
85
 
86
86
 
87
-
@Callable(K)
87
+
func K (L) = ("game_" + L)
88
+
89
+
90
+
func M (L) = l(K(L))
91
+
92
+
93
+
@Callable(N)
88
94
 
func patent (o,p,q,r,t,u,v,w,x,y,z,A) = {
89
-
    let L = extract(K.payment)
90
-
    if (isDefined(L.assetId))
95
+
    let O = extract(N.payment)
96
+
    if (isDefined(O.assetId))
91
97
 
        then throw("can use WAVES only at the moment")
92
98
 
        else {
93
-
            let M = toBase58String(K.caller.bytes)
94
-
            if ((L.amount != a))
99
+
            let P = toBase58String(N.caller.bytes)
100
+
            if ((O.amount != a))
95
101
 
                then throw("purchase amount cannot be not equal to the price")
96
102
 
                else if (!(s(o, p, q, r, t, u, v, w, x, y, z, A)))
97
103
 
                    then throw("invalid coordinates order")
98
104
 
                    else if ((l(B(o, p, q, r, t, u, v, w, x, y, z, A)) != f))
99
105
 
                        then throw("this patent is already exists")
100
-
                        else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), M)])
106
+
                        else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), P)])
101
107
 
            }
102
108
 
    }
103
109
 
104
110
 
105
111
 
106
-
@Callable(K)
112
+
@Callable(N)
107
113
 
func buyPatent (o,p,q,r,t,u,v,w,x,y,z,A) = {
108
-
    let L = extract(K.payment)
109
-
    if (isDefined(L.assetId))
114
+
    let O = extract(N.payment)
115
+
    if (isDefined(O.assetId))
110
116
 
        then throw("can use WAVES only at the moment")
111
117
 
        else {
112
-
            let M = toBase58String(K.caller.bytes)
113
-
            let N = l(B(o, p, q, r, t, u, v, w, x, y, z, A))
114
-
            if ((L.amount != b))
118
+
            let P = toBase58String(N.caller.bytes)
119
+
            let Q = l(B(o, p, q, r, t, u, v, w, x, y, z, A))
120
+
            if ((O.amount != b))
115
121
 
                then throw("purchase amount cannot be not equal to the price")
116
122
 
                else if (!(s(o, p, q, r, t, u, v, w, x, y, z, A)))
117
123
 
                    then throw("invalid coordinates order")
118
-
                    else if ((N == f))
124
+
                    else if ((Q == f))
119
125
 
                        then throw("there is no such patent")
120
-
                        else if ((N == M))
126
+
                        else if ((Q == P))
121
127
 
                            then throw("you cannot buy your own patent")
122
-
                            else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), M), DataEntry(C(N), (E(N) + L.amount))])
128
+
                            else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), P), DataEntry(C(Q), (E(Q) + O.amount))])
123
129
 
            }
124
130
 
    }
125
131
 
126
132
 
127
133
 
128
-
@Callable(K)
134
+
@Callable(N)
129
135
 
func withdraw () = {
130
-
    let M = toBase58String(K.caller.bytes)
131
-
    let O = E(M)
132
-
    if ((0 >= O))
136
+
    let P = toBase58String(N.caller.bytes)
137
+
    let R = E(P)
138
+
    if ((0 >= R))
133
139
 
        then throw("insufficient balance")
134
-
        else ScriptResult(WriteSet([DataEntry(C(M), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(M), O, unit)]))
140
+
        else ScriptResult(WriteSet([DataEntry(C(P), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(P), R, unit)]))
135
141
 
    }
136
142
 
137
143
 
138
144
 
139
-
@Callable(K)
140
-
func gameReport (P,Q,R) = {
141
-
    let S = toBase58String(K.caller.bytes)
142
-
    if ((S != c))
145
+
@Callable(N)
146
+
func gameReport (L,S,T) = {
147
+
    let U = toBase58String(N.caller.bytes)
148
+
    if ((U != c))
143
149
 
        then throw("only oracle can inform about games results")
144
-
        else if ((Q == R))
150
+
        else if ((S == T))
145
151
 
            then throw("winner and loser must be different")
146
-
            else if ((l(P) != f))
152
+
            else if ((M(L) != f))
147
153
 
                then throw("this game has already been played")
148
-
                else WriteSet([DataEntry(("game_" + P), (((Q + "-WIN;") + R) + "-LOSE")), DataEntry(F(Q), (H(Q) + 1)), DataEntry(I(R), (J(R) + 1))])
154
+
                else WriteSet([DataEntry(K(L), (((S + "-WIN;") + T) + "-LOSE")), DataEntry(F(S), (H(S) + 1)), DataEntry(I(T), (J(T) + 1))])
149
155
 
    }
150
156
 
151
157
 

github/deemru/w8io/169f3d6 
42.85 ms ◑