w8 · tx · 9a5···sis

tx · 9a53RapyiUTXEWnT95QYo359hReWk5rfrvay1eUmssis

3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8:  -0.01000000 Waves

2021.10.26 14:45 [1763213] smart account 3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9a53RapyiUTXEWnT95QYo359hReWk5rfrvay1eUmssis",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1635248768015,
    "version": 2,
    "chainId": 84,
    "sender": "3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8",
    "senderPublicKey": "8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U",
    "proofs": [
        "3C8xYYz5ZSpT1ysXMsdBCCRzrGoPZnPG1bMgiSwuUBBJBz43LtrTXiN67Gy4SMEKDGsAdSvZcsxnCjjwPMSrcUaM"
    ],
    "script": "base64:AAIDAAAAAAAAAAwIARIICgYBCAgICAgAAAAtAAAAAAd5Qml0Q08yAQAAACBpjNT/200BfejLeLffs4/BXDw5W+kMeWgNIY5n6ZtLrQAAAAAQVG9rVG9WZW5kZWRvclF0eQAAAAAAAAAnEAAAAAAETk9ORQIAAAAEbm9uZQAAAAALT3duZXJQdWJLZXkBAAAAIHYlgUf22Lk37u4at3MrCWteEN5n68yQc4q5Um14SA8PAAAAABZlY3hhY2h4a2FwYXdpeDAxcHJlaWNvCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFU3xPba43MIrTdBzkj1KIh5RJhI+0VJu6nAAAAABxlTTN4TjA4eE4wOHBleHByb2R4YWNBcHB4d3ZzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUZXtlAwFojd9til2zY8ueY3NTvHmic+ofAAAAAAp0eGFjeE4wOHBlCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFU2H+zv6hoVfC6umL2/Iw6/XNeoYjeAvgKAAAAAApOMDhwZXhwcm9kCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUoSOcBtKbP7i/nEoP0XqHwB6tn5KM3xRVAAAAAAVldXJvdQAAAAAAAAAAdAAAAAAFdXNkbncAAAAAAAAACesAAAAABWJjbzJlAAAAAAAAAYagAAAAAAhiaXRkc2N0bwAAAAAAAAAAAwAAAAADcElQAAAAAAAAAAAKAAAAAANlSVAAAAAAAAAAAAEAAAAAA3VCUAAAAAAAAAAABwAAAAADc0JQAAAAAAAAAAACAAAAAANlQlAAAAAAAAAAAAIAAAAACXJlbGFjZGN0bwAAAAAAAAAACwEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABAAAAA2tleQQAAAADbnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABQAAAANudW0BAAAAC2dldFN0ckJ5S2V5AAAAAQAAAANrZXkEAAAAA3N0cgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQUAAAADc3RyAQAAABhnZXRLZXlVc2VySXRlbUd0c0NvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQIAAAAKT3JkZXJf4oSWOgEAAAAaZ2V0VmFsdWVVc2VySXRlbUd0c0NvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAGGdldEtleVVzZXJJdGVtR3RzQ291bnRlcgAAAAIFAAAABHVzZXIFAAAABGl0ZW0BAAAAEWdldEtleXByb2plY3ROYW1lAAAAAQAAAARpdGVtAgAAAB5Qcm95ZWN0byBkZSBBcG95byB8IEludmVyc2nDs24BAAAAE2dldFZhbHVlcHJvamVjdE5hbWUAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABFnZXRLZXlwcm9qZWN0TmFtZQAAAAEFAAAABGl0ZW0BAAAAEmdldEtleVVzZXJEb2N1bWVudAAAAAEAAAAEaXRlbQIAAAAl4oSWIGRlIERvY3VtZW50byB8IEROSSBkZWwgQ29tcHJhZG9yOgEAAAAUZ2V0VmFsdWVVc2VyRG9jdW1lbnQAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABJnZXRLZXlVc2VyRG9jdW1lbnQAAAABBQAAAARpdGVtAQAAAA5nZXRLZXlJdGVtTmFtZQAAAAEAAAAEaXRlbQIAAAAkUHJvZHVjdG8tR1RTIGFkcXVpcmlkbyB8IENhdGVnb3LDrWE6AQAAABBnZXRWYWx1ZUl0ZW1OYW1lAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAOZ2V0S2V5SXRlbU5hbWUAAAABBQAAAARpdGVtAQAAAAtnZXRLZXlUTmFtZQAAAAEAAAAEaXRlbQIAAAAWVGllbmRhIHwgVmVuZGVkb3ItR1RTOgEAAAANZ2V0VmFsdWVUTmFtZQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAC2dldEtleVROYW1lAAAAAQUAAAAEaXRlbQEAAAAOZ2V0S2V5U3VwcGxpZXIAAAABAAAABGl0ZW0CAAAAGE5vZG8tQWN0aXZvIFBhcnRpY2lwYW50ZQEAAAAIZ2V0S2V5VUkAAAABAAAABGl0ZW0CAAAAEFVJLCB4MTBlLTA0IGJpdDoBAAAACmdldFZhbHVlVUkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlVSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVBJAAAAAQAAAARpdGVtAgAAAAlQSSwgd3ZsczoBAAAACmdldFZhbHVlUEkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlQSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVNJAAAAAQAAAARpdGVtAgAAABBTSSwgeDEwZS0wNCBiaXQ6AQAAAApnZXRWYWx1ZVNJAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAIZ2V0S2V5U0kAAAABBQAAAARpdGVtAQAAAAlnZXRLZXlOSWIAAAABAAAABGl0ZW0CAAAAEU5JYiwgeDEwZS0wNCBiaXQ6AQAAAAtnZXRWYWx1ZU5JYgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACWdldEtleU5JYgAAAAEFAAAABGl0ZW0BAAAACWdldEtleU5JdwAAAAEAAAAEaXRlbQIAAAAKTkl3LCB3dmxzOgEAAAALZ2V0VmFsdWVOSXcAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAlnZXRLZXlOSXcAAAABBQAAAARpdGVtAQAAABBnZXRLZXlCYWxhblRva2VuAAAAAQAAAAZ0aWVuZGECAAAANlNhbGRvIGVuIFRpZW5kYTEgYWN0dWFsIHBhcmEgcmVzdGFyIGRlbCBCYWxhbmNlLCB5dG9rOgEAAAASZ2V0VmFsdWVCYWxhblRva2VuAAAAAQAAAAZ0aWVuZGEJAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABBnZXRLZXlCYWxhblRva2VuAAAAAQUAAAAGdGllbmRhAQAAABVnZXRLZXlCYWxhbmNlUHJveWVjdG8AAAABAAAACHByb3llY3RvAgAAABtCYWxhbmNlIGRlbCBQcm95ZWN0bywgd3ZsczoBAAAAF2dldFZhbHVlQmFsYW5jZVByb3llY3RvAAAAAQAAAAhwcm95ZWN0bwkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFWdldEtleUJhbGFuY2VQcm95ZWN0bwAAAAEFAAAACHByb3llY3RvAAAAAQAAAAFpAQAAAAtwdXJjaGFzZUdUUwAAAAYAAAALdG90YWxBbW91bnQAAAAMdXNlckRvY3VtZW50AAAAC3Byb2plY3ROYW1lAAAACGl0ZW1OYW1lAAAABXROYW1lAAAABGl0ZW0EAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAkAAAIAAAABAgAAABNFbCBQcmVjaW8gZW4gd2F2ZXMuBAAAAAhzdXBwbGllcgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAAOZ2V0S2V5U3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUEAAAABnRpZW5kYQkAAlgAAAABCAUAAAAKdHhhY3hOMDhwZQAAAAVieXRlcwQAAAAMc2FsZG9UaWVuZGExBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABBnZXRLZXlCYWxhblRva2VuAAAAAQUAAAAGdGllbmRhAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAACHByb3llY3RvCQACWAAAAAEIBQAAABZlY3hhY2h4a2FwYXdpeDAxcHJlaWNvAAAABWJ5dGVzBAAAAAlzYWxkb1Byb2oEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAFWdldEtleUJhbGFuY2VQcm95ZWN0bwAAAAEFAAAACHByb3llY3RvAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACHN1YlRvdGFsBQAAAAt0b3RhbEFtb3VudAQAAAADcEl3CQAAaQAAAAIJAABoAAAAAgUAAAADcElQBQAAAAhzdWJUb3RhbAUAAAAJcmVsYWNkY3RvBAAAAANlSXcJAABpAAAAAgkAAGgAAAACBQAAAANlSVAFAAAACHN1YlRvdGFsBQAAAAlyZWxhY2RjdG8EAAAADWJjbzJtZW5vc2RjdG8JAABpAAAAAgkAAGgAAAACCQAAZQAAAAIAAAAAAAAAAGQFAAAACGJpdGRzY3RvCQAAaAAAAAIFAAAABWV1cm91BQAAAAViY28yZQAAAAAAAAAnEAQAAAAJc3ViVG90YWxiCQAAaQAAAAIJAABpAAAAAgkAAGgAAAACBQAAAAt0b3RhbEFtb3VudAUAAAAFdXNkbncAAAAAAAAAAGQFAAAADWJjbzJtZW5vc2RjdG8EAAAABnRvdGFsYgkAAGgAAAACBQAAAAlzdWJUb3RhbGIAAAAAAAAAJxAEAAAAA3VJYgkAAGkAAAACCQAAaAAAAAIFAAAAA3VCUAUAAAAJc3ViVG90YWxiBQAAAAlyZWxhY2RjdG8EAAAAA3NJYgkAAGkAAAACCQAAaAAAAAIFAAAAA3NCUAUAAAAJc3ViVG90YWxiBQAAAAlyZWxhY2RjdG8EAAAAA2VJYgkAAGkAAAACCQAAaAAAAAIFAAAAA2VCUAUAAAAJc3ViVG90YWxiBQAAAAlyZWxhY2RjdG8DCQAAZwAAAAIFAAAADHNhbGRvVGllbmRhMQkAAGgAAAACBQAAABBUb2tUb1ZlbmRlZG9yUXR5AAAAAAAAACcQCQAAAgAAAAECAAAAQ0xvIHNlbnRpbW9zLCBwb3IgYWhvcmEgbm8gaGF5IG9mZXJ0YSBkZSB0b2tlbnMgcGFyYSBzdSB0cmFuc2FjY2nDs24EAAAACmFtb3VudEJDTzIJAABlAAAAAgkAAGgAAAACBQAAABBUb2tUb1ZlbmRlZG9yUXR5AAAAAAAAACcQBQAAAAxzYWxkb1RpZW5kYTEDCQAAZgAAAAIFAAAAC3RvdGFsQW1vdW50CAUAAAADcG10AAAABmFtb3VudAkAAAIAAAABAgAAADVQYXltZW50IEFtb3VudCBjYW4ndCBiZSBsZXNzIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgMJAABmAAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAAC3RvdGFsQW1vdW50CQAAAgAAAAECAAAAN1BheW1lbnQgQW1vdW50IGNhbid0IGJlIGhpZ2hlciB0aGFuIGl0ZW0gUHVyY2hhc2UgT3JkZXIJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAYZ2V0S2V5VXNlckl0ZW1HdHNDb3VudGVyAAAAAgUAAAALdXNlckFkZHJlc3MFAAAABGl0ZW0JAABkAAAAAgkBAAAAGmdldFZhbHVlVXNlckl0ZW1HdHNDb3VudGVyAAAAAgUAAAALdXNlckFkZHJlc3MFAAAABGl0ZW0AAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAFkFwb3lvIEVjb2zDs2dpY28sIHd2bHMFAAAAC3RvdGFsQW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAASZ2V0S2V5VXNlckRvY3VtZW50AAAAAQUAAAAEaXRlbQUAAAAMdXNlckRvY3VtZW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAARZ2V0S2V5cHJvamVjdE5hbWUAAAABBQAAAARpdGVtBQAAAAtwcm9qZWN0TmFtZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleUl0ZW1OYW1lAAAAAQUAAAAEaXRlbQUAAAAIaXRlbU5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAtnZXRLZXlUTmFtZQAAAAEFAAAABGl0ZW0FAAAABXROYW1lCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5U3VwcGxpZXIAAAABBQAAAARpdGVtBQAAAARpdGVtCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAR1c2RuBQAAAAV1c2RudwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAFZXVyb3UFAAAABWV1cm91CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAB8xIEJpdC1DTzIgY29uIGRzY3RvLCB1c2QgeDEwZS00BQAAAA1iY28ybWVub3NkY3RvCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAACJUb3RhbCBiaXQtY28yIGEgZGlzdHJpYnVpciwgeDEwZS00BQAAAAlzdWJUb3RhbGIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAOT3JkZXJfU3RhdHVzOl8FAAAAC3VzZXJBZGRyZXNzAgAAABhUcmFuc2FjY2nDs24gQ29uZmlybWFkYSEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAJEJhbGFuY2UgZGVsIFByb3llY3RvLCBhbnRlcmlvciwgd3ZscwUAAAAJc2FsZG9Qcm9qCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAVZ2V0S2V5QmFsYW5jZVByb3llY3RvAAAAAQUAAAAIcHJveWVjdG8JAABkAAAAAgkBAAAAF2dldFZhbHVlQmFsYW5jZVByb3llY3RvAAAAAQUAAAAIcHJveWVjdG8FAAAAA3BJdwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAqU2FsZG8gZW4gVGllbmRhMSwgaW5pY2lhbCBvIGFudGVyaW9yLCBiY28yBQAAAAxzYWxkb1RpZW5kYTEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABBnZXRLZXlCYWxhblRva2VuAAAAAQUAAAAGdGllbmRhCQAAZAAAAAIJAQAAABJnZXRWYWx1ZUJhbGFuVG9rZW4AAAABBQAAAAZ0aWVuZGEFAAAACXN1YlRvdGFsYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAdU2FsZG8gQkNPMiBlbiBvZmVydGEsIHgxMGUtMDQJAABlAAAAAgUAAAAKYW1vdW50QkNPMgkAAGQAAAACCQAAZQAAAAIJAQAAABJnZXRWYWx1ZUJhbGFuVG9rZW4AAAABBQAAAAZ0aWVuZGEFAAAADHNhbGRvVGllbmRhMQUAAAAJc3ViVG90YWxiBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAWZWN4YWNoeGthcGF3aXgwMXByZWljbwUAAAADcEl3BQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAHGVNM3hOMDh4TjA4cGV4cHJvZHhhY0FwcHh3dnMFAAAAA2VJdwUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAA3VJYgUAAAAHeUJpdENPMgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAp0eGFjeE4wOHBlBQAAAANzSWIFAAAAB3lCaXRDTzIJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAKTjA4cGV4cHJvZAUAAAADZUliBQAAAAd5Qml0Q08yBQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAABAAAAAckbWF0Y2gwBQAAAAJ0eAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAAAAAXQFAAAAByRtYXRjaDAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAABQAAAAtPd25lclB1YktleQMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAElJlaXNzdWVUcmFuc2FjdGlvbgYJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAPRGF0YVRyYW5zYWN0aW9uBAAAAAFkBQAAAAckbWF0Y2gwBgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAATVHJhbnNmZXJUcmFuc2FjdGlvbgQAAAACdHgFAAAAByRtYXRjaDAGB/Sk7Ic=",
    "height": 1763213,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6JoXhuKF6cCoAR5oJwWieDXWj3UQk36snkU5xDh5ZT6a
