tx · CJBoNBF5kKKjWqhLQ2E123KMaCxZM2rei8qyxka2jjKs

3N18S8xfWJYHVuGfJcpcPVh7LsnqR9hKTcc:  -0.01400000 Waves

2019.09.08 14:56 [667072] smart account 3N18S8xfWJYHVuGfJcpcPVh7LsnqR9hKTcc > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "CJBoNBF5kKKjWqhLQ2E123KMaCxZM2rei8qyxka2jjKs",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1567943722569,
    "version": 1,
    "sender": "3N18S8xfWJYHVuGfJcpcPVh7LsnqR9hKTcc",
    "senderPublicKey": "9cETBksYN8YMHGvDB6BEqmH9HScpCMBRZwnjCviRQ9aA",
    "proofs": [
        "C8qe1eAudoZhE3ZDUSGCXvJo1MMZdprvrUEozcC8jB1yLHXve8JrBuFJro6gBpwjfT8T6HuzTvoPmXiZvvx4VX4"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAAXAAAAAAVQUklDRQAAAAAABfXhAAAAAAALUEFURU5UUFJJQ0UAAAAAAAvrwgAAAAAABk9SQUNMRQIAAAAjM012aXNEZkE2dk5nNGk2aUtZV1o4Yld2eVA0aW1mQmI5ZXEAAAAAA1dJTgIAAAADV0lOAAAAAARMT1NFAgAAAARMT1NFAAAAAAROT05FAgAAAARub25lAQAAAA5nZXROdW1iZXJCeUtleQAAAAEAAAADa2V5BAAAAANudW0EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAFAAAAA251bQEAAAALZ2V0U3RyQnlLZXkAAAABAAAAA2tleQQAAAADc3RyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBQAAAANzdHIBAAAAEXZhbGlkYXRlVHdvQ29vcmRzAAAABAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgMJAABmAAAAAgUAAAACeDEFAAAAAngyBwMDCQAAAAAAAAIFAAAAAngxBQAAAAJ4MgkAAGYAAAACBQAAAAJ5MQUAAAACeTIHBwYBAAAADnZhbGlkYXRlQ29vcmRzAAAADAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgAAAAJ4MwAAAAJ5MwAAAAJ4NAAAAAJ5NAAAAAJ4NQAAAAJ5NQAAAAJ4NgAAAAJ5NgMJAQAAAAEhAAAAAQkBAAAAEXZhbGlkYXRlVHdvQ29vcmRzAAAABAUAAAACeDEFAAAAAnkxBQAAAAJ4MgUAAAACeTIHAwkBAAAAASEAAAABCQEAAAARdmFsaWRhdGVUd29Db29yZHMAAAAEBQAAAAJ4MgUAAAACeTIFAAAAAngzBQAAAAJ5MwcDCQEAAAABIQAAAAEJAQAAABF2YWxpZGF0ZVR3b0Nvb3JkcwAAAAQFAAAAAngzBQAAAAJ5MwUAAAACeDQFAAAAAnk0BwMJAQAAAAEhAAAAAQkBAAAAEXZhbGlkYXRlVHdvQ29vcmRzAAAABAUAAAACeDQFAAAAAnk0BQAAAAJ4NQUAAAACeTUHAwkBAAAAASEAAAABCQEAAAARdmFsaWRhdGVUd29Db29yZHMAAAAEBQAAAAJ4NQUAAAACeTUFAAAAAng2BQAAAAJ5NgcGAQAAABBnZW5LZXlGcm9tQ29vcmRzAAAADAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgAAAAJ4MwAAAAJ5MwAAAAJ4NAAAAAJ5NAAAAAJ4NQAAAAJ5NQAAAAJ4NgAAAAJ5NgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAB3BhdGVudDoJAAGkAAAAAQUAAAACeDECAAAAASwJAAGkAAAAAQUAAAACeTECAAAAATsJAAGkAAAAAQUAAAACeDICAAAAASwJAAGkAAAAAQUAAAACeTICAAAAATsJAAGkAAAAAQUAAAACeDMCAAAAASwJAAGkAAAAAQUAAAACeTMCAAAAATsJAAGkAAAAAQUAAAACeDQCAAAAASwJAAGkAAAAAQUAAAACeTQCAAAAATsJAAGkAAAAAQUAAAACeDUCAAAAASwJAAGkAAAAAQUAAAACeTUCAAAAATsJAAGkAAAAAQUAAAACeDYCAAAAASwJAAGkAAAAAQUAAAACeTYBAAAAEWdldEtleUJhbGFuY2VVc2VyAAAAAQAAAAdhY2NvdW50CQABLAAAAAIFAAAAB2FjY291bnQCAAAACF9iYWxhbmNlAQAAABNnZXRWYWx1ZUJhbGFuY2VVc2VyAAAAAQAAAAdhY2NvdW50CQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAARZ2V0S2V5QmFsYW5jZVVzZXIAAAABBQAAAAdhY2NvdW50AQAAAA5nZXRLZXlXaW5Db3VudAAAAAEAAAAEdXNlcgkAASwAAAACBQAAAAR1c2VyAgAAAAdfd2luY250AQAAABBnZXRWYWx1ZVdpbkNvdW50AAAAAQAAAAR1c2VyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAOZ2V0S2V5V2luQ291bnQAAAABBQAAAAR1c2VyAQAAAA9nZXRLZXlMb3NlQ291bnQAAAABAAAABHVzZXIJAAEsAAAAAgUAAAAEdXNlcgIAAAAIX2xvc2VjbnQBAAAAEWdldFZhbHVlTG9zZUNvdW50AAAAAQAAAAR1c2VyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAPZ2V0S2V5TG9zZUNvdW50AAAAAQUAAAAEdXNlcgEAAAAKZ2V0S2V5R2FtZQAAAAEAAAAEZ2FtZQkAASwAAAACAgAAAAVnYW1lXwUAAAAEZ2FtZQEAAAAMZ2V0VmFsdWVHYW1lAAAAAQAAAARnYW1lCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAKZ2V0S2V5R2FtZQAAAAEFAAAABGdhbWUBAAAAFGdldEtleUluc3VyYW5jZUNvdW50AAAAAQAAAAR1c2VyCQABLAAAAAIFAAAABHVzZXICAAAADl9pbnN1cmFuY2VfY250AQAAABZnZXRWYWx1ZUluc3VyYW5jZUNvdW50AAAAAQAAAAR1c2VyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAUZ2V0S2V5SW5zdXJhbmNlQ291bnQAAAABBQAAAAR1c2VyAQAAABVnZXRLZXlVc2VyUGF0ZW50Q291bnQAAAABAAAABHVzZXIJAAEsAAAAAgUAAAAEdXNlcgIAAAALX3BhdGVudF9jbnQBAAAAF2dldFZhbHVlVXNlclBhdGVudENvdW50AAAAAQAAAAR1c2VyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5VXNlclBhdGVudENvdW50AAAAAQUAAAAEdXNlcgAAAAUAAAABaQEAAAAGcGF0ZW50AAAADAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgAAAAJ4MwAAAAJ5MwAAAAJ4NAAAAAJ5NAAAAAJ4NQAAAAJ5NQAAAAJ4NgAAAAJ5NgQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAIGNhbiB1c2UgV0FWRVMgb25seSBhdCB0aGUgbW9tZW50BAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAABVBSSUNFCQAAAgAAAAECAAAAMHB1cmNoYXNlIGFtb3VudCBjYW5ub3QgYmUgbm90IGVxdWFsIHRvIHRoZSBwcmljZQMJAQAAAAEhAAAAAQkBAAAADnZhbGlkYXRlQ29vcmRzAAAADAUAAAACeDEFAAAAAnkxBQAAAAJ4MgUAAAACeTIFAAAAAngzBQAAAAJ5MwUAAAACeDQFAAAAAnk0BQAAAAJ4NQUAAAACeTUFAAAAAng2BQAAAAJ5NgkAAAIAAAABAgAAABlpbnZhbGlkIGNvb3JkaW5hdGVzIG9yZGVyAwkBAAAAAiE9AAAAAgkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEGdlbktleUZyb21Db29yZHMAAAAMBQAAAAJ4MQUAAAACeTEFAAAAAngyBQAAAAJ5MgUAAAACeDMFAAAAAnkzBQAAAAJ4NAUAAAACeTQFAAAAAng1BQAAAAJ5NQUAAAACeDYFAAAAAnk2BQAAAAROT05FCQAAAgAAAAECAAAAHXRoaXMgcGF0ZW50IGlzIGFscmVhZHkgZXhpc3RzAwkAAGcAAAACCQEAAAAXZ2V0VmFsdWVVc2VyUGF0ZW50Q291bnQAAAABBQAAAAt1c2VyQWRkcmVzcwAAAAAAAAAAAgkAAAIAAAABAgAAACN5b3UgY2Fubm90IGhhdmUgbW9yZSB0aGFuIDIgcGF0ZW50cwkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEGdlbktleUZyb21Db29yZHMAAAAMBQAAAAJ4MQUAAAACeTEFAAAAAngyBQAAAAJ5MgUAAAACeDMFAAAAAnkzBQAAAAJ4NAUAAAACeTQFAAAAAng1BQAAAAJ5NQUAAAACeDYFAAAAAnk2BQAAAAt1c2VyQWRkcmVzcwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleVVzZXJQYXRlbnRDb3VudAAAAAEFAAAAC3VzZXJBZGRyZXNzCQAAZAAAAAIJAQAAABdnZXRWYWx1ZVVzZXJQYXRlbnRDb3VudAAAAAEFAAAAC3VzZXJBZGRyZXNzAAAAAAAAAAABBQAAAANuaWwAAAABaQEAAAAJYnV5UGF0ZW50AAAADAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgAAAAJ4MwAAAAJ5MwAAAAJ4NAAAAAJ5NAAAAAJ4NQAAAAJ5NQAAAAJ4NgAAAAJ5NgQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAIGNhbiB1c2UgV0FWRVMgb25seSBhdCB0aGUgbW9tZW50BAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAABJwYXRlbnRPd25lckFkZHJlc3MJAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABBnZW5LZXlGcm9tQ29vcmRzAAAADAUAAAACeDEFAAAAAnkxBQAAAAJ4MgUAAAACeTIFAAAAAngzBQAAAAJ5MwUAAAACeDQFAAAAAnk0BQAAAAJ4NQUAAAACeTUFAAAAAng2BQAAAAJ5NgMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAGYW1vdW50BQAAAAtQQVRFTlRQUklDRQkAAAIAAAABAgAAADBwdXJjaGFzZSBhbW91bnQgY2Fubm90IGJlIG5vdCBlcXVhbCB0byB0aGUgcHJpY2UDCQEAAAABIQAAAAEJAQAAAA52YWxpZGF0ZUNvb3JkcwAAAAwFAAAAAngxBQAAAAJ5MQUAAAACeDIFAAAAAnkyBQAAAAJ4MwUAAAACeTMFAAAAAng0BQAAAAJ5NAUAAAACeDUFAAAAAnk1BQAAAAJ4NgUAAAACeTYJAAACAAAAAQIAAAAZaW52YWxpZCBjb29yZGluYXRlcyBvcmRlcgMJAAAAAAAAAgUAAAAScGF0ZW50T3duZXJBZGRyZXNzBQAAAAROT05FCQAAAgAAAAECAAAAF3RoZXJlIGlzIG5vIHN1Y2ggcGF0ZW50AwkAAAAAAAACBQAAABJwYXRlbnRPd25lckFkZHJlc3MFAAAAC3VzZXJBZGRyZXNzCQAAAgAAAAECAAAAHnlvdSBjYW5ub3QgYnV5IHlvdXIgb3duIHBhdGVudAkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEGdlbktleUZyb21Db29yZHMAAAAMBQAAAAJ4MQUAAAACeTEFAAAAAngyBQAAAAJ5MgUAAAACeDMFAAAAAnkzBQAAAAJ4NAUAAAACeTQFAAAAAng1BQAAAAJ5NQUAAAACeDYFAAAAAnk2BQAAAAt1c2VyQWRkcmVzcwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEWdldEtleUJhbGFuY2VVc2VyAAAAAQUAAAAScGF0ZW50T3duZXJBZGRyZXNzCQAAZAAAAAIJAQAAABNnZXRWYWx1ZUJhbGFuY2VVc2VyAAAAAQUAAAAScGF0ZW50T3duZXJBZGRyZXNzCAUAAAADcG10AAAABmFtb3VudAUAAAADbmlsAAAAAWkBAAAACHdpdGhkcmF3AAAAAAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAHYmFsYW5jZQkBAAAAE2dldFZhbHVlQmFsYW5jZVVzZXIAAAABBQAAAAt1c2VyQWRkcmVzcwMJAABnAAAAAgAAAAAAAAAAAAUAAAAHYmFsYW5jZQkAAAIAAAABAgAAABRpbnN1ZmZpY2llbnQgYmFsYW5jZQkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABFnZXRLZXlCYWxhbmNlVXNlcgAAAAEFAAAAC3VzZXJBZGRyZXNzAAAAAAAAAAAABQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAAt1c2VyQWRkcmVzcwUAAAAHYmFsYW5jZQUAAAAEdW5pdAUAAAADbmlsAAAAAWkBAAAACmdhbWVSZXBvcnQAAAADAAAABGdhbWUAAAAGd2lubmVyAAAABWxvc2VyBAAAAAxvcmFjbGVBZGRyZXMJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwMJAQAAAAIhPQAAAAIFAAAADG9yYWNsZUFkZHJlcwUAAAAGT1JBQ0xFCQAAAgAAAAECAAAAKm9ubHkgb3JhY2xlIGNhbiBpbmZvcm0gYWJvdXQgZ2FtZXMgcmVzdWx0cwMJAAAAAAAAAgUAAAAGd2lubmVyBQAAAAVsb3NlcgkAAAIAAAABAgAAACJ3aW5uZXIgYW5kIGxvc2VyIG11c3QgYmUgZGlmZmVyZW50AwkBAAAAAiE9AAAAAgkBAAAADGdldFZhbHVlR2FtZQAAAAEFAAAABGdhbWUFAAAABE5PTkUJAAACAAAAAQIAAAAhdGhpcyBnYW1lIGhhcyBhbHJlYWR5IGJlZW4gcGxheWVkCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAKZ2V0S2V5R2FtZQAAAAEFAAAABGdhbWUJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABndpbm5lcgIAAAAFLVdJTjsFAAAABWxvc2VyAgAAAAUtTE9TRQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleVdpbkNvdW50AAAAAQUAAAAGd2lubmVyCQAAZAAAAAIJAQAAABBnZXRWYWx1ZVdpbkNvdW50AAAAAQUAAAAGd2lubmVyAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAPZ2V0S2V5TG9zZUNvdW50AAAAAQUAAAAFbG9zZXIJAABkAAAAAgkBAAAAEWdldFZhbHVlTG9zZUNvdW50AAAAAQUAAAAFbG9zZXIAAAAAAAAAAAEFAAAAA25pbAAAAAFpAQAAAAZpbnN1cmUAAAAABAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAQAAAAOaW5zdXJhbmNlUHJpY2UJAABrAAAAAwUAAAAFUFJJQ0UAAAAAAAAAAAcAAAAAAAAAAGQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAIGNhbiB1c2UgV0FWRVMgb25seSBhdCB0aGUgbW9tZW50BAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAADmluc3VyYW5jZVByaWNlCQAAAgAAAAECAAAAQ2luc3VyYW5jZSBwYXltZW50IGFtb3VudCBjYW5ub3QgYmUgbm90IGVxdWFsIHRvIHRoZSBpbnN1cmFuY2UgcHJpY2UJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABRnZXRLZXlJbnN1cmFuY2VDb3VudAAAAAEFAAAAC3VzZXJBZGRyZXNzCQAAZAAAAAIJAQAAABZnZXRWYWx1ZUluc3VyYW5jZUNvdW50AAAAAQUAAAALdXNlckFkZHJlc3MAAAAAAAAAAAEFAAAAA25pbAAAAABL5G38",
    "chainId": 84,
    "height": 667072,
    "spentComplexity": 0
}

