w8 · tx · 6Tn···DK9

tx · 6TnXtjpWdaDvQJKtdRt4SMzC8HFm3mGQ5fuBPVEcVDK9

3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk:  -0.00700000 Waves

2022.09.05 15:45 [3281358] smart account 3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "6TnXtjpWdaDvQJKtdRt4SMzC8HFm3mGQ5fuBPVEcVDK9",
    "fee": 700000,
    "feeAssetId": null,
    "timestamp": 1662382000192,
    "version": 1,
    "sender": "3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk",
    "senderPublicKey": "FwXAX9xcWiwbCejtdF8q1Nz8NpJqaVxXKnKK6JoR24pZ",
    "proofs": [
        "2RcvdRhExDrrc81pAQzcYNghYMYKxC4CxKMLXeJuoANzJ256JJmrFDFHAVpfT9FYy9o59FPiLiG8UsvmYtZfEqGs"
    ],
    "script": "base64:BgIdCAISCwoJCAgICAgICAEIEgASBAoCBAQSBAoCBAQcAAtmYWN0b3JzQmFzZQDoBwEQd3JpdGVDb25zdFN0cmluZwIDa2V5BXZhbHVlAwkBASEBCQEJaXNEZWZpbmVkAQkAnQgCBQR0aGlzBQNrZXkJAQtTdHJpbmdFbnRyeQIFA2tleQUFdmFsdWUJAAIBCQCsAgICFWFscmVhZHkgaW5pdGlhbGl6ZWQ6IAUDa2V5AQ13cml0ZUNvbnN0SW50AgNrZXkFdmFsdWUDCQEBIQEJAQlpc0RlZmluZWQBCQCaCAIFBHRoaXMFA2tleQkBDEludGVnZXJFbnRyeQIFA2tleQUFdmFsdWUJAAIBCQCsAgICFWFscmVhZHkgaW5pdGlhbGl6ZWQ6IAUDa2V5AQh3cml0ZUludAIDa2V5BXZhbHVlAwkAZgIAAAUFdmFsdWUJAAIBCQCsAgIJAKwCAgkArAICAhd3cml0aW5nIG5lZ2F0aXZlIHZhbHVlIAkApAMBBQV2YWx1ZQIJIGZvciBrZXkgBQNrZXkJAQxJbnRlZ2VyRW50cnkCBQNrZXkFBXZhbHVlAQhhc1N0cmluZwEFdmFsdWUEByRtYXRjaDAFBXZhbHVlAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAUBcwkAAgECHHdyb25nIHR5cGUsIGV4cGVjdGVkOiBTdHJpbmcBBWFzSW50AQV2YWx1ZQQHJG1hdGNoMAUFdmFsdWUDCQABAgUHJG1hdGNoMAIDSW50BANpbnQFByRtYXRjaDAFA2ludAkAAgECBHNtOjEBBmFzSW50MgEFdmFsdWUEByRtYXRjaDAFBXZhbHVlAwkAAQIFByRtYXRjaDACCihJbnQsIEludCkEAXgFByRtYXRjaDAFAXgEAXQFByRtYXRjaDAJAAIBAhp3cm9uZyB0eXBlLCBleHBlY3RlZDogSW50MgERYXNVc2VyQmFsYW5jZURhdGEBBXZhbHVlBAckbWF0Y2gwBQV2YWx1ZQMJAAECBQckbWF0Y2gwAiIoSW50LCBJbnQsIEludCwgSW50LCBJbnQsIEJvb2xlYW4pBAF4BQckbWF0Y2gwBQF4BAF0BQckbWF0Y2gwCQACAQIBMwELdXNlckJhbGFuY2UCA3JzcgR1c2VyCQERYXNVc2VyQmFsYW5jZURhdGEBCQD8BwQFA3JzcgILdXNlckJhbGFuY2UJAMwIAgUEdXNlcgUDbmlsBQNuaWwBB3Rocm93SWYCCWNvbmRpdGlvbgVlcnJvcgMFCWNvbmRpdGlvbgkAAgEFBWVycm9yBgEIY2hhbmdlQnkCA2tleQV2YWx1ZQkBCHdyaXRlSW50AgUDa2V5CQBkAgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQNrZXkAAAUFdmFsdWUAC2NvbmZpZ1N0b3JlAgZjb25maWcADWNvbmZpZ0FkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMFC2NvbmZpZ1N0b3JlABJtYXliZU9yYWNsZUFkZHJlc3MEByRtYXRjaDAJAJ0IAgUNY29uZmlnQWRkcmVzcwIOb3JhY2xlX2FkZHJlc3MDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQCmCAEFAXMFBHVuaXQABkhFSUdIVAUGaGVpZ2h0AAJ2ZAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFDWNvbmZpZ0FkZHJlc3MCEXZpcmVzX2Rpc3RyaWJ1dG9yAhViYWQgdmlyZXMgZGlzdHJpYnV0b3IAEHByb3RlY3RlZFJlc2VydmUJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFDWNvbmZpZ0FkZHJlc3MCEXByb3RlY3RlZF9yZXNlcnZlAAVtYWluMQkBEUBleHRyTmF0aXZlKDEwNjIpAQkBEUBleHRyTmF0aXZlKDEwNTMpAgUEdGhpcwIFbWFpbjEAC3VzZHRSZXNlcnZlCQERQGV4dHJOYXRpdmUoMTA2MikBCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzAgt1c2R0UmVzZXJ2ZQALdXNkY1Jlc2VydmUJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMCC3VzZGNSZXNlcnZlAANhY2MJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMCA2FjYwAOdXNkblZlc3RpbmdBbGwJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMCDnVzZG5WZXN0aW5nQWxsAAt1c2RuVmVzdGluZwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBEUBleHRyTmF0aXZlKDEwNTMpAgUEdGhpcwILdXNkblZlc3RpbmcAC3VzZG5Bc3NldElkCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzAgt1c2RuQXNzZXRJZAAJdXNkbkJvbnVzCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzAgVib251cwEKbW92ZVN0cmVhbQUDcnNyBmFjdGlvbgRmcm9tBnN0cmluZwNhbXQJAPwHBAUCdmQCBG1vdmUJAMwIAgUDcnNyCQDMCAIFBmFjdGlvbgkAzAgCBQRmcm9tCQDMCAIFBnN0cmluZwkAzAgCBQNhbXQFA25pbAUDbmlsAQlvcEFsbG93ZWQCAm9wCmFzc2V0SWRTdHIEByRtYXRjaDAJAPwHBAUNY29uZmlnQWRkcmVzcwIJb3BBbGxvd2VkCQDMCAIFCmFzc2V0SWRTdHIJAMwIAgUCb3AFA25pbAUDbmlsAwkAAQIFByRtYXRjaDACB0Jvb2xlYW4EAWIFByRtYXRjaDADBQFiBgkAAgECC25vdCBhbGxvd2VkCQACAQIhb3BBbGxvd2VkOiB1bmV4cGVjdGVkIHJlc3VsdCB0eXBlAQphZHZpc2VVc2VyAQNhY2MECWRhdGFXaGFsZQkBCGFzU3RyaW5nAQkA/AcEBQt1c2RuVmVzdGluZwIHYWR2aXNlVQkAzAgCBQNhY2MFA25pbAUDbmlsAwkAAAIFCWRhdGFXaGFsZQUJZGF0YVdoYWxlBAdkYXRhQWxsCQEIYXNTdHJpbmcBCQD8BwQFDnVzZG5WZXN0aW5nQWxsAgdhZHZpc2VVCQDMCAIFA2FjYwUDbmlsBQNuaWwDCQAAAgUHZGF0YUFsbAUHZGF0YUFsbAkArAICCQCsAgIFCWRhdGFXaGFsZQIDIHwgBQdkYXRhQWxsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAFpAQRpbml0CQRjb25mAXQBYwh2ZXN0bkFsbAdhY2NvdW50BG1haW4JdXNkbkFzc2V0BWJvbnVzBXZlc3RuAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQISb25seSBzZWxmIGNhbiBpbml0CQDMCAIJARB3cml0ZUNvbnN0U3RyaW5nAgULY29uZmlnU3RvcmUFBGNvbmYJAMwIAgkBEHdyaXRlQ29uc3RTdHJpbmcCAgt1c2R0UmVzZXJ2ZQUBdAkAzAgCCQEQd3JpdGVDb25zdFN0cmluZwICC3VzZGNSZXNlcnZlBQFjCQDMCAIJARB3cml0ZUNvbnN0U3RyaW5nAgIOdXNkblZlc3RpbmdBbGwFCHZlc3RuQWxsCQDMCAIJARB3cml0ZUNvbnN0U3RyaW5nAgILdXNkblZlc3RpbmcFBXZlc3RuCQDMCAIJARB3cml0ZUNvbnN0U3RyaW5nAgIDYWNjBQdhY2NvdW50CQDMCAIJARB3cml0ZUNvbnN0U3RyaW5nAgIFbWFpbjEFBG1haW4JAMwIAgkBEHdyaXRlQ29uc3RTdHJpbmcCAgt1c2RuQXNzZXRJZAUJdXNkbkFzc2V0CQDMCAIJAQxJbnRlZ2VyRW50cnkCAgVib251cwUFYm9udXMFA25pbAFpAQ1jb252ZXJ0VG9VU0ROAAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIKAQdtb3ZlUnNyAQNyc3IEB3Jlc2VydmUJARFAZXh0ck5hdGl2ZSgxMDYyKQEFA3JzcgQHYXNzZXRJZAkBEUBleHRyTmF0aXZlKDEwNTMpAgUHcmVzZXJ2ZQIHYXNzZXRJZAQGY2hlY2tzCQEJb3BBbGxvd2VkAgIOb3BlbkNvbGxhdGVyYWwFB2Fzc2V0SWQDCQAAAgUGY2hlY2tzBQZjaGVja3MDAwkBAiE9AgUDcnNyCQClCAEFC3VzZHRSZXNlcnZlCQECIT0CBQNyc3IJAKUIAQULdXNkY1Jlc2VydmUHCQACAQIPaW52YWxpZCByZXNlcnZlBANzaEMJAPwHBAUCdmQCCnN5bmNIZWlnaHQJAMwIAgUDcnNyBQNuaWwFA25pbAMJAAACBQNzaEMFA3NoQwQLJHQwNDIzMDQzMTQJAQZhc0ludDIBCQD8BwQFB3Jlc2VydmUCE3N0b3JlZERlcG9zaXRCb3Jyb3cFA25pbAUDbmlsBAx0b3RhbERlcG9zaXQIBQskdDA0MjMwNDMxNAJfMQQJdG90YWxEZWJ0CAULJHQwNDIzMDQzMTQCXzIEBHV0aWwDCQBmAgUMdG90YWxEZXBvc2l0AAAJAJcDAQkAzAgCBQtmYWN0b3JzQmFzZQkAzAgCCQBrAwUJdG90YWxEZWJ0BQtmYWN0b3JzQmFzZQUMdG90YWxEZXBvc2l0BQNuaWwAAAQNdXRpbFRocmVzaG9sZAkBC3ZhbHVlT3JFbHNlAgkAmggCBQ1jb25maWdBZGRyZXNzCQCsAgIFB2Fzc2V0SWQCGV9vcGVuX2NvbGxhdGVyYWxfdGhyZXNvbGQA6AcDCQBmAgUNdXRpbFRocmVzaG9sZAUEdXRpbAkAAgECHW5vdCBhbGxvd2VkOiB1dGlsIDwgdGhyZXNob2xkBANkZXAJAQVhc0ludAEJAPwHBAUHcmVzZXJ2ZQIOdXNlckRlcG9zaXRVU0QJAMwIAgUHYWRkcmVzcwUDbmlsBQNuaWwEBG1vdmUEAnMzCQD8BwQFB3Jlc2VydmUCEnRyYW5zZmVyQVRva2Vuc0ZvcgkAzAgCBQdhZGRyZXNzCQDMCAIFA2FjYwkAzAgCBQNkZXAFA25pbAUDbmlsAwkAAAIFAnMzBQJzMwQEcFJ3MwkBCm1vdmVTdHJlYW0FBQNyc3ICB2RlcG9zaXQFB2FkZHJlc3MFA2FjYwUDZGVwAwkAAAIFBHBSdzMFBHBSdzMFBHVuaXQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4DCQAAAgUEbW92ZQUEbW92ZQUDZGVwCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAJtdwkA/AcEBQt1c2RuVmVzdGluZwISc3RhcnRWZXN0aW5nQWxsRm9yCQDMCAIJAKUIAQgFAWkGY2FsbGVyBQNuaWwFA25pbAMJAAACBQJtdwUCbXcEAm10CQEFYXNJbnQBCQEHbW92ZVJzcgEJAKUIAQULdXNkdFJlc2VydmUDCQAAAgUCbXQFAm10BAJtYwkBBWFzSW50AQkBB21vdmVSc3IBCQClCAEFC3VzZGNSZXNlcnZlAwkAAAIFAm1jBQJtYwQIZGVwVG90YWwJAGQCBQJtdAUCbWMEBXJlaGFiBAd1c2RuQW10CQBrAwUIZGVwVG90YWwJAGQCBQtmYWN0b3JzQmFzZQUJdXNkbkJvbnVzBQtmYWN0b3JzQmFzZQQCd2QJAPwHBAUQcHJvdGVjdGVkUmVzZXJ2ZQIPd2l0aGRyYXdUb01haW4yCQDMCAIFA2FjYwkAzAgCBQt1c2RuQXNzZXRJZAkAzAgCBQd1c2RuQW10BQNuaWwFA25pbAMJAAACBQJ3ZAUCd2QEBXJlaGFiCQD8BwQFDnVzZG5WZXN0aW5nQWxsAgphY2NvdW50Rm9yCQDMCAIFB2FkZHJlc3MFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQt1c2RuQXNzZXRJZAUHdXNkbkFtdAUDbmlsAwkAAAIFBXJlaGFiBQVyZWhhYgUEdW5pdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgMJAAACBQVyZWhhYgUFcmVoYWIECyR0MDU1NDY1NjA4CQEGYXNJbnQyAQkA/AcEBQVtYWluMQIIaGVhbHRoT2YJAMwIAgUHYWRkcmVzcwUDbmlsBQNuaWwEAmJwCAULJHQwNTU0NjU2MDgCXzEEA2JwdQgFCyR0MDU1NDY1NjA4Al8yAwkAZgIFAmJwCQBoAgBkCQBlAgUCYnAFA2JwdQkAAgECKm5vdCBlbm91Z2ggYWRkcmVzcyBoZWFsdGggYWZ0ZXIgbW92ZTogPCAxJQQLJHQwNTcwNjU3NzIJAQZhc0ludDIBCQD8BwQFBW1haW4xAghoZWFsdGhPZgkAzAgCBQNhY2MFA25pbAUDbmlsBAZicF9hY2MIBQskdDA1NzA2NTc3MgJfMQQHYnB1X2FjYwgFCyR0MDU3MDY1NzcyAl8yAwkAZgIFBmJwX2FjYwkAaAIAZAkAZQIFBmJwX2FjYwUHYnB1X2FjYwkAAgECJm5vdCBlbm91Z2ggYWNjIGhlYWx0aCBhZnRlciBtb3ZlOiA8IDElCQDMCAIJAQhjaGFuZ2VCeQIJAKwCAgkArAICBQdhZGRyZXNzAgpfbWlncmF0ZWRfCQERQGV4dHJOYXRpdmUoMTA1MykCBQt1c2R0UmVzZXJ2ZQIHYXNzZXRJZAUCbXQJAMwIAgkBCGNoYW5nZUJ5AgkArAICCQCsAgIFB2FkZHJlc3MCCl9taWdyYXRlZF8JARFAZXh0ck5hdGl2ZSgxMDUzKQIFC3VzZGNSZXNlcnZlAgdhc3NldElkBQJtYwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBFXdpdGhkcmF3VmVzdGVkQWxsVVNETgIFd2hhbGUHcmVndWxhcgQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIECXdoYWxlUGFydAMFB3JlZ3VsYXIJAQVhc0ludAEJAPwHBAUOdXNkblZlc3RpbmdBbGwCE3dpdGhkcmF3VmVzdGVkRm9yVG8JAMwIAgUHYWRkcmVzcwkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAAAAwkAAAIFCXdoYWxlUGFydAUJd2hhbGVQYXJ0BAdyZWdQYXJ0AwUFd2hhbGUJAQVhc0ludAEJAPwHBAULdXNkblZlc3RpbmcCE3dpdGhkcmF3VmVzdGVkRm9yVG8JAMwIAgUHYWRkcmVzcwkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAAAAwkAAAIFB3JlZ1BhcnQFB3JlZ1BhcnQJAJQKAgUDbmlsCQBkAgUJd2hhbGVQYXJ0BQdyZWdQYXJ0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBFXdpdGhkcmF3VmVzdGVkQWxsU1VSRgIFd2hhbGUHcmVndWxhcgkAAgECBHRvZG8At7yqUg==",
    "chainId": 87,
    "height": 3281358,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4jodhEYGkCwQb2G2HEeBuw2xN4oya1H8JWoLxdFsaMtB
