w8 · tx · Hhd···Gfx

tx · Hhdmk6P47BGgr3w91zbQR4hPFJL3ejjoaBeS1Xc25Gfx

3N7nJwbFGppbebBtXy6bWVcQCGu7m3kXFaw:  -0.01000000 Waves

2022.06.01 19:25 [2077523] smart account 3N7nJwbFGppbebBtXy6bWVcQCGu7m3kXFaw > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Hhdmk6P47BGgr3w91zbQR4hPFJL3ejjoaBeS1Xc25Gfx",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1654100772334,
    "version": 2,
    "chainId": 84,
    "sender": "3N7nJwbFGppbebBtXy6bWVcQCGu7m3kXFaw",
    "senderPublicKey": "GTKqLSK6nuFkRdebB5SmTwTU2DnTeLMvhymCFfT2CxX2",
    "proofs": [
        "2e13sruk68bYryKxK7NCW3hPRer6WoQnL9RnKebKt2ALbPQyNB9RiZ3tJ3vbdnMr9EgzZShrB13FAdwQ7FnU5bZ9"
    ],
    "script": "base64:AAIFAAAAAAAAABsIAhIAEgUKAwgICBIDCgEBEgASBwoFCAgBAQEAAAALAAAAAARCVXNkAQAAACALvsj7FOtVE+sP1AaGydwZZ/QwPxANKxzHl3IsOosV4wAAAAAEVVNEVAEAAAAgC77I+xTrVRPrD9QGhsncGWf0MD8QDSscx5dyLDqLFeMAAAAABFVTREMBAAAAIAu+yPsU61UT6w/UBobJ3Bln9DA/EA0rHMeXciw6ixXjAAAAAANCVEMBAAAAIAu+yPsU61UT6w/UBobJ3Bln9DA/EA0rHMeXciw6ixXjAAAAAANFVEgBAAAAIAu+yPsU61UT6w/UBobJ3Bln9DA/EA0rHMeXciw6ixXjAAAAAANCTkIBAAAAIPFnQusGrf9lWc1HAL2GYEY/Z0GCbKxbjRY4l37PzNLbAAAAAARVU0ROAQAAACDxZ0LrBq3/ZVnNRwC9hmBGP2dBgmysW40WOJd+z8zS2wAAAAAESEFTSAEAAAAg8WdC6wat/2VZzUcAvYZgRj9nQYJsrFuNFjiXfs/M0tsAAAAABEtVU0QBAAAAIPFnQusGrf9lWc1HAL2GYEY/Z0GCbKxbjRY4l37PzNLbAAAAAAhkQXBwRmVlcwEAAAAaAVTVEO4dXi2WWBlfa2VnxLZIutJS/g3SExoAAAAACUFkbWluZEFwcAEAAAAaAVRZN9CSicTdhnoAg6OIqoMPeMIQYh/ksUQAAAAFAAAAAWkBAAAABVJlc2V0AAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAACF9QYXltZW50AAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAIX1BhaWR0cngAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAlfTGFzdFBhaWQAAAAAAAAAAAAFAAAAA25pbAAAAAFpAQAAAAxEZXBvc2l0RnVuZHMAAAADAAAACVNjb3BlRGVzYwAAAAxEZWxpdmVyYWJsZXMAAAARRnJlZWxhbmNlckFkZHJlc3MEAAAAEUZyZWVMYW5jZXJQYXltZW50CQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAIX1BheW1lbnQEAAAABmFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAABFGcmVlTGFuY2VyUGF5bWVudAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAAAwkBAAAAAiE9AAAAAgUAAAAGYW1vdW50AAAAAAAAAAAACQAAAgAAAAECAAAAQFlvdSBoYXZlIGFscmVhZHkgZGVwb3NpdGVkIGZ1bmRzLCBkZXBvc2l0cyBjYW4gb25seSBiZSBkb25lIG9uY2UEAAAAA3BtdAMJAAAAAAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAkAAAIAAAABAgAAABxBdHRhY2hlZCBwYXltZW50IGlzIHJlcXVpcmVkAwMDAwMDAwMDAwMJAABnAAAAAgAAAAAAAAAAAAgFAAAAA3BtdAAAAAZhbW91bnQJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAEQlVzZAcJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAEVVNEVAcJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAEVVNEQwcJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAADQlRDBwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAANFVEgHCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAAA0JOQgcJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAEVVNETgcJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAESEFTSAcJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAES1VTRAcJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQHCQAAAgAAAAECAAAAP0NhbiBvbmx5IGRlcG9zaXQgYWNjZXB0ZWQgdG9rZW5zLCBhbmQgYW1vdW50IHNob3VsZCBiZSBwb3NpdGl2ZQMDAwkAAAAAAAACBQAAAAlTY29wZURlc2MCAAAAAAYJAAAAAAAAAgUAAAAMRGVsaXZlcmFibGVzAgAAAAAGCQAAAAAAAAIFAAAAEUZyZWVsYW5jZXJBZGRyZXNzAgAAAAAJAAACAAAAAQIAAABKSm9iIFNjb3BlLCBEZWxpdmVyYWJsZXMgZGVzYyBhbmQgRnJlZWxhbmNlciBXYWxsZXQgQWRkcmVzcyBjYW5ub3QgYmUgZW1wdHkEAAAACUFzc2V0VXNlZAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAJYAAAAAQkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkAgAAAAVXYXZlcwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAGX1Njb3BlBQAAAAlTY29wZURlc2MJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAABl9EZWxpdgUAAAAMRGVsaXZlcmFibGVzCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAZfQXNzZXQFAAAACUFzc2V0VXNlZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAALX0ZyZWVsYW5jZXIFAAAAEUZyZWVsYW5jZXJBZGRyZXNzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAIX1BheW1lbnQIBQAAAANwbXQAAAAGYW1vdW50BQAAAANuaWwAAAABaQEAAAANUGF5RnJlZWxhbmNlcgAAAAEAAAANUGF5RnJlZWxhbmNlcgQAAAARRnJlZUxhbmNlclBheW1lbnQJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAhfUGF5bWVudAQAAAARRnJlZWxhbmNlckFkZHJlc3MJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAtfRnJlZWxhbmNlcgQAAAAMUGF5bWVudEFzc2V0CQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAGX0Fzc2V0BAAAAAdQYWlkdHJ4CQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAIX1BhaWR0cngEAAAABmFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAABFGcmVlTGFuY2VyUGF5bWVudAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAtQYWlkdHJ4TGFzdAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAAdQYWlkdHJ4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAAFEZyZWVsYW5jZXJBZGRyZXNzU3RyCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzBQAAABFGcmVlbGFuY2VyQWRkcmVzcwQAAAAOUGF5bWVudEFzc2V0SWQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAADFBheW1lbnRBc3NldAQAAAARQWRkcmVzc0ZyZWVMYW5jZXIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAFEZyZWVsYW5jZXJBZGRyZXNzU3RyBAAAAAlkQXBwRnJlZXMJAQAAAAdBZGRyZXNzAAAAAQUAAAAIZEFwcEZlZXMEAAAACUFzc2V0VXNlZAMJAAAAAAAAAgUAAAAOUGF5bWVudEFzc2V0SWQCAAAABVdhdmVzBQAAAAR1bml0CQACWQAAAAEFAAAADlBheW1lbnRBc3NldElkAwkAAGcAAAACAAAAAAAAAAAACQAAZQAAAAIJAABpAAAAAgkAAGgAAAACAAAAAAAAAABfBQAAAAZhbW91bnQAAAAAAAAAAGQJAABoAAAAAgUAAAANUGF5RnJlZWxhbmNlcgAAAAAABfXhAAkAAAIAAAABCQABLAAAAAICAAAASFlvdSBkbyBub3QgaGF2ZSBlbm91Z2ggZnVuZHMgdG8gbWFrZSBwYXltZW50LCB5b3VyIGF2YWlsYWJsZSBmdW5kcyBhcmU6IAkAAaQAAAABCQAAaQAAAAIFAAAABmFtb3VudAAAAAAABfXhAAMDCQAAZwAAAAIFAAAAC1BhaWR0cnhMYXN0AAAAAAAAAAAMCQAAZgAAAAIFAAAABmFtb3VudAAAAAAAAAAAAAcJAAACAAAAAQIAAABAWW91IGhhdmUgYWxyZWFkeSBkb25lIDEyIHBheW1lbnRzLCB5b3UgY2Fubm90IG1ha2UgbW9yZSBwYXltZW50cwQAAAALVXNlckFjY291bnQDCQAAAAAAAAIFAAAAC1BhaWR0cnhMYXN0AAAAAAAAAAALAAAAAAAAAAAACQAAZQAAAAIFAAAABmFtb3VudAkAAGgAAAACBQAAAA1QYXlGcmVlbGFuY2VyAAAAAAAF9eEABAAAABFQYXltZW50MkZyZWVsYW5jZQMJAAAAAAAAAgUAAAALUGFpZHRyeExhc3QAAAAAAAAAAAsJAABpAAAAAgkAAGgAAAACAAAAAAAAAABfBQAAAAZhbW91bnQAAAAAAAAAAGQJAABoAAAAAgkAAGgAAAACAAAAAAAAAABfBQAAAA1QYXlGcmVlbGFuY2VyAAAAAAAAD0JABAAAAAdGZWVQYWlkAwkAAAAAAAACBQAAAAtQYWlkdHJ4TGFzdAAAAAAAAAAACwkAAGkAAAACCQAAaAAAAAIAAAAAAAAAAAUFAAAABmFtb3VudAAAAAAAAAAAZAkAAGgAAAACCQAAaAAAAAIAAAAAAAAAAAUFAAAADVBheUZyZWVsYW5jZXIAAAAAAAAPQkAEAAAADFBhaWR0cnhWYWx1ZQMJAAAAAAAAAgUAAAALUGFpZHRyeExhc3QAAAAAAAAAAAsAAAAAAAAAAAAJAABkAAAAAgUAAAALUGFpZHRyeExhc3QAAAAAAAAAAAEJAAUUAAAAAgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAACF9QYXltZW50BQAAAAtVc2VyQWNjb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAACF9QYWlkdHJ4BQAAAAxQYWlkdHJ4VmFsdWUJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAARQWRkcmVzc0ZyZWVMYW5jZXIFAAAAEVBheW1lbnQyRnJlZWxhbmNlBQAAAAlBc3NldFVzZWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAJZEFwcEZyZWVzBQAAAAdGZWVQYWlkBQAAAAlBc3NldFVzZWQFAAAAA25pbAUAAAAJQXNzZXRVc2VkAAAAAWkBAAAAFVBheUZyZWVsYW5jZXJPbkRlbWFuZAAAAAAEAAAADVBheUZyZWVsYW5jZXIAAAAAAAAAAAQEAAAAA0ZlZQAAAAAAAAAAAQQAAAAIV2FpdFRpbWUAAAAAAAAAAAoEAAAAEUZyZWVMYW5jZXJQYXltZW50CQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAIX1BheW1lbnQEAAAAEUZyZWVsYW5jZXJBZGRyZXNzCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAALX0ZyZWVsYW5jZXIEAAAAEExhc3RQYXltZW50QmxvY2sJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAlfTGFzdFBhaWQEAAAADFBheW1lbnRBc3NldAkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAABl9Bc3NldAQAAAAHUGFpZHRyeAkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAACF9QYWlkdHJ4BAAAAAZhbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAARRnJlZUxhbmNlclBheW1lbnQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAALUGFpZHRyeExhc3QEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAHUGFpZHRyeAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAABVMYXN0UGF5bWVudEJsb2NrVmFsdWUEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAQTGFzdFBheW1lbnRCbG9jawMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAZoZWlnaHQEAAAAFEZyZWVsYW5jZXJBZGRyZXNzU3RyCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzBQAAABFGcmVlbGFuY2VyQWRkcmVzcwQAAAAOUGF5bWVudEFzc2V0SWQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAADFBheW1lbnRBc3NldAQAAAARQWRkcmVzc0ZyZWVMYW5jZXIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAFEZyZWVsYW5jZXJBZGRyZXNzU3RyBAAAAAlkQXBwRnJlZXMJAQAAAAdBZGRyZXNzAAAAAQUAAAAIZEFwcEZlZXMEAAAACUFzc2V0VXNlZAMJAAAAAAAAAgUAAAAOUGF5bWVudEFzc2V0SWQCAAAABVdhdmVzBQAAAAR1bml0CQACWQAAAAEFAAAADlBheW1lbnRBc3NldElkAwkAAGcAAAACAAAAAAAAAAAACQAAZQAAAAIFAAAABmFtb3VudAkAAGgAAAACBQAAAANGZWUAAAAAAAX14QAJAAACAAAAAQkAASwAAAACAgAAAEhZb3UgZG8gbm90IGhhdmUgZW5vdWdoIGZ1bmRzIHRvIG1ha2UgcGF5bWVudCwgeW91ciBhdmFpbGFibGUgZnVuZHMgYXJlOiAJAAGkAAAAAQkAAGkAAAACBQAAAAZhbW91bnQAAAAAAAX14QADAwkAAGYAAAACBQAAAAZoZWlnaHQJAABkAAAAAgUAAAAVTGFzdFBheW1lbnRCbG9ja1ZhbHVlBQAAAAhXYWl0VGltZQkAAGYAAAACBQAAAAtQYWlkdHJ4TGFzdAAAAAAAAAAAAQcJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAbQ2Fubm90IG1ha2UgUGF5bWVudCBiZWZvcmUgCQABpAAAAAEFAAAAFUxhc3RQYXltZW50QmxvY2tWYWx1ZQIAAAAEIG1pbgkAAaQAAAABBQAAAAhXYWl0VGltZQQAAAAHRmVlUGFpZAkAAGgAAAACBQAAAANGZWUAAAAAAAX14QAEAAAADFBhaWR0cnhWYWx1ZQMJAAAAAAAAAgUAAAALUGFpZHRyeExhc3QAAAAAAAAAAAMAAAAAAAAAAAAJAABkAAAAAgUAAAALUGFpZHRyeExhc3QAAAAAAAAAAAEEAAAAC1VzZXJBY2NvdW50AwkAAAAAAAACBQAAAAtQYWlkdHJ4TGFzdAAAAAAAAAAAAwAAAAAAAAAAAAkAAGUAAAACCQAAZQAAAAIFAAAABmFtb3VudAkAAGgAAAACBQAAAANGZWUAAAAAAAX14QAJAABpAAAAAgkAAGgAAAACCQAAaAAAAAIFAAAADFBhaWR0cnhWYWx1ZQAAAAAAAAAAGQkAAGUAAAACBQAAAAZhbW91bnQJAABoAAAAAgUAAAADRmVlAAAAAAAF9eEAAAAAAAAAAABkBAAAABFQYXltZW50MkZyZWVsYW5jZQkAAGkAAAACCQAAaAAAAAIAAAAAAAAAABkFAAAABmFtb3VudAAAAAAAAAAAZAkABRQAAAACCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAIX1BheW1lbnQFAAAAC1VzZXJBY2NvdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAIX1BhaWR0cngFAAAADFBhaWR0cnhWYWx1ZQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAACV9MYXN0UGFpZAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAhXYWl0VGltZQUAAAAIV2FpdFRpbWUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAFUxhc3RQYXltZW50QmxvY2tWYWx1ZQUAAAAVTGFzdFBheW1lbnRCbG9ja1ZhbHVlCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAVDaGVjawkAAGQAAAACBQAAABVMYXN0UGF5bWVudEJsb2NrVmFsdWUFAAAACFdhaXRUaW1lCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAEUFkZHJlc3NGcmVlTGFuY2VyBQAAABFQYXltZW50MkZyZWVsYW5jZQUAAAAJQXNzZXRVc2VkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACWRBcHBGcmVlcwUAAAAHRmVlUGFpZAUAAAAJQXNzZXRVc2VkBQAAAANuaWwFAAAACUFzc2V0VXNlZAAAAAFpAQAAAA1BZG1pblRyYW5zZmVyAAAABQAAAARVc2VyAAAACkZyZWVsYW5jZXIAAAAMVG9GcmVlbGFuY2VyAAAABlRvVXNlcgAAAAhBZG1pbkZlZQMJAQAAAAIhPQAAAAIICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMFAAAACUFkbWluZEFwcAkAAAIAAAABAgAAABZPbmx5IEFkbWluIGNhbiBkbyB0aGlzAwkBAAAAAiE9AAAAAgkAAGQAAAACCQAAZAAAAAIFAAAABlRvVXNlcgUAAAAMVG9GcmVlbGFuY2VyBQAAAAhBZG1pbkZlZQAAAAAAAAAAZAkAAAIAAAABAgAAADJUb3RhbCBvZiBQZXJjZW50YWdlcyBjYW5ub3QgYmUgZGlmZmVyZW50IGZyb20gMTAwJQQAAAARRnJlZUxhbmNlclBheW1lbnQJAAEsAAAAAgUAAAAEVXNlcgIAAAAIX1BheW1lbnQEAAAAEUZyZWVsYW5jZXJBZGRyZXNzCQABLAAAAAIFAAAABFVzZXICAAAAC19GcmVlbGFuY2VyBAAAAAxQYXltZW50QXNzZXQJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAZfQXNzZXQEAAAABmFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAABFGcmVlTGFuY2VyUGF5bWVudAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAABRGcmVlbGFuY2VyQWRkcmVzc1N0cgkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwUAAAARRnJlZWxhbmNlckFkZHJlc3MEAAAAEUFkZHJlc3NGcmVlTGFuY2VyCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAABRGcmVlbGFuY2VyQWRkcmVzc1N0cgQAAAAOUGF5bWVudEFzc2V0SWQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAADFBheW1lbnRBc3NldAQAAAAJZEFwcEZyZWVzCQEAAAAHQWRkcmVzcwAAAAEFAAAACGRBcHBGZWVzBAAAAAtBZGRyZXNzVXNlcgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAEVXNlcgQAAAAJQXNzZXRVc2VkAwkAAAAAAAACBQAAAA5QYXltZW50QXNzZXRJZAIAAAAFV2F2ZXMFAAAABHVuaXQJAAJZAAAAAQUAAAAOUGF5bWVudEFzc2V0SWQDCQAAAAAAAAIFAAAABmFtb3VudAAAAAAAAAAAAAkAAAIAAAABAgAAADRVc2VyJ3MgYmFsYW5jZSBpcyAwIEJVc2RjIGNhbm5vdCByZWFsaXplIGFueSBwYXltZW50CQAFFAAAAAIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEVXNlcgIAAAAIX1BheW1lbnQAAAAAAAAAAAAJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAARQWRkcmVzc0ZyZWVMYW5jZXIJAABpAAAAAgkAAGgAAAACBQAAAAxUb0ZyZWVsYW5jZXIFAAAABmFtb3VudAAAAAAAAAAAZAUAAAAJQXNzZXRVc2VkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAC0FkZHJlc3NVc2VyCQAAaQAAAAIJAABoAAAAAgUAAAAGVG9Vc2VyBQAAAAZhbW91bnQAAAAAAAAAAGQFAAAACUFzc2V0VXNlZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAlkQXBwRnJlZXMJAABpAAAAAgkAAGgAAAACBQAAAAhBZG1pbkZlZQUAAAAGYW1vdW50AAAAAAAAAABkBQAAAAlBc3NldFVzZWQFAAAAA25pbAUAAAAJQXNzZXRVc2VkAAAAALfICN0=",
    "height": 2077523,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2Kix6vTRgn84PZmVzoU87j28FQ6Zj3VKag8THWeKEaAo