View: original | compacted
Prev: 5kXvuNXuHnR48SPhf4ffSCSz5SDzhS1g8ehCzuPDv7fg
Next: BBcE14RcP2V15Ck5JEdWuT4NGASCJzuaSzvJRgQ9TFPM

Diff: 
Old
New
Differences
96
96
 
func O (G) = g(N(G))
97
97
 
98
98
 
99
-
@Callable(P)
99
+
func P (G) = (G + "_patent_cnt")
100
+
101
+
102
+
func Q (G) = g(P(G))
103
+
104
+
105
+
@Callable(R)
100
106
 
func patent (o,p,q,r,t,u,v,w,x,y,z,A) = {
101
-
    let Q = extract(P.payment)
102
-
    if (isDefined(Q.assetId))
107
+
    let S = extract(R.payment)
108
+
    if (isDefined(S.assetId))
103
109
 
        then throw("can use WAVES only at the moment")
104
110
 
        else {
105
-
            let R = toBase58String(P.caller.bytes)
106
-
            if ((Q.amount != a))
111
+
            let T = toBase58String(R.caller.bytes)
112
+
            if ((S.amount != a))
107
113
 
                then throw("purchase amount cannot be not equal to the price")
108
114
 
                else if (!(s(o, p, q, r, t, u, v, w, x, y, z, A)))
109
115
 
                    then throw("invalid coordinates order")
110
116
 
                    else if ((l(B(o, p, q, r, t, u, v, w, x, y, z, A)) != f))
111
117
 
                        then throw("this patent is already exists")
112
-
                        else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), R)])
