w8 · tx · 5Us···xLv

tx · 5UsnVCWZ6dvYe7cWMqTAFqLoN7vSemB3oHbWxz3HxLv

3NCLRHPm5VYMStKzvP2kkc5mxGSH9wtWAtK:  -0.01000000 Waves

2022.05.28 11:16 [2071255] smart account 3NCLRHPm5VYMStKzvP2kkc5mxGSH9wtWAtK > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5UsnVCWZ6dvYe7cWMqTAFqLoN7vSemB3oHbWxz3HxLv",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1653725755032,
    "version": 2,
    "chainId": 84,
    "sender": "3NCLRHPm5VYMStKzvP2kkc5mxGSH9wtWAtK",
    "senderPublicKey": "2bV4VobJC5a6L6e7or9PFXQhQ1KtkZW1UYzjAvMzs6A8",
    "proofs": [
        "fk5cch4w6g6u8rqSi8ki52sq8FT891L3kGw7zAYVbicdoiR1HMhNLbH8EU3waEFwn52FVraieQyt9uAtMi1hcn9"
    ],
    "script": "base64:AAIFAAAAAAAAABsIAhIAEgUKAwgICBIDCgEBEgASBwoFCAgBAQEAAAALAAAAAARCVXNkAQAAACCXSkGrfgp9S6ACoVXGdcgAKGd7js0XAB7Z3/CJRHkIAQAAAAAEVVNEVAEAAAAgl0pBq34KfUugAqFVxnXIAChne47NFwAe2d/wiUR5CAEAAAAABFVTREMBAAAAIJdKQat+Cn1LoAKhVcZ1yAAoZ3uOzRcAHtnf8IlEeQgBAAAAAANCVEMBAAAAIJdKQat+Cn1LoAKhVcZ1yAAoZ3uOzRcAHtnf8IlEeQgBAAAAAANFVEgBAAAAIJdKQat+Cn1LoAKhVcZ1yAAoZ3uOzRcAHtnf8IlEeQgBAAAAAANCTkIBAAAAIJdKQat+Cn1LoAKhVcZ1yAAoZ3uOzRcAHtnf8IlEeQgBAAAAAARVU0ROAQAAACCXSkGrfgp9S6ACoVXGdcgAKGd7js0XAB7Z3/CJRHkIAQAAAAAESEFTSAEAAAAgl0pBq34KfUugAqFVxnXIAChne47NFwAe2d/wiUR5CAEAAAAABEtVU0QBAAAAIJdKQat+Cn1LoAKhVcZ1yAAoZ3uOzRcAHtnf8IlEeQgBAAAAAAhkQXBwRmVlcwEAAAAaAVTVEO4dXi2WWBlfa2VnxLZIutJS/g3SExoAAAAACUFkbWluZEFwcAEAAAAaAVRZN9CSicTdhnoAg6OIqoMPeMIQYh/ksUQAAAAFAAAAAWkBAAAABVJlc2V0AAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAACF9QYXltZW50AAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAIX1BhaWR0cngAAAAAAAAAAAAFAAAAA25pbAAAAAFpAQAAAAxEZXBvc2l0RnVuZHMAAAADAAAACVNjb3BlRGVzYwAAAAxEZWxpdmVyYWJsZXMAAAARRnJlZWxhbmNlckFkZHJlc3MEAAAAEUZyZWVMYW5jZXJQYXltZW50CQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAIX1BheW1lbnQEAAAABmFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAABFGcmVlTGFuY2VyUGF5bWVudAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAAAwkBAAAAAiE9AAAAAgUAAAAGYW1vdW50AAAAAAAAAAAACQAAAgAAAAECAAAAQFlvdSBoYXZlIGFscmVhZHkgZGVwb3NpdGVkIGZ1bmRzLCBkZXBvc2l0cyBjYW4gb25seSBiZSBkb25lIG9uY2UEAAAAA3BtdAMJAAAAAAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAkAAAIAAAABAgAAABxBdHRhY2hlZCBwYXltZW50IGlzIHJlcXVpcmVkAwMDAwMDAwMDAwMJAABnAAAAAgAAAAAAAAAAAAgFAAAAA3BtdAAAAAZhbW91bnQJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAEQlVzZAcJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAEVVNEVAcJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAEVVNEQwcJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAADQlRDBwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAANFVEgHCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAAA0JOQgcJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAEVVNETgcJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAESEFTSAcJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAES1VTRAcJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQHCQAAAgAAAAECAAAAP0NhbiBvbmx5IGRlcG9zaXQgYWNjZXB0ZWQgdG9rZW5zLCBhbmQgYW1vdW50IHNob3VsZCBiZSBwb3NpdGl2ZQMDAwkAAAAAAAACBQAAAAlTY29wZURlc2MCAAAAAAYJAAAAAAAAAgUAAAAMRGVsaXZlcmFibGVzAgAAAAAGCQAAAAAAAAIFAAAAEUZyZWVsYW5jZXJBZGRyZXNzAgAAAAAJAAACAAAAAQIAAABKSm9iIFNjb3BlLCBEZWxpdmVyYWJsZXMgZGVzYyBhbmQgRnJlZWxhbmNlciBXYWxsZXQgQWRkcmVzcyBjYW5ub3QgYmUgZW1wdHkEAAAACUFzc2V0VXNlZAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAJYAAAAAQkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkAgAAAAVXYXZlcwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAGX1Njb3BlBQAAAAlTY29wZURlc2MJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAABl9EZWxpdgUAAAAMRGVsaXZlcmFibGVzCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAZfQXNzZXQFAAAACUFzc2V0VXNlZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAALX0ZyZWVsYW5jZXIFAAAAEUZyZWVsYW5jZXJBZGRyZXNzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAIX1BheW1lbnQIBQAAAANwbXQAAAAGYW1vdW50BQAAAANuaWwAAAABaQEAAAANUGF5RnJlZWxhbmNlcgAAAAEAAAANUGF5RnJlZWxhbmNlcgQAAAARRnJlZUxhbmNlclBheW1lbnQJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAhfUGF5bWVudAQAAAARRnJlZWxhbmNlckFkZHJlc3MJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAtfRnJlZWxhbmNlcgQAAAAMUGF5bWVudEFzc2V0CQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAGX0Fzc2V0BAAAAAdQYWlkdHJ4CQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAIX1BhaWR0cngEAAAABmFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAABFGcmVlTGFuY2VyUGF5bWVudAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAtQYWlkdHJ4TGFzdAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAAdQYWlkdHJ4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAAFEZyZWVsYW5jZXJBZGRyZXNzU3RyCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzBQAAABFGcmVlbGFuY2VyQWRkcmVzcwQAAAAOUGF5bWVudEFzc2V0SWQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAADFBheW1lbnRBc3NldAQAAAARQWRkcmVzc0ZyZWVMYW5jZXIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAFEZyZWVsYW5jZXJBZGRyZXNzU3RyBAAAAAlkQXBwRnJlZXMJAQAAAAdBZGRyZXNzAAAAAQUAAAAIZEFwcEZlZXMEAAAACUFzc2V0VXNlZAMJAAAAAAAAAgUAAAAOUGF5bWVudEFzc2V0SWQCAAAABVdhdmVzBQAAAAR1bml0CQACWQAAAAEFAAAADlBheW1lbnRBc3NldElkAwkAAGcAAAACAAAAAAAAAAAACQAAZQAAAAIJAABpAAAAAgkAAGgAAAACAAAAAAAAAABfBQAAAAZhbW91bnQAAAAAAAAAAGQJAABoAAAAAgUAAAANUGF5RnJlZWxhbmNlcgAAAAAABfXhAAkAAAIAAAABCQABLAAAAAICAAAASFlvdSBkbyBub3QgaGF2ZSBlbm91Z2ggZnVuZHMgdG8gbWFrZSBwYXltZW50LCB5b3VyIGF2YWlsYWJsZSBmdW5kcyBhcmU6IAkAAaQAAAABCQAAaQAAAAIFAAAABmFtb3VudAAAAAAABfXhAAMDCQAAZwAAAAIFAAAAC1BhaWR0cnhMYXN0AAAAAAAAAAAMCQAAZgAAAAIFAAAABmFtb3VudAAAAAAAAAAAAAcJAAACAAAAAQIAAABAWW91IGhhdmUgYWxyZWFkeSBkb25lIDEyIHBheW1lbnRzLCB5b3UgY2Fubm90IG1ha2UgbW9yZSBwYXltZW50cwQAAAALVXNlckFjY291bnQDCQAAAAAAAAIFAAAAC1BhaWR0cnhMYXN0AAAAAAAAAAALAAAAAAAAAAAACQAAZQAAAAIFAAAABmFtb3VudAkAAGgAAAACBQAAAA1QYXlGcmVlbGFuY2VyAAAAAAAF9eEABAAAABFQYXltZW50MkZyZWVsYW5jZQMJAAAAAAAAAgUAAAALUGFpZHRyeExhc3QAAAAAAAAAAAsJAABpAAAAAgkAAGgAAAACAAAAAAAAAABfBQAAAAZhbW91bnQAAAAAAAAAAGQJAABoAAAAAgkAAGgAAAACAAAAAAAAAABfBQAAAA1QYXlGcmVlbGFuY2VyAAAAAAAAD0JABAAAAAdGZWVQYWlkAwkAAAAAAAACBQAAAAtQYWlkdHJ4TGFzdAAAAAAAAAAACwkAAGkAAAACCQAAaAAAAAIAAAAAAAAAAAUFAAAABmFtb3VudAAAAAAAAAAAZAkAAGgAAAACCQAAaAAAAAIAAAAAAAAAAAUFAAAADVBheUZyZWVsYW5jZXIAAAAAAAAPQkAEAAAADFBhaWR0cnhWYWx1ZQMJAAAAAAAAAgUAAAALUGFpZHRyeExhc3QAAAAAAAAAAAsAAAAAAAAAAAAJAABkAAAAAgUAAAALUGFpZHRyeExhc3QAAAAAAAAAAAEJAAUUAAAAAgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAACF9QYXltZW50BQAAAAtVc2VyQWNjb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAACF9QYWlkdHJ4BQAAAAxQYWlkdHJ4VmFsdWUJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAARQWRkcmVzc0ZyZWVMYW5jZXIFAAAAEVBheW1lbnQyRnJlZWxhbmNlBQAAAAlBc3NldFVzZWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAJZEFwcEZyZWVzBQAAAAdGZWVQYWlkBQAAAAlBc3NldFVzZWQFAAAAA25pbAUAAAAJQXNzZXRVc2VkAAAAAWkBAAAAFVBheUZyZWVsYW5jZXJPbkRlbWFuZAAAAAAEAAAADVBheUZyZWVsYW5jZXIAAAAAAAAAAAQEAAAAA0ZlZQAAAAAAAAAAAQQAAAARRnJlZUxhbmNlclBheW1lbnQJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAhfUGF5bWVudAQAAAARRnJlZWxhbmNlckFkZHJlc3MJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAtfRnJlZWxhbmNlcgQAAAAQTGFzdFBheW1lbnRCbG9jawkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAACV9MYXN0UGFpZAQAAAAMUGF5bWVudEFzc2V0CQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAGX0Fzc2V0BAAAAAdQYWlkdHJ4CQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAIX1BhaWR0cngEAAAABmFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAABFGcmVlTGFuY2VyUGF5bWVudAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAtQYWlkdHJ4TGFzdAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAAdQYWlkdHJ4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAAFUxhc3RQYXltZW50QmxvY2tWYWx1ZQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAABBMYXN0UGF5bWVudEJsb2NrAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAAFEZyZWVsYW5jZXJBZGRyZXNzU3RyCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzBQAAABFGcmVlbGFuY2VyQWRkcmVzcwQAAAAOUGF5bWVudEFzc2V0SWQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAADFBheW1lbnRBc3NldAQAAAARQWRkcmVzc0ZyZWVMYW5jZXIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAFEZyZWVsYW5jZXJBZGRyZXNzU3RyBAAAAAlkQXBwRnJlZXMJAQAAAAdBZGRyZXNzAAAAAQUAAAAIZEFwcEZlZXMEAAAACUFzc2V0VXNlZAMJAAAAAAAAAgUAAAAOUGF5bWVudEFzc2V0SWQCAAAABVdhdmVzBQAAAAR1bml0CQACWQAAAAEFAAAADlBheW1lbnRBc3NldElkAwkAAGcAAAACAAAAAAAAAAAACQAAZQAAAAIFAAAABmFtb3VudAkAAGgAAAACBQAAAANGZWUAAAAAAAX14QAJAAACAAAAAQkAASwAAAACAgAAAEhZb3UgZG8gbm90IGhhdmUgZW5vdWdoIGZ1bmRzIHRvIG1ha2UgcGF5bWVudCwgeW91ciBhdmFpbGFibGUgZnVuZHMgYXJlOiAJAAGkAAAAAQkAAGkAAAACBQAAAAZhbW91bnQAAAAAAAX14QAEAAAADFBhaWR0cnhWYWx1ZQMJAAAAAAAAAgUAAAALUGFpZHRyeExhc3QAAAAAAAAAAAMAAAAAAAAAAAAJAABkAAAAAgUAAAALUGFpZHRyeExhc3QAAAAAAAAAAAEEAAAAC1VzZXJBY2NvdW50AwkAAAAAAAACBQAAAAtQYWlkdHJ4TGFzdAAAAAAAAAAAAwAAAAAAAAAAAAkAAGUAAAACCQAAZQAAAAIFAAAABmFtb3VudAkAAGkAAAACCQAAaAAAAAIJAABoAAAAAgUAAAALUGFpZHRyeExhc3QAAAAAAAAAABkFAAAABmFtb3VudAAAAAAAAAAAZAkAAGgAAAACBQAAAANGZWUAAAAAAAX14QAEAAAAEVBheW1lbnQyRnJlZWxhbmNlCQAAaQAAAAIJAABoAAAAAgAAAAAAAAAAGQUAAAAGYW1vdW50AAAAAAAAAABkBAAAAAdGZWVQYWlkCQAAaAAAAAIAAAAAAAAAAAEAAAAAAAX14QAJAAUUAAAAAgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAACF9QYXltZW50BQAAAAtVc2VyQWNjb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAACF9QYWlkdHJ4BQAAAAxQYWlkdHJ4VmFsdWUJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAARQWRkcmVzc0ZyZWVMYW5jZXIFAAAAEVBheW1lbnQyRnJlZWxhbmNlBQAAAAlBc3NldFVzZWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAJZEFwcEZyZWVzBQAAAAdGZWVQYWlkBQAAAAlBc3NldFVzZWQFAAAAA25pbAUAAAAJQXNzZXRVc2VkAAAAAWkBAAAADUFkbWluVHJhbnNmZXIAAAAFAAAABFVzZXIAAAAKRnJlZWxhbmNlcgAAAAxUb0ZyZWVsYW5jZXIAAAAGVG9Vc2VyAAAACEFkbWluRmVlAwkBAAAAAiE9AAAAAggIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwUAAAAJQWRtaW5kQXBwCQAAAgAAAAECAAAAFk9ubHkgQWRtaW4gY2FuIGRvIHRoaXMDCQEAAAACIT0AAAACCQAAZAAAAAIJAABkAAAAAgUAAAAGVG9Vc2VyBQAAAAxUb0ZyZWVsYW5jZXIFAAAACEFkbWluRmVlAAAAAAAAAABkCQAAAgAAAAECAAAAMlRvdGFsIG9mIFBlcmNlbnRhZ2VzIGNhbm5vdCBiZSBkaWZmZXJlbnQgZnJvbSAxMDAlBAAAABFGcmVlTGFuY2VyUGF5bWVudAkAASwAAAACBQAAAARVc2VyAgAAAAhfUGF5bWVudAQAAAARRnJlZWxhbmNlckFkZHJlc3MJAAEsAAAAAgUAAAAEVXNlcgIAAAALX0ZyZWVsYW5jZXIEAAAADFBheW1lbnRBc3NldAkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAABl9Bc3NldAQAAAAGYW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAEUZyZWVMYW5jZXJQYXltZW50AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAAFEZyZWVsYW5jZXJBZGRyZXNzU3RyCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzBQAAABFGcmVlbGFuY2VyQWRkcmVzcwQAAAARQWRkcmVzc0ZyZWVMYW5jZXIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAFEZyZWVsYW5jZXJBZGRyZXNzU3RyBAAAAA5QYXltZW50QXNzZXRJZAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwUAAAAMUGF5bWVudEFzc2V0BAAAAAlkQXBwRnJlZXMJAQAAAAdBZGRyZXNzAAAAAQUAAAAIZEFwcEZlZXMEAAAAC0FkZHJlc3NVc2VyCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAARVc2VyBAAAAAlBc3NldFVzZWQDCQAAAAAAAAIFAAAADlBheW1lbnRBc3NldElkAgAAAAVXYXZlcwUAAAAEdW5pdAkAAlkAAAABBQAAAA5QYXltZW50QXNzZXRJZAMJAAAAAAAAAgUAAAAGYW1vdW50AAAAAAAAAAAACQAAAgAAAAECAAAANFVzZXIncyBiYWxhbmNlIGlzIDAgQlVzZGMgY2Fubm90IHJlYWxpemUgYW55IHBheW1lbnQJAAUUAAAAAgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAARVc2VyAgAAAAhfUGF5bWVudAAAAAAAAAAAAAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAABFBZGRyZXNzRnJlZUxhbmNlcgkAAGkAAAACCQAAaAAAAAIFAAAADFRvRnJlZWxhbmNlcgUAAAAGYW1vdW50AAAAAAAAAABkBQAAAAlBc3NldFVzZWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAALQWRkcmVzc1VzZXIJAABpAAAAAgkAAGgAAAACBQAAAAZUb1VzZXIFAAAABmFtb3VudAAAAAAAAAAAZAUAAAAJQXNzZXRVc2VkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACWRBcHBGcmVlcwkAAGkAAAACCQAAaAAAAAIFAAAACEFkbWluRmVlBQAAAAZhbW91bnQAAAAAAAAAAGQFAAAACUFzc2V0VXNlZAUAAAADbmlsBQAAAAlBc3NldFVzZWQAAAAALF0/8w==",
    "height": 2071255,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6i5MeGNEb3fUhdT4bw1YEdA9KiViLYNGk8Enr9fWVwRj
