tx · 3G38CSd7eHwPmKaPPkUxws9C1Q7hBtZQidkLWEQ7A2d1

3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4:  -0.01400000 Waves

2020.03.14 14:10 [908789] smart account 3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3G38CSd7eHwPmKaPPkUxws9C1Q7hBtZQidkLWEQ7A2d1",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1584184123825,
    "version": 1,
    "sender": "3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4",
    "senderPublicKey": "4AHsCbS9QYVdKNvxrPWwsMwwy3KqXaCMXeAscExJZk9L",
    "proofs": [
        "5GSyiB4BkijbfLm82M4eDxK326JB72GFk3GjMXCJ4iFySgTAKhR81QhSNe5ioA49QnUXNgQgWeZ3zRs5hYgJBYVM"
    ],
    "script": "base64:AAIDAAAAAAAAABQIARIGCgQIAQEIEggKBggICAEBAQAAAB0AAAAAB2FCaXRDTzIBAAAAIMf4egCdN1CfKjJsuySIc91YzhODi96HwhotKBtnwSiWAAAAAAhzdGFydFF0eQAAAAAAAAUUAAAAAAAIbm9tUHJpY2UAAAAAAAX14QAAAAAAEHN1cHBsaWVyRGlzY291bnQAAAAAAAAAAAwAAAAADk93bmVyRWNvUHViS2V5AQAAACAu9FujQAkaDvA3MFtEeOs3vmzRi69LYN3AJDT/FjZAHwAAAAADd3ZzAAAAAAAF9eEAAAAAAAROT05FAgAAAARub25lAAAAAAZpc3N1ZXIJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVTK9zs+5y/RVeIPrfhFsyze+43QDUVrfW8BAAAADmdldE51bWJlckJ5S2V5AAAAAQAAAANrZXkEAAAAA251bQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAUAAAADbnVtAQAAAAtnZXRTdHJCeUtleQAAAAEAAAADa2V5BAAAAANzdHIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUFAAAAA3N0cgEAAAAKZ2V0S2V5SXRlbQAAAAIAAAAIc3VwcGxpZXIAAAAFdGl0bGUJAAEsAAAAAgIAAAAQdG9rZW5zX0JpdC1DTzI6XwkAAlgAAAABCQAB9wAAAAEJAAGbAAAAAQkAASwAAAACBQAAAAhzdXBwbGllcgUAAAAFdGl0bGUBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEAAAAEaXRlbQkAASwAAAACBQAAAARpdGVtAgAAABpfdG9fQW1hem9uaWFuX0NvbnNlcnZhdGlvbgEAAAAUZ2V0VmFsdWVJdGVtU3VwcGxpZXIAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABAAAABGl0ZW0CAAAAF1Rva2Vuc19vZmVydGFkb3MsX1NhbGRvAQAAABpnZXRWYWx1ZUJhbGFuY2VRdHlTdXBwbGllcgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0BAAAADmdldEtleUl0ZW1EYXRhAAAAAQAAAARpdGVtCQABLAAAAAIFAAAABGl0ZW0CAAAADF9kZXNjcmlwdGlvbgEAAAAVZ2V0S2V5VXNlckl0ZW1Db3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0JAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABGl0ZW0CAAAAAV8FAAAABHVzZXICAAAABF9jbnQBAAAAF2dldFZhbHVlVXNlckl0ZW1Db3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACBQAAAAR1c2VyBQAAAARpdGVtAQAAABJnZXRLZXlJdGVtVXNlckRhdGEAAAABAAAABGl0ZW0CAAAACV91c2VyZGF0YQEAAAAWZ2V0S2V5SXRlbVVzZXJPcmRlclF0eQAAAAEAAAAEaXRlbQIAAAAHX3Rva2VucwEAAAAYZ2V0VmFsdWVJdGVtVXNlck9yZGVyUXR5AAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAWZ2V0S2V5SXRlbVVzZXJPcmRlclF0eQAAAAEFAAAABGl0ZW0BAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEAAAAIc3VwcGxpZXICAAAAFVNlbGxlcl9CYWxhbmNlOl93YXZlcwEAAAAXZ2V0VmFsdWVCYWxhbmNlU3VwcGxpZXIAAAABAAAACHN1cHBsaWVyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIBAAAADmdldEtleUl0ZW1Vc2VyAAAAAQAAAARpdGVtAgAAAA1Qcm9qZWN0X25hbWU6AQAAABBnZXRWYWx1ZUl0ZW1Vc2VyAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAOZ2V0S2V5SXRlbVVzZXIAAAABBQAAAARpdGVtAQAAABpnZXRLZXlJdGVtRGlzY291bnRTdXBwbGllcgAAAAEAAAAEaXRlbQIAAAACXyUBAAAAHGdldFZhbHVlSXRlbURpc2NvdW50U3VwcGxpZXIAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABpnZXRLZXlJdGVtRGlzY291bnRTdXBwbGllcgAAAAEFAAAABGl0ZW0BAAAAF2dldEtleUl0ZW1QcmljZVN1cHBsaWVyAAAAAQAAAARpdGVtAgAAAAZfd2F2ZXMBAAAAGWdldFZhbHVlSXRlbVByaWNlU3VwcGxpZXIAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABdnZXRLZXlJdGVtUHJpY2VTdXBwbGllcgAAAAEFAAAABGl0ZW0AAAACAAAAAWkBAAAAEEFkZFN1cHBsaWVyVG9rZW4AAAAEAAAABXRpdGxlAAAACXByZUljb1F0eQAAABBzdXBwbGllckRpc2NvdW50AAAADHN1cHBsaWVyRGF0YQQAAAAIc3VwcGxpZXIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAEaXRlbQkBAAAACmdldEtleUl0ZW0AAAACBQAAAAhzdXBwbGllcgUAAAAFdGl0bGUDCQAAZwAAAAIAAAAAAAAAAAAFAAAACXByZUljb1F0eQkAAAIAAAABAgAAAB9Tb3JyeSwgaW5zdWZmaWNpZW50IHRva2VuIG9mZmVyCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAC09mZXJ0YW50ZTpfCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQUAAAAIc3VwcGxpZXIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtBQAAAAlwcmVJY29RdHkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAPUHJlY2lvX05vbWluYWw6CQEAAAAXZ2V0S2V5SXRlbVByaWNlU3VwcGxpZXIAAAABBQAAAARpdGVtBQAAAAhub21QcmljZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAABdNYXhfRGVzY3VlbnRvX29mcmVjaWRvOgkBAAAAGmdldEtleUl0ZW1EaXNjb3VudFN1cHBsaWVyAAAAAQUAAAAEaXRlbQUAAAAQc3VwcGxpZXJEaXNjb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleUl0ZW1EYXRhAAAAAQUAAAAEaXRlbQUAAAAMc3VwcGxpZXJEYXRhBQAAAANuaWwAAAABaQEAAAANUHVyY2hhc2VUb2tlbgAAAAYAAAAEaXRlbQAAAAtwcm9qZWN0TmFtZQAAAAh1c2VyRGF0YQAAAAx1c2VyRGlzY291bnQAAAAIb3JkZXJRdHkAAAAGYW1vdW50BAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAseW91IGNhbiBhZHF1aXJlIGNCaXRDTzIgb25seSBieSBXYXZlcyB0b2tlbnMEAAAACHN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUEAAAACXByZUljb1F0eQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAhzdGFydFF0eQQAAAAPYmFsYW5jZVN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAA9idXllclRva2VuUHJpY2UJAABpAAAAAgkAAGgAAAACBQAAAAhub21QcmljZQkAAGUAAAACAAAAAAAAAABkBQAAAAx1c2VyRGlzY291bnQAAAAAAAAAAGQEAAAAC3RvdGFsQW1vdW50CQAAaAAAAAIFAAAACG9yZGVyUXR5BQAAAA9idXllclRva2VuUHJpY2UDCQAAZgAAAAIFAAAAC3RvdGFsQW1vdW50CAUAAAADcG10AAAABmFtb3VudAkAAAIAAAABAgAAADZQYXltZW50IEFtb3VudCBjYW5ub3QgYmUgbGVzcyB0aGFuIGl0ZW0gUHVyY2hhc2UgT3JkZXIDCQAAZgAAAAIIBQAAAANwbXQAAAAGYW1vdW50BQAAAAt0b3RhbEFtb3VudAkAAAIAAAABAgAAADdQYXltZW50IEFtb3VudCBjYW4ndCBiZSBoaWdoZXIgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleVVzZXJJdGVtQ291bnRlcgAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAARpdGVtCQAAZAAAAAIJAQAAABdnZXRWYWx1ZVVzZXJJdGVtQ291bnRlcgAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAARpdGVtAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5SXRlbVVzZXIAAAABBQAAAARpdGVtBQAAAAtwcm9qZWN0TmFtZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEmdldEtleUl0ZW1Vc2VyRGF0YQAAAAEFAAAABGl0ZW0FAAAACHVzZXJEYXRhCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAFENhbnRpZGFkX3NvbGljaXRhZGE6CQEAAAAWZ2V0S2V5SXRlbVVzZXJPcmRlclF0eQAAAAEFAAAABGl0ZW0FAAAACG9yZGVyUXR5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAEFJlcXVlc3RfU3RhdHVzOl8FAAAAC3VzZXJBZGRyZXNzAgAAAAljb25maXJtZWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtCQAAZQAAAAIFAAAACXByZUljb1F0eQUAAAAIb3JkZXJRdHkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgkAAGQAAAACBQAAAA9iYWxhbmNlU3VwcGxpZXIIBQAAAANwbXQAAAAGYW1vdW50BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAAt1c2VyQWRkcmVzcwUAAAAIb3JkZXJRdHkFAAAAB2FCaXRDTzIFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAADk93bmVyRWNvUHViS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAAWQFAAAAByRtYXRjaDAGAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAQAAAAJcmVjaXBpZW50CQACWAAAAAEICQAEJAAAAAEIBQAAAAJ0eAAAAAlyZWNpcGllbnQAAAAFYnl0ZXMDCQAAAAAAAAIIBQAAAAJ0eAAAAAZzZW5kZXIFAAAABmlzc3VlcgYJAAACAAAAAQIAAAAgWW91IGNhbid0IHRyYW5zZmVycmVkIHRoaXMgdG9rZW4DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE0V4Y2hhbmdlVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBAAAAAl3aXRoV2F2ZXMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAACnByaWNlQXNzZXQGCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAAC2Ftb3VudEFzc2V0BQAAAAl3aXRoV2F2ZXMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE0V4Y2hhbmdlVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBAAAAAJwawkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAABBAAAAAdhZGRyZXNzCQEAAAAUYWRkcmVzc0Zyb21QdWJsaWNLZXkAAAABBQAAAAJwawQAAAADZmVlAAAAAAAAFVzABAAAAAhoYXNNb25leQkAAGcAAAACCQAAZQAAAAIJAQAAAAx3YXZlc0JhbGFuY2UAAAABBQAAAAdhZGRyZXNzBQAAAANmZWUICAUAAAACdHgAAAAIYnV5T3JkZXIAAAAFcHJpY2UEAAAABHNlbGwJAAH0AAAAAwgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYm9keUJ5dGVzCQABkQAAAAIICAUAAAACdHgAAAAJc2VsbE9yZGVyAAAABnByb29mcwAAAAAAAAAAAAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAPc2VuZGVyUHVibGljS2V5BAAAAANidXkJAAH0AAAAAwgIBQAAAAJ0eAAAAAhidXlPcmRlcgAAAAlib2R5Qnl0ZXMJAAGRAAAAAggIBQAAAAJ0eAAAAAhidXlPcmRlcgAAAAZwcm9vZnMAAAAAAAAAAAAICAUAAAACdHgAAAAIYnV5T3JkZXIAAAAPc2VuZGVyUHVibGljS2V5BAAAAA9zZWxsT3JkZXJTZW5kZXIJAAJYAAAAAQgICAUAAAACdHgAAAAJc2VsbE9yZGVyAAAABnNlbmRlcgAAAAVieXRlcwQAAAAJbWluQW1vdW50AAAAAAAAAAABBAAAAAltYXhBbW91bnQAAAAAAAAAAAQEAAAACG1heFByaWNlCQAAaAAAAAIFAAAACW1heEFtb3VudAUAAAAIbm9tUHJpY2UDAwUAAAADYnV5AwkBAAAACWlzRGVmaW5lZAAAAAEJAABnAAAAAgUAAAAIbWF4UHJpY2UICAUAAAACdHgAAAAIYnV5T3JkZXIAAAAFcHJpY2UGCQAAAgAAAAECAAAAOkVsIG1vbnRvIGEgcGFnYXIgbm8gcHVlZGUgc2VyIG1lbm9yIHF1ZSBlbCBwcmVjaW8gZGUgdmVudGEHBgMFAAAABHNlbGwDAwMJAAAAAAAAAggIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAGc2VuZGVyBQAAAAZpc3N1ZXIJAABnAAAAAggFAAAAAnR4AAAABmFtb3VudAUAAAAJbWluQW1vdW50BwkAAGcAAAACBQAAAAltYXhBbW91bnQIBQAAAAJ0eAAAAAZhbW91bnQHBgkAAAIAAAABAgAAAFNFcnJvcjogTWluaW11bSBhbW91bnQ6IDEgYUJpdENPMjsgTWF4aW11bSBhbW91bnQgb2ZmZXJlZDogNCBhQml0Q08yIGJ5IFVzZXIgQWNjb3VudAcDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAF0ludm9rZVNjcmlwdFRyYW5zYWN0aW9uBAAAAAFjBQAAAAckbWF0Y2gwBgcKUeao",
    "chainId": 84,
    "height": 908789,
    "spentComplexity": 0
}