118
+
                        else if ((Q(T) >= 2))
119
+
                            then throw("you cannot have more than 2 patents")
120
+
                            else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), T), DataEntry(P(T), (Q(T) + 1))])
113
121
 
            }
114
122
 
    }
115
123
 
116
124
 
117
125
 
118
-
@Callable(P)
126
+
@Callable(R)
119
127
 
func buyPatent (o,p,q,r,t,u,v,w,x,y,z,A) = {
120
-
    let Q = extract(P.payment)
121
-
    if (isDefined(Q.assetId))
128
+
    let S = extract(R.payment)
129
+
    if (isDefined(S.assetId))
122
130
 
        then throw("can use WAVES only at the moment")
123
131
 
        else {
124
-
            let R = toBase58String(P.caller.bytes)
125
-
            let S = l(B(o, p, q, r, t, u, v, w, x, y, z, A))
126
-
            if ((Q.amount != b))
132
+
            let T = toBase58String(R.caller.bytes)
133
+
            let U = l(B(o, p, q, r, t, u, v, w, x, y, z, A))
134
+
            if ((S.amount != b))
127
135
 
                then throw("purchase amount cannot be not equal to the price")
128
136
 
                else if (!(s(o, p, q, r, t, u, v, w, x, y, z, A)))
129
137
 
                    then throw("invalid coordinates order")
130
-
                    else if ((S == f))
138
+
                    else if ((U == f))
131
139
 
                        then throw("there is no such patent")
132
-
                        else if ((S == R))
140
+
                        else if ((U == T))
133
141
 
                            then throw("you cannot buy your own patent")
134
-
                            else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), R), DataEntry(C(S), (E(S) + Q.amount))])