Next: 2Hthmj2ZJkPJ7RVotu46qwWB4w1qzeecSQ4FneYf7zX9

Diff: 
Old New Differences
169 169      if ((0 >= (amount - (Fee * 100000000))))
170 170          then throw(("You do not have enough funds to make payment, your available funds are: " + toString((amount / 100000000))))
171 171          else {
172 -             let UserAccount = if ((PaidtrxLast == 3))
173 -                 then 0
174 -                 else ((amount - (((PaidtrxLast * 25) * amount) / 100)) - (Fee * 0))
175 -             let Payment2Freelance = ((25 * amount) / 100)
176 -             let FeePaid = (1 * 100000000)
177 172              let PaidtrxValue = if ((PaidtrxLast == 3))
178 173                  then 0
179 174                  else (PaidtrxLast + 1)
175 +             let UserAccount = if ((PaidtrxLast == 3))
176 +                 then 0
177 +                 else ((amount - (((PaidtrxLast * 25) * amount) / 100)) - (Fee * 100000000))
178 +             let Payment2Freelance = ((25 * amount) / 100)
179 +             let FeePaid = (1 * 100000000)
180 180              $Tuple2([IntegerEntry((toBase58String(i.caller.bytes) + "_Payment"), UserAccount), IntegerEntry((toBase58String(i.caller.bytes) + "_Paidtrx"), PaidtrxValue), ScriptTransfer(AddressFreeLancer, Payment2Freelance, AssetUsed), ScriptTransfer(dAppFrees, FeePaid, AssetUsed)], AssetUsed)
181 181              }
182 182      }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let BUsd = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
5 5  
6 6  let USDT = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
7 7  
8 8  let USDC = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
9 9  
10 10  let BTC = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
11 11  
12 12  let ETH = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
13 13  
14 14  let BNB = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
15 15  
16 16  let USDN = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
17 17  
18 18  let HASH = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
19 19  
20 20  let KUSD = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
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)]
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 FreeLancerPayment = (toBase58String(i.caller.bytes) + "_Payment")
140 140      let FreelancerAddress = (toBase58String(i.caller.bytes) + "_Freelancer")
141 141      let LastPaymentBlock = (toBase58String(i.caller.bytes) + "_LastPaid")
142 142      let PaymentAsset = (toBase58String(i.caller.bytes) + "_Asset")
143 143      let Paidtrx = (toBase58String(i.caller.bytes) + "_Paidtrx")
144 144      let amount =     match getInteger(this, FreeLancerPayment) {
145 145          case a: Int => 
146 146              a
147 147          case _ => 
148 148              0
149 149      }
150 150      let PaidtrxLast =     match getInteger(this, Paidtrx) {
151 151          case a: Int => 
152 152              a
153 153          case _ => 
154 154              0
155 155      }
156 156      let LastPaymentBlockValue =     match getInteger(this, LastPaymentBlock) {
157 157          case a: Int => 
158 158              a
159 159          case _ => 
160 160              0
161 161      }
162 162      let FreelancerAddressStr = getStringValue(this, FreelancerAddress)
163 163      let PaymentAssetId = getStringValue(this, PaymentAsset)
164 164      let AddressFreeLancer = addressFromStringValue(FreelancerAddressStr)
165 165      let dAppFrees = Address(dAppFees)
166 166      let AssetUsed = if ((PaymentAssetId == "Waves"))
167 167          then unit
168 168          else fromBase58String(PaymentAssetId)
169 169      if ((0 >= (amount - (Fee * 100000000))))
170 170          then throw(("You do not have enough funds to make payment, your available funds are: " + toString((amount / 100000000))))
171 171          else {
172 -             let UserAccount = if ((PaidtrxLast == 3))
173 -                 then 0
174 -                 else ((amount - (((PaidtrxLast * 25) * amount) / 100)) - (Fee * 0))
175 -             let Payment2Freelance = ((25 * amount) / 100)
176 -             let FeePaid = (1 * 100000000)
177 172              let PaidtrxValue = if ((PaidtrxLast == 3))
178 173                  then 0
179 174                  else (PaidtrxLast + 1)
175 +             let UserAccount = if ((PaidtrxLast == 3))
176 +                 then 0
177 +                 else ((amount - (((PaidtrxLast * 25) * amount) / 100)) - (Fee * 100000000))
178 +             let Payment2Freelance = ((25 * amount) / 100)
179 +             let FeePaid = (1 * 100000000)
180 180              $Tuple2([IntegerEntry((toBase58String(i.caller.bytes) + "_Payment"), UserAccount), IntegerEntry((toBase58String(i.caller.bytes) + "_Paidtrx"), PaidtrxValue), ScriptTransfer(AddressFreeLancer, Payment2Freelance, AssetUsed), ScriptTransfer(dAppFrees, FeePaid, AssetUsed)], AssetUsed)
181 181              }
182 182      }
183 183  
184 184  
185 185  
186 186  @Callable(i)
187 187  func AdminTransfer (User,Freelancer,ToFreelancer,ToUser,AdminFee) = if ((i.caller.bytes != AdmindApp))
188 188      then throw("Only Admin can do this")
189 189      else if ((((ToUser + ToFreelancer) + AdminFee) != 100))
190 190          then throw("Total of Percentages cannot be different from 100%")
191 191          else {
192 192              let FreeLancerPayment = (User + "_Payment")
193 193              let FreelancerAddress = (User + "_Freelancer")
194 194              let PaymentAsset = (toBase58String(i.caller.bytes) + "_Asset")
195 195              let amount =             match getInteger(this, FreeLancerPayment) {
196 196                  case a: Int => 
197 197                      a
198 198                  case _ => 
199 199                      0
200 200              }
201 201              let FreelancerAddressStr = getStringValue(this, FreelancerAddress)
202 202              let AddressFreeLancer = addressFromStringValue(FreelancerAddressStr)
203 203              let PaymentAssetId = getStringValue(this, PaymentAsset)
204 204              let dAppFrees = Address(dAppFees)
205 205              let AddressUser = addressFromStringValue(User)
206 206              let AssetUsed = if ((PaymentAssetId == "Waves"))
207 207                  then unit
208 208                  else fromBase58String(PaymentAssetId)
209 209              if ((amount == 0))
210 210                  then throw("User's balance is 0 BUsdc cannot realize any payment")
211 211                  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)
212 212              }
213 213  
214 214

