w8 · tx · GzU···7R7

tx · GzUhnRSKqKamEgmQ5JBDYvTWGESPFpUEB7wrxrgar7R7

3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4:  -0.01400000 Waves

2020.03.11 16:08 [904536] smart account 3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "GzUhnRSKqKamEgmQ5JBDYvTWGESPFpUEB7wrxrgar7R7",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1583932095358,
    "version": 1,
    "sender": "3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4",
    "senderPublicKey": "4AHsCbS9QYVdKNvxrPWwsMwwy3KqXaCMXeAscExJZk9L",
    "proofs": [
        "3eZdLhBk7uzo7nvQnnVXzyNQjY2axdr8cJMcJCAuUt6DroCQ9vE52xN2bQh9FYZa1B2t8jyyNLjAPTARpFw2Hxx9"
    ],
    "script": "base64:AAIDAAAAAAAAABMIARIGCgQIAQEIEgcKBQgICAEBAAAAHwAAAAAHYUJpdENPMgEAAAAgx/h6AJ03UJ8qMmy7JIhz3VjOE4OL3ofCGi0oG2fBKJYAAAAACHN0YXJ0UXR5AAAAAAAABRQAAAAAAAhub21QcmljZQAAAAAABfXhAAAAAAAQc3VwcGxpZXJEaXNjb3VudAAAAAAAAAAADAAAAAAOT3duZXJFY29QdWJLZXkBAAAAIC70W6NACRoO8DcwW0R46ze+bNGLr0tg3cAkNP8WNkAfAAAAAAN3dnMAAAAAAAX14QAAAAAABE5PTkUCAAAABG5vbmUAAAAABmlzc3VlcgkBAAAAB0FkZHJlc3MAAAABAQAAABoBVMr3Oz7nL9FV4g+t+EWzLN77jdANRWt9bwEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABAAAAA2tleQQAAAADbnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABQAAAANudW0BAAAAC2dldFN0ckJ5S2V5AAAAAQAAAANrZXkEAAAAA3N0cgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQUAAAADc3RyAQAAAApnZXRLZXlJdGVtAAAAAgAAAAhzdXBwbGllcgAAAAV0aXRsZQkAASwAAAACAgAAABB0b2tlbnNfQml0LUNPMjpfCQACWAAAAAEJAAH3AAAAAQkAAZsAAAABCQABLAAAAAIFAAAACHN1cHBsaWVyBQAAAAV0aXRsZQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQAAAARpdGVtCQABLAAAAAIFAAAABGl0ZW0CAAAAGl90b19BbWF6b25pYW5fQ29uc2VydmF0aW9uAQAAABRnZXRWYWx1ZUl0ZW1TdXBwbGllcgAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0BAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEAAAAEaXRlbQIAAAAYX3Rva2Vuc19vZmVydGFkb3MsX1NhbGRvAQAAABpnZXRWYWx1ZUJhbGFuY2VRdHlTdXBwbGllcgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0BAAAADmdldEtleUl0ZW1EYXRhAAAAAQAAAARpdGVtCQABLAAAAAIFAAAABGl0ZW0CAAAADF9kZXNjcmlwdGlvbgEAAAAVZ2V0S2V5VXNlckl0ZW1Db3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0JAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABGl0ZW0CAAAAAV8FAAAABHVzZXICAAAABF9jbnQBAAAAF2dldFZhbHVlVXNlckl0ZW1Db3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACBQAAAAR1c2VyBQAAAARpdGVtAQAAABJnZXRLZXlJdGVtVXNlckRhdGEAAAABAAAABGl0ZW0CAAAACV91c2VyZGF0YQEAAAARZ2V0S2V5QmFsYW5jZVVzZXIAAAABAAAABGl0ZW0JAAEsAAAAAgUAAAAEaXRlbQIAAAAMX3NhbGR3dnN1c2VyAQAAABNnZXRWYWx1ZUJhbGFuY2VVc2VyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAARZ2V0S2V5QmFsYW5jZVVzZXIAAAABBQAAAARpdGVtAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQAAAARpdGVtAgAAAAdfdG9rZW5zAQAAABhnZXRWYWx1ZUl0ZW1Vc2VyT3JkZXJRdHkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQUAAAAEaXRlbQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgIAAAAaX2JhbGFuY2VfZGVsX1NlbGxlcixfd2F2ZXMBAAAAF2dldFZhbHVlQmFsYW5jZVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyAQAAAA5nZXRLZXlJdGVtVXNlcgAAAAEAAAAEaXRlbQIAAAANUHJvamVjdF9uYW1lOgEAAAAQZ2V0VmFsdWVJdGVtVXNlcgAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleUl0ZW1Vc2VyAAAAAQUAAAAEaXRlbQEAAAAaZ2V0S2V5SXRlbURpc2NvdW50U3VwcGxpZXIAAAABAAAABGl0ZW0CAAAAAl8lAQAAABxnZXRWYWx1ZUl0ZW1EaXNjb3VudFN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAaZ2V0S2V5SXRlbURpc2NvdW50U3VwcGxpZXIAAAABBQAAAARpdGVtAQAAABdnZXRLZXlJdGVtUHJpY2VTdXBwbGllcgAAAAEAAAAEaXRlbQIAAAAGX3dhdmVzAQAAABlnZXRWYWx1ZUl0ZW1QcmljZVN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAXZ2V0S2V5SXRlbVByaWNlU3VwcGxpZXIAAAABBQAAAARpdGVtAAAAAgAAAAFpAQAAABBBZGRTdXBwbGllclRva2VuAAAABAAAAAV0aXRsZQAAAAlwcmVJY29RdHkAAAAQc3VwcGxpZXJEaXNjb3VudAAAAAxzdXBwbGllckRhdGEEAAAACHN1cHBsaWVyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAABGl0ZW0JAQAAAApnZXRLZXlJdGVtAAAAAgUAAAAIc3VwcGxpZXIFAAAABXRpdGxlAwkAAGcAAAACAAAAAAAAAAAABQAAAAlwcmVJY29RdHkJAAACAAAAAQIAAAAfU29ycnksIGluc3VmZmljaWVudCB0b2tlbiBvZmZlcgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAtPZmVydGFudGU6XwkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0FAAAACHN1cHBsaWVyCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQUAAAAJcHJlSWNvUXR5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAD1ByZWNpb19Ob21pbmFsOgkBAAAAF2dldEtleUl0ZW1QcmljZVN1cHBsaWVyAAAAAQUAAAAEaXRlbQUAAAAIbm9tUHJpY2UJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAXTWF4X0Rlc2N1ZW50b19vZnJlY2lkbzoJAQAAABpnZXRLZXlJdGVtRGlzY291bnRTdXBwbGllcgAAAAEFAAAABGl0ZW0FAAAAEHN1cHBsaWVyRGlzY291bnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA5nZXRLZXlJdGVtRGF0YQAAAAEFAAAABGl0ZW0FAAAADHN1cHBsaWVyRGF0YQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAB9TYWxkby9CYWxhbmNlX1N1cHBsaWVyLF93YXZlczpfCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIAAAAAAAAAAAAFAAAAA25pbAAAAAFpAQAAAA1QdXJjaGFzZVRva2VuAAAABQAAAARpdGVtAAAAC3Byb2plY3ROYW1lAAAACHVzZXJEYXRhAAAACG9yZGVyUXR5AAAADHVzZXJEaXNjb3VudAQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAALHlvdSBjYW4gYWRxdWlyZSBjQml0Q08yIG9ubHkgYnkgV2F2ZXMgdG9rZW5zBAAAAAhzdXBwbGllcgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBAAAAAlwcmVJY29RdHkEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAIc3RhcnRRdHkEAAAAD2JhbGFuY2VTdXBwbGllcgQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAPYnV5ZXJUb2tlblByaWNlCQAAaQAAAAIJAABoAAAAAgUAAAAIbm9tUHJpY2UJAABlAAAAAgAAAAAAAAAAZAUAAAAMdXNlckRpc2NvdW50AAAAAAAAAABkBAAAAAt0b3RhbEFtb3VudAkAAGgAAAACBQAAAAhvcmRlclF0eQUAAAAPYnV5ZXJUb2tlblByaWNlAwkAAGYAAAACBQAAAAt0b3RhbEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQIAAAA2UGF5bWVudCBBbW91bnQgY2Fubm90IGJlIGxlc3MgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyAwkAAGYAAAACCAUAAAADcG10AAAABmFtb3VudAUAAAALdG90YWxBbW91bnQJAAACAAAAAQIAAAA3UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgaGlnaGVyIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQkAAGQAAAACCQEAAAAXZ2V0VmFsdWVVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleUl0ZW1Vc2VyAAAAAQUAAAAEaXRlbQUAAAALcHJvamVjdE5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABJnZXRLZXlJdGVtVXNlckRhdGEAAAABBQAAAARpdGVtBQAAAAh1c2VyRGF0YQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAABRDYW50aWRhZF9zb2xpY2l0YWRhOgkBAAAAFmdldEtleUl0ZW1Vc2VyT3JkZXJRdHkAAAABBQAAAARpdGVtBQAAAAhvcmRlclF0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAABBSZXF1ZXN0X1N0YXR1czpfBQAAAAt1c2VyQWRkcmVzcwIAAAAJY29uZmlybWVkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQkAAGUAAAACBQAAAAlwcmVJY29RdHkFAAAACG9yZGVyUXR5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAB1NhbGRvOl8JAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgkAAGQAAAACBQAAAA9iYWxhbmNlU3VwcGxpZXIIBQAAAANwbXQAAAAGYW1vdW50BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAADk93bmVyRWNvUHViS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAAWQFAAAAByRtYXRjaDAGAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE0V4Y2hhbmdlVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBAAAAAl3aXRoV2F2ZXMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAACnByaWNlQXNzZXQGCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAAC2Ftb3VudEFzc2V0BQAAAAl3aXRoV2F2ZXMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAF0ludm9rZVNjcmlwdFRyYW5zYWN0aW9uBAAAAAFjBQAAAAckbWF0Y2gwBgfgPpXg",
    "chainId": 84,
    "height": 904536,
    "spentComplexity": 0
}

