tx · FagAsUqFfw2FygWTrt5nQr88Rx9UmQkqf1uC4UQhJUtA

3NA2sejUzEcL7Gg8WfhrcqxP22fHk2SS9pK:  -0.00700000 Waves

2022.08.25 08:12 [2199563] smart account 3NA2sejUzEcL7Gg8WfhrcqxP22fHk2SS9pK > SELF 0.00000000 Waves

{ "type": 13, "id": "FagAsUqFfw2FygWTrt5nQr88Rx9UmQkqf1uC4UQhJUtA", "fee": 700000, "feeAssetId": null, "timestamp": 1661404336903, "version": 2, "chainId": 84, "sender": "3NA2sejUzEcL7Gg8WfhrcqxP22fHk2SS9pK", "senderPublicKey": "HMzDczZUThMMhE2Grm1ZmpN3QNZ9N7CUCYnsqh4utSDJ", "proofs": [ "5U42RJznKJv37r98YcStFH8sdKmXjAEeoK4rQkmKSLyjrTgeJDs1V6KYGTtVJNooeEYDdTfzzuvMtDkXkY4qM1bU" ], "script": "base64:BgIYCAISABIAEgMKAQESAwoBARIAEgASABIABgAEdXNkbgEg11KRGPRfT6VehNuJvBkobHB7OMalzc+gLp7N2ofv42AABHVzZGMBIPQcuTcYg4l4Uh6IaJaLWyiuNgmUbeQfgPZEel3eCXgMAAxhZG1pbl93YWxsZXQCIzNOM0RDbmdqaWRpdmtKYlRKd0ZURXZiWVJUZmZDV1ZCTENMAA5hbGZhcmtfdGVzdG5ldAAFAAp2aXJlc19kYXBwARoBVHjn3floRCovnhXY1SHCQGibEg7rsYrFrAENdHJ5R2V0SW50ZWdlcgEDa2V5BAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAgBaQEPYnV5X3VzZG5fdGlja2V0AAMJAQIhPQIICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUEdXNkbgkAAgECH1BsZWFzZSBkZXBvc2l0IFVTRC1OIHRva2VuIG9ubHkEC3VzZXJfY3JlZGl0CQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgV1c2RuXwkApQgBCAUBaQxvcmlnaW5DYWxsZXICB19jcmVkaXQEDmRlcG9zaXRfYW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQPbmV3X3VzZXJfY3JlZGl0CQBkAgULdXNlcl9jcmVkaXQFDmRlcG9zaXRfYW1vdW50BAphbGxfY3JlZGl0CQENdHJ5R2V0SW50ZWdlcgECD3VzZG5fYWxsX2NyZWRpdAQObmV3X2FsbF9jcmVkaXQJAGQCBQphbGxfY3JlZGl0BQ5kZXBvc2l0X2Ftb3VudAQRdHJhbnNhY3Rpb25fYmxvY2sEByRtYXRjaDAJAOkHAQgFAWkNdHJhbnNhY3Rpb25JZAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEJAAIBAhJFcnJvciBibG9jayBudW1iZXIEA3JlcwkA/AcECQEHQWRkcmVzcwEFCnZpcmVzX2RhcHACCnVzZE5fc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUEdXNkbgUOZGVwb3NpdF9hbW91bnQFA25pbAMJAAACBQNyZXMFA3JlcwQJdmlyZXNfcmVzBAckbWF0Y2gwBQNyZXMDCQABAgUHJG1hdGNoMAIJTGlzdFtBbnldBAFyBQckbWF0Y2gwBQFyCQACAQIXSW5jb3JyZWN0IGludm9rZSByZXN1bHQDCQAAAgUJdmlyZXNfcmVzBQl2aXJlc19yZXMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgV1c2RuXwkApQgBCAUBaQxvcmlnaW5DYWxsZXICB19jcmVkaXQFD25ld191c2VyX2NyZWRpdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICBXVzZG5fCQClCAEIBQFpDG9yaWdpbkNhbGxlcgIGX2Jsb2NrBRF0cmFuc2FjdGlvbl9ibG9jawkAzAgCCQEMSW50ZWdlckVudHJ5AgIPdXNkbl9hbGxfY3JlZGl0BQ5uZXdfYWxsX2NyZWRpdAkAzAgCCQEMSW50ZWdlckVudHJ5AgIOdXNkbl9hbGxfYmxvY2sFEXRyYW5zYWN0aW9uX2Jsb2NrBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEPYnV5X3VzZGNfdGlja2V0AAMJAQIhPQIICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUEdXNkYwkAAgECH1BsZWFzZSBkZXBvc2l0IFVTRC1OIHRva2VuIG9ubHkEC3VzZXJfY3JlZGl0CQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgV1c2RjXwkApQgBCAUBaQxvcmlnaW5DYWxsZXICB19jcmVkaXQEDmRlcG9zaXRfYW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQPbmV3X3VzZXJfY3JlZGl0CQBkAgULdXNlcl9jcmVkaXQFDmRlcG9zaXRfYW1vdW50BAphbGxfY3JlZGl0CQENdHJ5R2V0SW50ZWdlcgECD3VzZGNfYWxsX2NyZWRpdAQObmV3X2FsbF9jcmVkaXQJAGQCBQphbGxfY3JlZGl0BQ5kZXBvc2l0X2Ftb3VudAQRdHJhbnNhY3Rpb25fYmxvY2sEByRtYXRjaDAJAOkHAQgFAWkNdHJhbnNhY3Rpb25JZAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEJAAIBAhJFcnJvciBibG9jayBudW1iZXIEA3JlcwkA/AcECQEHQWRkcmVzcwEFCnZpcmVzX2RhcHACCnVzZENfc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUEdXNkYwUOZGVwb3NpdF9hbW91bnQFA25pbAMJAAACBQNyZXMFA3JlcwQJdmlyZXNfcmVzBAckbWF0Y2gwBQNyZXMDCQABAgUHJG1hdGNoMAIJTGlzdFtBbnldBAFyBQckbWF0Y2gwBQFyCQACAQIXSW5jb3JyZWN0IGludm9rZSByZXN1bHQDCQAAAgUJdmlyZXNfcmVzBQl2aXJlc19yZXMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgV1c2RjXwkApQgBCAUBaQxvcmlnaW5DYWxsZXICB19jcmVkaXQFD25ld191c2VyX2NyZWRpdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICBXVzZGNfCQClCAEIBQFpDG9yaWdpbkNhbGxlcgIGX2Jsb2NrBRF0cmFuc2FjdGlvbl9ibG9jawkAzAgCCQEMSW50ZWdlckVudHJ5AgIPdXNkY19hbGxfY3JlZGl0BQ5uZXdfYWxsX2NyZWRpdAkAzAgCCQEMSW50ZWdlckVudHJ5AgIOdXNkY19hbGxfYmxvY2sFEXRyYW5zYWN0aW9uX2Jsb2NrBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEQc2VsbF91c2RuX3RpY2tldAEGYW1vdW50BAt1c2VyX2NyZWRpdAkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIFdXNkbl8JAKUIAQgFAWkMb3JpZ2luQ2FsbGVyAgdfY3JlZGl0AwkAZgIFBmFtb3VudAULdXNlcl9jcmVkaXQJAAIBCQCsAgICPnNvcnJ5IHlvdSBjYW4ndCB3aXRoZHJhdyB0aGlzIGFtb3VudCwgYmVjYXVzZSB1PXlvdSBoYXZlIG9ubHkgCQCkAwEFC3VzZXJfY3JlZGl0BA9uZXdfdXNlcl9jcmVkaXQJAGUCBQt1c2VyX2NyZWRpdAUGYW1vdW50BAphbGxfY3JlZGl0CQENdHJ5R2V0SW50ZWdlcgECD3VzZG5fYWxsX2NyZWRpdAQObmV3X2FsbF9jcmVkaXQJAGUCBQphbGxfY3JlZGl0BQZhbW91bnQEEXRyYW5zYWN0aW9uX2Jsb2NrBAckbWF0Y2gwCQDpBwEIBQFpDXRyYW5zYWN0aW9uSWQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhCQACAQISRXJyb3IgYmxvY2sgbnVtYmVyBANyZXMJAPwHBAkBB0FkZHJlc3MBBQp2aXJlc19kYXBwAhB1c2ROX2NhbmNlbFN0YWtlCQDMCAIFBmFtb3VudAUDbmlsBQNuaWwDCQAAAgUDcmVzBQNyZXMECXZpcmVzX3JlcwQHJG1hdGNoMAUDcmVzAwkAAQIFByRtYXRjaDACCUxpc3RbQW55XQQBcgUHJG1hdGNoMAUBcgkAAgECF0luY29ycmVjdCBpbnZva2UgcmVzdWx0AwkAAAIFCXZpcmVzX3JlcwUJdmlyZXNfcmVzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIFdXNkbl8JAKUIAQgFAWkMb3JpZ2luQ2FsbGVyAgdfY3JlZGl0BQ9uZXdfdXNlcl9jcmVkaXQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgV1c2RuXwkApQgBCAUBaQxvcmlnaW5DYWxsZXICBl9ibG9jawURdHJhbnNhY3Rpb25fYmxvY2sJAMwIAgkBDEludGVnZXJFbnRyeQICD3VzZG5fYWxsX2NyZWRpdAUObmV3X2FsbF9jcmVkaXQJAMwIAgkBDEludGVnZXJFbnRyeQICDnVzZG5fYWxsX2Jsb2NrBRF0cmFuc2FjdGlvbl9ibG9jawUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBEHNlbGxfdXNkY190aWNrZXQBBmFtb3VudAQLdXNlcl9jcmVkaXQJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICBXVzZGNfCQClCAEIBQFpDG9yaWdpbkNhbGxlcgIHX2NyZWRpdAMJAGYCBQZhbW91bnQFC3VzZXJfY3JlZGl0CQACAQkArAICAj5zb3JyeSB5b3UgY2FuJ3Qgd2l0aGRyYXcgdGhpcyBhbW91bnQsIGJlY2F1c2UgdT15b3UgaGF2ZSBvbmx5IAkApAMBBQt1c2VyX2NyZWRpdAQPbmV3X3VzZXJfY3JlZGl0CQBlAgULdXNlcl9jcmVkaXQFBmFtb3VudAQKYWxsX2NyZWRpdAkBDXRyeUdldEludGVnZXIBAg91c2RjX2FsbF9jcmVkaXQEDm5ld19hbGxfY3JlZGl0CQBlAgUKYWxsX2NyZWRpdAUGYW1vdW50BBF0cmFuc2FjdGlvbl9ibG9jawQHJG1hdGNoMAkA6QcBCAUBaQ10cmFuc2FjdGlvbklkAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQkAAgECEkVycm9yIGJsb2NrIG51bWJlcgQDcmVzCQD8BwQJAQdBZGRyZXNzAQUKdmlyZXNfZGFwcAIQdXNkQ19jYW5jZWxTdGFrZQkAzAgCBQZhbW91bnQFA25pbAUDbmlsAwkAAAIFA3JlcwUDcmVzBAl2aXJlc19yZXMEByRtYXRjaDAFA3JlcwMJAAECBQckbWF0Y2gwAglMaXN0W0FueV0EAXIFByRtYXRjaDAFAXIJAAIBAhdJbmNvcnJlY3QgaW52b2tlIHJlc3VsdAMJAAACBQl2aXJlc19yZXMFCXZpcmVzX3JlcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICBXVzZGNfCQClCAEIBQFpDG9yaWdpbkNhbGxlcgIHX2NyZWRpdAUPbmV3X3VzZXJfY3JlZGl0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIFdXNkY18JAKUIAQgFAWkMb3JpZ2luQ2FsbGVyAgZfYmxvY2sFEXRyYW5zYWN0aW9uX2Jsb2NrCQDMCAIJAQxJbnRlZ2VyRW50cnkCAg91c2RjX2FsbF9jcmVkaXQFDm5ld19hbGxfY3JlZGl0CQDMCAIJAQxJbnRlZ2VyRW50cnkCAg51c2RjX2FsbF9ibG9jawURdHJhbnNhY3Rpb25fYmxvY2sFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARd1c2RuX2NhbGNfcHJvZml0X2Ftb3VudAADCQECIT0CCQClCAEIBQFpDG9yaWdpbkNhbGxlcgUMYWRtaW5fd2FsbGV0CQACAQIwU29ycnkhIHlvdSBhcmUgbm90IGFsbG93ZWQgdG8gdXNlIHRoaXMgZnVuYWN0aW9uBBZ1c2RuX3Byb2ZpdF9sYXN0X2Jsb2NrCQENdHJ5R2V0SW50ZWdlcgECFnVzZG5fcHJvZml0X2xhc3RfYmxvY2sEF3VzZG5fcHJvZml0X2xhc3RfYW1vdW50CQENdHJ5R2V0SW50ZWdlcgECF3VzZG5fcHJvZml0X2xhc3RfYW1vdW50BBF0cmFuc2FjdGlvbl9ibG9jawQHJG1hdGNoMAkA6QcBCAUBaQ10cmFuc2FjdGlvbklkAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQkAAgECEkVycm9yIGJsb2NrIG51bWJlcgQGYWxmYXJrCQBlAgURdHJhbnNhY3Rpb25fYmxvY2sFFnVzZG5fcHJvZml0X2xhc3RfYmxvY2sDCQBmAgUOYWxmYXJrX3Rlc3RuZXQFBmFsZmFyawkAAgEJAKwCAgkArAICAhdQbGVhc2UgdHJ5IGFnYWluIGFmdGVyIAkApAMBCQBlAgUOYWxmYXJrX3Rlc3RuZXQFBmFsZmFyawIGIGJsb2NrBAx1c2RuX2JhbGFuY2UJAPAHAgUEdGhpcwUEdXNkbgkAzAgCCQEMSW50ZWdlckVudHJ5AgIWdXNkbl9wcm9maXRfbGFzdF9ibG9jawURdHJhbnNhY3Rpb25fYmxvY2sJAMwIAgkBDEludGVnZXJFbnRyeQICF3VzZG5fcHJvZml0X2xhc3RfYW1vdW50BQx1c2RuX2JhbGFuY2UFA25pbAFpARd1c2RuX3NlbmRfcHJvZml0X2Ftb3VudAAEF3VzZG5fcHJvZml0X2xhc3RfYW1vdW50CQENdHJ5R2V0SW50ZWdlcgECF3VzZG5fcHJvZml0X2xhc3RfYW1vdW50AwkAZwIAAAUXdXNkbl9wcm9maXRfbGFzdF9hbW91bnQJAAIBCQCsAgICHHlvdSBkb250IGhhdmUgcHJvZml0IGFtb3VudCAJAKQDAQUXdXNkbl9wcm9maXRfbGFzdF9hbW91bnQECHRyYW5zZmVyCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQxhZG1pbl93YWxsZXQFF3VzZG5fcHJvZml0X2xhc3RfYW1vdW50BQR1c2RuCQDMCAIFCHRyYW5zZmVyBQNuaWwBaQEXdXNkY19jYWxjX3Byb2ZpdF9hbW91bnQAAwkBAiE9AgkApQgBCAUBaQxvcmlnaW5DYWxsZXIFDGFkbWluX3dhbGxldAkAAgECMFNvcnJ5ISB5b3UgYXJlIG5vdCBhbGxvd2VkIHRvIHVzZSB0aGlzIGZ1bmFjdGlvbgQWdXNkY19wcm9maXRfbGFzdF9ibG9jawkBDXRyeUdldEludGVnZXIBAhZ1c2RjX3Byb2ZpdF9sYXN0X2Jsb2NrBBd1c2RjX3Byb2ZpdF9sYXN0X2Ftb3VudAkBDXRyeUdldEludGVnZXIBAhd1c2RjX3Byb2ZpdF9sYXN0X2Ftb3VudAQRdHJhbnNhY3Rpb25fYmxvY2sEByRtYXRjaDAJAOkHAQgFAWkNdHJhbnNhY3Rpb25JZAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEJAAIBAhJFcnJvciBibG9jayBudW1iZXIEBmFsZmFyawkAZQIFEXRyYW5zYWN0aW9uX2Jsb2NrBRZ1c2RjX3Byb2ZpdF9sYXN0X2Jsb2NrAwkAZgIFDmFsZmFya190ZXN0bmV0BQZhbGZhcmsJAAIBCQCsAgIJAKwCAgIXUGxlYXNlIHRyeSBhZ2FpbiBhZnRlciAJAKQDAQkAZQIFDmFsZmFya190ZXN0bmV0BQZhbGZhcmsCBiBibG9jawQMdXNkY19iYWxhbmNlCQDwBwIFBHRoaXMFBHVzZGMJAMwIAgkBDEludGVnZXJFbnRyeQICFnVzZGNfcHJvZml0X2xhc3RfYmxvY2sFEXRyYW5zYWN0aW9uX2Jsb2NrCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhd1c2RjX3Byb2ZpdF9sYXN0X2Ftb3VudAUMdXNkY19iYWxhbmNlBQNuaWwBaQEXdXNkY19zZW5kX3Byb2ZpdF9hbW91bnQABBd1c2RjX3Byb2ZpdF9sYXN0X2Ftb3VudAkBDXRyeUdldEludGVnZXIBAhd1c2RjX3Byb2ZpdF9sYXN0X2Ftb3VudAMJAGcCAAAFF3VzZGNfcHJvZml0X2xhc3RfYW1vdW50CQACAQkArAICAhx5b3UgZG9udCBoYXZlIHByb2ZpdCBhbW91bnQgCQCkAwEFF3VzZGNfcHJvZml0X2xhc3RfYW1vdW50BAh0cmFuc2ZlcgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUMYWRtaW5fd2FsbGV0BRd1c2RjX3Byb2ZpdF9sYXN0X2Ftb3VudAUEdXNkYwkAzAgCBQh0cmFuc2ZlcgUDbmlsAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleZLWYvE=", "height": 2199563, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: none Next: CLwUypmgs1t7qB6TEtGf7HrkDsNmbYhrM37ArPdc6JmU Full:
OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 6 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let usdn = base58'FVXgJ86erBw5GAMeAw1CnYXwQn48BFAEAhRyHPUjbMQB'
5+
6+let usdc = base58'HRut8ESAGXxwvsKJky1V96qRtqyXQd4Apq4GY7TE5yGP'
7+
8+let admin_wallet = "3N3DCngjidivkJbTJwFTEvbYRTffCWVBLCL"
9+
10+let alfark_testnet = 5
11+
12+let vires_dapp = base58'3MzwNdM8LQZEPXq3d4uXvxeZGpBwVQXs9RD'
13+
14+func tryGetInteger (key) = match getInteger(this, key) {
15+ case b: Int =>
16+ b
17+ case _ =>
18+ 0
19+}
20+
21+
22+@Callable(i)
23+func buy_usdn_ticket () = if ((i.payments[0].assetId != usdn))
24+ then throw("Please deposit USD-N token only")
25+ else {
26+ let user_credit = tryGetInteger((("usdn_" + toString(i.originCaller)) + "_credit"))
27+ let deposit_amount = i.payments[0].amount
28+ let new_user_credit = (user_credit + deposit_amount)
29+ let all_credit = tryGetInteger("usdn_all_credit")
30+ let new_all_credit = (all_credit + deposit_amount)
31+ let transaction_block = match transactionHeightById(i.transactionId) {
32+ case a: Int =>
33+ a
34+ case _ =>
35+ throw("Error block number")
36+ }
37+ let res = invoke(Address(vires_dapp), "usdN_stake", nil, [AttachedPayment(usdn, deposit_amount)])
38+ if ((res == res))
39+ then {
40+ let vires_res = match res {
41+ case r: List[Any] =>
42+ r
43+ case _ =>
44+ throw("Incorrect invoke result")
45+ }
46+ if ((vires_res == vires_res))
47+ then [IntegerEntry((("usdn_" + toString(i.originCaller)) + "_credit"), new_user_credit), IntegerEntry((("usdn_" + toString(i.originCaller)) + "_block"), transaction_block), IntegerEntry("usdn_all_credit", new_all_credit), IntegerEntry("usdn_all_block", transaction_block)]
48+ else throw("Strict value is not equal to itself.")
49+ }
50+ else throw("Strict value is not equal to itself.")
51+ }
52+
53+
54+
55+@Callable(i)
56+func buy_usdc_ticket () = if ((i.payments[0].assetId != usdc))
57+ then throw("Please deposit USD-N token only")
58+ else {
59+ let user_credit = tryGetInteger((("usdc_" + toString(i.originCaller)) + "_credit"))
60+ let deposit_amount = i.payments[0].amount
61+ let new_user_credit = (user_credit + deposit_amount)
62+ let all_credit = tryGetInteger("usdc_all_credit")
63+ let new_all_credit = (all_credit + deposit_amount)
64+ let transaction_block = match transactionHeightById(i.transactionId) {
65+ case a: Int =>
66+ a
67+ case _ =>
68+ throw("Error block number")
69+ }
70+ let res = invoke(Address(vires_dapp), "usdC_stake", nil, [AttachedPayment(usdc, deposit_amount)])
71+ if ((res == res))
72+ then {
73+ let vires_res = match res {
74+ case r: List[Any] =>
75+ r
76+ case _ =>
77+ throw("Incorrect invoke result")
78+ }
79+ if ((vires_res == vires_res))
80+ then [IntegerEntry((("usdc_" + toString(i.originCaller)) + "_credit"), new_user_credit), IntegerEntry((("usdc_" + toString(i.originCaller)) + "_block"), transaction_block), IntegerEntry("usdc_all_credit", new_all_credit), IntegerEntry("usdc_all_block", transaction_block)]
81+ else throw("Strict value is not equal to itself.")
82+ }
83+ else throw("Strict value is not equal to itself.")
84+ }
85+
86+
87+
88+@Callable(i)
89+func sell_usdn_ticket (amount) = {
90+ let user_credit = tryGetInteger((("usdn_" + toString(i.originCaller)) + "_credit"))
91+ if ((amount > user_credit))
92+ then throw(("sorry you can't withdraw this amount, because u=you have only " + toString(user_credit)))
93+ else {
94+ let new_user_credit = (user_credit - amount)
95+ let all_credit = tryGetInteger("usdn_all_credit")
96+ let new_all_credit = (all_credit - amount)
97+ let transaction_block = match transactionHeightById(i.transactionId) {
98+ case a: Int =>
99+ a
100+ case _ =>
101+ throw("Error block number")
102+ }
103+ let res = invoke(Address(vires_dapp), "usdN_cancelStake", [amount], nil)
104+ if ((res == res))
105+ then {
106+ let vires_res = match res {
107+ case r: List[Any] =>
108+ r
109+ case _ =>
110+ throw("Incorrect invoke result")
111+ }
112+ if ((vires_res == vires_res))
113+ then [IntegerEntry((("usdn_" + toString(i.originCaller)) + "_credit"), new_user_credit), IntegerEntry((("usdn_" + toString(i.originCaller)) + "_block"), transaction_block), IntegerEntry("usdn_all_credit", new_all_credit), IntegerEntry("usdn_all_block", transaction_block)]
114+ else throw("Strict value is not equal to itself.")
115+ }
116+ else throw("Strict value is not equal to itself.")
117+ }
118+ }
119+
120+
121+
122+@Callable(i)
123+func sell_usdc_ticket (amount) = {
124+ let user_credit = tryGetInteger((("usdc_" + toString(i.originCaller)) + "_credit"))
125+ if ((amount > user_credit))
126+ then throw(("sorry you can't withdraw this amount, because u=you have only " + toString(user_credit)))
127+ else {
128+ let new_user_credit = (user_credit - amount)
129+ let all_credit = tryGetInteger("usdc_all_credit")
130+ let new_all_credit = (all_credit - amount)
131+ let transaction_block = match transactionHeightById(i.transactionId) {
132+ case a: Int =>
133+ a
134+ case _ =>
135+ throw("Error block number")
136+ }
137+ let res = invoke(Address(vires_dapp), "usdC_cancelStake", [amount], nil)
138+ if ((res == res))
139+ then {
140+ let vires_res = match res {
141+ case r: List[Any] =>
142+ r
143+ case _ =>
144+ throw("Incorrect invoke result")
145+ }
146+ if ((vires_res == vires_res))
147+ then [IntegerEntry((("usdc_" + toString(i.originCaller)) + "_credit"), new_user_credit), IntegerEntry((("usdc_" + toString(i.originCaller)) + "_block"), transaction_block), IntegerEntry("usdc_all_credit", new_all_credit), IntegerEntry("usdc_all_block", transaction_block)]
148+ else throw("Strict value is not equal to itself.")
149+ }
150+ else throw("Strict value is not equal to itself.")
151+ }
152+ }
153+
154+
155+
156+@Callable(i)
157+func usdn_calc_profit_amount () = if ((toString(i.originCaller) != admin_wallet))
158+ then throw("Sorry! you are not allowed to use this funaction")
159+ else {
160+ let usdn_profit_last_block = tryGetInteger("usdn_profit_last_block")
161+ let usdn_profit_last_amount = tryGetInteger("usdn_profit_last_amount")
162+ let transaction_block = match transactionHeightById(i.transactionId) {
163+ case a: Int =>
164+ a
165+ case _ =>
166+ throw("Error block number")
167+ }
168+ let alfark = (transaction_block - usdn_profit_last_block)
169+ if ((alfark_testnet > alfark))
170+ then throw((("Please try again after " + toString((alfark_testnet - alfark))) + " block"))
171+ else {
172+ let usdn_balance = assetBalance(this, usdn)
173+[IntegerEntry("usdn_profit_last_block", transaction_block), IntegerEntry("usdn_profit_last_amount", usdn_balance)]
174+ }
175+ }
176+
177+
178+
179+@Callable(i)
180+func usdn_send_profit_amount () = {
181+ let usdn_profit_last_amount = tryGetInteger("usdn_profit_last_amount")
182+ if ((0 >= usdn_profit_last_amount))
183+ then throw(("you dont have profit amount " + toString(usdn_profit_last_amount)))
184+ else {
185+ let transfer = ScriptTransfer(addressFromStringValue(admin_wallet), usdn_profit_last_amount, usdn)
186+[transfer]
187+ }
188+ }
189+
190+
191+
192+@Callable(i)
193+func usdc_calc_profit_amount () = if ((toString(i.originCaller) != admin_wallet))
194+ then throw("Sorry! you are not allowed to use this funaction")
195+ else {
196+ let usdc_profit_last_block = tryGetInteger("usdc_profit_last_block")
197+ let usdc_profit_last_amount = tryGetInteger("usdc_profit_last_amount")
198+ let transaction_block = match transactionHeightById(i.transactionId) {
199+ case a: Int =>
200+ a
201+ case _ =>
202+ throw("Error block number")
203+ }
204+ let alfark = (transaction_block - usdc_profit_last_block)
205+ if ((alfark_testnet > alfark))
206+ then throw((("Please try again after " + toString((alfark_testnet - alfark))) + " block"))
207+ else {
208+ let usdc_balance = assetBalance(this, usdc)
209+[IntegerEntry("usdc_profit_last_block", transaction_block), IntegerEntry("usdc_profit_last_amount", usdc_balance)]
210+ }
211+ }
212+
213+
214+
215+@Callable(i)
216+func usdc_send_profit_amount () = {
217+ let usdc_profit_last_amount = tryGetInteger("usdc_profit_last_amount")
218+ if ((0 >= usdc_profit_last_amount))
219+ then throw(("you dont have profit amount " + toString(usdc_profit_last_amount)))
220+ else {
221+ let transfer = ScriptTransfer(addressFromStringValue(admin_wallet), usdc_profit_last_amount, usdc)
222+[transfer]
223+ }
224+ }
225+
226+
227+@Verifier(tx)
228+func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
229+

github/deemru/w8io/169f3d6 
20.09 ms