Old	New		Differences
169	169		if ((0 >= (amount - (Fee * 100000000))))
170	170		then throw(("You do not have enough funds to make payment, your available funds are: " + toString((amount / 100000000))))
171	171		else {
172		-	let UserAccount = if ((PaidtrxLast == 3))
173		-	then 0
174		-	else ((amount - (((PaidtrxLast * 25) * amount) / 100)) - (Fee * 0))
175		-	let Payment2Freelance = ((25 * amount) / 100)
176		-	let FeePaid = (1 * 100000000)
177	172		let PaidtrxValue = if ((PaidtrxLast == 3))
178	173		then 0
179	174		else (PaidtrxLast + 1)
	175	+	let UserAccount = if ((PaidtrxLast == 3))
	176	+	then 0
	177	+	else ((amount - (((PaidtrxLast * 25) * amount) / 100)) - (Fee * 100000000))
	178	+	let Payment2Freelance = ((25 * amount) / 100)
	179	+	let FeePaid = (1 * 100000000)
180	180		$Tuple2([IntegerEntry((toBase58String(i.caller.bytes) + "_Payment"), UserAccount), IntegerEntry((toBase58String(i.caller.bytes) + "_Paidtrx"), PaidtrxValue), ScriptTransfer(AddressFreeLancer, Payment2Freelance, AssetUsed), ScriptTransfer(dAppFrees, FeePaid, AssetUsed)], AssetUsed)
181	181		}
182	182		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let BUsd = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
5	5
6	6		let USDT = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
7	7
8	8		let USDC = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
9	9
10	10		let BTC = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
11	11
12	12		let ETH = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
13	13
14	14		let BNB = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
15	15
16	16		let USDN = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
17	17
18	18		let HASH = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
19	19
20	20		let KUSD = base58'BBaEeEmuA6qPNowGcB8BXozC2PmAAG48G5zzSWw8qt2k'
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)]
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 FreeLancerPayment = (toBase58String(i.caller.bytes) + "_Payment")
140	140		let FreelancerAddress = (toBase58String(i.caller.bytes) + "_Freelancer")
141	141		let LastPaymentBlock = (toBase58String(i.caller.bytes) + "_LastPaid")
142	142		let PaymentAsset = (toBase58String(i.caller.bytes) + "_Asset")
143	143		let Paidtrx = (toBase58String(i.caller.bytes) + "_Paidtrx")
144	144		let amount = match getInteger(this, FreeLancerPayment) {
145	145		case a: Int =>
146	146		a
147	147		case _ =>
148	148		0
149	149		}
150	150		let PaidtrxLast = match getInteger(this, Paidtrx) {
151	151		case a: Int =>
152	152		a
153	153		case _ =>
154	154		0
155	155		}
156	156		let LastPaymentBlockValue = match getInteger(this, LastPaymentBlock) {
157	157		case a: Int =>
158	158		a
159	159		case _ =>
160	160		0
161	161		}
162	162		let FreelancerAddressStr = getStringValue(this, FreelancerAddress)
163	163		let PaymentAssetId = getStringValue(this, PaymentAsset)
164	164		let AddressFreeLancer = addressFromStringValue(FreelancerAddressStr)
165	165		let dAppFrees = Address(dAppFees)
166	166		let AssetUsed = if ((PaymentAssetId == "Waves"))
167	167		then unit
168	168		else fromBase58String(PaymentAssetId)
169	169		if ((0 >= (amount - (Fee * 100000000))))
170	170		then throw(("You do not have enough funds to make payment, your available funds are: " + toString((amount / 100000000))))
171	171		else {
172		-	let UserAccount = if ((PaidtrxLast == 3))
173		-	then 0
174		-	else ((amount - (((PaidtrxLast * 25) * amount) / 100)) - (Fee * 0))
175		-	let Payment2Freelance = ((25 * amount) / 100)
176		-	let FeePaid = (1 * 100000000)
177	172		let PaidtrxValue = if ((PaidtrxLast == 3))
178	173		then 0
179	174		else (PaidtrxLast + 1)
	175	+	let UserAccount = if ((PaidtrxLast == 3))
	176	+	then 0
	177	+	else ((amount - (((PaidtrxLast * 25) * amount) / 100)) - (Fee * 100000000))
	178	+	let Payment2Freelance = ((25 * amount) / 100)
	179	+	let FeePaid = (1 * 100000000)
180	180		$Tuple2([IntegerEntry((toBase58String(i.caller.bytes) + "_Payment"), UserAccount), IntegerEntry((toBase58String(i.caller.bytes) + "_Paidtrx"), PaidtrxValue), ScriptTransfer(AddressFreeLancer, Payment2Freelance, AssetUsed), ScriptTransfer(dAppFrees, FeePaid, AssetUsed)], AssetUsed)
181	181		}
182	182		}
183	183
184	184
185	185
186	186		@Callable(i)
187	187		func AdminTransfer (User,Freelancer,ToFreelancer,ToUser,AdminFee) = if ((i.caller.bytes != AdmindApp))
188	188		then throw("Only Admin can do this")
189	189		else if ((((ToUser + ToFreelancer) + AdminFee) != 100))
190	190		then throw("Total of Percentages cannot be different from 100%")
191	191		else {
192	192		let FreeLancerPayment = (User + "_Payment")
193	193		let FreelancerAddress = (User + "_Freelancer")
194	194		let PaymentAsset = (toBase58String(i.caller.bytes) + "_Asset")
195	195		let amount = match getInteger(this, FreeLancerPayment) {
196	196		case a: Int =>
197	197		a
198	198		case _ =>
199	199		0
200	200		}
201	201		let FreelancerAddressStr = getStringValue(this, FreelancerAddress)
202	202		let AddressFreeLancer = addressFromStringValue(FreelancerAddressStr)
203	203		let PaymentAssetId = getStringValue(this, PaymentAsset)
204	204		let dAppFrees = Address(dAppFees)
205	205		let AddressUser = addressFromStringValue(User)
206	206		let AssetUsed = if ((PaymentAssetId == "Waves"))
207	207		then unit
208	208		else fromBase58String(PaymentAssetId)
209	209		if ((amount == 0))
210	210		then throw("User's balance is 0 BUsdc cannot realize any payment")
211	211		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)
212	212		}
213	213
214	214

github/deemru/w8io/873ac7e 
54.25 ms ◑