w8 · tx · 98n···hfj

tx · 98nrw2wDGF8vdLvZSFQSCngjzaF9FGeNYQSKLkcUshfj

3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4:  -0.01400000 Waves

2020.03.11 22:35 [904913] smart account 3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "98nrw2wDGF8vdLvZSFQSCngjzaF9FGeNYQSKLkcUshfj",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1583955294322,
    "version": 1,
    "sender": "3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4",
    "senderPublicKey": "4AHsCbS9QYVdKNvxrPWwsMwwy3KqXaCMXeAscExJZk9L",
    "proofs": [
        "2ZnohJ8QmFHzQGw5kjbfUtsj2B9FsZEqmSJrZXvWzXuFJ9HqmLs5n2oti5SBaTG9CuR4Mbm99wRMcZfmTcj5yoA2"
    ],
    "script": "base64:AAIDAAAAAAAAABMIARIGCgQIAQEIEgcKBQgICAEBAAAAHQAAAAAHYUJpdENPMgEAAAAgx/h6AJ03UJ8qMmy7JIhz3VjOE4OL3ofCGi0oG2fBKJYAAAAACHN0YXJ0UXR5AAAAAAAABRQAAAAAAAhub21QcmljZQAAAAAABfXhAAAAAAAQc3VwcGxpZXJEaXNjb3VudAAAAAAAAAAADAAAAAAOT3duZXJFY29QdWJLZXkBAAAAIC70W6NACRoO8DcwW0R46ze+bNGLr0tg3cAkNP8WNkAfAAAAAAN3dnMAAAAAAAX14QAAAAAABE5PTkUCAAAABG5vbmUAAAAABmlzc3VlcgkBAAAAB0FkZHJlc3MAAAABAQAAABoBVMr3Oz7nL9FV4g+t+EWzLN77jdANRWt9bwEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABAAAAA2tleQQAAAADbnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABQAAAANudW0BAAAAC2dldFN0ckJ5S2V5AAAAAQAAAANrZXkEAAAAA3N0cgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQUAAAADc3RyAQAAAApnZXRLZXlJdGVtAAAAAgAAAAhzdXBwbGllcgAAAAV0aXRsZQkAASwAAAACAgAAABB0b2tlbnNfQml0LUNPMjpfCQACWAAAAAEJAAH3AAAAAQkAAZsAAAABCQABLAAAAAIFAAAACHN1cHBsaWVyBQAAAAV0aXRsZQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQAAAARpdGVtCQABLAAAAAIFAAAABGl0ZW0CAAAAGl90b19BbWF6b25pYW5fQ29uc2VydmF0aW9uAQAAABRnZXRWYWx1ZUl0ZW1TdXBwbGllcgAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0BAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEAAAAEaXRlbQIAAAAXVG9rZW5zX29mZXJ0YWRvcyxfU2FsZG8BAAAAGmdldFZhbHVlQmFsYW5jZVF0eVN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQEAAAAOZ2V0S2V5SXRlbURhdGEAAAABAAAABGl0ZW0JAAEsAAAAAgUAAAAEaXRlbQIAAAAMX2Rlc2NyaXB0aW9uAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEaXRlbQIAAAABXwUAAAAEdXNlcgIAAAAEX2NudAEAAAAXZ2V0VmFsdWVVc2VySXRlbUNvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFWdldEtleVVzZXJJdGVtQ291bnRlcgAAAAIFAAAABHVzZXIFAAAABGl0ZW0BAAAAEmdldEtleUl0ZW1Vc2VyRGF0YQAAAAEAAAAEaXRlbQIAAAAJX3VzZXJkYXRhAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQAAAARpdGVtAgAAAAdfdG9rZW5zAQAAABhnZXRWYWx1ZUl0ZW1Vc2VyT3JkZXJRdHkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQUAAAAEaXRlbQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgIAAAAVU2VsbGVyX0JhbGFuY2U6X3dhdmVzAQAAABdnZXRWYWx1ZUJhbGFuY2VTdXBwbGllcgAAAAEAAAAIc3VwcGxpZXIJAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgEAAAAOZ2V0S2V5SXRlbVVzZXIAAAABAAAABGl0ZW0CAAAADVByb2plY3RfbmFtZToBAAAAEGdldFZhbHVlSXRlbVVzZXIAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAA5nZXRLZXlJdGVtVXNlcgAAAAEFAAAABGl0ZW0BAAAAGmdldEtleUl0ZW1EaXNjb3VudFN1cHBsaWVyAAAAAQAAAARpdGVtAgAAAAJfJQEAAAAcZ2V0VmFsdWVJdGVtRGlzY291bnRTdXBwbGllcgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAGmdldEtleUl0ZW1EaXNjb3VudFN1cHBsaWVyAAAAAQUAAAAEaXRlbQEAAAAXZ2V0S2V5SXRlbVByaWNlU3VwcGxpZXIAAAABAAAABGl0ZW0CAAAABl93YXZlcwEAAAAZZ2V0VmFsdWVJdGVtUHJpY2VTdXBwbGllcgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAF2dldEtleUl0ZW1QcmljZVN1cHBsaWVyAAAAAQUAAAAEaXRlbQAAAAIAAAABaQEAAAAQQWRkU3VwcGxpZXJUb2tlbgAAAAQAAAAFdGl0bGUAAAAJcHJlSWNvUXR5AAAAEHN1cHBsaWVyRGlzY291bnQAAAAMc3VwcGxpZXJEYXRhBAAAAAhzdXBwbGllcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAARpdGVtCQEAAAAKZ2V0S2V5SXRlbQAAAAIFAAAACHN1cHBsaWVyBQAAAAV0aXRsZQMJAABnAAAAAgAAAAAAAAAAAAUAAAAJcHJlSWNvUXR5CQAAAgAAAAECAAAAH1NvcnJ5LCBpbnN1ZmZpY2llbnQgdG9rZW4gb2ZmZXIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAALT2ZlcnRhbnRlOl8JAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtBQAAAAhzdXBwbGllcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0FAAAACXByZUljb1F0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAA9QcmVjaW9fTm9taW5hbDoJAQAAABdnZXRLZXlJdGVtUHJpY2VTdXBwbGllcgAAAAEFAAAABGl0ZW0FAAAACG5vbVByaWNlCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAF01heF9EZXNjdWVudG9fb2ZyZWNpZG86CQEAAAAaZ2V0S2V5SXRlbURpc2NvdW50U3VwcGxpZXIAAAABBQAAAARpdGVtBQAAABBzdXBwbGllckRpc2NvdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5SXRlbURhdGEAAAABBQAAAARpdGVtBQAAAAxzdXBwbGllckRhdGEFAAAAA25pbAAAAAFpAQAAAA1QdXJjaGFzZVRva2VuAAAABQAAAARpdGVtAAAAC3Byb2plY3ROYW1lAAAACHVzZXJEYXRhAAAACG9yZGVyUXR5AAAADHVzZXJEaXNjb3VudAQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAALHlvdSBjYW4gYWRxdWlyZSBjQml0Q08yIG9ubHkgYnkgV2F2ZXMgdG9rZW5zBAAAAAhzdXBwbGllcgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBAAAAAlwcmVJY29RdHkEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAIc3RhcnRRdHkEAAAAD2JhbGFuY2VTdXBwbGllcgQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAPYnV5ZXJUb2tlblByaWNlCQAAaQAAAAIJAABoAAAAAgUAAAAIbm9tUHJpY2UJAABlAAAAAgAAAAAAAAAAZAUAAAAMdXNlckRpc2NvdW50AAAAAAAAAABkBAAAAAt0b3RhbEFtb3VudAkAAGgAAAACBQAAAAhvcmRlclF0eQUAAAAPYnV5ZXJUb2tlblByaWNlAwkAAGYAAAACBQAAAAt0b3RhbEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQIAAAA2UGF5bWVudCBBbW91bnQgY2Fubm90IGJlIGxlc3MgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyAwkAAGYAAAACCAUAAAADcG10AAAABmFtb3VudAUAAAALdG90YWxBbW91bnQJAAACAAAAAQIAAAA3UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgaGlnaGVyIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQkAAGQAAAACCQEAAAAXZ2V0VmFsdWVVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleUl0ZW1Vc2VyAAAAAQUAAAAEaXRlbQUAAAALcHJvamVjdE5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABJnZXRLZXlJdGVtVXNlckRhdGEAAAABBQAAAARpdGVtBQAAAAh1c2VyRGF0YQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAABRDYW50aWRhZF9zb2xpY2l0YWRhOgkBAAAAFmdldEtleUl0ZW1Vc2VyT3JkZXJRdHkAAAABBQAAAARpdGVtBQAAAAhvcmRlclF0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAABBSZXF1ZXN0X1N0YXR1czpfBQAAAAt1c2VyQWRkcmVzcwIAAAAJY29uZmlybWVkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQkAAGUAAAACBQAAAAlwcmVJY29RdHkFAAAACG9yZGVyUXR5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIJAABkAAAAAgUAAAAPYmFsYW5jZVN1cHBsaWVyCAUAAAADcG10AAAABmFtb3VudAUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIDCQEAAAAJaXNEZWZpbmVkAAAAAQkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAAdhQml0Q08yCQAAAgAAAAECAAAAImNhbiB1c2UgYUJpdENPMiBvbmx5IGF0IHRoZSBtb21lbnQJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQUAAAALdXNlckFkZHJlc3MFAAAACG9yZGVyUXR5BQAAAAdhQml0Q08yBQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAABAAAAAckbWF0Y2gwBQAAAAJ0eAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAAAAAXQFAAAAByRtYXRjaDAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAABQAAAA5Pd25lckVjb1B1YktleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAPRGF0YVRyYW5zYWN0aW9uBAAAAAFkBQAAAAckbWF0Y2gwBgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAATVHJhbnNmZXJUcmFuc2FjdGlvbgQAAAACdHgFAAAAByRtYXRjaDAEAAAACXJlY2lwaWVudAkAAlgAAAABCAkABCQAAAABCAUAAAACdHgAAAAJcmVjaXBpZW50AAAABWJ5dGVzAwkAAAAAAAACCAUAAAACdHgAAAAGc2VuZGVyBQAAAAZpc3N1ZXIGCQAAAgAAAAECAAAAIFlvdSBjYW4ndCB0cmFuc2ZlcnJlZCB0aGlzIHRva2VuAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNFeGNoYW5nZVRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAQAAAAJd2l0aFdhdmVzAwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQgICAUAAAACdHgAAAAJc2VsbE9yZGVyAAAACWFzc2V0UGFpcgAAAApwcmljZUFzc2V0BgkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQgICAUAAAACdHgAAAAJc2VsbE9yZGVyAAAACWFzc2V0UGFpcgAAAAthbW91bnRBc3NldAUAAAAJd2l0aFdhdmVzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNFeGNoYW5nZVRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAQAAAACcGsJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAQQAAAAHYWRkcmVzcwkBAAAAFGFkZHJlc3NGcm9tUHVibGljS2V5AAAAAQUAAAACcGsEAAAAA2ZlZQAAAAAAABVcwAQAAAAIaGFzTW9uZXkJAABnAAAAAgkAAGUAAAACCQEAAAAMd2F2ZXNCYWxhbmNlAAAAAQUAAAAHYWRkcmVzcwUAAAADZmVlCAgFAAAAAnR4AAAACGJ1eU9yZGVyAAAABXByaWNlBAAAAARzZWxsCQAB9AAAAAMICAUAAAACdHgAAAAJc2VsbE9yZGVyAAAACWJvZHlCeXRlcwkAAZEAAAACCAgFAAAAAnR4AAAACXNlbGxPcmRlcgAAAAZwcm9vZnMAAAAAAAAAAAAICAUAAAACdHgAAAAJc2VsbE9yZGVyAAAAD3NlbmRlclB1YmxpY0tleQQAAAADYnV5CQAB9AAAAAMICAUAAAACdHgAAAAIYnV5T3JkZXIAAAAJYm9keUJ5dGVzCQABkQAAAAIICAUAAAACdHgAAAAIYnV5T3JkZXIAAAAGcHJvb2ZzAAAAAAAAAAAACAgFAAAAAnR4AAAACGJ1eU9yZGVyAAAAD3NlbmRlclB1YmxpY0tleQQAAAAPc2VsbE9yZGVyU2VuZGVyCQACWAAAAAEICAgFAAAAAnR4AAAACXNlbGxPcmRlcgAAAAZzZW5kZXIAAAAFYnl0ZXMEAAAACW1pbkFtb3VudAAAAAAAAAAAAQQAAAAJbWF4QW1vdW50AAAAAAAAAAAEBAAAAAhtYXhQcmljZQkAAGgAAAACBQAAAAltYXhBbW91bnQFAAAACG5vbVByaWNlAwMFAAAAA2J1eQMJAQAAAAlpc0RlZmluZWQAAAABCQAAZwAAAAIFAAAACG1heFByaWNlCAgFAAAAAnR4AAAACGJ1eU9yZGVyAAAABXByaWNlBgkAAAIAAAABAgAAADpFbCBtb250byBhIHBhZ2FyIG5vIHB1ZWRlIHNlciBtZW5vciBxdWUgZWwgcHJlY2lvIGRlIHZlbnRhBwYDBQAAAARzZWxsAwMDCQAAAAAAAAIICAUAAAACdHgAAAAJc2VsbE9yZGVyAAAABnNlbmRlcgUAAAAGaXNzdWVyCQAAZwAAAAIIBQAAAAJ0eAAAAAZhbW91bnQFAAAACW1pbkFtb3VudAcJAABnAAAAAgUAAAAJbWF4QW1vdW50CAUAAAACdHgAAAAGYW1vdW50BwYJAAACAAAAAQIAAABTRXJyb3I6IE1pbmltdW0gYW1vdW50OiAxIGFCaXRDTzI7IE1heGltdW0gYW1vdW50IG9mZmVyZWQ6IDQgYUJpdENPMiBieSBVc2VyIEFjY291bnQHAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABdJbnZva2VTY3JpcHRUcmFuc2FjdGlvbgQAAAABYwUAAAAHJG1hdGNoMAYH/eS7pg==",
    "chainId": 84,
    "height": 904913,
    "spentComplexity": 0
}