142
+
                            else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), T), DataEntry(C(U), (E(U) + S.amount))])
135
143
 
            }
136
144
 
    }
137
145
 
138
146
 
139
147
 
140
-
@Callable(P)
148
+
@Callable(R)
141
149
 
func withdraw () = {
142
-
    let R = toBase58String(P.caller.bytes)
143
-
    let T = E(R)
144
-
    if ((0 >= T))
150
+
    let T = toBase58String(R.caller.bytes)
151
+
    let V = E(T)
152
+
    if ((0 >= V))
145
153
 
        then throw("insufficient balance")
146
-
        else ScriptResult(WriteSet([DataEntry(C(R), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(R), T, unit)]))
154
+
        else ScriptResult(WriteSet([DataEntry(C(T), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(T), V, unit)]))
147
155
 
    }
148
156
 
149
157
 
150
158
 
151
-
@Callable(P)
152
-
func gameReport (L,U,V) = {
153
-
    let W = toBase58String(P.caller.bytes)
154
-
    if ((W != c))
159
+
@Callable(R)
160
+
func gameReport (L,W,X) = {
161
+
    let Y = toBase58String(R.caller.bytes)
162
+
    if ((Y != c))
155
163
 
        then throw("only oracle can inform about games results")
156
-
        else if ((U == V))
164
+
        else if ((W == X))
157
165
 
            then throw("winner and loser must be different")
158
166
 
            else if ((M(L) != f))
159
167
 
                then throw("this game has already been played")
160
-
                else WriteSet([DataEntry(K(L), (((U + "-WIN;") + V) + "-LOSE")), DataEntry(F(U), (H(U) + 1)), DataEntry(I(V), (J(V) + 1))])
168
+
                else WriteSet([DataEntry(K(L), (((W + "-WIN;") + X) + "-LOSE")), DataEntry(F(W), (H(W) + 1)), DataEntry(I(X), (J(X) + 1))])
161
169
 
    }
162
170
 
163
171
 
164
172
 
165
-
@Callable(P)
173
+
@Callable(R)
166
174
 
func insure () = {
167
-
    let Q = extract(P.payment)
168
-
    let X = fraction(a, 7, 100)
169
-
    if (isDefined(Q.assetId))
175
+
    let S = extract(R.payment)
176
+
    let Z = fraction(a, 7, 100)
177
+
    if (isDefined(S.assetId))
170
178
 
        then throw("can use WAVES only at the moment")
171
179
 
        else {
172
-
            let R = toBase58String(P.caller.bytes)
173
-
            if ((Q.amount != X))
180
+
            let T = toBase58String(R.caller.bytes)
181
+
            if ((S.amount != Z))
174
182
 
                then throw("insurance payment amount cannot be not equal to the insurance price")
175
-
                else WriteSet([DataEntry(N(R), (O(R) + 1))])
183
+
                else WriteSet([DataEntry(N(T), (O(T) + 1))])
176
184
 
            }
177
185
 
    }
178
186
 

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) = ((((((((((((((((((((((("patent:" + 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
87
 
func K (L) = ("game_" + L)
88
88
 
89
89
 
90
90
 
func M (L) = l(K(L))
91
91
 
92
92
 
93
93
 
func N (G) = (G + "_insurance_cnt")
94
94
 
95
95
 
96
96
 
func O (G) = g(N(G))
97
97
 
98
98
 
99
-
@Callable(P)
99
+
func P (G) = (G + "_patent_cnt")
100
+
101
+
102
+
func Q (G) = g(P(G))
103
+
104
+
105
+
@Callable(R)
100
106
 
func patent (o,p,q,r,t,u,v,w,x,y,z,A) = {
101
-
    let Q = extract(P.payment)
102
-
    if (isDefined(Q.assetId))
107
+
    let S = extract(R.payment)
108
+
    if (isDefined(S.assetId))
103
109
 
        then throw("can use WAVES only at the moment")
104
110
 
        else {
105
-
            let R = toBase58String(P.caller.bytes)
106
-
            if ((Q.amount != a))
111
+
            let T = toBase58String(R.caller.bytes)
112
+
            if ((S.amount != a))
107
113
 
                then throw("purchase amount cannot be not equal to the price")
108
114
 
                else if (!(s(o, p, q, r, t, u, v, w, x, y, z, A)))
109
115
 
                    then throw("invalid coordinates order")
110
116
 
                    else if ((l(B(o, p, q, r, t, u, v, w, x, y, z, A)) != f))
111
117
 
                        then throw("this patent is already exists")
112
-
                        else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), R)])
118
+
                        else if ((Q(T) >= 2))
119
+
                            then throw("you cannot have more than 2 patents")
120
+
                            else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), T), DataEntry(P(T), (Q(T) + 1))])
113
121
 
            }
114
122
 
    }
115
123
 
116
124
 
117
125
 
118
-
@Callable(P)
126
+
@Callable(R)
119
127
 
func buyPatent (o,p,q,r,t,u,v,w,x,y,z,A) = {
120
-
    let Q = extract(P.payment)
121
-
    if (isDefined(Q.assetId))
128
+
    let S = extract(R.payment)
129
+
    if (isDefined(S.assetId))
122
130
 
        then throw("can use WAVES only at the moment")
123
131
 
        else {
124
-
            let R = toBase58String(P.caller.bytes)
125
-
            let S = l(B(o, p, q, r, t, u, v, w, x, y, z, A))
126
-
            if ((Q.amount != b))
132
+
            let T = toBase58String(R.caller.bytes)
133
+
            let U = l(B(o, p, q, r, t, u, v, w, x, y, z, A))
134
+
            if ((S.amount != b))
127
135
 
                then throw("purchase amount cannot be not equal to the price")
128
136
 
                else if (!(s(o, p, q, r, t, u, v, w, x, y, z, A)))
129
137
 
                    then throw("invalid coordinates order")
130
-
                    else if ((S == f))
138
+
                    else if ((U == f))
131
139
 
                        then throw("there is no such patent")
132
-
                        else if ((S == R))
140
+
                        else if ((U == T))
133
141
 
                            then throw("you cannot buy your own patent")
134
-
                            else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), R), DataEntry(C(S), (E(S) + Q.amount))])
142
+
                            else WriteSet([DataEntry(B(o, p, q, r, t, u, v, w, x, y, z, A), T), DataEntry(C(U), (E(U) + S.amount))])
135
143
 
            }
136
144
 
    }
137
145
 
138
146
 
139
147
 
140
-
@Callable(P)
148
+
@Callable(R)
141
149
 
func withdraw () = {
142
-
    let R = toBase58String(P.caller.bytes)
143
-
    let T = E(R)
144
-
    if ((0 >= T))
150
+
    let T = toBase58String(R.caller.bytes)
151
+
    let V = E(T)
152
+
    if ((0 >= V))
145
153
 
        then throw("insufficient balance")
146
-
        else ScriptResult(WriteSet([DataEntry(C(R), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(R), T, unit)]))
154
+
        else ScriptResult(WriteSet([DataEntry(C(T), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(T), V, unit)]))
147
155
 
    }
148
156
 
149
157
 
150
158
 
151
-
@Callable(P)
152
-
func gameReport (L,U,V) = {
153
-
    let W = toBase58String(P.caller.bytes)
154
-
    if ((W != c))
159
+
@Callable(R)
160
+
func gameReport (L,W,X) = {
161
+
    let Y = toBase58String(R.caller.bytes)
162
+
    if ((Y != c))
155
163
 
        then throw("only oracle can inform about games results")
156
-
        else if ((U == V))
164
+
        else if ((W == X))
157
165
 
            then throw("winner and loser must be different")
158
166
 
            else if ((M(L) != f))
159
167
 
                then throw("this game has already been played")
160
-
                else WriteSet([DataEntry(K(L), (((U + "-WIN;") + V) + "-LOSE")), DataEntry(F(U), (H(U) + 1)), DataEntry(I(V), (J(V) + 1))])
168
+
                else WriteSet([DataEntry(K(L), (((W + "-WIN;") + X) + "-LOSE")), DataEntry(F(W), (H(W) + 1)), DataEntry(I(X), (J(X) + 1))])
161
169
 
    }
162
170
 
163
171
 
164
172
 
165
-
@Callable(P)
173
+
@Callable(R)
166
174
 
func insure () = {
167
-
    let Q = extract(P.payment)
168
-
    let X = fraction(a, 7, 100)
169
-
    if (isDefined(Q.assetId))
175
+
    let S = extract(R.payment)
176
+
    let Z = fraction(a, 7, 100)
177
+
    if (isDefined(S.assetId))
170
178
 
        then throw("can use WAVES only at the moment")
171
179
 
        else {
172
-
            let R = toBase58String(P.caller.bytes)
173
-
            if ((Q.amount != X))
180
+
            let T = toBase58String(R.caller.bytes)
181
+
            if ((S.amount != Z))
174
182
 
                then throw("insurance payment amount cannot be not equal to the insurance price")
175
-
                else WriteSet([DataEntry(N(R), (O(R) + 1))])
183
+
                else WriteSet([DataEntry(N(T), (O(T) + 1))])
176
184
 
            }
177
185
 
    }
178
186
 
179
187
 

github/deemru/w8io/169f3d6 
45.05 ms ◑