Next: 4Tfr9dFptSy2Lz2ckrKXiQkHfXcCFvp7KKaZo4rhzbei

Diff: 
Old New Differences
210 210                                              let bpu_acc = $t057065772._2
211 211                                              if ((bp_acc > (100 * (bp_acc - bpu_acc))))
212 212                                                  then throw("not enough acc health after move: < 1%")
213 -                                                 else [writeConstInt(((address + "_migrated_") + getStringValue(usdtReserve, "assetId")), mt), writeConstInt(((address + "_migrated_") + getStringValue(usdcReserve, "assetId")), mc)]
213 +                                                 else [changeBy(((address + "_migrated_") + getStringValue(usdtReserve, "assetId")), mt), changeBy(((address + "_migrated_") + getStringValue(usdcReserve, "assetId")), mc)]
214 214                                              }
215 215                                      }
216 216                                  else throw("Strict value is not equal to itself.")
245 245  
246 246  
247 247  @Callable(i)
248 - func withdrawVestedAllSURF (whale,regular) = throw("tbd")
248 + func withdrawVestedAllSURF (whale,regular) = throw("todo")
249 249  
250 250  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let factorsBase = 1000
5 5  
6 6  func writeConstString (key,value) = if (!(isDefined(getString(this, key))))
7 7      then StringEntry(key, value)
8 8      else throw(("already initialized: " + key))
9 9  
10 10  
11 11  func writeConstInt (key,value) = if (!(isDefined(getInteger(this, key))))
12 12      then IntegerEntry(key, value)
13 13      else throw(("already initialized: " + key))
14 14  
15 15  
16 16  func writeInt (key,value) = if ((0 > value))
17 17      then throw(((("writing negative value " + toString(value)) + " for key ") + key))
18 18      else IntegerEntry(key, value)
19 19  
20 20  
21 21  func asString (value) = match value {
22 22      case s: String => 
23 23          s
24 24      case _ => 
25 25          throw("wrong type, expected: String")
26 26  }
27 27  
28 28  
29 29  func asInt (value) = match value {
30 30      case int: Int => 
31 31          int
32 32      case _ => 
33 33          throw("sm:1")
34 34  }
35 35  
36 36  
37 37  func asInt2 (value) = match value {
38 38      case x: (Int, Int) => 
39 39          x
40 40      case t => 
41 41          throw("wrong type, expected: Int2")
42 42  }
43 43  
44 44  
45 45  func asUserBalanceData (value) = match value {
46 46      case x: (Int, Int, Int, Int, Int, Boolean) => 
47 47          x
48 48      case t => 
49 49          throw("3")
50 50  }
51 51  
52 52  
53 53  func userBalance (rsr,user) = asUserBalanceData(invoke(rsr, "userBalance", [user], nil))
54 54  
55 55  
56 56  func throwIf (condition,error) = if (condition)
57 57      then throw(error)
58 58      else true
59 59  
60 60  
61 61  func changeBy (key,value) = writeInt(key, (valueOrElse(getInteger(this, key), 0) + value))
62 62  
63 63  
64 64  let configStore = "config"
65 65  
66 66  let configAddress = addressFromStringValue(getStringValue(this, configStore))
67 67  
68 68  let maybeOracleAddress = match getString(configAddress, "oracle_address") {
69 69      case s: String => 
70 70          addressFromString(s)
71 71      case _ => 
72 72          unit
73 73  }
74 74  
75 75  let HEIGHT = height
76 76  
77 77  let vd = addressFromStringValue(valueOrErrorMessage(getString(configAddress, "vires_distributor"), "bad vires distributor"))
78 78  
79 79  let protectedReserve = addressFromStringValue(getStringValue(configAddress, "protected_reserve"))
80 80  
81 81  let main1 = addressFromStringValue(getStringValue(this, "main1"))
82 82  
83 83  let usdtReserve = addressFromStringValue(getStringValue(this, "usdtReserve"))
84 84  
85 85  let usdcReserve = addressFromStringValue(getStringValue(this, "usdcReserve"))
86 86  
87 87  let acc = getStringValue(this, "acc")
88 88  
89 89  let usdnVestingAll = addressFromStringValue(getStringValue(this, "usdnVestingAll"))
90 90  
91 91  let usdnVesting = addressFromStringValue(getStringValue(this, "usdnVesting"))
92 92  
93 93  let usdnAssetId = getStringValue(this, "usdnAssetId")
94 94  
95 95  let usdnBonus = getIntegerValue(this, "bonus")
96 96  
97 97  func moveStream (rsr,action,from,string,amt) = invoke(vd, "move", [rsr, action, from, string, amt], nil)
98 98  
99 99  
100 100  func opAllowed (op,assetIdStr) = match invoke(configAddress, "opAllowed", [assetIdStr, op], nil) {
101 101      case b: Boolean => 
102 102          if (b)
103 103              then true
104 104              else throw("not allowed")
105 105      case _ => 
106 106          throw("opAllowed: unexpected result type")
107 107  }
108 108  
109 109  
110 110  func adviseUser (acc) = {
111 111      let dataWhale = asString(invoke(usdnVesting, "adviseU", [acc], nil))
112 112      if ((dataWhale == dataWhale))
113 113          then {
114 114              let dataAll = asString(invoke(usdnVestingAll, "adviseU", [acc], nil))
115 115              if ((dataAll == dataAll))
116 116                  then ((dataWhale + " | ") + dataAll)
117 117                  else throw("Strict value is not equal to itself.")
118 118              }
119 119          else throw("Strict value is not equal to itself.")
120 120      }
121 121  
122 122  
123 123  @Callable(i)
124 124  func init (conf,t,c,vestnAll,account,main,usdnAsset,bonus,vestn) = if ((i.caller != this))
125 125      then throw("only self can init")
126 126      else [writeConstString(configStore, conf), writeConstString("usdtReserve", t), writeConstString("usdcReserve", c), writeConstString("usdnVestingAll", vestnAll), writeConstString("usdnVesting", vestn), writeConstString("acc", account), writeConstString("main1", main), writeConstString("usdnAssetId", usdnAsset), IntegerEntry("bonus", bonus)]
127 127  
128 128  
129 129  
130 130  @Callable(i)
131 131  func convertToUSDN () = {
132 132      let address = toString(i.caller)
133 133      func moveRsr (rsr) =     {
134 134          let reserve = addressFromStringValue(rsr)
135 135          let assetId = getStringValue(reserve, "assetId")
136 136          let checks = opAllowed("openCollateral", assetId)
137 137          if ((checks == checks))
138 138              then if (if ((rsr != toString(usdtReserve)))
139 139                  then (rsr != toString(usdcReserve))
140 140                  else false)
141 141                  then throw("invalid reserve")
142 142                  else {
143 143                      let shC = invoke(vd, "syncHeight", [rsr], nil)
144 144                      if ((shC == shC))
145 145                          then {
146 146                              let $t042304314 = asInt2(invoke(reserve, "storedDepositBorrow", nil, nil))
147 147                              let totalDeposit = $t042304314._1
148 148                              let totalDebt = $t042304314._2
149 149                              let util = if ((totalDeposit > 0))
150 150                                  then min([factorsBase, fraction(totalDebt, factorsBase, totalDeposit)])
151 151                                  else 0
152 152                              let utilThreshold = valueOrElse(getInteger(configAddress, (assetId + "_open_collateral_thresold")), 1000)
153 153                              if ((utilThreshold > util))
154 154                                  then throw("not allowed: util < threshold")
155 155                                  else {
156 156                                      let dep = asInt(invoke(reserve, "userDepositUSD", [address], nil))
157 157                                      let move = {
158 158                                          let s3 = invoke(reserve, "transferATokensFor", [address, acc, dep], nil)
159 159                                          if ((s3 == s3))
160 160                                              then {
161 161                                                  let pRw3 = moveStream(rsr, "deposit", address, acc, dep)
162 162                                                  if ((pRw3 == pRw3))
163 163                                                      then unit
164 164                                                      else throw("Strict value is not equal to itself.")
165 165                                                  }
166 166                                              else throw("Strict value is not equal to itself.")
167 167                                          }
168 168                                      if ((move == move))
169 169                                          then dep
170 170                                          else throw("Strict value is not equal to itself.")
171 171                                      }
172 172                              }
173 173                          else throw("Strict value is not equal to itself.")
174 174                      }
175 175              else throw("Strict value is not equal to itself.")
176 176          }
177 177  
178 178      let mw = invoke(usdnVesting, "startVestingAllFor", [toString(i.caller)], nil)
179 179      if ((mw == mw))
180 180          then {
181 181              let mt = asInt(moveRsr(toString(usdtReserve)))
182 182              if ((mt == mt))
183 183                  then {
184 184                      let mc = asInt(moveRsr(toString(usdcReserve)))
185 185                      if ((mc == mc))
186 186                          then {
187 187                              let depTotal = (mt + mc)
188 188                              let rehab = {
189 189                                  let usdnAmt = fraction(depTotal, (factorsBase + usdnBonus), factorsBase)
190 190                                  let wd = invoke(protectedReserve, "withdrawToMain2", [acc, usdnAssetId, usdnAmt], nil)
191 191                                  if ((wd == wd))
192 192                                      then {
193 193                                          let rehab = invoke(usdnVestingAll, "accountFor", [address], [AttachedPayment(fromBase58String(usdnAssetId), usdnAmt)])
194 194                                          if ((rehab == rehab))
195 195                                              then unit
196 196                                              else throw("Strict value is not equal to itself.")
197 197                                          }
198 198                                      else throw("Strict value is not equal to itself.")
199 199                                  }
200 200                              if ((rehab == rehab))
201 201                                  then {
202 202                                      let $t055465608 = asInt2(invoke(main1, "healthOf", [address], nil))
203 203                                      let bp = $t055465608._1
204 204                                      let bpu = $t055465608._2
205 205                                      if ((bp > (100 * (bp - bpu))))
206 206                                          then throw("not enough address health after move: < 1%")
207 207                                          else {
208 208                                              let $t057065772 = asInt2(invoke(main1, "healthOf", [acc], nil))
209 209                                              let bp_acc = $t057065772._1
210 210                                              let bpu_acc = $t057065772._2
211 211                                              if ((bp_acc > (100 * (bp_acc - bpu_acc))))
212 212                                                  then throw("not enough acc health after move: < 1%")
213 -                                                 else [writeConstInt(((address + "_migrated_") + getStringValue(usdtReserve, "assetId")), mt), writeConstInt(((address + "_migrated_") + getStringValue(usdcReserve, "assetId")), mc)]
213 +                                                 else [changeBy(((address + "_migrated_") + getStringValue(usdtReserve, "assetId")), mt), changeBy(((address + "_migrated_") + getStringValue(usdcReserve, "assetId")), mc)]
214 214                                              }
215 215                                      }
216 216                                  else throw("Strict value is not equal to itself.")
217 217                              }
218 218                          else throw("Strict value is not equal to itself.")
219 219                      }
220 220                  else throw("Strict value is not equal to itself.")
221 221              }
222 222          else throw("Strict value is not equal to itself.")
223 223      }
224 224  
225 225  
226 226  
227 227  @Callable(i)
228 228  func withdrawVestedAllUSDN (whale,regular) = {
229 229      let address = toString(i.caller)
230 230      let whalePart = if (regular)
231 231          then asInt(invoke(usdnVestingAll, "withdrawVestedForTo", [address, address], nil))
232 232          else 0
233 233      if ((whalePart == whalePart))
234 234          then {
235 235              let regPart = if (whale)
236 236                  then asInt(invoke(usdnVesting, "withdrawVestedForTo", [address, address], nil))
237 237                  else 0
238 238              if ((regPart == regPart))
239 239                  then $Tuple2(nil, (whalePart + regPart))
240 240                  else throw("Strict value is not equal to itself.")
241 241              }
242 242          else throw("Strict value is not equal to itself.")
243 243      }
244 244  
245 245  
246 246  
247 247  @Callable(i)
248 - func withdrawVestedAllSURF (whale,regular) = throw("tbd")
248 + func withdrawVestedAllSURF (whale,regular) = throw("todo")
249 249  
250 250