View: original | compacted
Prev: 5xZWcZmZPJ4qRuFFUPsJGimYwQPBKsVdKMJAs3H8vGd3
Next: 3tKj2SJot2VrsWfdbaKmzUje9tfAuKDManJDCq5WN3fh

Diff: 
Old New Differences
153 153                  then throw("Payment Amount cannot be less than item Purchase Order")
154 154                  else if ((T.amount > X))
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(nil))
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([if (isDefined((T.assetId != a)))
157 +                         then throw("can use aBitCO2 only at the moment")
158 +                         else ScriptTransfer(addressFromStringValue(V), R, a)]))
157 159              }
158 160      }
159 161  
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 117  func PurchaseToken (t,P,Q,R,S) = {
118 118      let T = extract(M.payment)
119 119      if (isDefined(T.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 140              let U = {
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 149              let V = toBase58String(M.caller.bytes)
150 150              let W = ((c * (100 - S)) / 100)
151 151              let X = (R * W)
152 152              if ((X > T.amount))
153 153                  then throw("Payment Amount cannot be less than item Purchase Order")
154 154                  else if ((T.amount > X))
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(nil))
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([if (isDefined((T.assetId != a)))
157 +                         then throw("can use aBitCO2 only at the moment")
158 +                         else ScriptTransfer(addressFromStringValue(V), R, a)]))
157 159              }
158 160      }
159 161  
160 162  
161 163  @Verifier(Y)
162 164  func Z () = {
163 165      let l = Y
164 166      if ($isInstanceOf(l, "SetScriptTransaction"))
165 167          then {
166 168              let aa = l
167 169              sigVerify(Y.bodyBytes, Y.proofs[0], e)
168 170              }
169 171          else if ($isInstanceOf(l, "DataTransaction"))
170 172              then {
171 173                  let ab = l
172 174                  true
173 175                  }
174 176              else if ($isInstanceOf(l, "TransferTransaction"))
175 177                  then {
176 178                      let Y = l
177 179                      let ac = toBase58String(addressFromRecipient(Y.recipient).bytes)
178 180                      if ((Y.sender == h))
179 181                          then true
180 182                          else throw("You can't transferred this token")
181 183                      }
182 184                  else if ($isInstanceOf(l, "ExchangeTransaction"))
183 185                      then {
184 186                          let Y = l
185 187                          let ad = if (!(isDefined(Y.sellOrder.assetPair.priceAsset)))
186 188                              then true
187 189                              else !(isDefined(Y.sellOrder.assetPair.amountAsset))
188 190                          ad
189 191                          }
190 192                      else if ($isInstanceOf(l, "ExchangeTransaction"))
191 193                          then {
192 194                              let Y = l
193 195                              let ae = Y.proofs[1]
194 196                              let af = addressFromPublicKey(ae)
195 197                              let ag = 1400000
196 198                              let ah = ((wavesBalance(af) - ag) >= Y.buyOrder.price)
197 199                              let ai = sigVerify(Y.sellOrder.bodyBytes, Y.sellOrder.proofs[0], Y.sellOrder.senderPublicKey)
198 200                              let aj = sigVerify(Y.buyOrder.bodyBytes, Y.buyOrder.proofs[0], Y.buyOrder.senderPublicKey)
199 201                              let ak = toBase58String(Y.sellOrder.sender.bytes)
200 202                              let al = 1
201 203                              let am = 4
202 204                              let an = (am * c)
203 205                              if (if (aj)
204 206                                  then if (isDefined((an >= Y.buyOrder.price)))
205 207                                      then true
206 208                                      else throw("El monto a pagar no puede ser menor que el precio de venta")
207 209                                  else false)
208 210                                  then true
209 211                                  else if (ai)
210 212                                      then if (if (if ((Y.sellOrder.sender == h))
211 213                                          then (Y.amount >= al)
212 214                                          else false)
213 215                                          then (am >= Y.amount)
214 216                                          else false)
215 217                                          then true
216 218                                          else throw("Error: Minimum amount: 1 aBitCO2; Maximum amount offered: 4 aBitCO2 by User Account")
217 219                                      else false
218 220                              }
219 221                          else if ($isInstanceOf(l, "InvokeScriptTransaction"))
220 222                              then {
221 223                                  let ao = l
222 224                                  true
223 225                                  }
224 226                              else false
225 227      }
226 228