View: original | compacted
Prev: 7mw5vsdXj73gTVNyZeM4ZFna6FopDruE9Nnf1T4LqHFQ
Next: DGC7cEkmnc1dYgewuqYXVUBW9auUXZaAkvDsz737TNnL

Diff: 
Old New Differences
84 84  func F (t) = i(E(t))
85 85  
86 86  
87 - func G (q) = q
87 + func G (q) = "_balance_del_Seller,_waves"
88 88  
89 89  
90 90  func H (q) = i(G(q))
91 91  
92 92  
93 - func I (t) = "Project_name:_"
93 + func I (t) = "Project_name:"
94 94  
95 95  
96 96  func J (t) = n(I(t))
159 159                  then throw("Payment Amount cannot be less than item Purchase Order")
160 160                  else if ((V.amount > Z))
161 161                      then throw("Payment Amount can't be higher than item Purchase Order")
162 -                     else ScriptResult(WriteSet([DataEntry(y(X, t), (A(X, t) + 1)), DataEntry(I(t), R), DataEntry(B(t), S), DataEntry(("Cantidad_solicitada:" + E(t)), T), DataEntry(("Request_Status:_" + X), "confirmed"), DataEntry(v(t), (P - T)), DataEntry(("Saldo_Seller:_" + G(q)), (W + V.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(X), T, a)]))
162 +                     else ScriptResult(WriteSet([DataEntry(y(X, t), (A(X, t) + 1)), DataEntry(I(t), R), DataEntry(B(t), S), DataEntry(("Cantidad_solicitada:" + E(t)), T), DataEntry(("Request_Status:_" + X), "confirmed"), DataEntry(v(t), (P - T)), DataEntry(("Saldo:_" + G(q)), (W + V.amount))]), TransferSet(nil))
163 163              }
164 164      }
165 165  
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) = (t + "_saldwvsuser")
76 76  
77 77  
78 78  func D (t) = i(C(t))
79 79  
80 80  
81 81  func E (t) = "_tokens"
82 82  
83 83  
84 84  func F (t) = i(E(t))
85 85  
86 86  
87 - func G (q) = q
87 + func G (q) = "_balance_del_Seller,_waves"
88 88  
89 89  
90 90  func H (q) = i(G(q))
91 91  
92 92  
93 - func I (t) = "Project_name:_"
93 + func I (t) = "Project_name:"
94 94  
95 95  
96 96  func J (t) = n(I(t))
97 97  
98 98  
99 99  func K (t) = "_%"
100 100  
101 101  
102 102  func L (t) = i(K(t))
103 103  
104 104  
105 105  func M (t) = "_waves"
106 106  
107 107  
108 108  func N (t) = i(M(t))
109 109  
110 110  
111 111  @Callable(O)
112 112  func AddSupplierToken (r,P,d,Q) = {
113 113      let q = toBase58String(O.caller.bytes)
114 114      let t = p(q, r)
115 115      if ((0 >= P))
116 116          then throw("Sorry, insufficient token offer")
117 117          else WriteSet([DataEntry(("Ofertante:_" + s(t)), q), DataEntry(v(t), P), DataEntry(("Precio_Nominal:" + M(t)), c), DataEntry(("Max_Descuento_ofrecido:" + K(t)), d), DataEntry(x(t), Q), DataEntry(("Saldo/Balance_Supplier,_waves:_" + G(q)), 0)])
118 118      }
119 119  
120 120  
121 121  
122 122  @Callable(O)
123 123  func PurchaseToken (t,R,S,T,U) = {
124 124      let V = extract(O.payment)
125 125      if (isDefined(V.assetId))
126 126          then throw("you can adquire cBitCO2 only by Waves tokens")
127 127          else {
128 128              let q = {
129 129                  let l = getString(this, s(t))
130 130                  if ($isInstanceOf(l, "String"))
131 131                      then {
132 132                          let m = l
133 133                          m
134 134                          }
135 135                      else g
136 136                  }
137 137              let P = {
138 138                  let l = getInteger(this, v(t))
139 139                  if ($isInstanceOf(l, "Int"))
140 140                      then {
141 141                          let m = l
142 142                          m
143 143                          }
144 144                      else b
145 145                  }
146 146              let W = {
147 147                  let l = getInteger(this, G(q))
148 148                  if ($isInstanceOf(l, "Int"))
149 149                      then {
150 150                          let m = l
151 151                          m
152 152                          }
153 153                      else 0
154 154                  }
155 155              let X = toBase58String(O.caller.bytes)
156 156              let Y = ((c * (100 - U)) / 100)
157 157              let Z = (T * Y)
158 158              if ((Z > V.amount))
159 159                  then throw("Payment Amount cannot be less than item Purchase Order")
160 160                  else if ((V.amount > Z))
161 161                      then throw("Payment Amount can't be higher than item Purchase Order")
162 -                     else ScriptResult(WriteSet([DataEntry(y(X, t), (A(X, t) + 1)), DataEntry(I(t), R), DataEntry(B(t), S), DataEntry(("Cantidad_solicitada:" + E(t)), T), DataEntry(("Request_Status:_" + X), "confirmed"), DataEntry(v(t), (P - T)), DataEntry(("Saldo_Seller:_" + G(q)), (W + V.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(X), T, a)]))
162 +                     else ScriptResult(WriteSet([DataEntry(y(X, t), (A(X, t) + 1)), DataEntry(I(t), R), DataEntry(B(t), S), DataEntry(("Cantidad_solicitada:" + E(t)), T), DataEntry(("Request_Status:_" + X), "confirmed"), DataEntry(v(t), (P - T)), DataEntry(("Saldo:_" + G(q)), (W + V.amount))]), TransferSet(nil))
163 163              }
164 164      }
165 165  
166 166  
167 167  @Verifier(aa)
168 168  func ab () = {
169 169      let l = aa
170 170      if ($isInstanceOf(l, "SetScriptTransaction"))
171 171          then {
172 172              let ac = l
173 173              sigVerify(aa.bodyBytes, aa.proofs[0], e)
174 174              }
175 175          else if ($isInstanceOf(l, "DataTransaction"))
176 176              then {
177 177                  let ad = l
178 178                  true
179 179                  }
180 180              else if ($isInstanceOf(l, "TransferTransaction"))
181 181                  then {
182 182                      let aa = l
183 183                      true
184 184                      }
185 185                  else if ($isInstanceOf(l, "ExchangeTransaction"))
186 186                      then {
187 187                          let aa = l
188 188                          let ae = if (!(isDefined(aa.sellOrder.assetPair.priceAsset)))
189 189                              then true
190 190                              else !(isDefined(aa.sellOrder.assetPair.amountAsset))
191 191                          ae
192 192                          }
193 193                      else if ($isInstanceOf(l, "InvokeScriptTransaction"))
194 194                          then {
195 195                              let af = l
196 196                              true
197 197                              }
198 198                          else false
199 199      }
200 200

Old	New		Differences
84	84		func F (t) = i(E(t))
85	85
86	86
87		-	func G (q) = q
	87	+	func G (q) = "_balance_del_Seller,_waves"
88	88
89	89
90	90		func H (q) = i(G(q))
91	91
92	92
93		-	func I (t) = "Project_name:_"
	93	+	func I (t) = "Project_name:"
94	94
95	95
96	96		func J (t) = n(I(t))

159	159		then throw("Payment Amount cannot be less than item Purchase Order")
160	160		else if ((V.amount > Z))
161	161		then throw("Payment Amount can't be higher than item Purchase Order")
162		-	else ScriptResult(WriteSet([DataEntry(y(X, t), (A(X, t) + 1)), DataEntry(I(t), R), DataEntry(B(t), S), DataEntry(("Cantidad_solicitada:" + E(t)), T), DataEntry(("Request_Status:_" + X), "confirmed"), DataEntry(v(t), (P - T)), DataEntry(("Saldo~~_Seller~~:_" + G(q)), (W + V.amount))]), TransferSet(~~[ScriptTransfer(addressFromStringValue(X), T, a)]~~))
	162	+	else ScriptResult(WriteSet([DataEntry(y(X, t), (A(X, t) + 1)), DataEntry(I(t), R), DataEntry(B(t), S), DataEntry(("Cantidad_solicitada:" + E(t)), T), DataEntry(("Request_Status:_" + X), "confirmed"), DataEntry(v(t), (P - T)), DataEntry(("Saldo:_" + G(q)), (W + V.amount))]), TransferSet(nil))
163	163		}
164	164		}
165	165

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) = (t + "_saldwvsuser")
76	76
77	77
78	78		func D (t) = i(C(t))
79	79
80	80
81	81		func E (t) = "_tokens"
82	82
83	83
84	84		func F (t) = i(E(t))
85	85
86	86
87		-	func G (q) = q
	87	+	func G (q) = "_balance_del_Seller,_waves"
