tx · AWE2Puoc6oeGKB8TjoakwSxfg7P3nEUdgrgzjf9xvHYk

3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4:  -0.01400000 Waves

2020.03.10 13:06 [902893] smart account 3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4 > SELF 0.00000000 Waves

{ "type": 13, "id": "AWE2Puoc6oeGKB8TjoakwSxfg7P3nEUdgrgzjf9xvHYk", "fee": 1400000, "feeAssetId": null, "timestamp": 1583834525896, "version": 1, "sender": "3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4", "senderPublicKey": "4AHsCbS9QYVdKNvxrPWwsMwwy3KqXaCMXeAscExJZk9L", "proofs": [ "3vAehheJFr5db7nFiA7HVHyaHycRrgSeR4JodUsqRqJBdGgdC7M5YPAkFdrCcC7L9xzmzSWCD6sRVvnYRyHJsFn" ], "script": "base64:AAIDAAAAAAAAABAIARIFCgMIAQgSBQoDCAgIAAAAJQAAAAAHYUJpdENPMgEAAAAgx/h6AJ03UJ8qMmy7JIhz3VjOE4OL3ofCGi0oG2fBKJYAAAAACHN0YXJ0UXR5AAAAAAAABRQAAAAAAAhub21QcmljZQAAAAAABfXhAAAAAAAWZGlzY291bnRQcmVJY29TdXBwbGllcgAAAAAAAAAADAAAAAAOT3duZXJFY29QdWJLZXkBAAAAIC70W6NACRoO8DcwW0R46ze+bNGLr0tg3cAkNP8WNkAfAAAAAAN3dnMAAAAAAAX14QAAAAAABE5PTkUCAAAABG5vbmUAAAAABmlzc3VlcgkBAAAAB0FkZHJlc3MAAAABAQAAABoBVMr3Oz7nL9FV4g+t+EWzLN77jdANRWt9bwEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABAAAAA2tleQQAAAADbnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABQAAAANudW0BAAAAC2dldFN0ckJ5S2V5AAAAAQAAAANrZXkEAAAAA3N0cgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQUAAAADc3RyAQAAAApnZXRLZXlJdGVtAAAAAgAAAAhzdXBwbGllcgAAAAV0aXRsZQkAASwAAAACAgAAAAhCaXRDTzI6XwkAAlgAAAABCQAB9wAAAAEJAAGbAAAAAQkAASwAAAACBQAAAAhzdXBwbGllcgUAAAAFdGl0bGUBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEAAAAEaXRlbQkAASwAAAACBQAAAARpdGVtAgAAAAVfQW1hegEAAAAUZ2V0VmFsdWVJdGVtU3VwcGxpZXIAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtAQAAAA1nZXRLZXlJdGVtUXR5AAAAAQAAAARpdGVtCQABLAAAAAIFAAAABGl0ZW0CAAAAC190b2suYW1vdW50AQAAAA9nZXRWYWx1ZUl0ZW1RdHkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAA1nZXRLZXlJdGVtUXR5AAAAAQUAAAAEaXRlbQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQAAAARpdGVtCQABLAAAAAIFAAAABGl0ZW0CAAAAB190b2tlbnMBAAAAGmdldFZhbHVlQmFsYW5jZVF0eVN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQEAAAAOZ2V0S2V5SXRlbURhdGEAAAABAAAABGl0ZW0JAAEsAAAAAgUAAAAEaXRlbQIAAAAMX2Rlc2NyaXB0aW9uAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEaXRlbQIAAAABXwUAAAAEdXNlcgIAAAAEX2NudAEAAAAXZ2V0VmFsdWVVc2VySXRlbUNvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFWdldEtleVVzZXJJdGVtQ291bnRlcgAAAAIFAAAABHVzZXIFAAAABGl0ZW0BAAAAEmdldEtleUl0ZW1Vc2VyRGF0YQAAAAEAAAAEaXRlbQkAASwAAAACBQAAAARpdGVtAgAAAAlfdXNlcmRhdGEBAAAAEWdldEtleUJhbGFuY2VVc2VyAAAAAQAAAARpdGVtCQABLAAAAAIFAAAABGl0ZW0CAAAADF9zYWxkd3ZzdXNlcgEAAAATZ2V0VmFsdWVCYWxhbmNlVXNlcgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAEWdldEtleUJhbGFuY2VVc2VyAAAAAQUAAAAEaXRlbQEAAAARZ2V0S2V5UGF5bWVudFVzZXIAAAABAAAABGl0ZW0JAAEsAAAAAgUAAAAEaXRlbQIAAAAJX3VzZXIucG10AQAAABNnZXRWYWx1ZVBheW1lbnRVc2VyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAARZ2V0S2V5UGF5bWVudFVzZXIAAAABBQAAAARpdGVtAQAAABRnZXRLZXlCYWxhbmNlUXR5VXNlcgAAAAEAAAAEaXRlbQkAASwAAAACBQAAAARpdGVtAgAAAAhfc2FsZHF0eQEAAAAWZ2V0VmFsdWVCYWxhbmNlUXR5VXNlcgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFGdldEtleUJhbGFuY2VRdHlVc2VyAAAAAQUAAAAEaXRlbQEAAAAWZ2V0S2V5SXRlbVVzZXJPcmRlclF0eQAAAAEAAAAEaXRlbQkAASwAAAACBQAAAARpdGVtAgAAAARfcXR5AQAAABhnZXRWYWx1ZUl0ZW1Vc2VyT3JkZXJRdHkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQUAAAAEaXRlbQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgkAASwAAAACBQAAAAhzdXBwbGllcgIAAAAPX3NlbGxlcl9iYWxhbmNlAQAAABdnZXRWYWx1ZUJhbGFuY2VTdXBwbGllcgAAAAEAAAAHYWNjb3VudAkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAAB2FjY291bnQBAAAADmdldEtleUl0ZW1Vc2VyAAAAAQAAAARpdGVtCQABLAAAAAIJAAEsAAAAAgIAAAAGbmFtZTpfBQAAAARpdGVtAgAAAAFfAQAAABBnZXRWYWx1ZUl0ZW1Vc2VyAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAOZ2V0S2V5SXRlbVVzZXIAAAABBQAAAARpdGVtAQAAABpnZXRLZXlJdGVtRGlzY291bnRTdXBwbGllcgAAAAEAAAAEaXRlbQkAASwAAAACCQABLAAAAAICAAAABmRpc2M6XwUAAAAEaXRlbQIAAAABXwEAAAAcZ2V0VmFsdWVJdGVtRGlzY291bnRTdXBwbGllcgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAGmdldEtleUl0ZW1EaXNjb3VudFN1cHBsaWVyAAAAAQUAAAAEaXRlbQEAAAAXZ2V0S2V5SXRlbVByaWNlU3VwcGxpZXIAAAABAAAABGl0ZW0JAAEsAAAAAgkAASwAAAACAgAAAAVOb206XwUAAAAEaXRlbQIAAAABXwEAAAAZZ2V0VmFsdWVJdGVtUHJpY2VTdXBwbGllcgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAF2dldEtleUl0ZW1QcmljZVN1cHBsaWVyAAAAAQUAAAAEaXRlbQAAAAIAAAABaQEAAAAQQWRkU3VwcGxpZXJUb2tlbgAAAAMAAAAFdGl0bGUAAAAJcHJlSWNvUXR5AAAADHN1cHBsaWVyRGF0YQQAAAAIc3VwcGxpZXIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAEaXRlbQkBAAAACmdldEtleUl0ZW0AAAACBQAAAAhzdXBwbGllcgUAAAAFdGl0bGUDCQAAZwAAAAIAAAAAAAAAAAAFAAAACXByZUljb1F0eQkAAAIAAAABAgAAAB9Tb3JyeSwgaW5zdWZmaWNpZW50IHRva2VuIG9mZmVyCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQUAAAAIc3VwcGxpZXIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAOU2FsZG9fdG9rZW5zOl8JAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtBQAAAAlwcmVJY29RdHkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAZUHJlY2lvX05vbWluYWxfMV9CaXRDTzI6XwkBAAAAF2dldEtleUl0ZW1QcmljZVN1cHBsaWVyAAAAAQUAAAAEaXRlbQUAAAAIbm9tUHJpY2UJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABpnZXRLZXlJdGVtRGlzY291bnRTdXBwbGllcgAAAAEFAAAABGl0ZW0FAAAAFmRpc2NvdW50UHJlSWNvU3VwcGxpZXIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA5nZXRLZXlJdGVtRGF0YQAAAAEFAAAABGl0ZW0FAAAADHN1cHBsaWVyRGF0YQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyAAAAAAAAAAAABQAAAANuaWwAAAABaQEAAAANUHVyY2hhc2VUb2tlbgAAAAMAAAAEaXRlbQAAAAtwcm9qZWN0TmFtZQAAAAh1c2VyRGF0YQQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAALHlvdSBjYW4gYWRxdWlyZSBjQml0Q08yIG9ubHkgYnkgV2F2ZXMgdG9rZW5zBAAAAAdhY2NvdW50CQEAAAAUZ2V0VmFsdWVJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtBAAAAAlwcmVJY29RdHkEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAIc3RhcnRRdHkEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAD2J1eWVyVG9rZW5QcmljZQkAAGkAAAACCQAAaAAAAAIFAAAACG5vbVByaWNlCQAAZQAAAAIAAAAAAAAAAGQFAAAAFmRpc2NvdW50UHJlSWNvU3VwcGxpZXIAAAAAAAAAAGQEAAAAC29yZGVyQW1vdW50CQAAaQAAAAIIBQAAAANwbXQAAAAGYW1vdW50BQAAAA9idXllclRva2VuUHJpY2UEAAAABm5ld1F0eQkAAGUAAAACBQAAAAlwcmVJY29RdHkFAAAAC29yZGVyQW1vdW50BAAAAAt0b3RhbEFtb3VudAkAAGgAAAACBQAAAAtvcmRlckFtb3VudAUAAAAPYnV5ZXJUb2tlblByaWNlAwkAAGYAAAACBQAAAAt0b3RhbEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQIAAAA2UGF5bWVudCBBbW91bnQgY2Fubm90IGJlIGxlc3MgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyAwkAAGYAAAACCAUAAAADcG10AAAABmFtb3VudAUAAAALdG90YWxBbW91bnQJAAACAAAAAQIAAAA3UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgaGlnaGVyIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQkAAGQAAAACCQEAAAAXZ2V0VmFsdWVVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0FAAAAC3Byb2plY3ROYW1lCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAASZ2V0S2V5SXRlbVVzZXJEYXRhAAAAAQUAAAAEaXRlbQUAAAAIdXNlckRhdGEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAHkNhbnRpZGFkX2RlX3Rva2Vuc19hX2NvbXByYXI6XwUAAAALb3JkZXJBbW91bnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAARU3VtYV9hX2ludmVydGlyOl8JAQAAABFnZXRLZXlCYWxhbmNlVXNlcgAAAAEFAAAABGl0ZW0IBQAAAANwbXQAAAAGYW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAEFJlcXVlc3RfU3RhdHVzOl8FAAAAC3VzZXJBZGRyZXNzAgAAAARzb2xkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAADlVzZXJfQmFsYW5jZTpfCQEAAAAUZ2V0S2V5QmFsYW5jZVF0eVVzZXIAAAABBQAAAARpdGVtCQAAZAAAAAIJAQAAABZnZXRWYWx1ZUJhbGFuY2VRdHlVc2VyAAAAAQUAAAAEaXRlbQUAAAALb3JkZXJBbW91bnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAOU2FsZG9fdG9rZW5zOl8JAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtBQAAAAZuZXdRdHkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAOU2FsZG9fU2VsbGVyOl8JAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAdhY2NvdW50CQAAZAAAAAIJAQAAABdnZXRWYWx1ZUJhbGFuY2VTdXBwbGllcgAAAAEFAAAAB2FjY291bnQIBQAAAANwbXQAAAAGYW1vdW50BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAAt1c2VyQWRkcmVzcwUAAAALb3JkZXJBbW91bnQFAAAAB2FCaXRDTzIFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAADk93bmVyRWNvUHViS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAAWQFAAAAByRtYXRjaDAGAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE0V4Y2hhbmdlVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBAAAAAl3aXRoV2F2ZXMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAACnByaWNlQXNzZXQGCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAAC2Ftb3VudEFzc2V0BQAAAAl3aXRoV2F2ZXMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAF0ludm9rZVNjcmlwdFRyYW5zYWN0aW9uBAAAAAFjBQAAAAckbWF0Y2gwBgc9V75h", "chainId": 84, "height": 902893, "spentComplexity": 0 } View: original | compacted Prev: 2XQSuNGWvp7kKVcnTwe3PPyEKqqK6ayu1NgW9CBHYTYa Next: 52XBai7eLEAek4cwq7M4q79WGNcm2tDGsaVujEJj9M64 Diff:
OldNewDifferences
102102 func L (t) = i(K(t))
103103
104104
105-func M (N) = (N + "_balance")
105+func M (q) = (q + "_seller_balance")
106106
107107
108-func O (N) = i(M(N))
108+func N (O) = i(M(O))
109109
110110
111111 func P (t) = (("name:_" + t) + "_")
132132 let t = p(q, r)
133133 if ((0 >= W))
134134 then throw("Sorry, insufficient token offer")
135- else WriteSet([DataEntry(s(t), q), DataEntry(("Saldo_tokens:_" + x(t)), W), DataEntry(("Precio_Nominal_de_1 token_cBitCO2:_" + T(t)), c), DataEntry(R(t), d), DataEntry(z(t), X), DataEntry(x(t), W)])
135+ else WriteSet([DataEntry(s(t), q), DataEntry(("Saldo_tokens:_" + x(t)), W), DataEntry(("Precio_Nominal_1_BitCO2:_" + T(t)), c), DataEntry(R(t), d), DataEntry(z(t), X), DataEntry(M(q), 0)])
136136 }
137137
138138
143143 if (isDefined(aa.assetId))
144144 then throw("you can adquire cBitCO2 only by Waves tokens")
145145 else {
146- let N = u(t)
146+ let O = u(t)
147147 let W = {
148148 let l = getInteger(this, x(t))
149149 if ($isInstanceOf(l, "Int"))
162162 then throw("Payment Amount cannot be less than item Purchase Order")
163163 else if ((aa.amount > af))
164164 then throw("Payment Amount can't be higher than item Purchase Order")
165- else ScriptResult(WriteSet([DataEntry(A(ab, t), (C(ab, t) + 1)), DataEntry(s(t), Y), DataEntry(D(t), Z), DataEntry("Cantidad_de_tokens_a_comprar:_", ad), DataEntry(("Suma_a_invertir:_" + E(t)), aa.amount), DataEntry(("Request_Status:_" + ab), "sold"), DataEntry(("User_Balance:_" + I(t)), (J(t) + ad)), DataEntry(("Saldo_tokens:_" + x(t)), ae), DataEntry(("Saldo_Seller:_" + M(N)), (O(N) + aa.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(ab), ad, a)]))
165+ else ScriptResult(WriteSet([DataEntry(A(ab, t), (C(ab, t) + 1)), DataEntry(s(t), Y), DataEntry(D(t), Z), DataEntry("Cantidad_de_tokens_a_comprar:_", ad), DataEntry(("Suma_a_invertir:_" + E(t)), aa.amount), DataEntry(("Request_Status:_" + ab), "sold"), DataEntry(("User_Balance:_" + I(t)), (J(t) + ad)), DataEntry(("Saldo_tokens:_" + x(t)), ae), DataEntry(("Saldo_Seller:_" + M(O)), (N(O) + aa.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(ab), ad, a)]))
166166 }
167167 }
168168
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 3 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let a = base58'ETbtNp6MBuSM9EfjmLDwctrYEBBiq8CZ7ti7zbwTktry'
55
66 let b = 332800
77
88 let c = 100000000
99
1010 let d = 12
1111
1212 let e = base58'4AHsCbS9QYVdKNvxrPWwsMwwy3KqXaCMXeAscExJZk9L'
1313
1414 let f = 100000000
1515
1616 let g = "none"
1717
1818 let h = Address(base58'3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4')
1919
2020 func i (j) = {
2121 let k = {
2222 let l = getInteger(this, j)
2323 if ($isInstanceOf(l, "Int"))
2424 then {
2525 let m = l
2626 m
2727 }
2828 else 0
2929 }
3030 k
3131 }
3232
3333
3434 func n (j) = {
3535 let o = {
3636 let l = getString(this, j)
3737 if ($isInstanceOf(l, "String"))
3838 then {
3939 let m = l
4040 m
4141 }
4242 else g
4343 }
4444 o
4545 }
4646
4747
4848 func p (q,r) = ("BitCO2:_" + toBase58String(sha256(toBytes((q + r)))))
4949
5050
5151 func s (t) = (t + "_Amaz")
5252
5353
5454 func u (t) = n(s(t))
5555
5656
5757 func v (t) = (t + "_tok.amount")
5858
5959
6060 func w (t) = i(v(t))
6161
6262
6363 func x (t) = (t + "_tokens")
6464
6565
6666 func y (t) = i(x(t))
6767
6868
6969 func z (t) = (t + "_description")
7070
7171
7272 func A (B,t) = (((t + "_") + B) + "_cnt")
7373
7474
7575 func C (B,t) = i(A(B, t))
7676
7777
7878 func D (t) = (t + "_userdata")
7979
8080
8181 func E (t) = (t + "_saldwvsuser")
8282
8383
8484 func F (t) = i(E(t))
8585
8686
8787 func G (t) = (t + "_user.pmt")
8888
8989
9090 func H (t) = i(G(t))
9191
9292
9393 func I (t) = (t + "_saldqty")
9494
9595
9696 func J (t) = i(I(t))
9797
9898
9999 func K (t) = (t + "_qty")
100100
101101
102102 func L (t) = i(K(t))
103103
104104
105-func M (N) = (N + "_balance")
105+func M (q) = (q + "_seller_balance")
106106
107107
108-func O (N) = i(M(N))
108+func N (O) = i(M(O))
109109
110110
111111 func P (t) = (("name:_" + t) + "_")
112112
113113
114114 func Q (t) = n(P(t))
115115
116116
117117 func R (t) = (("disc:_" + t) + "_")
118118
119119
120120 func S (t) = i(R(t))
121121
122122
123123 func T (t) = (("Nom:_" + t) + "_")
124124
125125
126126 func U (t) = i(T(t))
127127
128128
129129 @Callable(V)
130130 func AddSupplierToken (r,W,X) = {
131131 let q = toBase58String(V.caller.bytes)
132132 let t = p(q, r)
133133 if ((0 >= W))
134134 then throw("Sorry, insufficient token offer")
135- else WriteSet([DataEntry(s(t), q), DataEntry(("Saldo_tokens:_" + x(t)), W), DataEntry(("Precio_Nominal_de_1 token_cBitCO2:_" + T(t)), c), DataEntry(R(t), d), DataEntry(z(t), X), DataEntry(x(t), W)])
135+ else WriteSet([DataEntry(s(t), q), DataEntry(("Saldo_tokens:_" + x(t)), W), DataEntry(("Precio_Nominal_1_BitCO2:_" + T(t)), c), DataEntry(R(t), d), DataEntry(z(t), X), DataEntry(M(q), 0)])
136136 }
137137
138138
139139
140140 @Callable(V)
141141 func PurchaseToken (t,Y,Z) = {
142142 let aa = extract(V.payment)
143143 if (isDefined(aa.assetId))
144144 then throw("you can adquire cBitCO2 only by Waves tokens")
145145 else {
146- let N = u(t)
146+ let O = u(t)
147147 let W = {
148148 let l = getInteger(this, x(t))
149149 if ($isInstanceOf(l, "Int"))
150150 then {
151151 let m = l
152152 m
153153 }
154154 else b
155155 }
156156 let ab = toBase58String(V.caller.bytes)
157157 let ac = ((c * (100 - d)) / 100)
158158 let ad = (aa.amount / ac)
159159 let ae = (W - ad)
160160 let af = (ad * ac)
161161 if ((af > aa.amount))
162162 then throw("Payment Amount cannot be less than item Purchase Order")
163163 else if ((aa.amount > af))
164164 then throw("Payment Amount can't be higher than item Purchase Order")
165- else ScriptResult(WriteSet([DataEntry(A(ab, t), (C(ab, t) + 1)), DataEntry(s(t), Y), DataEntry(D(t), Z), DataEntry("Cantidad_de_tokens_a_comprar:_", ad), DataEntry(("Suma_a_invertir:_" + E(t)), aa.amount), DataEntry(("Request_Status:_" + ab), "sold"), DataEntry(("User_Balance:_" + I(t)), (J(t) + ad)), DataEntry(("Saldo_tokens:_" + x(t)), ae), DataEntry(("Saldo_Seller:_" + M(N)), (O(N) + aa.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(ab), ad, a)]))
165+ else ScriptResult(WriteSet([DataEntry(A(ab, t), (C(ab, t) + 1)), DataEntry(s(t), Y), DataEntry(D(t), Z), DataEntry("Cantidad_de_tokens_a_comprar:_", ad), DataEntry(("Suma_a_invertir:_" + E(t)), aa.amount), DataEntry(("Request_Status:_" + ab), "sold"), DataEntry(("User_Balance:_" + I(t)), (J(t) + ad)), DataEntry(("Saldo_tokens:_" + x(t)), ae), DataEntry(("Saldo_Seller:_" + M(O)), (N(O) + aa.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(ab), ad, a)]))
166166 }
167167 }
168168
169169
170170 @Verifier(ag)
171171 func ah () = {
172172 let l = ag
173173 if ($isInstanceOf(l, "SetScriptTransaction"))
174174 then {
175175 let ai = l
176176 sigVerify(ag.bodyBytes, ag.proofs[0], e)
177177 }
178178 else if ($isInstanceOf(l, "DataTransaction"))
179179 then {
180180 let aj = l
181181 true
182182 }
183183 else if ($isInstanceOf(l, "TransferTransaction"))
184184 then {
185185 let ag = l
186186 true
187187 }
188188 else if ($isInstanceOf(l, "ExchangeTransaction"))
189189 then {
190190 let ag = l
191191 let ak = if (!(isDefined(ag.sellOrder.assetPair.priceAsset)))
192192 then true
193193 else !(isDefined(ag.sellOrder.assetPair.amountAsset))
194194 ak
195195 }
196196 else if ($isInstanceOf(l, "InvokeScriptTransaction"))
197197 then {
198198 let al = l
199199 true
200200 }
201201 else false
202202 }
203203

github/deemru/w8io/c3f4982 
35.89 ms