Next: AB1eNr1bqVfFAGCZceTR7jKtU2CFugSSqD4GDqh2FndW

Diff: 
Old New Differences
188 188              if ((ak >= (b * 10000)))
189 189                  then throw("Lo sentimos, por ahora no hay oferta de tokens para su transacción")
190 190                  else {
191 -                     let aw = (b * 10000)
191 +                     let aw = ((b * 10000) - ak)
192 192                      if ((ad > ai.amount))
193 193                          then throw("Payment Amount can't be less than item Purchase Order")
194 194                          else if ((ai.amount > ad))
195 195                              then throw("Payment Amount can't be higher than item Purchase Order")
196 -                             else ScriptResult(WriteSet([DataEntry(z(am, B), (C(am, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", aq), DataEntry("Total bit-co2 a distribuir, x10e-4", ar), DataEntry(("Order_Status:_" + am), "Transacción Confirmada!"), DataEntry("Balance del Proyecto, anterior, wvls", al), DataEntry(Z(aa), (ab(aa) + ao)), DataEntry("Saldo Tienda1, anterior, bco2", 0), DataEntry(W(X), 0), DataEntry("Saldo BCO2 en oferta, x10e-04", aw)]), TransferSet([ScriptTransfer(e, ao, unit), ScriptTransfer(f, ap, unit), ScriptTransfer(ac.caller, at, a), ScriptTransfer(g, au, a), ScriptTransfer(h, av, a)]))
196 +                             else ScriptResult(WriteSet([DataEntry(z(am, B), (C(am, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", aq), DataEntry("Total bit-co2 a distribuir, x10e-4", ar), DataEntry(("Order_Status:_" + am), "Transacción Confirmada!"), DataEntry("Balance del Proyecto, anterior, wvls", al), DataEntry(Z(aa), (ab(aa) + ao)), DataEntry("Saldo en Tienda1, inicial o anterior, bco2", ak), DataEntry(W(X), (Y(X) + ar)), DataEntry("Saldo BCO2 en oferta, x10e-04", (aw - ((Y(X) - ak) + ar)))]), TransferSet([ScriptTransfer(e, ao, unit), ScriptTransfer(f, ap, unit), ScriptTransfer(ac.caller, at, a), ScriptTransfer(g, au, a), ScriptTransfer(h, av, a)]))
197 197                      }
198 198              }
199 199      }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = base58'872MvpMoQx7SnV58HMcR9hd6vBWDtQvqmt5javCmYwpx'
5 5  
6 6  let b = 10000
7 7  
8 8  let c = "none"
9 9  
10 10  let d = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
11 11  
12 12  let e = Address(base58'3NAFcFPrj1wWrVMcsJMLvWBzmBt93oLh6w8')
13 13  
14 14  let f = Address(base58'3MyAfquD1K4mvWJNDLVPRG4BWiAW3RQUpXG')
15 15  
16 16  let g = Address(base58'3N9epiFphbL3Sf25xMASL1jAPxDH5D8vX85')
17 17  
18 18  let h = Address(base58'3N4c7DzgBcyVWTEv9N11vNpg4B1bfg5ryfJ')
19 19  
20 20  let i = 116
21 21  
22 22  let j = 2539
23 23  
24 24  let k = 100000
25 25  
26 26  let l = 3
27 27  
28 28  let m = 10
29 29  
30 30  let n = 1
31 31  
32 32  let o = 7
33 33  
34 34  let p = 2
35 35  
36 36  let q = 2
37 37  
38 38  let r = 11
39 39  
40 40  func s (t) = {
41 41      let u = {
42 42          let v = getInteger(this, t)
43 43          if ($isInstanceOf(v, "Int"))
44 44              then {
45 45                  let w = v
46 46                  w
47 47                  }
48 48              else 0
49 49          }
50 50      u
51 51      }
52 52  
53 53  
54 54  func x (t) = {
55 55      let y = {
56 56          let v = getString(this, t)
57 57          if ($isInstanceOf(v, "String"))
58 58              then {
59 59                  let w = v
60 60                  w
61 61                  }
62 62              else c
63 63          }
64 64      y
65 65      }
66 66  
67 67  
68 68  func z (A,B) = "Order_№:"
69 69  
70 70  
71 71  func C (A,B) = s(z(A, B))
72 72  
73 73  
74 74  func D (B) = "Proyecto de Apoyo | Inversión"
75 75  
76 76  
77 77  func E (B) = x(D(B))
78 78  
79 79  
80 80  func F (B) = "№ de Documento | DNI del Comprador:"
81 81  
82 82  
83 83  func G (B) = x(F(B))
84 84  
85 85  
86 86  func H (B) = "Producto-GTS adquirido | Categoría:"
87 87  
88 88  
89 89  func I (B) = x(H(B))
90 90  
91 91  
92 92  func J (B) = "Tienda | Vendedor-GTS:"
93 93  
94 94  
95 95  func K (B) = x(J(B))
96 96  
97 97  
98 98  func L (B) = "Nodo-Activo Participante"
99 99  
100 100  
101 101  func M (B) = "UI, x10e-04 bit:"
102 102  
103 103  
104 104  func N (B) = s(M(B))
105 105  
106 106  
107 107  func O (B) = "PI, wvls:"
108 108  
109 109  
110 110  func P (B) = s(O(B))
111 111  
112 112  
113 113  func Q (B) = "SI, x10e-04 bit:"
114 114  
115 115  
116 116  func R (B) = s(Q(B))
117 117  
118 118  
119 119  func S (B) = "NIb, x10e-04 bit:"
120 120  
121 121  
122 122  func T (B) = s(S(B))
123 123  
124 124  
125 125  func U (B) = "NIw, wvls:"
126 126  
127 127  
128 128  func V (B) = s(U(B))
129 129  
130 130  
131 131  func W (X) = "Saldo en Tienda1 actual para restar del Balance, ytok:"
132 132  
133 133  
134 134  func Y (X) = s(W(X))
135 135  
136 136  
137 137  func Z (aa) = "Balance del Proyecto, wvls:"
138 138  
139 139  
140 140  func ab (aa) = s(Z(aa))
141 141  
142 142  
143 143  @Callable(ac)
144 144  func purchaseGTS (ad,ae,af,ag,ah,B) = {
145 145      let ai = extract(ac.payment)
146 146      if (isDefined(ai.assetId))
147 147          then throw("El Precio en waves.")
148 148          else {
149 149              let aj = {
150 150                  let v = getString(this, L(B))
151 151                  if ($isInstanceOf(v, "String"))
152 152                      then {
153 153                          let w = v
154 154                          w
155 155                          }
156 156                      else c
157 157                  }
158 158              let X = toBase58String(g.bytes)
159 159              let ak = {
160 160                  let v = getInteger(this, W(X))
161 161                  if ($isInstanceOf(v, "Int"))
162 162                      then {
163 163                          let w = v
164 164                          w
165 165                          }
166 166                      else 0
167 167                  }
168 168              let aa = toBase58String(e.bytes)
169 169              let al = {
170 170                  let v = getInteger(this, Z(aa))
171 171                  if ($isInstanceOf(v, "Int"))
172 172                      then {
173 173                          let w = v
174 174                          w
175 175                          }
176 176                      else 0
177 177                  }
178 178              let am = toBase58String(ac.caller.bytes)
179 179              let an = ad
180 180              let ao = ((m * an) / r)
181 181              let ap = ((n * an) / r)
182 182              let aq = (((100 - l) * (i * k)) / 10000)
183 183              let ar = (((ad * j) / 100) / aq)
184 184              let as = (ar * 10000)
185 185              let at = ((o * ar) / r)
186 186              let au = ((p * ar) / r)
187 187              let av = ((q * ar) / r)
188 188              if ((ak >= (b * 10000)))
189 189                  then throw("Lo sentimos, por ahora no hay oferta de tokens para su transacción")
190 190                  else {
191 -                     let aw = (b * 10000)
191 +                     let aw = ((b * 10000) - ak)
192 192                      if ((ad > ai.amount))
193 193                          then throw("Payment Amount can't be less than item Purchase Order")
194 194                          else if ((ai.amount > ad))
195 195                              then throw("Payment Amount can't be higher than item Purchase Order")
196 -                             else ScriptResult(WriteSet([DataEntry(z(am, B), (C(am, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", aq), DataEntry("Total bit-co2 a distribuir, x10e-4", ar), DataEntry(("Order_Status:_" + am), "Transacción Confirmada!"), DataEntry("Balance del Proyecto, anterior, wvls", al), DataEntry(Z(aa), (ab(aa) + ao)), DataEntry("Saldo Tienda1, anterior, bco2", 0), DataEntry(W(X), 0), DataEntry("Saldo BCO2 en oferta, x10e-04", aw)]), TransferSet([ScriptTransfer(e, ao, unit), ScriptTransfer(f, ap, unit), ScriptTransfer(ac.caller, at, a), ScriptTransfer(g, au, a), ScriptTransfer(h, av, a)]))
196 +                             else ScriptResult(WriteSet([DataEntry(z(am, B), (C(am, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", aq), DataEntry("Total bit-co2 a distribuir, x10e-4", ar), DataEntry(("Order_Status:_" + am), "Transacción Confirmada!"), DataEntry("Balance del Proyecto, anterior, wvls", al), DataEntry(Z(aa), (ab(aa) + ao)), DataEntry("Saldo en Tienda1, inicial o anterior, bco2", ak), DataEntry(W(X), (Y(X) + ar)), DataEntry("Saldo BCO2 en oferta, x10e-04", (aw - ((Y(X) - ak) + ar)))]), TransferSet([ScriptTransfer(e, ao, unit), ScriptTransfer(f, ap, unit), ScriptTransfer(ac.caller, at, a), ScriptTransfer(g, au, a), ScriptTransfer(h, av, a)]))
197 197                      }
198 198              }
199 199      }
200 200  
201 201  
202 202  @Verifier(ax)
203 203  func ay () = {
204 204      let v = ax
205 205      if ($isInstanceOf(v, "SetScriptTransaction"))
206 206          then {
207 207              let az = v
208 208              sigVerify(ax.bodyBytes, ax.proofs[0], d)
209 209              }
210 210          else if (if ($isInstanceOf(v, "ReissueTransaction"))
211 211              then true
212 212              else $isInstanceOf(v, "DataTransaction"))
213 213              then {
214 214                  let aA = v
215 215                  true
216 216                  }
217 217              else if ($isInstanceOf(v, "TransferTransaction"))
218 218                  then {
219 219                      let ax = v
220 220                      true
221 221                      }
222 222                  else false
223 223      }
224 224

Old	New		Differences
188	188		if ((ak >= (b * 10000)))
189	189		then throw("Lo sentimos, por ahora no hay oferta de tokens para su transacción")
190	190		else {
191		-	let aw = (b * 10000)
	191	+	let aw = ((b * 10000) - ak)
192	192		if ((ad > ai.amount))
193	193		then throw("Payment Amount can't be less than item Purchase Order")
194	194		else if ((ai.amount > ad))
195	195		then throw("Payment Amount can't be higher than item Purchase Order")
196		-	else ScriptResult(WriteSet([DataEntry(z(am, B), (C(am, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", aq), DataEntry("Total bit-co2 a distribuir, x10e-4", ar), DataEntry(("Order_Status:_" + am), "Transacción Confirmada!"), DataEntry("Balance del Proyecto, anterior, wvls", al), DataEntry(Z(aa), (ab(aa) + ao)), DataEntry("Saldo Tienda1, anterior, bco2", 0), DataEntry(W(X), 0), DataEntry("Saldo BCO2 en oferta, x10e-04", aw)]), TransferSet([ScriptTransfer(e, ao, unit), ScriptTransfer(f, ap, unit), ScriptTransfer(ac.caller, at, a), ScriptTransfer(g, au, a), ScriptTransfer(h, av, a)]))
	196	+	else ScriptResult(WriteSet([DataEntry(z(am, B), (C(am, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", aq), DataEntry("Total bit-co2 a distribuir, x10e-4", ar), DataEntry(("Order_Status:_" + am), "Transacción Confirmada!"), DataEntry("Balance del Proyecto, anterior, wvls", al), DataEntry(Z(aa), (ab(aa) + ao)), DataEntry("Saldo en Tienda1, inicial o anterior, bco2", ak), DataEntry(W(X), (Y(X) + ar)), DataEntry("Saldo BCO2 en oferta, x10e-04", (aw - ((Y(X) - ak) + ar)))]), TransferSet([ScriptTransfer(e, ao, unit), ScriptTransfer(f, ap, unit), ScriptTransfer(ac.caller, at, a), ScriptTransfer(g, au, a), ScriptTransfer(h, av, a)]))
197	197		}
198	198		}
199	199		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let a = base58'872MvpMoQx7SnV58HMcR9hd6vBWDtQvqmt5javCmYwpx'
5	5
6	6		let b = 10000
7	7
8	8		let c = "none"
9	9
10	10		let d = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
11	11
12	12		let e = Address(base58'3NAFcFPrj1wWrVMcsJMLvWBzmBt93oLh6w8')
13	13
14	14		let f = Address(base58'3MyAfquD1K4mvWJNDLVPRG4BWiAW3RQUpXG')
15	15
16	16		let g = Address(base58'3N9epiFphbL3Sf25xMASL1jAPxDH5D8vX85')
17	17
18	18		let h = Address(base58'3N4c7DzgBcyVWTEv9N11vNpg4B1bfg5ryfJ')
19	19
20	20		let i = 116
21	21
22	22		let j = 2539
23	23
24	24		let k = 100000
25	25
26	26		let l = 3
27	27
28	28		let m = 10
29	29
30	30		let n = 1
31	31
32	32		let o = 7
33	33
34	34		let p = 2
35	35
36	36		let q = 2
37	37
38	38		let r = 11
39	39
40	40		func s (t) = {
41	41		let u = {
42	42		let v = getInteger(this, t)
43	43		if ($isInstanceOf(v, "Int"))
44	44		then {
45	45		let w = v
46	46		w
47	47		}
48	48		else 0
49	49		}
50	50		u
51	51		}
52	52
53	53
54	54		func x (t) = {
55	55		let y = {
56	56		let v = getString(this, t)
57	57		if ($isInstanceOf(v, "String"))
58	58		then {
59	59		let w = v
60	60		w
61	61		}
62	62		else c
63	63		}
64	64		y
65	65		}
66	66
67	67
68	68		func z (A,B) = "Order_№:"
69	69
70	70
71	71		func C (A,B) = s(z(A, B))
72	72
73	73
74	74		func D (B) = "Proyecto de Apoyo \| Inversión"
75	75
76	76
77	77		func E (B) = x(D(B))
78	78
79	79
80	80		func F (B) = "№ de Documento \| DNI del Comprador:"
81	81
82	82
83	83		func G (B) = x(F(B))
84	84
85	85
86	86		func H (B) = "Producto-GTS adquirido \| Categoría:"
87	87
88	88
89	89		func I (B) = x(H(B))
90	90
91	91
92	92		func J (B) = "Tienda \| Vendedor-GTS:"
93	93
94	94
95	95		func K (B) = x(J(B))
96	96
97	97
98	98		func L (B) = "Nodo-Activo Participante"
99	99
100	100
101	101		func M (B) = "UI, x10e-04 bit:"
102	102
103	103
104	104		func N (B) = s(M(B))
105	105
106	106
107	107		func O (B) = "PI, wvls:"
108	108
109	109
110	110		func P (B) = s(O(B))
111	111
112	112
113	113		func Q (B) = "SI, x10e-04 bit:"
114	114
115	115
116	116		func R (B) = s(Q(B))
117	117
118	118
119	119		func S (B) = "NIb, x10e-04 bit:"
120	120
121	121
122	122		func T (B) = s(S(B))
123	123
124	124
125	125		func U (B) = "NIw, wvls:"
126	126
127	127
128	128		func V (B) = s(U(B))
129	129
130	130
131	131		func W (X) = "Saldo en Tienda1 actual para restar del Balance, ytok:"
132	132
133	133
134	134		func Y (X) = s(W(X))
135	135
136	136
137	137		func Z (aa) = "Balance del Proyecto, wvls:"
138	138
139	139
140	140		func ab (aa) = s(Z(aa))
141	141
142	142
143	143		@Callable(ac)
144	144		func purchaseGTS (ad,ae,af,ag,ah,B) = {
145	145		let ai = extract(ac.payment)
146	146		if (isDefined(ai.assetId))
147	147		then throw("El Precio en waves.")
148	148		else {
149	149		let aj = {
150	150		let v = getString(this, L(B))
151	151		if ($isInstanceOf(v, "String"))
152	152		then {
153	153		let w = v
154	154		w
155	155		}
156	156		else c
157	157		}
158	158		let X = toBase58String(g.bytes)
159	159		let ak = {
160	160		let v = getInteger(this, W(X))
161	161		if ($isInstanceOf(v, "Int"))
162	162		then {
163	163		let w = v
164	164		w
165	165		}
166	166		else 0
167	167		}
168	168		let aa = toBase58String(e.bytes)
169	169		let al = {
170	170		let v = getInteger(this, Z(aa))
171	171		if ($isInstanceOf(v, "Int"))
172	172		then {
173	173		let w = v
174	174		w
175	175		}
176	176		else 0
177	177		}
178	178		let am = toBase58String(ac.caller.bytes)
179	179		let an = ad
180	180		let ao = ((m * an) / r)
181	181		let ap = ((n * an) / r)
182	182		let aq = (((100 - l) * (i * k)) / 10000)
183	183		let ar = (((ad * j) / 100) / aq)
184	184		let as = (ar * 10000)
185	185		let at = ((o * ar) / r)
186	186		let au = ((p * ar) / r)
187	187		let av = ((q * ar) / r)
188	188		if ((ak >= (b * 10000)))
189	189		then throw("Lo sentimos, por ahora no hay oferta de tokens para su transacción")
190	190		else {
191		-	let aw = (b * 10000)
	191	+	let aw = ((b * 10000) - ak)
192	192		if ((ad > ai.amount))
193	193		then throw("Payment Amount can't be less than item Purchase Order")
194	194		else if ((ai.amount > ad))
195	195		then throw("Payment Amount can't be higher than item Purchase Order")
196		-	else ScriptResult(WriteSet([DataEntry(z(am, B), (C(am, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", aq), DataEntry("Total bit-co2 a distribuir, x10e-4", ar), DataEntry(("Order_Status:_" + am), "Transacción Confirmada!"), DataEntry("Balance del Proyecto, anterior, wvls", al), DataEntry(Z(aa), (ab(aa) + ao)), DataEntry("Saldo Tienda1, anterior, bco2", 0), DataEntry(W(X), 0), DataEntry("Saldo BCO2 en oferta, x10e-04", aw)]), TransferSet([ScriptTransfer(e, ao, unit), ScriptTransfer(f, ap, unit), ScriptTransfer(ac.caller, at, a), ScriptTransfer(g, au, a), ScriptTransfer(h, av, a)]))
	196	+	else ScriptResult(WriteSet([DataEntry(z(am, B), (C(am, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", aq), DataEntry("Total bit-co2 a distribuir, x10e-4", ar), DataEntry(("Order_Status:_" + am), "Transacción Confirmada!"), DataEntry("Balance del Proyecto, anterior, wvls", al), DataEntry(Z(aa), (ab(aa) + ao)), DataEntry("Saldo en Tienda1, inicial o anterior, bco2", ak), DataEntry(W(X), (Y(X) + ar)), DataEntry("Saldo BCO2 en oferta, x10e-04", (aw - ((Y(X) - ak) + ar)))]), TransferSet([ScriptTransfer(e, ao, unit), ScriptTransfer(f, ap, unit), ScriptTransfer(ac.caller, at, a), ScriptTransfer(g, au, a), ScriptTransfer(h, av, a)]))
197	197		}
198	198		}
199	199		}
200	200
201	201
202	202		@Verifier(ax)
203	203		func ay () = {
204	204		let v = ax
205	205		if ($isInstanceOf(v, "SetScriptTransaction"))
206	206		then {
207	207		let az = v
208	208		sigVerify(ax.bodyBytes, ax.proofs[0], d)
209	209		}
210	210		else if (if ($isInstanceOf(v, "ReissueTransaction"))
211	211		then true
212	212		else $isInstanceOf(v, "DataTransaction"))
213	213		then {
214	214		let aA = v
215	215		true
216	216		}
217	217		else if ($isInstanceOf(v, "TransferTransaction"))
218	218		then {
219	219		let ax = v
220	220		true
221	221		}
222	222		else false
223	223		}
224	224

github/deemru/w8io/169f3d6 
63.04 ms ◑