88	88
89	89
90	90		func H (q) = i(G(q))
91	91
92	92
93		-	func I (t) = "Project_name:_"
	93	+	func I (t) = "Project_name:"
94	94
95	95
96	96		func J (t) = n(I(t))
97	97
98	98
99	99		func K (t) = "_%"
100	100
101	101
102	102		func L (t) = i(K(t))
103	103
104	104
105	105		func M (t) = "_waves"
106	106
107	107
108	108		func N (t) = i(M(t))
109	109
110	110
111	111		@Callable(O)
112	112		func AddSupplierToken (r,P,d,Q) = {
113	113		let q = toBase58String(O.caller.bytes)
114	114		let t = p(q, r)
115	115		if ((0 >= P))
116	116		then throw("Sorry, insufficient token offer")
117	117		else WriteSet([DataEntry(("Ofertante:_" + s(t)), q), DataEntry(v(t), P), DataEntry(("Precio_Nominal:" + M(t)), c), DataEntry(("Max_Descuento_ofrecido:" + K(t)), d), DataEntry(x(t), Q), DataEntry(("Saldo/Balance_Supplier,_waves:_" + G(q)), 0)])
118	118		}
119	119
120	120
121	121
122	122		@Callable(O)
123	123		func PurchaseToken (t,R,S,T,U) = {
124	124		let V = extract(O.payment)
125	125		if (isDefined(V.assetId))
126	126		then throw("you can adquire cBitCO2 only by Waves tokens")
127	127		else {
128	128		let q = {
129	129		let l = getString(this, s(t))
130	130		if ($isInstanceOf(l, "String"))
131	131		then {
132	132		let m = l
133	133		m
134	134		}
135	135		else g
136	136		}
137	137		let P = {
138	138		let l = getInteger(this, v(t))
139	139		if ($isInstanceOf(l, "Int"))
140	140		then {
141	141		let m = l
142	142		m
143	143		}
144	144		else b
145	145		}
146	146		let W = {
147	147		let l = getInteger(this, G(q))
148	148		if ($isInstanceOf(l, "Int"))
149	149		then {
150	150		let m = l
151	151		m
152	152		}
153	153		else 0
154	154		}
155	155		let X = toBase58String(O.caller.bytes)
156	156		let Y = ((c * (100 - U)) / 100)
157	157		let Z = (T * Y)
158	158		if ((Z > V.amount))
159	159		then throw("Payment Amount cannot be less than item Purchase Order")
160	160		else if ((V.amount > Z))
161	161		then throw("Payment Amount can't be higher than item Purchase Order")
162		-	else ScriptResult(WriteSet([DataEntry(y(X, t), (A(X, t) + 1)), DataEntry(I(t), R), DataEntry(B(t), S), DataEntry(("Cantidad_solicitada:" + E(t)), T), DataEntry(("Request_Status:_" + X), "confirmed"), DataEntry(v(t), (P - T)), DataEntry(("Saldo~~_Seller~~:_" + G(q)), (W + V.amount))]), TransferSet(~~[ScriptTransfer(addressFromStringValue(X), T, a)]~~))
	162	+	else ScriptResult(WriteSet([DataEntry(y(X, t), (A(X, t) + 1)), DataEntry(I(t), R), DataEntry(B(t), S), DataEntry(("Cantidad_solicitada:" + E(t)), T), DataEntry(("Request_Status:_" + X), "confirmed"), DataEntry(v(t), (P - T)), DataEntry(("Saldo:_" + G(q)), (W + V.amount))]), TransferSet(nil))
163	163		}
164	164		}
165	165
166	166
167	167		@Verifier(aa)
168	168		func ab () = {
169	169		let l = aa
170	170		if ($isInstanceOf(l, "SetScriptTransaction"))
171	171		then {
172	172		let ac = l
173	173		sigVerify(aa.bodyBytes, aa.proofs[0], e)
174	174		}
175	175		else if ($isInstanceOf(l, "DataTransaction"))
176	176		then {
177	177		let ad = l
178	178		true
179	179		}
180	180		else if ($isInstanceOf(l, "TransferTransaction"))
181	181		then {
182	182		let aa = l
183	183		true
184	184		}
185	185		else if ($isInstanceOf(l, "ExchangeTransaction"))
186	186		then {
187	187		let aa = l
188	188		let ae = if (!(isDefined(aa.sellOrder.assetPair.priceAsset)))
189	189		then true
190	190		else !(isDefined(aa.sellOrder.assetPair.amountAsset))
191	191		ae
192	192		}
193	193		else if ($isInstanceOf(l, "InvokeScriptTransaction"))
194	194		then {
195	195		let af = l
196	196		true
197	197		}
198	198		else false
199	199		}
200	200

github/deemru/w8io/873ac7e 
38.00 ms ◑