Old	New		Differences
153	153		then throw("Payment Amount cannot be less than item Purchase Order")
154	154		else if ((T.amount > X))
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(nil))
	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([if (isDefined((T.assetId != a)))
	157	+	then throw("can use aBitCO2 only at the moment")
	158	+	else ScriptTransfer(addressFromStringValue(V), R, a)]))
157	159		}
158	160		}
159	161

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	117		func PurchaseToken (t,P,Q,R,S) = {
118	118		let T = extract(M.payment)
119	119		if (isDefined(T.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	140		let U = {
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	149		let V = toBase58String(M.caller.bytes)
150	150		let W = ((c * (100 - S)) / 100)
151	151		let X = (R * W)
152	152		if ((X > T.amount))
153	153		then throw("Payment Amount cannot be less than item Purchase Order")
154	154		else if ((T.amount > X))
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(nil))
	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([if (isDefined((T.assetId != a)))
	157	+	then throw("can use aBitCO2 only at the moment")
	158	+	else ScriptTransfer(addressFromStringValue(V), R, a)]))
157	159		}
158	160		}
159	161
160	162
161	163		@Verifier(Y)
162	164		func Z () = {
163	165		let l = Y
164	166		if ($isInstanceOf(l, "SetScriptTransaction"))
165	167		then {
166	168		let aa = l
167	169		sigVerify(Y.bodyBytes, Y.proofs[0], e)
168	170		}
169	171		else if ($isInstanceOf(l, "DataTransaction"))
170	172		then {
171	173		let ab = l
172	174		true
173	175		}
174	176		else if ($isInstanceOf(l, "TransferTransaction"))
175	177		then {
176	178		let Y = l
177	179		let ac = toBase58String(addressFromRecipient(Y.recipient).bytes)
178	180		if ((Y.sender == h))
179	181		then true
180	182		else throw("You can't transferred this token")
181	183		}
182	184		else if ($isInstanceOf(l, "ExchangeTransaction"))
183	185		then {
184	186		let Y = l
185	187		let ad = if (!(isDefined(Y.sellOrder.assetPair.priceAsset)))
186	188		then true
187	189		else !(isDefined(Y.sellOrder.assetPair.amountAsset))
188	190		ad
189	191		}
190	192		else if ($isInstanceOf(l, "ExchangeTransaction"))
191	193		then {
192	194		let Y = l
193	195		let ae = Y.proofs[1]
194	196		let af = addressFromPublicKey(ae)
195	197		let ag = 1400000
196	198		let ah = ((wavesBalance(af) - ag) >= Y.buyOrder.price)
197	199		let ai = sigVerify(Y.sellOrder.bodyBytes, Y.sellOrder.proofs[0], Y.sellOrder.senderPublicKey)
198	200		let aj = sigVerify(Y.buyOrder.bodyBytes, Y.buyOrder.proofs[0], Y.buyOrder.senderPublicKey)
199	201		let ak = toBase58String(Y.sellOrder.sender.bytes)
200	202		let al = 1
201	203		let am = 4
202	204		let an = (am * c)
203	205		if (if (aj)
204	206		then if (isDefined((an >= Y.buyOrder.price)))
205	207		then true
206	208		else throw("El monto a pagar no puede ser menor que el precio de venta")
207	209		else false)
208	210		then true
209	211		else if (ai)
210	212		then if (if (if ((Y.sellOrder.sender == h))
211	213		then (Y.amount >= al)
212	214		else false)
213	215		then (am >= Y.amount)
214	216		else false)
215	217		then true
216	218		else throw("Error: Minimum amount: 1 aBitCO2; Maximum amount offered: 4 aBitCO2 by User Account")
217	219		else false
218	220		}
219	221		else if ($isInstanceOf(l, "InvokeScriptTransaction"))
220	222		then {
221	223		let ao = l
222	224		true
223	225		}
224	226		else false
225	227		}
226	228

github/deemru/w8io/873ac7e 
40.32 ms ◑