View: original | compacted
Prev: 42RRbkkbghj127fdZUddpAz67pzxRTZmX3fx3H88Ks7U
Next: FjHrTUeTBVtd8d51Uo6NSBhru8fgRdHosCPMKozSxPoV

Diff: 
Old
New
Differences
114
114
 
115
115
 
116
116
 
@Callable(M)
117
-
func PurchaseToken (t,P,Q,R,S) = {
118
-
    let T = extract(M.payment)
119
-
    if (isDefined(T.assetId))
117
+
func PurchaseToken (t,P,Q,R,S,T) = {
118
+
    let U = extract(M.payment)
119
+
    if (isDefined(U.assetId))
120
120
 
        then throw("you can adquire cBitCO2 only by Waves tokens")
121
121
 
        else {
122
122
 
            let q = {
137
137
 
                        }
138
138
 
                    else b
139
139
 
                }
140
-
            let U = {
140
+
            let V = {
141
141
 
                let l = getInteger(this, E(q))
142
142
 
                if ($isInstanceOf(l, "Int"))
143
143
 
                    then {
146
146
 
                        }
147
147
 
                    else 0
148
148
 
                }
149
-
            let V = toBase58String(M.caller.bytes)
150
-
            let W = ((c * (100 - S)) / 100)
151
-
            let X = (R * W)
152
-
            if ((X > T.amount))
149
+
            let W = toBase58String(M.caller.bytes)
150
+
            let X = ((c * (100 - R)) / 100)
151
+
            let Y = (S * X)
152
+
            if ((Y > U.amount))
153
153
 
                then throw("Payment Amount cannot be less than item Purchase Order")
154
-
                else if ((T.amount > X))
154
+
                else if ((U.amount > Y))
155
155
 
                    then throw("Payment Amount can't be higher than item Purchase Order")
156
-
                    else ScriptResult(WriteSet([DataEntry(y(V, t), (A(V, t) + 1)), DataEntry(G(t), P), DataEntry(B(t), Q), DataEntry(("Cantidad_solicitada:" + C(t)), R), DataEntry(("Request_Status:_" + V), "confirmed"), DataEntry(v(t), (N - R)), DataEntry(E(q), (U + T.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(V), R, a)]))
156
+
                    else ScriptResult(WriteSet([DataEntry(y(W, t), (A(W, t) + 1)), DataEntry(G(t), P), DataEntry(B(t), Q), DataEntry(("Cantidad_solicitada:" + C(t)), S), DataEntry(("Request_Status:_" + W), "confirmed"), DataEntry(v(t), (N - S)), DataEntry(E(q), (V + U.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(W), S, a)]))
157
157
 
            }
158
158
 
    }
159
159
 
160
160
 
161
-
@Verifier(Y)
162
-
func Z () = {
163
-
    let l = Y
161
+
@Verifier(Z)
162
+
func aa () = {
163
+
    let l = Z
164
164
 
    if ($isInstanceOf(l, "SetScriptTransaction"))
165
165
 
        then {
166
-
            let aa = l
167
-
            sigVerify(Y.bodyBytes, Y.proofs[0], e)
166
+
            let ab = l
167
+
            sigVerify(Z.bodyBytes, Z.proofs[0], e)
168
168
 
            }
169
169
 
        else if ($isInstanceOf(l, "DataTransaction"))
170
170
 
            then {
171
-
                let ab = l
171
+
                let ac = l
172
172
 
                true
173
173
 
                }
174
174
 
            else if ($isInstanceOf(l, "TransferTransaction"))
175
175
 
                then {
176
-
                    let Y = l
177
-
                    let ac = toBase58String(addressFromRecipient(Y.recipient).bytes)
178
-
                    if ((Y.sender == h))
176
+
                    let Z = l
177
+
                    let ad = toBase58String(addressFromRecipient(Z.recipient).bytes)
178
+
                    if ((Z.sender == h))
179
179
 
                        then true
180
180
 
                        else throw("You can't transferred this token")
181
181
 
                    }
182
182
 
                else if ($isInstanceOf(l, "ExchangeTransaction"))
183
183
 
                    then {
184
-
                        let Y = l
185
-
                        let ad = if (!(isDefined(Y.sellOrder.assetPair.priceAsset)))
184
+
                        let Z = l
185
+
                        let ae = if (!(isDefined(Z.sellOrder.assetPair.priceAsset)))
186
186
 
                            then true
187
-
                            else !(isDefined(Y.sellOrder.assetPair.amountAsset))
188
-
                        ad
187
+
                            else !(isDefined(Z.sellOrder.assetPair.amountAsset))
188
+
                        ae
189
189
 
                        }
190
190
 
                    else if ($isInstanceOf(l, "ExchangeTransaction"))
191
191
 
                        then {
192
-
                            let Y = l
193
-
                            let ae = Y.proofs[1]
194
-
                            let af = addressFromPublicKey(ae)
195
-
                            let ag = 1400000
196
-
                            let ah = ((wavesBalance(af) - ag) >= Y.buyOrder.price)
197
-
                            let ai = sigVerify(Y.sellOrder.bodyBytes, Y.sellOrder.proofs[0], Y.sellOrder.senderPublicKey)
198
-
                            let aj = sigVerify(Y.buyOrder.bodyBytes, Y.buyOrder.proofs[0], Y.buyOrder.senderPublicKey)
199
-
                            let ak = toBase58String(Y.sellOrder.sender.bytes)
200
-
                            let al = 1
201
-
                            let am = 4
202
-
                            let an = (am * c)
203
-
                            if (if (aj)
204
-
                                then if (isDefined((an >= Y.buyOrder.price)))
192
+
                            let Z = l
193
+
                            let af = Z.proofs[1]
194
+
                            let ag = addressFromPublicKey(af)
195
+
                            let ah = 1400000
196
+
                            let ai = ((wavesBalance(ag) - ah) >= Z.buyOrder.price)
197
+
                            let aj = sigVerify(Z.sellOrder.bodyBytes, Z.sellOrder.proofs[0], Z.sellOrder.senderPublicKey)
198
+
                            let ak = sigVerify(Z.buyOrder.bodyBytes, Z.buyOrder.proofs[0], Z.buyOrder.senderPublicKey)
199
+
                            let al = toBase58String(Z.sellOrder.sender.bytes)
200
+
                            let am = 1
201
+
                            let an = 4
202
+
                            let ao = (an * c)
203
+
                            if (if (ak)
204
+
                                then if (isDefined((ao >= Z.buyOrder.price)))
205
205
 
                                    then true
206
206
 
                                    else throw("El monto a pagar no puede ser menor que el precio de venta")
207
207
 
                                else false)
208
208
 
                                then true
209
-
                                else if (ai)
210
-
                                    then if (if (if ((Y.sellOrder.sender == h))
211
-
                                        then (Y.amount >= al)
209
+
                                else if (aj)
210
+
                                    then if (if (if ((Z.sellOrder.sender == h))
211
+
                                        then (Z.amount >= am)
212
212
 
                                        else false)
213
-
                                        then (am >= Y.amount)
213
+
                                        then (an >= Z.amount)
214
214
 
                                        else false)
215
215
 
                                        then true
216
216
 
                                        else throw("Error: Minimum amount: 1 aBitCO2; Maximum amount offered: 4 aBitCO2 by User Account")
218
218
 
                            }
219
219
 
                        else if ($isInstanceOf(l, "InvokeScriptTransaction"))
220
220
 
                            then {
221
-
                                let ao = l
221
+
                                let ap = l
222
222
 
                                true
223
223
 
                                }
224
224
 
                            else false
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 3 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = base58'ETbtNp6MBuSM9EfjmLDwctrYEBBiq8CZ7ti7zbwTktry'
5
5
 
6
6
 
let b = 332800
7
7
 
8
8
 
let c = 100000000
9
9
 
10
10
 
let d = 12
11
11
 
12
12
 
let e = base58'4AHsCbS9QYVdKNvxrPWwsMwwy3KqXaCMXeAscExJZk9L'
13
13
 
14
14
 
let f = 100000000
15
15
 
16
16
 
let g = "none"
17
17
 
18
18
 
let h = Address(base58'3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4')
19
19
 
20
20
 
func i (j) = {
21
21
 
    let k = {
22
22
 
        let l = getInteger(this, j)
23
23
 
        if ($isInstanceOf(l, "Int"))
24
24
 
            then {
25
25
 
                let m = l
26
26
 
                m
27
27
 
                }
28
28
 
            else 0
29
29
 
        }
30
30
 
    k
31
31
 
    }
32
32
 
33
33
 
34
34
 
func n (j) = {
35
35
 
    let o = {
36
36
 
        let l = getString(this, j)
37
37
 
        if ($isInstanceOf(l, "String"))
38
38
 
            then {
39
39
 
                let m = l
40
40
 
                m
41
41
 
                }
42
42
 
            else g
43
43
 
        }
44
44
 
    o
45
45
 
    }
46
46
 
47
47
 
48
48
 
func p (q,r) = ("tokens_Bit-CO2:_" + toBase58String(sha256(toBytes((q + r)))))
49
49
 
50
50
 
51
51
 
func s (t) = (t + "_to_Amazonian_Conservation")
52
52
 
53
53
 
54
54
 
func u (t) = n(s(t))
55
55
 
56
56
 
57
57
 
func v (t) = "Tokens_ofertados,_Saldo"
58
58
 
59
59
 
60
60
 
func w (t) = i(v(t))
61
61
 
62
62
 
63
63
 
func x (t) = (t + "_description")
64
64
 
65
65
 
66
66
 
func y (z,t) = (((t + "_") + z) + "_cnt")
67
67
 
68
68
 
69
69
 
func A (z,t) = i(y(z, t))
70
70
 
71
71
 
72
72
 
func B (t) = "_userdata"
73
73
 
74
74
 
75
75
 
func C (t) = "_tokens"
76
76
 
77
77
 
78
78
 
func D (t) = i(C(t))
79
79
 
80
80
 
81
81
 
func E (q) = "Seller_Balance:_waves"
82
82
 
83
83
 
84
84
 
func F (q) = i(E(q))
85
85
 
86
86
 
87
87
 
func G (t) = "Project_name:"
88
88
 
89
89
 
90
90
 
func H (t) = n(G(t))
91
91
 
92
92
 
93
93
 
func I (t) = "_%"
94
94
 
95
95
 
96
96
 
func J (t) = i(I(t))
97
97
 
98
98
 
99
99
 
func K (t) = "_waves"
100
100
 
101
101
 
102
102
 
func L (t) = i(K(t))
103
103
 
104
104
 
105
105
 
@Callable(M)
106
106
 
func AddSupplierToken (r,N,d,O) = {
107
107
 
    let q = toBase58String(M.caller.bytes)
108
108
 
    let t = p(q, r)
109
109
 
    if ((0 >= N))
110
110
 
        then throw("Sorry, insufficient token offer")
111
111
 
        else WriteSet([DataEntry(("Ofertante:_" + s(t)), q), DataEntry(v(t), N), DataEntry(("Precio_Nominal:" + K(t)), c), DataEntry(("Max_Descuento_ofrecido:" + I(t)), d), DataEntry(x(t), O)])
112
112
 
    }
113
113
 
114
114
 
115
115
 
116
116
 
@Callable(M)
117
-
func PurchaseToken (t,P,Q,R,S) = {
118
-
    let T = extract(M.payment)
119
-
    if (isDefined(T.assetId))
117
+
func PurchaseToken (t,P,Q,R,S,T) = {
118
+
    let U = extract(M.payment)
119
+
    if (isDefined(U.assetId))
120
120
 
        then throw("you can adquire cBitCO2 only by Waves tokens")
121
121
 
        else {
122
122
 
            let q = {
123
123
 
                let l = getString(this, s(t))
124
124
 
                if ($isInstanceOf(l, "String"))
125
125
 
                    then {
126
126
 
                        let m = l
127
127
 
                        m
128
128
 
                        }
129
129
 
                    else g
130
130
 
                }
131
131
 
            let N = {
132
132
 
                let l = getInteger(this, v(t))
133
133
 
                if ($isInstanceOf(l, "Int"))
134
134
 
                    then {
135
135
 
                        let m = l
136
136
 
                        m
137
137
 
                        }
138
138
 
                    else b
139
139
 
                }
140
-
            let U = {
140
+
            let V = {
141
141
 
                let l = getInteger(this, E(q))
142
142
 
                if ($isInstanceOf(l, "Int"))
143
143
 
                    then {
144
144
 
                        let m = l
145
145
 
                        m
146
146
 
                        }
147
147
 
                    else 0
148
148
 
                }
149
-
            let V = toBase58String(M.caller.bytes)
150
-
            let W = ((c * (100 - S)) / 100)
151
-
            let X = (R * W)
152
-
            if ((X > T.amount))
149
+
            let W = toBase58String(M.caller.bytes)
150
+
            let X = ((c * (100 - R)) / 100)
151
+
            let Y = (S * X)
152
+
            if ((Y > U.amount))
153
153
 
                then throw("Payment Amount cannot be less than item Purchase Order")
154
-
                else if ((T.amount > X))
154
+
                else if ((U.amount > Y))
155
155
 
                    then throw("Payment Amount can't be higher than item Purchase Order")
156
-
                    else ScriptResult(WriteSet([DataEntry(y(V, t), (A(V, t) + 1)), DataEntry(G(t), P), DataEntry(B(t), Q), DataEntry(("Cantidad_solicitada:" + C(t)), R), DataEntry(("Request_Status:_" + V), "confirmed"), DataEntry(v(t), (N - R)), DataEntry(E(q), (U + T.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(V), R, a)]))
156
+
                    else ScriptResult(WriteSet([DataEntry(y(W, t), (A(W, t) + 1)), DataEntry(G(t), P), DataEntry(B(t), Q), DataEntry(("Cantidad_solicitada:" + C(t)), S), DataEntry(("Request_Status:_" + W), "confirmed"), DataEntry(v(t), (N - S)), DataEntry(E(q), (V + U.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(W), S, a)]))
157
157
 
            }
158
158
 
    }
159
159
 
160
160
 
161
-
@Verifier(Y)
162
-
func Z () = {
163
-
    let l = Y
161
+
@Verifier(Z)
162
+
func aa () = {
163
+
    let l = Z
164
164
 
    if ($isInstanceOf(l, "SetScriptTransaction"))
165
165
 
        then {
166
-
            let aa = l
167
-
            sigVerify(Y.bodyBytes, Y.proofs[0], e)
166
+
            let ab = l
167
+
            sigVerify(Z.bodyBytes, Z.proofs[0], e)
168
168
 
            }
169
169
 
        else if ($isInstanceOf(l, "DataTransaction"))
170
170
 
            then {
171
-
                let ab = l
171
+
                let ac = l
172
172
 
                true
173
173
 
                }
174
174
 
            else if ($isInstanceOf(l, "TransferTransaction"))
175
175
 
                then {
176
-
                    let Y = l
177
-
                    let ac = toBase58String(addressFromRecipient(Y.recipient).bytes)
178
-
                    if ((Y.sender == h))
176
+
                    let Z = l
177
+
                    let ad = toBase58String(addressFromRecipient(Z.recipient).bytes)
178
+
                    if ((Z.sender == h))
179
179
 
                        then true
180
180
 
                        else throw("You can't transferred this token")
181
181
 
                    }
182
182
 
                else if ($isInstanceOf(l, "ExchangeTransaction"))
183
183
 
                    then {
184
-
                        let Y = l
185
-
                        let ad = if (!(isDefined(Y.sellOrder.assetPair.priceAsset)))
184
+
                        let Z = l
185
+
                        let ae = if (!(isDefined(Z.sellOrder.assetPair.priceAsset)))
186
186
 
                            then true
187
-
                            else !(isDefined(Y.sellOrder.assetPair.amountAsset))
188
-
                        ad
187
+
                            else !(isDefined(Z.sellOrder.assetPair.amountAsset))
188
+
                        ae
189
189
 
                        }
190
190
 
                    else if ($isInstanceOf(l, "ExchangeTransaction"))
191
191
 
                        then {
192
-
                            let Y = l
193
-
                            let ae = Y.proofs[1]
194
-
                            let af = addressFromPublicKey(ae)
195
-
                            let ag = 1400000
196
-
                            let ah = ((wavesBalance(af) - ag) >= Y.buyOrder.price)
197
-
                            let ai = sigVerify(Y.sellOrder.bodyBytes, Y.sellOrder.proofs[0], Y.sellOrder.senderPublicKey)
198
-
                            let aj = sigVerify(Y.buyOrder.bodyBytes, Y.buyOrder.proofs[0], Y.buyOrder.senderPublicKey)
199
-
                            let ak = toBase58String(Y.sellOrder.sender.bytes)
200
-
                            let al = 1
201
-
                            let am = 4
202
-
                            let an = (am * c)
203
-
                            if (if (aj)
204
-
                                then if (isDefined((an >= Y.buyOrder.price)))
192
+
                            let Z = l
193
+
                            let af = Z.proofs[1]
194
+
                            let ag = addressFromPublicKey(af)
195
+
                            let ah = 1400000
196
+
                            let ai = ((wavesBalance(ag) - ah) >= Z.buyOrder.price)
197
+
                            let aj = sigVerify(Z.sellOrder.bodyBytes, Z.sellOrder.proofs[0], Z.sellOrder.senderPublicKey)
198
+
                            let ak = sigVerify(Z.buyOrder.bodyBytes, Z.buyOrder.proofs[0], Z.buyOrder.senderPublicKey)
199
+
                            let al = toBase58String(Z.sellOrder.sender.bytes)
200
+
                            let am = 1
201
+
                            let an = 4
202
+
                            let ao = (an * c)
203
+
                            if (if (ak)
204
+
                                then if (isDefined((ao >= Z.buyOrder.price)))
205
205
 
                                    then true
206
206
 
                                    else throw("El monto a pagar no puede ser menor que el precio de venta")
207
207
 
                                else false)
208
208
 
                                then true
209
-
                                else if (ai)
210
-
                                    then if (if (if ((Y.sellOrder.sender == h))
211
-
                                        then (Y.amount >= al)
209
+
                                else if (aj)
210
+
                                    then if (if (if ((Z.sellOrder.sender == h))
211
+
                                        then (Z.amount >= am)
212
212
 
                                        else false)
213
-
                                        then (am >= Y.amount)
213
+
                                        then (an >= Z.amount)
214
214
 
                                        else false)
215
215
 
                                        then true
216
216
 
                                        else throw("Error: Minimum amount: 1 aBitCO2; Maximum amount offered: 4 aBitCO2 by User Account")
217
217
 
                                    else false
218
218
 
                            }
219
219
 
                        else if ($isInstanceOf(l, "InvokeScriptTransaction"))
220
220
 
                            then {
221
-
                                let ao = l
221
+
                                let ap = l
222
222
 
                                true
223
223
 
                                }
224
224
 
                            else false
225
225
 
    }
226
226
 

github/deemru/w8io/169f3d6 
217.91 ms ◑