Next: 62hQYZc14BMvipdJddNUGHHXSNjdfXQgsFgEMC3oxmSJ

Diff: 
Old New Differences
170 170      if ((0 >= (amount - (Fee * 100000000))))
171 171          then throw(("You do not have enough funds to make payment, your available funds are: " + toString((amount / 100000000))))
172 172          else if (if ((height > (LastPaymentBlockValue + WaitTime)))
173 -             then (PaidtrxLast == 1)
173 +             then (PaidtrxLast > 1)
174 174              else false)
175 175              then throw(((("Cannot make Payment before " + toString(LastPaymentBlockValue)) + " min") + toString(WaitTime)))
176 176              else {
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let BUsd = base58'nrDXX1zHfGht7xExqNxDu7voCy9wzmc9vJxwcc2jLga'
5 5  
6 6  let USDT = base58'nrDXX1zHfGht7xExqNxDu7voCy9wzmc9vJxwcc2jLga'
7 7  
8 8  let USDC = base58'nrDXX1zHfGht7xExqNxDu7voCy9wzmc9vJxwcc2jLga'
9 9  
10 10  let BTC = base58'nrDXX1zHfGht7xExqNxDu7voCy9wzmc9vJxwcc2jLga'
11 11  
12 12  let ETH = base58'nrDXX1zHfGht7xExqNxDu7voCy9wzmc9vJxwcc2jLga'
13 13  
14 14  let BNB = base58'HFLaeLdjg9cASsYhvwM9PV3NcCxa3UeVa5KvfYUPQYgJ'
15 15  
16 16  let USDN = base58'HFLaeLdjg9cASsYhvwM9PV3NcCxa3UeVa5KvfYUPQYgJ'
17 17  
18 18  let HASH = base58'HFLaeLdjg9cASsYhvwM9PV3NcCxa3UeVa5KvfYUPQYgJ'
19 19  
20 20  let KUSD = base58'HFLaeLdjg9cASsYhvwM9PV3NcCxa3UeVa5KvfYUPQYgJ'
21 21  
22 22  let dAppFees = base58'3N9Lfz79kZAEUupwESSboYFyygo1nQguVXo'
23 23  
24 24  let AdmindApp = base58'3Mx3pn4yMcBccM59UrDGjbbAkVsRYBw38tB'
25 25  
26 26  @Callable(i)
27 27  func Reset () = [IntegerEntry((toBase58String(i.caller.bytes) + "_Payment"), 0), IntegerEntry((toBase58String(i.caller.bytes) + "_Paidtrx"), 0), IntegerEntry((toBase58String(i.caller.bytes) + "_LastPaid"), 0)]
28 28  
29 29  
30 30  
31 31  @Callable(i)
32 32  func DepositFunds (ScopeDesc,Deliverables,FreelancerAddress) = {
33 33      let FreeLancerPayment = (toBase58String(i.caller.bytes) + "_Payment")
34 34      let amount =     match getInteger(this, FreeLancerPayment) {
35 35          case a: Int => 
36 36              a
37 37          case _ => 
38 38              0
39 39      }
40 40      if ((amount != 0))
41 41          then throw("You have already deposited funds, deposits can only be done once")
42 42          else {
43 43              let pmt = if ((size(i.payments) == 1))
44 44                  then i.payments[0]
45 45                  else throw("Attached payment is required")
46 46              if (if (if (if (if (if (if (if (if (if (if ((0 >= pmt.amount))
47 47                  then (pmt.assetId != BUsd)
48 48                  else false)
49 49                  then (pmt.assetId != USDT)
50 50                  else false)
51 51                  then (pmt.assetId != USDC)
52 52                  else false)
53 53                  then (pmt.assetId != BTC)
54 54                  else false)
55 55                  then (pmt.assetId != ETH)
56 56                  else false)
57 57                  then (pmt.assetId != BNB)
58 58                  else false)
59 59                  then (pmt.assetId != USDN)
60 60                  else false)
61 61                  then (pmt.assetId != HASH)
62 62                  else false)
63 63                  then (pmt.assetId != KUSD)
64 64                  else false)
65 65                  then isDefined(pmt.assetId)
66 66                  else false)
67 67                  then throw("Can only deposit accepted tokens, and amount should be positive")
68 68                  else if (if (if ((ScopeDesc == ""))
69 69                      then true
70 70                      else (Deliverables == ""))
71 71                      then true
72 72                      else (FreelancerAddress == ""))
73 73                      then throw("Job Scope, Deliverables desc and Freelancer Wallet Address cannot be empty")
74 74                      else {
75 75                          let AssetUsed = if (isDefined(pmt.assetId))
76 76                              then toBase58String(value(pmt.assetId))
77 77                              else "Waves"
78 78  [StringEntry((toBase58String(i.caller.bytes) + "_Scope"), ScopeDesc), StringEntry((toBase58String(i.caller.bytes) + "_Deliv"), Deliverables), StringEntry((toBase58String(i.caller.bytes) + "_Asset"), AssetUsed), StringEntry((toBase58String(i.caller.bytes) + "_Freelancer"), FreelancerAddress), IntegerEntry((toBase58String(i.caller.bytes) + "_Payment"), pmt.amount)]
79 79                          }
80 80              }
81 81      }
82 82  
83 83  
84 84  
85 85  @Callable(i)
86 86  func PayFreelancer (PayFreelancer) = {
87 87      let FreeLancerPayment = (toBase58String(i.caller.bytes) + "_Payment")
88 88      let FreelancerAddress = (toBase58String(i.caller.bytes) + "_Freelancer")
89 89      let PaymentAsset = (toBase58String(i.caller.bytes) + "_Asset")
90 90      let Paidtrx = (toBase58String(i.caller.bytes) + "_Paidtrx")
91 91      let amount =     match getInteger(this, FreeLancerPayment) {
92 92          case a: Int => 
93 93              a
94 94          case _ => 
95 95              0
96 96      }
97 97      let PaidtrxLast =     match getInteger(this, Paidtrx) {
98 98          case a: Int => 
99 99              a
100 100          case _ => 
101 101              0
102 102      }
103 103      let FreelancerAddressStr = getStringValue(this, FreelancerAddress)
104 104      let PaymentAssetId = getStringValue(this, PaymentAsset)
105 105      let AddressFreeLancer = addressFromStringValue(FreelancerAddressStr)
106 106      let dAppFrees = Address(dAppFees)
107 107      let AssetUsed = if ((PaymentAssetId == "Waves"))
108 108          then unit
109 109          else fromBase58String(PaymentAssetId)
110 110      if ((0 >= (((95 * amount) / 100) - (PayFreelancer * 100000000))))
111 111          then throw(("You do not have enough funds to make payment, your available funds are: " + toString((amount / 100000000))))
112 112          else if (if ((PaidtrxLast >= 12))
113 113              then (amount > 0)
114 114              else false)
115 115              then throw("You have already done 12 payments, you cannot make more payments")
116 116              else {
117 117                  let UserAccount = if ((PaidtrxLast == 11))
118 118                      then 0
119 119                      else (amount - (PayFreelancer * 100000000))
120 120                  let Payment2Freelance = if ((PaidtrxLast == 11))
121 121                      then ((95 * amount) / 100)
122 122                      else ((95 * PayFreelancer) * 1000000)
123 123                  let FeePaid = if ((PaidtrxLast == 11))
124 124                      then ((5 * amount) / 100)
125 125                      else ((5 * PayFreelancer) * 1000000)
126 126                  let PaidtrxValue = if ((PaidtrxLast == 11))
127 127                      then 0
128 128                      else (PaidtrxLast + 1)
129 129                  $Tuple2([IntegerEntry((toBase58String(i.caller.bytes) + "_Payment"), UserAccount), IntegerEntry((toBase58String(i.caller.bytes) + "_Paidtrx"), PaidtrxValue), ScriptTransfer(AddressFreeLancer, Payment2Freelance, AssetUsed), ScriptTransfer(dAppFrees, FeePaid, AssetUsed)], AssetUsed)
130 130                  }
131 131      }
132 132  
133 133  
134 134  
135 135  @Callable(i)
136 136  func PayFreelancerOnDemand () = {
137 137      let PayFreelancer = 4
138 138      let Fee = 1
139 139      let WaitTime = 10
140 140      let FreeLancerPayment = (toBase58String(i.caller.bytes) + "_Payment")
141 141      let FreelancerAddress = (toBase58String(i.caller.bytes) + "_Freelancer")
142 142      let LastPaymentBlock = (toBase58String(i.caller.bytes) + "_LastPaid")
143 143      let PaymentAsset = (toBase58String(i.caller.bytes) + "_Asset")
144 144      let Paidtrx = (toBase58String(i.caller.bytes) + "_Paidtrx")
145 145      let amount =     match getInteger(this, FreeLancerPayment) {
146 146          case a: Int => 
147 147              a
148 148          case _ => 
149 149              0
150 150      }
151 151      let PaidtrxLast =     match getInteger(this, Paidtrx) {
152 152          case a: Int => 
153 153              a
154 154          case _ => 
155 155              0
156 156      }
157 157      let LastPaymentBlockValue =     match getInteger(this, LastPaymentBlock) {
158 158          case a: Int => 
159 159              a
160 160          case _ => 
161 161              height
162 162      }
163 163      let FreelancerAddressStr = getStringValue(this, FreelancerAddress)
164 164      let PaymentAssetId = getStringValue(this, PaymentAsset)
165 165      let AddressFreeLancer = addressFromStringValue(FreelancerAddressStr)
166 166      let dAppFrees = Address(dAppFees)
167 167      let AssetUsed = if ((PaymentAssetId == "Waves"))
168 168          then unit
169 169          else fromBase58String(PaymentAssetId)
170 170      if ((0 >= (amount - (Fee * 100000000))))
171 171          then throw(("You do not have enough funds to make payment, your available funds are: " + toString((amount / 100000000))))
172 172          else if (if ((height > (LastPaymentBlockValue + WaitTime)))
173 -             then (PaidtrxLast == 1)
173 +             then (PaidtrxLast > 1)
174 174              else false)
175 175              then throw(((("Cannot make Payment before " + toString(LastPaymentBlockValue)) + " min") + toString(WaitTime)))
176 176              else {
177 177                  let FeePaid = (Fee * 100000000)
178 178                  let PaidtrxValue = if ((PaidtrxLast == 3))
179 179                      then 0
180 180                      else (PaidtrxLast + 1)
181 181                  let UserAccount = if ((PaidtrxLast == 3))
182 182                      then 0
183 183                      else ((amount - (Fee * 100000000)) - (((PaidtrxValue * 25) * (amount - (Fee * 100000000))) / 100))
184 184                  let Payment2Freelance = ((25 * amount) / 100)
185 185                  $Tuple2([IntegerEntry((toBase58String(i.caller.bytes) + "_Payment"), UserAccount), IntegerEntry((toBase58String(i.caller.bytes) + "_Paidtrx"), PaidtrxValue), IntegerEntry((toBase58String(i.caller.bytes) + "_LastPaid"), height), IntegerEntry("WaitTime", WaitTime), IntegerEntry("LastPaymentBlockValue", LastPaymentBlockValue), IntegerEntry("Check", (LastPaymentBlockValue + WaitTime)), ScriptTransfer(AddressFreeLancer, Payment2Freelance, AssetUsed), ScriptTransfer(dAppFrees, FeePaid, AssetUsed)], AssetUsed)
186 186                  }
187 187      }
188 188  
189 189  
190 190  
191 191  @Callable(i)
192 192  func AdminTransfer (User,Freelancer,ToFreelancer,ToUser,AdminFee) = if ((i.caller.bytes != AdmindApp))
193 193      then throw("Only Admin can do this")
194 194      else if ((((ToUser + ToFreelancer) + AdminFee) != 100))
195 195          then throw("Total of Percentages cannot be different from 100%")
196 196          else {
197 197              let FreeLancerPayment = (User + "_Payment")
198 198              let FreelancerAddress = (User + "_Freelancer")
199 199              let PaymentAsset = (toBase58String(i.caller.bytes) + "_Asset")
200 200              let amount =             match getInteger(this, FreeLancerPayment) {
201 201                  case a: Int => 
202 202                      a
203 203                  case _ => 
204 204                      0
205 205              }
206 206              let FreelancerAddressStr = getStringValue(this, FreelancerAddress)
207 207              let AddressFreeLancer = addressFromStringValue(FreelancerAddressStr)
208 208              let PaymentAssetId = getStringValue(this, PaymentAsset)
209 209              let dAppFrees = Address(dAppFees)
210 210              let AddressUser = addressFromStringValue(User)
211 211              let AssetUsed = if ((PaymentAssetId == "Waves"))
212 212                  then unit
213 213                  else fromBase58String(PaymentAssetId)
214 214              if ((amount == 0))
215 215                  then throw("User's balance is 0 BUsdc cannot realize any payment")
216 216                  else $Tuple2([IntegerEntry((User + "_Payment"), 0), ScriptTransfer(AddressFreeLancer, ((ToFreelancer * amount) / 100), AssetUsed), ScriptTransfer(AddressUser, ((ToUser * amount) / 100), AssetUsed), ScriptTransfer(dAppFrees, ((AdminFee * amount) / 100), AssetUsed)], AssetUsed)
217 217              }
218 218  
219 219

Old	New		Differences
170	170		if ((0 >= (amount - (Fee * 100000000))))
171	171		then throw(("You do not have enough funds to make payment, your available funds are: " + toString((amount / 100000000))))
172	172		else if (if ((height > (LastPaymentBlockValue + WaitTime)))
173		-	then (PaidtrxLast == 1)
	173	+	then (PaidtrxLast > 1)
174	174		else false)
175	175		then throw(((("Cannot make Payment before " + toString(LastPaymentBlockValue)) + " min") + toString(WaitTime)))
176	176		else {

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let BUsd = base58'nrDXX1zHfGht7xExqNxDu7voCy9wzmc9vJxwcc2jLga'
5	5
6	6		let USDT = base58'nrDXX1zHfGht7xExqNxDu7voCy9wzmc9vJxwcc2jLga'
7	7
8	8		let USDC = base58'nrDXX1zHfGht7xExqNxDu7voCy9wzmc9vJxwcc2jLga'
9	9
10	10		let BTC = base58'nrDXX1zHfGht7xExqNxDu7voCy9wzmc9vJxwcc2jLga'
11	11
12	12		let ETH = base58'nrDXX1zHfGht7xExqNxDu7voCy9wzmc9vJxwcc2jLga'
13	13
14	14		let BNB = base58'HFLaeLdjg9cASsYhvwM9PV3NcCxa3UeVa5KvfYUPQYgJ'
15	15
16	16		let USDN = base58'HFLaeLdjg9cASsYhvwM9PV3NcCxa3UeVa5KvfYUPQYgJ'
17	17
18	18		let HASH = base58'HFLaeLdjg9cASsYhvwM9PV3NcCxa3UeVa5KvfYUPQYgJ'
19	19
20	20		let KUSD = base58'HFLaeLdjg9cASsYhvwM9PV3NcCxa3UeVa5KvfYUPQYgJ'
21	21
22	22		let dAppFees = base58'3N9Lfz79kZAEUupwESSboYFyygo1nQguVXo'
23	23
24	24		let AdmindApp = base58'3Mx3pn4yMcBccM59UrDGjbbAkVsRYBw38tB'
25	25
26	26		@Callable(i)
27	27		func Reset () = [IntegerEntry((toBase58String(i.caller.bytes) + "_Payment"), 0), IntegerEntry((toBase58String(i.caller.bytes) + "_Paidtrx"), 0), IntegerEntry((toBase58String(i.caller.bytes) + "_LastPaid"), 0)]
28	28
29	29
30	30
31	31		@Callable(i)
32	32		func DepositFunds (ScopeDesc,Deliverables,FreelancerAddress) = {
33	33		let FreeLancerPayment = (toBase58String(i.caller.bytes) + "_Payment")
34	34		let amount = match getInteger(this, FreeLancerPayment) {
35	35		case a: Int =>
36	36		a
37	37		case _ =>
38	38		0
39	39		}
40	40		if ((amount != 0))
41	41		then throw("You have already deposited funds, deposits can only be done once")
42	42		else {
43	43		let pmt = if ((size(i.payments) == 1))
44	44		then i.payments[0]
45	45		else throw("Attached payment is required")
46	46		if (if (if (if (if (if (if (if (if (if (if ((0 >= pmt.amount))
47	47		then (pmt.assetId != BUsd)
48	48		else false)
49	49		then (pmt.assetId != USDT)
50	50		else false)
51	51		then (pmt.assetId != USDC)
52	52		else false)
53	53		then (pmt.assetId != BTC)
54	54		else false)
55	55		then (pmt.assetId != ETH)
56	56		else false)
57	57		then (pmt.assetId != BNB)
58	58		else false)
59	59		then (pmt.assetId != USDN)
60	60		else false)
61	61		then (pmt.assetId != HASH)
62	62		else false)
63	63		then (pmt.assetId != KUSD)
64	64		else false)
65	65		then isDefined(pmt.assetId)
66	66		else false)
67	67		then throw("Can only deposit accepted tokens, and amount should be positive")
68	68		else if (if (if ((ScopeDesc == ""))
69	69		then true
70	70		else (Deliverables == ""))
71	71		then true
72	72		else (FreelancerAddress == ""))
73	73		then throw("Job Scope, Deliverables desc and Freelancer Wallet Address cannot be empty")
74	74		else {
75	75		let AssetUsed = if (isDefined(pmt.assetId))
76	76		then toBase58String(value(pmt.assetId))
77	77		else "Waves"
78	78		[StringEntry((toBase58String(i.caller.bytes) + "_Scope"), ScopeDesc), StringEntry((toBase58String(i.caller.bytes) + "_Deliv"), Deliverables), StringEntry((toBase58String(i.caller.bytes) + "_Asset"), AssetUsed), StringEntry((toBase58String(i.caller.bytes) + "_Freelancer"), FreelancerAddress), IntegerEntry((toBase58String(i.caller.bytes) + "_Payment"), pmt.amount)]
79	79		}
80	80		}
81	81		}
82	82
83	83
84	84
85	85		@Callable(i)
86	86		func PayFreelancer (PayFreelancer) = {
87	87		let FreeLancerPayment = (toBase58String(i.caller.bytes) + "_Payment")
88	88		let FreelancerAddress = (toBase58String(i.caller.bytes) + "_Freelancer")
89	89		let PaymentAsset = (toBase58String(i.caller.bytes) + "_Asset")
90	90		let Paidtrx = (toBase58String(i.caller.bytes) + "_Paidtrx")
91	91		let amount = match getInteger(this, FreeLancerPayment) {
92	92		case a: Int =>
93	93		a
94	94		case _ =>
95	95		0
96	96		}
97	97		let PaidtrxLast = match getInteger(this, Paidtrx) {
98	98		case a: Int =>
99	99		a
100	100		case _ =>
101	101		0
102	102		}
103	103		let FreelancerAddressStr = getStringValue(this, FreelancerAddress)
104	104		let PaymentAssetId = getStringValue(this, PaymentAsset)
105	105		let AddressFreeLancer = addressFromStringValue(FreelancerAddressStr)
106	106		let dAppFrees = Address(dAppFees)
107	107		let AssetUsed = if ((PaymentAssetId == "Waves"))
108	108		then unit
109	109		else fromBase58String(PaymentAssetId)
110	110		if ((0 >= (((95 * amount) / 100) - (PayFreelancer * 100000000))))
111	111		then throw(("You do not have enough funds to make payment, your available funds are: " + toString((amount / 100000000))))
112	112		else if (if ((PaidtrxLast >= 12))
113	113		then (amount > 0)
114	114		else false)
115	115		then throw("You have already done 12 payments, you cannot make more payments")
116	116		else {
117	117		let UserAccount = if ((PaidtrxLast == 11))
118	118		then 0
119	119		else (amount - (PayFreelancer * 100000000))
120	120		let Payment2Freelance = if ((PaidtrxLast == 11))
121	121		then ((95 * amount) / 100)
122	122		else ((95 * PayFreelancer) * 1000000)
123	123		let FeePaid = if ((PaidtrxLast == 11))
124	124		then ((5 * amount) / 100)
125	125		else ((5 * PayFreelancer) * 1000000)
126	126		let PaidtrxValue = if ((PaidtrxLast == 11))
127	127		then 0
128	128		else (PaidtrxLast + 1)
129	129		$Tuple2([IntegerEntry((toBase58String(i.caller.bytes) + "_Payment"), UserAccount), IntegerEntry((toBase58String(i.caller.bytes) + "_Paidtrx"), PaidtrxValue), ScriptTransfer(AddressFreeLancer, Payment2Freelance, AssetUsed), ScriptTransfer(dAppFrees, FeePaid, AssetUsed)], AssetUsed)
130	130		}
131	131		}
132	132
133	133
134	134
135	135		@Callable(i)
136	136		func PayFreelancerOnDemand () = {
137	137		let PayFreelancer = 4
138	138		let Fee = 1
139	139		let WaitTime = 10
140	140		let FreeLancerPayment = (toBase58String(i.caller.bytes) + "_Payment")
141	141		let FreelancerAddress = (toBase58String(i.caller.bytes) + "_Freelancer")
142	142		let LastPaymentBlock = (toBase58String(i.caller.bytes) + "_LastPaid")
143	143		let PaymentAsset = (toBase58String(i.caller.bytes) + "_Asset")
144	144		let Paidtrx = (toBase58String(i.caller.bytes) + "_Paidtrx")
145	145		let amount = match getInteger(this, FreeLancerPayment) {
146	146		case a: Int =>
147	147		a
148	148		case _ =>
149	149		0
150	150		}
151	151		let PaidtrxLast = match getInteger(this, Paidtrx) {
152	152		case a: Int =>
153	153		a
154	154		case _ =>
155	155		0
156	156		}
157	157		let LastPaymentBlockValue = match getInteger(this, LastPaymentBlock) {
158	158		case a: Int =>
159	159		a
160	160		case _ =>
161	161		height
162	162		}
163	163		let FreelancerAddressStr = getStringValue(this, FreelancerAddress)
164	164		let PaymentAssetId = getStringValue(this, PaymentAsset)
165	165		let AddressFreeLancer = addressFromStringValue(FreelancerAddressStr)
166	166		let dAppFrees = Address(dAppFees)
167	167		let AssetUsed = if ((PaymentAssetId == "Waves"))
168	168		then unit
169	169		else fromBase58String(PaymentAssetId)
170	170		if ((0 >= (amount - (Fee * 100000000))))
171	171		then throw(("You do not have enough funds to make payment, your available funds are: " + toString((amount / 100000000))))
172	172		else if (if ((height > (LastPaymentBlockValue + WaitTime)))
173		-	then (PaidtrxLast == 1)
	173	+	then (PaidtrxLast > 1)
174	174		else false)
175	175		then throw(((("Cannot make Payment before " + toString(LastPaymentBlockValue)) + " min") + toString(WaitTime)))
176	176		else {
177	177		let FeePaid = (Fee * 100000000)
178	178		let PaidtrxValue = if ((PaidtrxLast == 3))
179	179		then 0
180	180		else (PaidtrxLast + 1)
181	181		let UserAccount = if ((PaidtrxLast == 3))
182	182		then 0
183	183		else ((amount - (Fee * 100000000)) - (((PaidtrxValue * 25) * (amount - (Fee * 100000000))) / 100))
184	184		let Payment2Freelance = ((25 * amount) / 100)
185	185		$Tuple2([IntegerEntry((toBase58String(i.caller.bytes) + "_Payment"), UserAccount), IntegerEntry((toBase58String(i.caller.bytes) + "_Paidtrx"), PaidtrxValue), IntegerEntry((toBase58String(i.caller.bytes) + "_LastPaid"), height), IntegerEntry("WaitTime", WaitTime), IntegerEntry("LastPaymentBlockValue", LastPaymentBlockValue), IntegerEntry("Check", (LastPaymentBlockValue + WaitTime)), ScriptTransfer(AddressFreeLancer, Payment2Freelance, AssetUsed), ScriptTransfer(dAppFrees, FeePaid, AssetUsed)], AssetUsed)
186	186		}
187	187		}
188	188
189	189
190	190
191	191		@Callable(i)
192	192		func AdminTransfer (User,Freelancer,ToFreelancer,ToUser,AdminFee) = if ((i.caller.bytes != AdmindApp))
193	193		then throw("Only Admin can do this")
194	194		else if ((((ToUser + ToFreelancer) + AdminFee) != 100))
195	195		then throw("Total of Percentages cannot be different from 100%")
196	196		else {
197	197		let FreeLancerPayment = (User + "_Payment")
198	198		let FreelancerAddress = (User + "_Freelancer")
199	199		let PaymentAsset = (toBase58String(i.caller.bytes) + "_Asset")
200	200		let amount = match getInteger(this, FreeLancerPayment) {
201	201		case a: Int =>
202	202		a
203	203		case _ =>
204	204		0
205	205		}
206	206		let FreelancerAddressStr = getStringValue(this, FreelancerAddress)
207	207		let AddressFreeLancer = addressFromStringValue(FreelancerAddressStr)
208	208		let PaymentAssetId = getStringValue(this, PaymentAsset)
209	209		let dAppFrees = Address(dAppFees)
210	210		let AddressUser = addressFromStringValue(User)
211	211		let AssetUsed = if ((PaymentAssetId == "Waves"))
212	212		then unit
213	213		else fromBase58String(PaymentAssetId)
214	214		if ((amount == 0))
215	215		then throw("User's balance is 0 BUsdc cannot realize any payment")
216	216		else $Tuple2([IntegerEntry((User + "_Payment"), 0), ScriptTransfer(AddressFreeLancer, ((ToFreelancer * amount) / 100), AssetUsed), ScriptTransfer(AddressUser, ((ToUser * amount) / 100), AssetUsed), ScriptTransfer(dAppFrees, ((AdminFee * amount) / 100), AssetUsed)], AssetUsed)
217	217		}
218	218
219	219

github/deemru/w8io/026f985 
36.01 ms ◑