Old	New		Differences
210	210		let bpu_acc = $t057065772._2
211	211		if ((bp_acc > (100 * (bp_acc - bpu_acc))))
212	212		then throw("not enough acc health after move: < 1%")
213		-	else [~~writeConstInt~~(((address + "_migrated_") + getStringValue(usdtReserve, "assetId")), mt), ~~writeConstInt~~(((address + "_migrated_") + getStringValue(usdcReserve, "assetId")), mc)]
	213	+	else [changeBy(((address + "_migrated_") + getStringValue(usdtReserve, "assetId")), mt), changeBy(((address + "_migrated_") + getStringValue(usdcReserve, "assetId")), mc)]
214	214		}
215	215		}
216	216		else throw("Strict value is not equal to itself.")

245	245
246	246
247	247		@Callable(i)
248		-	func withdrawVestedAllSURF (whale,regular) = throw("~~tbd~~")
	248	+	func withdrawVestedAllSURF (whale,regular) = throw("todo")
249	249
250	250

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let factorsBase = 1000
5	5
6	6		func writeConstString (key,value) = if (!(isDefined(getString(this, key))))
7	7		then StringEntry(key, value)
8	8		else throw(("already initialized: " + key))
9	9
10	10
11	11		func writeConstInt (key,value) = if (!(isDefined(getInteger(this, key))))
12	12		then IntegerEntry(key, value)
13	13		else throw(("already initialized: " + key))
14	14
15	15
16	16		func writeInt (key,value) = if ((0 > value))
17	17		then throw(((("writing negative value " + toString(value)) + " for key ") + key))
18	18		else IntegerEntry(key, value)
19	19
20	20
21	21		func asString (value) = match value {
22	22		case s: String =>
23	23		s
24	24		case _ =>
25	25		throw("wrong type, expected: String")
26	26		}
27	27
28	28
29	29		func asInt (value) = match value {
30	30		case int: Int =>
31	31		int
32	32		case _ =>
33	33		throw("sm:1")
34	34		}
35	35
36	36
37	37		func asInt2 (value) = match value {
38	38		case x: (Int, Int) =>
39	39		x
40	40		case t =>
41	41		throw("wrong type, expected: Int2")
42	42		}
43	43
44	44
45	45		func asUserBalanceData (value) = match value {
46	46		case x: (Int, Int, Int, Int, Int, Boolean) =>
47	47		x
48	48		case t =>
49	49		throw("3")
50	50		}
51	51
52	52
53	53		func userBalance (rsr,user) = asUserBalanceData(invoke(rsr, "userBalance", [user], nil))
54	54
55	55
56	56		func throwIf (condition,error) = if (condition)
57	57		then throw(error)
58	58		else true
59	59
60	60
61	61		func changeBy (key,value) = writeInt(key, (valueOrElse(getInteger(this, key), 0) + value))
62	62
63	63
64	64		let configStore = "config"
65	65
66	66		let configAddress = addressFromStringValue(getStringValue(this, configStore))
67	67
68	68		let maybeOracleAddress = match getString(configAddress, "oracle_address") {
69	69		case s: String =>
70	70		addressFromString(s)
71	71		case _ =>
72	72		unit
73	73		}
74	74
75	75		let HEIGHT = height
76	76
77	77		let vd = addressFromStringValue(valueOrErrorMessage(getString(configAddress, "vires_distributor"), "bad vires distributor"))
78	78
79	79		let protectedReserve = addressFromStringValue(getStringValue(configAddress, "protected_reserve"))
80	80
81	81		let main1 = addressFromStringValue(getStringValue(this, "main1"))
82	82
83	83		let usdtReserve = addressFromStringValue(getStringValue(this, "usdtReserve"))
84	84
85	85		let usdcReserve = addressFromStringValue(getStringValue(this, "usdcReserve"))
86	86
87	87		let acc = getStringValue(this, "acc")
88	88
89	89		let usdnVestingAll = addressFromStringValue(getStringValue(this, "usdnVestingAll"))
90	90
91	91		let usdnVesting = addressFromStringValue(getStringValue(this, "usdnVesting"))
92	92
93	93		let usdnAssetId = getStringValue(this, "usdnAssetId")
94	94
95	95		let usdnBonus = getIntegerValue(this, "bonus")
96	96
97	97		func moveStream (rsr,action,from,string,amt) = invoke(vd, "move", [rsr, action, from, string, amt], nil)
98	98
99	99
100	100		func opAllowed (op,assetIdStr) = match invoke(configAddress, "opAllowed", [assetIdStr, op], nil) {
101	101		case b: Boolean =>
102	102		if (b)
103	103		then true
104	104		else throw("not allowed")
105	105		case _ =>
106	106		throw("opAllowed: unexpected result type")
107	107		}
108	108
109	109
110	110		func adviseUser (acc) = {
111	111		let dataWhale = asString(invoke(usdnVesting, "adviseU", [acc], nil))
112	112		if ((dataWhale == dataWhale))
113	113		then {
114	114		let dataAll = asString(invoke(usdnVestingAll, "adviseU", [acc], nil))
115	115		if ((dataAll == dataAll))
116	116		then ((dataWhale + " \| ") + dataAll)
117	117		else throw("Strict value is not equal to itself.")
118	118		}
119	119		else throw("Strict value is not equal to itself.")
120	120		}
121	121
122	122
123	123		@Callable(i)
124	124		func init (conf,t,c,vestnAll,account,main,usdnAsset,bonus,vestn) = if ((i.caller != this))
125	125		then throw("only self can init")
126	126		else [writeConstString(configStore, conf), writeConstString("usdtReserve", t), writeConstString("usdcReserve", c), writeConstString("usdnVestingAll", vestnAll), writeConstString("usdnVesting", vestn), writeConstString("acc", account), writeConstString("main1", main), writeConstString("usdnAssetId", usdnAsset), IntegerEntry("bonus", bonus)]
127	127
128	128
129	129
130	130		@Callable(i)
131	131		func convertToUSDN () = {
132	132		let address = toString(i.caller)
133	133		func moveRsr (rsr) = {
134	134		let reserve = addressFromStringValue(rsr)
135	135		let assetId = getStringValue(reserve, "assetId")
136	136		let checks = opAllowed("openCollateral", assetId)
137	137		if ((checks == checks))
138	138		then if (if ((rsr != toString(usdtReserve)))
139	139		then (rsr != toString(usdcReserve))
140	140		else false)
141	141		then throw("invalid reserve")
142	142		else {
143	143		let shC = invoke(vd, "syncHeight", [rsr], nil)
144	144		if ((shC == shC))
145	145		then {
146	146		let $t042304314 = asInt2(invoke(reserve, "storedDepositBorrow", nil, nil))
147	147		let totalDeposit = $t042304314._1
148	148		let totalDebt = $t042304314._2
149	149		let util = if ((totalDeposit > 0))
150	150		then min([factorsBase, fraction(totalDebt, factorsBase, totalDeposit)])
151	151		else 0
152	152		let utilThreshold = valueOrElse(getInteger(configAddress, (assetId + "_open_collateral_thresold")), 1000)
153	153		if ((utilThreshold > util))
154	154		then throw("not allowed: util < threshold")
155	155		else {
156	156		let dep = asInt(invoke(reserve, "userDepositUSD", [address], nil))
157	157		let move = {
158	158		let s3 = invoke(reserve, "transferATokensFor", [address, acc, dep], nil)
159	159		if ((s3 == s3))
160	160		then {
161	161		let pRw3 = moveStream(rsr, "deposit", address, acc, dep)
162	162		if ((pRw3 == pRw3))
163	163		then unit
164	164		else throw("Strict value is not equal to itself.")
165	165		}
166	166		else throw("Strict value is not equal to itself.")
167	167		}
168	168		if ((move == move))
169	169		then dep
170	170		else throw("Strict value is not equal to itself.")
171	171		}
172	172		}
173	173		else throw("Strict value is not equal to itself.")
174	174		}
175	175		else throw("Strict value is not equal to itself.")
176	176		}
177	177
178	178		let mw = invoke(usdnVesting, "startVestingAllFor", [toString(i.caller)], nil)
179	179		if ((mw == mw))
180	180		then {
181	181		let mt = asInt(moveRsr(toString(usdtReserve)))
182	182		if ((mt == mt))
183	183		then {
184	184		let mc = asInt(moveRsr(toString(usdcReserve)))
185	185		if ((mc == mc))
186	186		then {
187	187		let depTotal = (mt + mc)
188	188		let rehab = {
189	189		let usdnAmt = fraction(depTotal, (factorsBase + usdnBonus), factorsBase)
190	190		let wd = invoke(protectedReserve, "withdrawToMain2", [acc, usdnAssetId, usdnAmt], nil)
191	191		if ((wd == wd))
192	192		then {
193	193		let rehab = invoke(usdnVestingAll, "accountFor", [address], [AttachedPayment(fromBase58String(usdnAssetId), usdnAmt)])
194	194		if ((rehab == rehab))
195	195		then unit
196	196		else throw("Strict value is not equal to itself.")
197	197		}
198	198		else throw("Strict value is not equal to itself.")
199	199		}
200	200		if ((rehab == rehab))
201	201		then {
202	202		let $t055465608 = asInt2(invoke(main1, "healthOf", [address], nil))
203	203		let bp = $t055465608._1
204	204		let bpu = $t055465608._2
205	205		if ((bp > (100 * (bp - bpu))))
206	206		then throw("not enough address health after move: < 1%")
207	207		else {
208	208		let $t057065772 = asInt2(invoke(main1, "healthOf", [acc], nil))
209	209		let bp_acc = $t057065772._1
210	210		let bpu_acc = $t057065772._2
211	211		if ((bp_acc > (100 * (bp_acc - bpu_acc))))
212	212		then throw("not enough acc health after move: < 1%")
213		-	else [~~writeConstInt~~(((address + "_migrated_") + getStringValue(usdtReserve, "assetId")), mt), ~~writeConstInt~~(((address + "_migrated_") + getStringValue(usdcReserve, "assetId")), mc)]
	213	+	else [changeBy(((address + "_migrated_") + getStringValue(usdtReserve, "assetId")), mt), changeBy(((address + "_migrated_") + getStringValue(usdcReserve, "assetId")), mc)]
214	214		}
215	215		}
216	216		else throw("Strict value is not equal to itself.")
217	217		}
218	218		else throw("Strict value is not equal to itself.")
219	219		}
220	220		else throw("Strict value is not equal to itself.")
221	221		}
222	222		else throw("Strict value is not equal to itself.")
223	223		}
224	224
225	225
226	226
227	227		@Callable(i)
228	228		func withdrawVestedAllUSDN (whale,regular) = {
229	229		let address = toString(i.caller)
230	230		let whalePart = if (regular)
231	231		then asInt(invoke(usdnVestingAll, "withdrawVestedForTo", [address, address], nil))
232	232		else 0
233	233		if ((whalePart == whalePart))
234	234		then {
235	235		let regPart = if (whale)
236	236		then asInt(invoke(usdnVesting, "withdrawVestedForTo", [address, address], nil))
237	237		else 0
238	238		if ((regPart == regPart))
239	239		then $Tuple2(nil, (whalePart + regPart))
240	240		else throw("Strict value is not equal to itself.")
241	241		}
242	242		else throw("Strict value is not equal to itself.")
243	243		}
244	244
245	245
246	246
247	247		@Callable(i)
248		-	func withdrawVestedAllSURF (whale,regular) = throw("~~tbd~~")
	248	+	func withdrawVestedAllSURF (whale,regular) = throw("todo")
249	249
250	250

github/deemru/w8io/6500d08 
36.02 ms ◑