w8 · tx · 4bq···9PJ

tx · 4bqmQ7FBJubFQ1x7VGeeiTsrhHD8zohN3tShLrDLe9PJ

3NCWFHDzdPHZC6636ZkMLNDup9mjpbTLs7h:  -0.01300000 Waves

2024.02.12 14:14 [2972965] smart account 3NCWFHDzdPHZC6636ZkMLNDup9mjpbTLs7h > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "4bqmQ7FBJubFQ1x7VGeeiTsrhHD8zohN3tShLrDLe9PJ",
    "fee": 1300000,
    "feeAssetId": null,
    "timestamp": 1707736492536,
    "version": 2,
    "chainId": 84,
    "sender": "3NCWFHDzdPHZC6636ZkMLNDup9mjpbTLs7h",
    "senderPublicKey": "3z8Q6Zu3KppVmn6fJJvrLc1Wo3krVHSvfaNcerm82md2",
    "proofs": [
        "3YVdi2s2jZHRg9CKb4xMiJASMSqxdu74pzBjsrCGbxQKPzowhPUqwjSE48JPcRttGZ3ZVXWkyhhywqvecRWmTLGA"
    ],
    "script": "base64:BgIqCAISAwoBARIDCgEIEgQKAggIEgMKAQgSBAoCCAESBAoCCAESAwoBARIAJAAMY29udHJhY3RGaWxlAhFsMm1wX2xlYXNpbmcucmlkZQADU0VQAgJfXwAGc2NhbGU4AIDC1y8BCHRocm93RXJyAQNtc2cJAAIBCQCsAgIJAKwCAgUMY29udHJhY3RGaWxlAgI6IAUDbXNnAAprZXlBc3NldElkCQC5CQIJAMwIAgICJXMJAMwIAgIHYXNzZXRJZAUDbmlsBQNTRVAAEWtleVBlcmlvZE9mZnNldElkCQC5CQIJAMwIAgICJXMJAMwIAgIIb2Zmc2V0SWQFA25pbAUDU0VQABVrZXlQZXJpb2RPZmZzZXRIZWlnaHQJALkJAgkAzAgCAgIlcwkAzAgCAgxvZmZzZXRIZWlnaHQFA25pbAUDU0VQAA9rZXlQZXJpb2RMZW5ndGgJALkJAgkAzAgCAgIlcwkAzAgCAgxwZXJpb2RMZW5ndGgFA25pbAUDU0VQAA5wZXJpb2RPZmZzZXRJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBRFrZXlQZXJpb2RPZmZzZXRJZAAAAAxwZXJpb2RMZW5ndGgJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUPa2V5UGVyaW9kTGVuZ3RoAJBOABJwZXJpb2RPZmZzZXRIZWlnaHQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUVa2V5UGVyaW9kT2Zmc2V0SGVpZ2h0AP///////////wEAD2N1cnJlbnRQZXJpb2RJZAMDCQBmAgUGaGVpZ2h0BRJwZXJpb2RPZmZzZXRIZWlnaHQJAQIhPQIFEnBlcmlvZE9mZnNldEhlaWdodAD///////////8BBwkAZAIJAGkCCQBlAgUGaGVpZ2h0BRJwZXJpb2RPZmZzZXRIZWlnaHQFDHBlcmlvZExlbmd0aAUOcGVyaW9kT2Zmc2V0SWQJAJYDAQkAzAgCAAAJAMwIAgkAZQIFDnBlcmlvZE9mZnNldElkAAEFA25pbAATY3VycmVudFBlcmlvZEhlaWdodAkAZAIFEnBlcmlvZE9mZnNldEhlaWdodAkAaAIJAGUCBQ9jdXJyZW50UGVyaW9kSWQFDnBlcmlvZE9mZnNldElkBQxwZXJpb2RMZW5ndGgAEG5leHRQZXJpb2RIZWlnaHQJAGQCBRNjdXJyZW50UGVyaW9kSGVpZ2h0BQxwZXJpb2RMZW5ndGgBEmtleUxlYXNpbmdOb2RlRGF0YQELbm9kZUFkZHJlc3MJALkJAgkAzAgCAgIlcwkAzAgCBQtub2RlQWRkcmVzcwUDbmlsBQNTRVABFmtleVVzZXJMZWFzaW5nTm9kZUxpc3QBC3VzZXJBZGRyZXNzCQC5CQIJAMwIAgIEJXMlcwkAzAgCAhN1c2VyTGVhc2luZ05vZGVMaXN0CQDMCAIFC3VzZXJBZGRyZXNzBQNuaWwFA1NFUAEWa2V5VXNlckxlYXNpbmdOb2RlRGF0YQILdXNlckFkZHJlc3MLbm9kZUFkZHJlc3MJALkJAgkAzAgCAgQlcyVzCQDMCAIFC25vZGVBZGRyZXNzCQDMCAIFC3VzZXJBZGRyZXNzBQNuaWwFA1NFUAEOa2V5VXNlclRvQ2xhaW0BC3VzZXJBZGRyZXNzCQC5CQIJAMwIAgIEJXMlcwkAzAgCAgd0b0NsYWltCQDMCAIFC3VzZXJBZGRyZXNzBQNuaWwFA1NFUAANYXNzZXRJZFN0cmluZwkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzBQprZXlBc3NldElkAgVXQVZFUwAMYXNzZXRJZEJ5dGVzAwkAAAIFDWFzc2V0SWRTdHJpbmcCBVdBVkVTBQR1bml0CQDZBAEFDWFzc2V0SWRTdHJpbmcBDmlzVmFsaWRBZGRyZXNzAQdhZGRyZXNzBAckbWF0Y2gwCQCmCAEFB2FkZHJlc3MDCQABAgUHJG1hdGNoMAIHQWRkcmVzcwQBYQUHJG1hdGNoMAYHARNnZXRMZWFzaW5nTm9kZUVudHJ5Awtub2RlQWRkcmVzcw1jdXJyZW50TGVhc2VkCm5leHRMZWFzZWQEC3ZhbHVlU3RyaW5nCQC5CQIJAMwIAgIIJWQlZCVkJWQJAMwIAgkApAMBBRNjdXJyZW50UGVyaW9kSGVpZ2h0CQDMCAIJAKQDAQUNY3VycmVudExlYXNlZAkAzAgCCQCkAwEFEG5leHRQZXJpb2RIZWlnaHQJAMwIAgkApAMBBQpuZXh0TGVhc2VkBQNuaWwFA1NFUAkBC1N0cmluZ0VudHJ5AgkBEmtleUxlYXNpbmdOb2RlRGF0YQEFC25vZGVBZGRyZXNzBQt2YWx1ZVN0cmluZwESZ2V0TGVhc2luZ05vZGVEYXRhAQtub2RlQWRkcmVzcwQUbGVhc2luZ0RhdGFTdHJpbmdSYXcJAJ0IAgUEdGhpcwkBEmtleUxlYXNpbmdOb2RlRGF0YQEFC25vZGVBZGRyZXNzBAckbWF0Y2gwBRRsZWFzaW5nRGF0YVN0cmluZ1JhdwMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAmRzBQckbWF0Y2gwBAhkYXRhTGlzdAkAtQkCBQJkcwUDU0VQBBFub2RlQ3VycmVudFBlcmlvZAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCGRhdGFMaXN0AAEEEW5vZGVDdXJyZW50TGVhc2VkCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIZGF0YUxpc3QAAgQObm9kZU5leHRQZXJpb2QJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhkYXRhTGlzdAADBA5ub2RlTmV4dExlYXNlZAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCGRhdGFMaXN0AAQDCQBmAgUObm9kZU5leHRQZXJpb2QFBmhlaWdodAkAlAoCBRFub2RlQ3VycmVudExlYXNlZAUObm9kZU5leHRMZWFzZWQJAJQKAgUObm9kZU5leHRMZWFzZWQFDm5vZGVOZXh0TGVhc2VkCQCUCgIAAAAAARNnZXRVc2VyTGVhc2luZ0VudHJ5Bgtub2RlQWRkcmVzcwt1c2VyQWRkcmVzcxF1c2VyQ3VycmVudFBlcmlvZBF1c2VyQ3VycmVudExlYXNlZA51c2VyTmV4dFBlcmlvZA51c2VyTmV4dExlYXNlZAQLdmFsdWVTdHJpbmcJALkJAgkAzAgCAgglZCVkJWQlZAkAzAgCCQCkAwEFEXVzZXJDdXJyZW50UGVyaW9kCQDMCAIJAKQDAQURdXNlckN1cnJlbnRMZWFzZWQJAMwIAgkApAMBBQ51c2VyTmV4dFBlcmlvZAkAzAgCCQCkAwEFDnVzZXJOZXh0TGVhc2VkBQNuaWwFA1NFUAkBC1N0cmluZ0VudHJ5AgkBFmtleVVzZXJMZWFzaW5nTm9kZURhdGECBQt1c2VyQWRkcmVzcwULbm9kZUFkZHJlc3MFC3ZhbHVlU3RyaW5nARJnZXRVc2VyTGVhc2luZ0RhdGECC25vZGVBZGRyZXNzC3VzZXJBZGRyZXNzBBRsZWFzaW5nRGF0YVN0cmluZ1JhdwkAnQgCBQR0aGlzCQEWa2V5VXNlckxlYXNpbmdOb2RlRGF0YQIFC3VzZXJBZGRyZXNzBQtub2RlQWRkcmVzcwQHJG1hdGNoMAUUbGVhc2luZ0RhdGFTdHJpbmdSYXcDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAJkcwUHJG1hdGNoMAQIZGF0YUxpc3QJALUJAgUCZHMFA1NFUAQRdXNlckN1cnJlbnRQZXJpb2QJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhkYXRhTGlzdAABBBF1c2VyQ3VycmVudExlYXNlZAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCGRhdGFMaXN0AAIEDnVzZXJOZXh0UGVyaW9kCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIZGF0YUxpc3QAAwQOdXNlck5leHRMZWFzZWQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhkYXRhTGlzdAAEAwkAZgIFDnVzZXJOZXh0UGVyaW9kBQZoZWlnaHQJAJYKBAURdXNlckN1cnJlbnRQZXJpb2QFEXVzZXJDdXJyZW50TGVhc2VkBQ51c2VyTmV4dFBlcmlvZAUOdXNlck5leHRMZWFzZWQJAJYKBAUTY3VycmVudFBlcmlvZEhlaWdodAUOdXNlck5leHRMZWFzZWQFEG5leHRQZXJpb2RIZWlnaHQFDnVzZXJOZXh0TGVhc2VkCQCWCgQAAAAAAAAAAAETZ2V0VXNlclRvQ2xhaW1FbnRyeQULdXNlckFkZHJlc3MNY3VycmVudFBlcmlvZAd0b0NsYWltCm5leHRQZXJpb2QIdG9VbmxvY2sEC3ZhbHVlU3RyaW5nCQC5CQIJAMwIAgIIJWQlZCVkJWQJAMwIAgkApAMBBQ1jdXJyZW50UGVyaW9kCQDMCAIJAKQDAQUHdG9DbGFpbQkAzAgCCQCkAwEFCm5leHRQZXJpb2QJAMwIAgkApAMBBQh0b1VubG9jawUDbmlsBQNTRVAJAQtTdHJpbmdFbnRyeQIJAQ5rZXlVc2VyVG9DbGFpbQEFC3VzZXJBZGRyZXNzBQt2YWx1ZVN0cmluZwEVZ2V0VXNlclRvQ2xhaW1CYWxhbmNlAQt1c2VyQWRkcmVzcwQSdXNlclRvQ2xhaW1EYXRhUmF3CQCdCAIFBHRoaXMJAQ5rZXlVc2VyVG9DbGFpbQEFC3VzZXJBZGRyZXNzBAckbWF0Y2gwBRJ1c2VyVG9DbGFpbURhdGFSYXcDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAJkcwUHJG1hdGNoMAQIZGF0YUxpc3QJALUJAgUCZHMFA1NFUAQNY3VycmVudFBlcmlvZAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCGRhdGFMaXN0AAEEB3RvQ2xhaW0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhkYXRhTGlzdAACBApuZXh0UGVyaW9kCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIZGF0YUxpc3QAAwQIdG9VbmxvY2sJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhkYXRhTGlzdAAEAwkAZgIFCm5leHRQZXJpb2QFBmhlaWdodAkAlgoEBQ1jdXJyZW50UGVyaW9kBQd0b0NsYWltBQpuZXh0UGVyaW9kBQh0b1VubG9jawkAlgoEBRNjdXJyZW50UGVyaW9kSGVpZ2h0CQBkAgUHdG9DbGFpbQUIdG9VbmxvY2sFEG5leHRQZXJpb2RIZWlnaHQAAAkAlgoEAAAAAAAAAAABFmdldFVzZXJMZWFzaW5nTm9kZUxpc3QBC3VzZXJBZGRyZXNzBBRsZWFzaW5nRGF0YVN0cmluZ1JhdwkAnQgCBQR0aGlzCQEWa2V5VXNlckxlYXNpbmdOb2RlTGlzdAEFC3VzZXJBZGRyZXNzBAckbWF0Y2gwBRRsZWFzaW5nRGF0YVN0cmluZ1JhdwMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAmRzBQckbWF0Y2gwBAhkYXRhTGlzdAkAvQkCBQJkcwUDU0VQBQhkYXRhTGlzdAUDbmlsARRnZXRVc2VyTm9kZUxpc3RFbnRyeQILdXNlckFkZHJlc3MIbm9kZUxpc3QDCQAAAgkAkAMBBQhub2RlTGlzdAAACQELRGVsZXRlRW50cnkBCQEWa2V5VXNlckxlYXNpbmdOb2RlTGlzdAEFC3VzZXJBZGRyZXNzCQELU3RyaW5nRW50cnkCCQEWa2V5VXNlckxlYXNpbmdOb2RlTGlzdAEFC3VzZXJBZGRyZXNzCQC7CQIFCG5vZGVMaXN0BQNTRVABEWFkZE5vZGVUb05vZGVMaXN0Agt1c2VyQWRkcmVzcwtub2RlQWRkcmVzcwQIbm9kZUxpc3QJARZnZXRVc2VyTGVhc2luZ05vZGVMaXN0AQULdXNlckFkZHJlc3MDCQEPY29udGFpbnNFbGVtZW50AgUIbm9kZUxpc3QFC25vZGVBZGRyZXNzBQhub2RlTGlzdAkAzQgCBQhub2RlTGlzdAULbm9kZUFkZHJlc3MBFnJlbW92ZU5vZGVGcm9tTm9kZUxpc3QCC3VzZXJBZGRyZXNzC25vZGVBZGRyZXNzBAhub2RlTGlzdAkBFmdldFVzZXJMZWFzaW5nTm9kZUxpc3QBBQt1c2VyQWRkcmVzcwQHJG1hdGNoMAkAzwgCBQhub2RlTGlzdAULbm9kZUFkZHJlc3MDCQABAgUHJG1hdGNoMAIDSW50BAVpbmRleAUHJG1hdGNoMAkA0QgCBQhub2RlTGlzdAUFaW5kZXgFCG5vZGVMaXN0AQ9nZXRTdGFrZUFjdGlvbnMDC25vZGVBZGRyZXNzC3VzZXJBZGRyZXNzAWkEBmNoZWNrcwkAzAgCAwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQYJAQh0aHJvd0VycgECIHBheW1lbnQgc2l6ZSBzaG91bGQgYmUgZXhhY3RseSAxCQDMCAIDCQAAAggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQxhc3NldElkQnl0ZXMGCQEIdGhyb3dFcnIBCQC5CQIJAMwIAgIacGF5bWVudCBhc3NldElkIHNob3VsZCBiZToJAMwIAgUNYXNzZXRJZFN0cmluZwUDbmlsAgEgCQDMCAIDCQEOaXNWYWxpZEFkZHJlc3MBBQtub2RlQWRkcmVzcwYJAQh0aHJvd0VycgEJALkJAgkAzAgCAhpub2RlIGFkZHJlc3MgaXMgbm90IHZhbGlkOgkAzAgCBQtub2RlQWRkcmVzcwUDbmlsAgEgCQDMCAIDCQEOaXNWYWxpZEFkZHJlc3MBBQt1c2VyQWRkcmVzcwYJAQh0aHJvd0VycgEJALkJAgkAzAgCAhp1c2VyIGFkZHJlc3MgaXMgbm90IHZhbGlkOgkAzAgCBQt1c2VyQWRkcmVzcwUDbmlsAgEgBQNuaWwDCQAAAgUGY2hlY2tzBQZjaGVja3MEEXVzZXJMZWFzaW5nQW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQLJHQwNjkzNDcwMDcJARJnZXRMZWFzaW5nTm9kZURhdGEBBQtub2RlQWRkcmVzcwQRbm9kZUN1cnJlbnRMZWFzZWQIBQskdDA2OTM0NzAwNwJfMQQObm9kZU5leHRMZWFzZWQIBQskdDA2OTM0NzAwNwJfMgQQbmV3Tm9kZU5leHRMZWFzZQkAZAIFDm5vZGVOZXh0TGVhc2VkBRF1c2VyTGVhc2luZ0Ftb3VudAQLJHQwNzA3NTcxOTYJARJnZXRVc2VyTGVhc2luZ0RhdGECBQtub2RlQWRkcmVzcwULdXNlckFkZHJlc3MEEXVzZXJDdXJyZW50UGVyaW9kCAULJHQwNzA3NTcxOTYCXzEEEXVzZXJDdXJyZW50TGVhc2VkCAULJHQwNzA3NTcxOTYCXzIEDnVzZXJOZXh0UGVyaW9kCAULJHQwNzA3NTcxOTYCXzMEDnVzZXJOZXh0TGVhc2VkCAULJHQwNzA3NTcxOTYCXzQEEW5ld1VzZXJOZXh0TGVhc2VkCQBkAgUOdXNlck5leHRMZWFzZWQFEXVzZXJMZWFzaW5nQW1vdW50CQDMCAIJARNnZXRMZWFzaW5nTm9kZUVudHJ5AwULbm9kZUFkZHJlc3MFEW5vZGVDdXJyZW50TGVhc2VkBRBuZXdOb2RlTmV4dExlYXNlCQDMCAIJARNnZXRVc2VyTGVhc2luZ0VudHJ5BgULbm9kZUFkZHJlc3MFC3VzZXJBZGRyZXNzBRF1c2VyQ3VycmVudFBlcmlvZAURdXNlckN1cnJlbnRMZWFzZWQFDnVzZXJOZXh0UGVyaW9kBRFuZXdVc2VyTmV4dExlYXNlZAkAzAgCCQEUZ2V0VXNlck5vZGVMaXN0RW50cnkCBQt1c2VyQWRkcmVzcwkBEWFkZE5vZGVUb05vZGVMaXN0AgULdXNlckFkZHJlc3MFC25vZGVBZGRyZXNzBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BEWdldFVuc3Rha2VBY3Rpb25zAwtub2RlQWRkcmVzcwt1c2VyQWRkcmVzcw11bnN0YWtlQW1vdW50BAskdDA3ODQ5NzkyMgkBEmdldExlYXNpbmdOb2RlRGF0YQEFC25vZGVBZGRyZXNzBBFub2RlQ3VycmVudExlYXNlZAgFCyR0MDc4NDk3OTIyAl8xBA5ub2RlTmV4dExlYXNlZAgFCyR0MDc4NDk3OTIyAl8yBAskdDA3OTI3ODA0OAkBEmdldFVzZXJMZWFzaW5nRGF0YQIFC25vZGVBZGRyZXNzBQt1c2VyQWRkcmVzcwQRdXNlckN1cnJlbnRQZXJpb2QIBQskdDA3OTI3ODA0OAJfMQQRdXNlckN1cnJlbnRMZWFzZWQIBQskdDA3OTI3ODA0OAJfMgQOdXNlck5leHRQZXJpb2QIBQskdDA3OTI3ODA0OAJfMwQOdXNlck5leHRMZWFzZWQIBQskdDA3OTI3ODA0OAJfNAQGY2hlY2tzCQDMCAIDCQBmAgUNdW5zdGFrZUFtb3VudAAABgkBCHRocm93RXJyAQIndW5zdGFrZSBhbW91bnQgc2hvdWxkIGJlIGdyZWF0ZXIgdGhhbiAwCQDMCAIDCQBnAgUOdXNlck5leHRMZWFzZWQFDXVuc3Rha2VBbW91bnQGCQEIdGhyb3dFcnIBAjl1bnN0YWtlIGFtb3VudCBzaG91bGQgYmUgbGVzcyBvciBlcXVhbCB1c2VyIHN0YWtlZCBhbW91bnQJAMwIAgMJAGcCBQ5ub2RlTmV4dExlYXNlZAUNdW5zdGFrZUFtb3VudAYJAQh0aHJvd0VycgECOXVuc3Rha2UgYW1vdW50IHNob3VsZCBiZSBsZXNzIG9yIGVxdWFsIG5vZGUgc3Rha2VkIGFtb3VudAkAzAgCAwkBDmlzVmFsaWRBZGRyZXNzAQULbm9kZUFkZHJlc3MGCQEIdGhyb3dFcnIBCQC5CQIJAMwIAgIabm9kZSBhZGRyZXNzIGlzIG5vdCB2YWxpZDoJAMwIAgULbm9kZUFkZHJlc3MFA25pbAIBIAkAzAgCAwkBDmlzVmFsaWRBZGRyZXNzAQULdXNlckFkZHJlc3MGCQEIdGhyb3dFcnIBCQC5CQIJAMwIAgIadXNlciBhZGRyZXNzIGlzIG5vdCB2YWxpZDoJAMwIAgULdXNlckFkZHJlc3MFA25pbAIBIAUDbmlsAwkAAAIFBmNoZWNrcwUGY2hlY2tzBBBuZXdOb2RlTmV4dExlYXNlCQBlAgUObm9kZU5leHRMZWFzZWQFDXVuc3Rha2VBbW91bnQEEW5ld1VzZXJOZXh0TGVhc2VkCQBlAgUOdXNlck5leHRMZWFzZWQFDXVuc3Rha2VBbW91bnQECyR0MDg3NDE4ODczCQEVZ2V0VXNlclRvQ2xhaW1CYWxhbmNlAQULdXNlckFkZHJlc3MEDWN1cnJlbnRQZXJpb2QIBQskdDA4NzQxODg3MwJfMQQHdG9DbGFpbQgFCyR0MDg3NDE4ODczAl8yBApuZXh0UGVyaW9kCAULJHQwODc0MTg4NzMCXzMECHRvVW5sb2NrCAULJHQwODc0MTg4NzMCXzQEC25ld1RvVW5sb2NrCQBkAgUIdG9VbmxvY2sFDXVuc3Rha2VBbW91bnQEEXJlbW92ZU5vZGVBY3Rpb25zAwkAAAIFEW5ld1VzZXJOZXh0TGVhc2VkAAAJAMwIAgkBFGdldFVzZXJOb2RlTGlzdEVudHJ5AgULdXNlckFkZHJlc3MJARZyZW1vdmVOb2RlRnJvbU5vZGVMaXN0AgULdXNlckFkZHJlc3MFC25vZGVBZGRyZXNzBQNuaWwFA25pbAkAzggCCQDMCAIJARNnZXRMZWFzaW5nTm9kZUVudHJ5AwULbm9kZUFkZHJlc3MFEW5vZGVDdXJyZW50TGVhc2VkBRBuZXdOb2RlTmV4dExlYXNlCQDMCAIJARNnZXRVc2VyTGVhc2luZ0VudHJ5BgULbm9kZUFkZHJlc3MFC3VzZXJBZGRyZXNzBRF1c2VyQ3VycmVudFBlcmlvZAURdXNlckN1cnJlbnRMZWFzZWQFDnVzZXJOZXh0UGVyaW9kBRFuZXdVc2VyTmV4dExlYXNlZAkAzAgCCQETZ2V0VXNlclRvQ2xhaW1FbnRyeQUFC3VzZXJBZGRyZXNzBQ1jdXJyZW50UGVyaW9kBQd0b0NsYWltBQpuZXh0UGVyaW9kBQtuZXdUb1VubG9jawUDbmlsBRFyZW1vdmVOb2RlQWN0aW9ucwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEXZ2V0Q2xhaW1VbmxvY2tlZEFjdGlvbnMCC3VzZXJBZGRyZXNzC2NsYWltQW1vdW50BAskdDA5NTA1OTU5MgkBFWdldFVzZXJUb0NsYWltQmFsYW5jZQEFC3VzZXJBZGRyZXNzBA1jdXJyZW50UGVyaW9kCAULJHQwOTUwNTk1OTICXzEEB3RvQ2xhaW0IBQskdDA5NTA1OTU5MgJfMgQKbmV4dFBlcmlvZAgFCyR0MDk1MDU5NTkyAl8zBAh0b1VubG9jawgFCyR0MDk1MDU5NTkyAl80BAZjaGVja3MJAMwIAgMJAGYCBQtjbGFpbUFtb3VudAAABgkBCHRocm93RXJyAQIlY2xhaW0gYW1vdW50IHNob3VsZCBiZSBncmVhdGVyIHRoYW4gMAkAzAgCAwkAZwIFB3RvQ2xhaW0FC2NsYWltQW1vdW50BgkBCHRocm93RXJyAQI0Y2xhaW0gYW1vdW50IHNob3VsZCBiZSBsZXNzIG9yIGVxdWFsIHVubG9ja2VkIGFtb3VudAkAzAgCAwkBDmlzVmFsaWRBZGRyZXNzAQULdXNlckFkZHJlc3MGCQEIdGhyb3dFcnIBCQC5CQIJAMwIAgIadXNlciBhZGRyZXNzIGlzIG5vdCB2YWxpZDoJAMwIAgULdXNlckFkZHJlc3MFA25pbAIBIAUDbmlsAwkAAAIFBmNoZWNrcwUGY2hlY2tzBApuZXdUb0NsYWltCQBlAgUHdG9DbGFpbQULY2xhaW1BbW91bnQJAMwIAgkBE2dldFVzZXJUb0NsYWltRW50cnkFBQt1c2VyQWRkcmVzcwUNY3VycmVudFBlcmlvZAUKbmV3VG9DbGFpbQUKbmV4dFBlcmlvZAUIdG9VbmxvY2sJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQULdXNlckFkZHJlc3MFC2NsYWltQW1vdW50BQxhc3NldElkQnl0ZXMFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEbZ2V0U3Rha2VGcm9tVW5sb2NrZWRBY3Rpb25zAwtub2RlQWRkcmVzcwt1c2VyQWRkcmVzcxF1c2VyTGVhc2luZ0Ftb3VudAQNJHQwMTAyNTkxMDM0NgkBFWdldFVzZXJUb0NsYWltQmFsYW5jZQEFC3VzZXJBZGRyZXNzBA1jdXJyZW50UGVyaW9kCAUNJHQwMTAyNTkxMDM0NgJfMQQHdG9DbGFpbQgFDSR0MDEwMjU5MTAzNDYCXzIECm5leHRQZXJpb2QIBQ0kdDAxMDI1OTEwMzQ2Al8zBAh0b1VubG9jawgFDSR0MDEwMjU5MTAzNDYCXzQECWF2YWlsYWJsZQkAZAIFCHRvVW5sb2NrBQd0b0NsYWltBAZjaGVja3MJAMwIAgMJAGYCBRF1c2VyTGVhc2luZ0Ftb3VudAAABgkBCHRocm93RXJyAQIfYW1vdW50IHNob3VsZCBiZSBncmVhdGVyIHRoYW4gMAkAzAgCAwkAZwIFCWF2YWlsYWJsZQURdXNlckxlYXNpbmdBbW91bnQGCQEIdGhyb3dFcnIBAithbW91bnQgc2hvdWxkIGJlIGxlc3Mgb3IgZXF1YWwgdG8gYXZhaWxhYmxlCQDMCAIDCQEOaXNWYWxpZEFkZHJlc3MBBQtub2RlQWRkcmVzcwYJAQh0aHJvd0VycgEJALkJAgkAzAgCAhpub2RlIGFkZHJlc3MgaXMgbm90IHZhbGlkOgkAzAgCBQtub2RlQWRkcmVzcwUDbmlsAgEgCQDMCAIDCQEOaXNWYWxpZEFkZHJlc3MBBQt1c2VyQWRkcmVzcwYJAQh0aHJvd0VycgEJALkJAgkAzAgCAhp1c2VyIGFkZHJlc3MgaXMgbm90IHZhbGlkOgkAzAgCBQt1c2VyQWRkcmVzcwUDbmlsAgEgBQNuaWwDCQAAAgUGY2hlY2tzBQZjaGVja3MEDSR0MDEwODIzMTA4OTYJARJnZXRMZWFzaW5nTm9kZURhdGEBBQtub2RlQWRkcmVzcwQRbm9kZUN1cnJlbnRMZWFzZWQIBQ0kdDAxMDgyMzEwODk2Al8xBA5ub2RlTmV4dExlYXNlZAgFDSR0MDEwODIzMTA4OTYCXzIEEG5ld05vZGVOZXh0TGVhc2UJAGQCBQ5ub2RlTmV4dExlYXNlZAURdXNlckxlYXNpbmdBbW91bnQEDSR0MDEwOTY0MTEwODUJARJnZXRVc2VyTGVhc2luZ0RhdGECBQtub2RlQWRkcmVzcwULdXNlckFkZHJlc3MEEXVzZXJDdXJyZW50UGVyaW9kCAUNJHQwMTA5NjQxMTA4NQJfMQQRdXNlckN1cnJlbnRMZWFzZWQIBQ0kdDAxMDk2NDExMDg1Al8yBA51c2VyTmV4dFBlcmlvZAgFDSR0MDEwOTY0MTEwODUCXzMEDnVzZXJOZXh0TGVhc2VkCAUNJHQwMTA5NjQxMTA4NQJfNAQRbmV3VXNlck5leHRMZWFzZWQJAGQCBQ51c2VyTmV4dExlYXNlZAURdXNlckxlYXNpbmdBbW91bnQEC25ld1RvVW5sb2NrCQCWAwEJAMwIAgAACQDMCAIJAGUCBQh0b1VubG9jawURdXNlckxlYXNpbmdBbW91bnQFA25pbAQKbmV3VG9DbGFpbQkAlwMBCQDMCAIFB3RvQ2xhaW0JAMwIAgkAZAIFB3RvQ2xhaW0JAGUCBQh0b1VubG9jawURdXNlckxlYXNpbmdBbW91bnQFA25pbAkAzAgCCQETZ2V0TGVhc2luZ05vZGVFbnRyeQMFC25vZGVBZGRyZXNzBRFub2RlQ3VycmVudExlYXNlZAUObm9kZU5leHRMZWFzZWQJAMwIAgkBE2dldFVzZXJMZWFzaW5nRW50cnkGBQtub2RlQWRkcmVzcwULdXNlckFkZHJlc3MFEXVzZXJDdXJyZW50UGVyaW9kBRF1c2VyQ3VycmVudExlYXNlZAUOdXNlck5leHRQZXJpb2QFEW5ld1VzZXJOZXh0TGVhc2VkCQDMCAIJARNnZXRVc2VyVG9DbGFpbUVudHJ5BQULdXNlckFkZHJlc3MFDWN1cnJlbnRQZXJpb2QFCm5ld1RvQ2xhaW0FCm5leHRQZXJpb2QFC25ld1RvVW5sb2NrCQDMCAIJARRnZXRVc2VyTm9kZUxpc3RFbnRyeQIFC3VzZXJBZGRyZXNzCQERYWRkTm9kZVRvTm9kZUxpc3QCBQt1c2VyQWRkcmVzcwULbm9kZUFkZHJlc3MFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEcZ2V0U2V0TmV3UGVyaW9kTGVuZ3RoQWN0aW9ucwEPbmV3UGVyaW9kTGVuZ3RoBAVjaGVjawkAzAgCAwkAZgIFD25ld1BlcmlvZExlbmd0aAAABgkBCHRocm93RXJyAQImcGVyaW9kIGxlbmd0aCBzaG91bGQgYmUgZ3JlYXRlciB0aGFuIDAFA25pbAMJAAACBQVjaGVjawUFY2hlY2sDCQAAAgUScGVyaW9kT2Zmc2V0SGVpZ2h0AP///////////wEJAMwIAgkBDEludGVnZXJFbnRyeQIFD2tleVBlcmlvZExlbmd0aAUPbmV3UGVyaW9kTGVuZ3RoCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRVrZXlQZXJpb2RPZmZzZXRIZWlnaHQFBmhlaWdodAUDbmlsBBFuZXdQZXJpb2RPZmZzZXRJZAkAZAIFD2N1cnJlbnRQZXJpb2RJZAABBA9uZXdPZmZzZXRIZWlnaHQJAGQCCQBoAgUMcGVyaW9kTGVuZ3RoCQBlAgURbmV3UGVyaW9kT2Zmc2V0SWQFDnBlcmlvZE9mZnNldElkBRJwZXJpb2RPZmZzZXRIZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIFEWtleVBlcmlvZE9mZnNldElkBRFuZXdQZXJpb2RPZmZzZXRJZAkAzAgCCQEMSW50ZWdlckVudHJ5AgUVa2V5UGVyaW9kT2Zmc2V0SGVpZ2h0BQ9uZXdPZmZzZXRIZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIFD2tleVBlcmlvZExlbmd0aAUPbmV3UGVyaW9kTGVuZ3RoBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4IAWkBEnNldE5ld1BlcmlvZExlbmd0aAEPbmV3UGVyaW9kTGVuZ3RoCQEcZ2V0U2V0TmV3UGVyaW9kTGVuZ3RoQWN0aW9ucwEFD25ld1BlcmlvZExlbmd0aAFpAQtnZXRVc2VyRGF0YQELdXNlckFkZHJlc3MEDSR0MDEyNjA3MTI2OTQJARVnZXRVc2VyVG9DbGFpbUJhbGFuY2UBBQt1c2VyQWRkcmVzcwQNY3VycmVudFBlcmlvZAgFDSR0MDEyNjA3MTI2OTQCXzEEB3RvQ2xhaW0IBQ0kdDAxMjYwNzEyNjk0Al8yBApuZXh0UGVyaW9kCAUNJHQwMTI2MDcxMjY5NAJfMwQIdG9VbmxvY2sIBQ0kdDAxMjYwNzEyNjk0Al80BAhub2RlTGlzdAkBFmdldFVzZXJMZWFzaW5nTm9kZUxpc3QBBQt1c2VyQWRkcmVzcwkAlAoCBQNuaWwJAJYKBAUHdG9DbGFpbQUIdG9VbmxvY2sJAGQCBQh0b1VubG9jawUHdG9DbGFpbQUIbm9kZUxpc3QBaQEIc3Rha2VGb3ICC25vZGVBZGRyZXNzC3VzZXJBZGRyZXNzCQEPZ2V0U3Rha2VBY3Rpb25zAwULbm9kZUFkZHJlc3MFC3VzZXJBZGRyZXNzBQFpAWkBBXN0YWtlAQtub2RlQWRkcmVzcwQLdXNlckFkZHJlc3MJAKUIAQgFAWkGY2FsbGVyCQEPZ2V0U3Rha2VBY3Rpb25zAwULbm9kZUFkZHJlc3MFC3VzZXJBZGRyZXNzBQFpAWkBEXN0YWtlRnJvbVVubG9ja2VkAgtub2RlQWRkcmVzcwZhbW91bnQEC3VzZXJBZGRyZXNzCQClCAEIBQFpBmNhbGxlcgkBG2dldFN0YWtlRnJvbVVubG9ja2VkQWN0aW9ucwMFC25vZGVBZGRyZXNzBQt1c2VyQWRkcmVzcwUGYW1vdW50AWkBB3Vuc3Rha2UCC25vZGVBZGRyZXNzBmFtb3VudAQLdXNlckFkZHJlc3MJAKUIAQgFAWkGY2FsbGVyCQERZ2V0VW5zdGFrZUFjdGlvbnMDBQtub2RlQWRkcmVzcwULdXNlckFkZHJlc3MFBmFtb3VudAFpAQVjbGFpbQEGYW1vdW50BAt1c2VyQWRkcmVzcwkApQgBCAUBaQZjYWxsZXIJARdnZXRDbGFpbVVubG9ja2VkQWN0aW9ucwIFC3VzZXJBZGRyZXNzBQZhbW91bnQBaQEIY2xhaW1BbGwABAt1c2VyQWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEDSR0MDEzNjUyMTM3MzkJARVnZXRVc2VyVG9DbGFpbUJhbGFuY2UBBQt1c2VyQWRkcmVzcwQNY3VycmVudFBlcmlvZAgFDSR0MDEzNjUyMTM3MzkCXzEEB3RvQ2xhaW0IBQ0kdDAxMzY1MjEzNzM5Al8yBApuZXh0UGVyaW9kCAUNJHQwMTM2NTIxMzczOQJfMwQIdG9VbmxvY2sIBQ0kdDAxMzY1MjEzNzM5Al80CQEXZ2V0Q2xhaW1VbmxvY2tlZEFjdGlvbnMCBQt1c2VyQWRkcmVzcwUHdG9DbGFpbQAvFCUA",
    "height": 2972965,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2b4k2v9V4QPpAYj1UMVF52Kofuvb55uFBkjiwHpBSxHw
Next: 7gShWbxXeGEHPD7bhARcBjud47w6DTRcPddq47HYDjSp

Diff: 
Old New Differences
60 60  }
61 61  
62 62  
63 - func getLeasingNodeEntry (nodeAddress,currentPeriod,currentLeased,nextPeriod,nextLeased) = {
64 -     let valueString = makeString(["%d%d%d%d", toString(currentPeriod), toString(currentLeased), toString(nextPeriod), toString(nextLeased)], SEP)
63 + func getLeasingNodeEntry (nodeAddress,currentLeased,nextLeased) = {
64 +     let valueString = makeString(["%d%d%d%d", toString(currentPeriodHeight), toString(currentLeased), toString(nextPeriodHeight), toString(nextLeased)], SEP)
65 65      StringEntry(keyLeasingNodeData(nodeAddress), valueString)
66 66      }
67 67  
76 76              let nodeNextPeriod = parseIntValue(dataList[3])
77 77              let nodeNextLeased = parseIntValue(dataList[4])
78 78              if ((nodeNextPeriod > height))
79 -                 then $Tuple4(nodeCurrentPeriod, nodeCurrentLeased, nodeNextPeriod, nodeNextLeased)
80 -                 else $Tuple4(currentPeriodHeight, nodeNextLeased, nextPeriodHeight, nodeNextLeased)
79 +                 then $Tuple2(nodeCurrentLeased, nodeNextLeased)
80 +                 else $Tuple2(nodeNextLeased, nodeNextLeased)
81 81          case _ => 
82 -             $Tuple4(0, 0, 0, 0)
82 +             $Tuple2(0, 0)
83 83      }
84 84      }
85 85  
181 181      if ((checks == checks))
182 182          then {
183 183              let userLeasingAmount = i.payments[0].amount
184 -             let $t070397147 = getLeasingNodeData(nodeAddress)
185 -             let nodeCurrentPeriod = $t070397147._1
186 -             let nodeCurrentLeased = $t070397147._2
187 -             let nodeNextPeriod = $t070397147._3
188 -             let nodeNextLeased = $t070397147._4
184 +             let $t069347007 = getLeasingNodeData(nodeAddress)
185 +             let nodeCurrentLeased = $t069347007._1
186 +             let nodeNextLeased = $t069347007._2
189 187              let newNodeNextLease = (nodeNextLeased + userLeasingAmount)
190 -             let $t072157336 = getUserLeasingData(nodeAddress, userAddress)
191 -             let userCurrentPeriod = $t072157336._1
192 -             let userCurrentLeased = $t072157336._2
193 -             let userNextPeriod = $t072157336._3
194 -             let userNextLeased = $t072157336._4
188 +             let $t070757196 = getUserLeasingData(nodeAddress, userAddress)
189 +             let userCurrentPeriod = $t070757196._1
190 +             let userCurrentLeased = $t070757196._2
191 +             let userNextPeriod = $t070757196._3
192 +             let userNextLeased = $t070757196._4
195 193              let newUserNextLeased = (userNextLeased + userLeasingAmount)
196 - [getLeasingNodeEntry(nodeAddress, nodeCurrentPeriod, nodeCurrentLeased, nodeNextPeriod, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
194 + [getLeasingNodeEntry(nodeAddress, nodeCurrentLeased, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
197 195              }
198 196          else throw("Strict value is not equal to itself.")
199 197      }
200 198  
201 199  
202 200  func getUnstakeActions (nodeAddress,userAddress,unstakeAmount) = {
203 -     let $t080248132 = getLeasingNodeData(nodeAddress)
204 -     let nodeCurrentPeriod = $t080248132._1
205 -     let nodeCurrentLeased = $t080248132._2
206 -     let nodeNextPeriod = $t080248132._3
207 -     let nodeNextLeased = $t080248132._4
208 -     let $t081378258 = getUserLeasingData(nodeAddress, userAddress)
209 -     let userCurrentPeriod = $t081378258._1
210 -     let userCurrentLeased = $t081378258._2
211 -     let userNextPeriod = $t081378258._3
212 -     let userNextLeased = $t081378258._4
201 +     let $t078497922 = getLeasingNodeData(nodeAddress)
202 +     let nodeCurrentLeased = $t078497922._1
203 +     let nodeNextLeased = $t078497922._2
204 +     let $t079278048 = getUserLeasingData(nodeAddress, userAddress)
205 +     let userCurrentPeriod = $t079278048._1
206 +     let userCurrentLeased = $t079278048._2
207 +     let userNextPeriod = $t079278048._3
208 +     let userNextLeased = $t079278048._4
213 209      let checks = [if ((unstakeAmount > 0))
214 210          then true
215 211          else throwErr("unstake amount should be greater than 0"), if ((userNextLeased >= unstakeAmount))
225 221          then {
226 222              let newNodeNextLease = (nodeNextLeased - unstakeAmount)
227 223              let newUserNextLeased = (userNextLeased - unstakeAmount)
228 -             let $t089519083 = getUserToClaimBalance(userAddress)
229 -             let currentPeriod = $t089519083._1
230 -             let toClaim = $t089519083._2
231 -             let nextPeriod = $t089519083._3
232 -             let toUnlock = $t089519083._4
224 +             let $t087418873 = getUserToClaimBalance(userAddress)
225 +             let currentPeriod = $t087418873._1
226 +             let toClaim = $t087418873._2
227 +             let nextPeriod = $t087418873._3
228 +             let toUnlock = $t087418873._4
233 229              let newToUnlock = (toUnlock + unstakeAmount)
234 230              let removeNodeActions = if ((newUserNextLeased == 0))
235 231                  then [getUserNodeListEntry(userAddress, removeNodeFromNodeList(userAddress, nodeAddress))]
236 232                  else nil
237 -             ([getLeasingNodeEntry(nodeAddress, nodeCurrentPeriod, nodeCurrentLeased, nodeNextPeriod, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, toClaim, nextPeriod, newToUnlock)] ++ removeNodeActions)
233 +             ([getLeasingNodeEntry(nodeAddress, nodeCurrentLeased, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, toClaim, nextPeriod, newToUnlock)] ++ removeNodeActions)
238 234              }
239 235          else throw("Strict value is not equal to itself.")
240 236      }
241 237  
242 238  
243 239  func getClaimUnlockedActions (userAddress,claimAmount) = {
244 -     let $t097509837 = getUserToClaimBalance(userAddress)
245 -     let currentPeriod = $t097509837._1
246 -     let toClaim = $t097509837._2
247 -     let nextPeriod = $t097509837._3
248 -     let toUnlock = $t097509837._4
240 +     let $t095059592 = getUserToClaimBalance(userAddress)
241 +     let currentPeriod = $t095059592._1
242 +     let toClaim = $t095059592._2
243 +     let nextPeriod = $t095059592._3
244 +     let toUnlock = $t095059592._4
249 245      let checks = [if ((claimAmount > 0))
250 246          then true
251 247          else throwErr("claim amount should be greater than 0"), if ((toClaim >= claimAmount))
263 259  
264 260  
265 261  func getStakeFromUnlockedActions (nodeAddress,userAddress,userLeasingAmount) = {
266 -     let $t01050410591 = getUserToClaimBalance(userAddress)
267 -     let currentPeriod = $t01050410591._1
268 -     let toClaim = $t01050410591._2
269 -     let nextPeriod = $t01050410591._3
270 -     let toUnlock = $t01050410591._4
262 +     let $t01025910346 = getUserToClaimBalance(userAddress)
263 +     let currentPeriod = $t01025910346._1
264 +     let toClaim = $t01025910346._2
265 +     let nextPeriod = $t01025910346._3
266 +     let toUnlock = $t01025910346._4
271 267      let available = (toUnlock + toClaim)
272 268      let checks = [if ((userLeasingAmount > 0))
273 269          then true
280 276          else throwErr(makeString(["user address is not valid:", userAddress], " "))]
281 277      if ((checks == checks))
282 278          then {
283 -             let $t01106811176 = getLeasingNodeData(nodeAddress)
284 -             let nodeCurrentPeriod = $t01106811176._1
285 -             let nodeCurrentLeased = $t01106811176._2
286 -             let nodeNextPeriod = $t01106811176._3
287 -             let nodeNextLeased = $t01106811176._4
279 +             let $t01082310896 = getLeasingNodeData(nodeAddress)
280 +             let nodeCurrentLeased = $t01082310896._1
281 +             let nodeNextLeased = $t01082310896._2
288 282              let newNodeNextLease = (nodeNextLeased + userLeasingAmount)
289 -             let $t01124411365 = getUserLeasingData(nodeAddress, userAddress)
290 -             let userCurrentPeriod = $t01124411365._1
291 -             let userCurrentLeased = $t01124411365._2
292 -             let userNextPeriod = $t01124411365._3
293 -             let userNextLeased = $t01124411365._4
283 +             let $t01096411085 = getUserLeasingData(nodeAddress, userAddress)
284 +             let userCurrentPeriod = $t01096411085._1
285 +             let userCurrentLeased = $t01096411085._2
286 +             let userNextPeriod = $t01096411085._3
287 +             let userNextLeased = $t01096411085._4
294 288              let newUserNextLeased = (userNextLeased + userLeasingAmount)
295 289              let newToUnlock = max([0, (toUnlock - userLeasingAmount)])
296 290              let newToClaim = min([toClaim, (toClaim + (toUnlock - userLeasingAmount))])
297 - [getLeasingNodeEntry(nodeAddress, nodeCurrentPeriod, nodeCurrentLeased, nodeNextPeriod, nodeNextLeased), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, newToClaim, nextPeriod, newToUnlock), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
291 + [getLeasingNodeEntry(nodeAddress, nodeCurrentLeased, nodeNextLeased), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, newToClaim, nextPeriod, newToUnlock), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
298 292              }
299 293          else throw("Strict value is not equal to itself.")
300 294      }
323 317  
324 318  @Callable(i)
325 319  func getUserData (userAddress) = {
326 -     let $t01292213009 = getUserToClaimBalance(userAddress)
327 -     let currentPeriod = $t01292213009._1
328 -     let toClaim = $t01292213009._2
329 -     let nextPeriod = $t01292213009._3
330 -     let toUnlock = $t01292213009._4
320 +     let $t01260712694 = getUserToClaimBalance(userAddress)
321 +     let currentPeriod = $t01260712694._1
322 +     let toClaim = $t01260712694._2
323 +     let nextPeriod = $t01260712694._3
324 +     let toUnlock = $t01260712694._4
331 325      let nodeList = getUserLeasingNodeList(userAddress)
332 326      $Tuple2(nil, $Tuple4(toClaim, toUnlock, (toUnlock + toClaim), nodeList))
333 327      }
374 368  @Callable(i)
375 369  func claimAll () = {
376 370      let userAddress = toString(i.caller)
377 -     let $t01396714054 = getUserToClaimBalance(userAddress)
378 -     let currentPeriod = $t01396714054._1
379 -     let toClaim = $t01396714054._2
380 -     let nextPeriod = $t01396714054._3
381 -     let toUnlock = $t01396714054._4
371 +     let $t01365213739 = getUserToClaimBalance(userAddress)
372 +     let currentPeriod = $t01365213739._1
373 +     let toClaim = $t01365213739._2
374 +     let nextPeriod = $t01365213739._3
375 +     let toUnlock = $t01365213739._4
382 376      getClaimUnlockedActions(userAddress, toClaim)
383 377      }
384 378  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let contractFile = "l2mp_leasing.ride"
5 5  
6 6  let SEP = "__"
7 7  
8 8  let scale8 = 100000000
9 9  
10 10  func throwErr (msg) = throw(((contractFile + ": ") + msg))
11 11  
12 12  
13 13  let keyAssetId = makeString(["%s", "assetId"], SEP)
14 14  
15 15  let keyPeriodOffsetId = makeString(["%s", "offsetId"], SEP)
16 16  
17 17  let keyPeriodOffsetHeight = makeString(["%s", "offsetHeight"], SEP)
18 18  
19 19  let keyPeriodLength = makeString(["%s", "periodLength"], SEP)
20 20  
21 21  let periodOffsetId = valueOrElse(getInteger(this, keyPeriodOffsetId), 0)
22 22  
23 23  let periodLength = valueOrElse(getInteger(this, keyPeriodLength), 10000)
24 24  
25 25  let periodOffsetHeight = valueOrElse(getInteger(this, keyPeriodOffsetHeight), -1)
26 26  
27 27  let currentPeriodId = if (if ((height > periodOffsetHeight))
28 28      then (periodOffsetHeight != -1)
29 29      else false)
30 30      then (((height - periodOffsetHeight) / periodLength) + periodOffsetId)
31 31      else max([0, (periodOffsetId - 1)])
32 32  
33 33  let currentPeriodHeight = (periodOffsetHeight + ((currentPeriodId - periodOffsetId) * periodLength))
34 34  
35 35  let nextPeriodHeight = (currentPeriodHeight + periodLength)
36 36  
37 37  func keyLeasingNodeData (nodeAddress) = makeString(["%s", nodeAddress], SEP)
38 38  
39 39  
40 40  func keyUserLeasingNodeList (userAddress) = makeString(["%s%s", "userLeasingNodeList", userAddress], SEP)
41 41  
42 42  
43 43  func keyUserLeasingNodeData (userAddress,nodeAddress) = makeString(["%s%s", nodeAddress, userAddress], SEP)
44 44  
45 45  
46 46  func keyUserToClaim (userAddress) = makeString(["%s%s", "toClaim", userAddress], SEP)
47 47  
48 48  
49 49  let assetIdString = valueOrElse(getString(this, keyAssetId), "WAVES")
50 50  
51 51  let assetIdBytes = if ((assetIdString == "WAVES"))
52 52      then unit
53 53      else fromBase58String(assetIdString)
54 54  
55 55  func isValidAddress (address) = match addressFromString(address) {
56 56      case a: Address => 
57 57          true
58 58      case _ => 
59 59          false
60 60  }
61 61  
62 62  
63 - func getLeasingNodeEntry (nodeAddress,currentPeriod,currentLeased,nextPeriod,nextLeased) = {
64 -     let valueString = makeString(["%d%d%d%d", toString(currentPeriod), toString(currentLeased), toString(nextPeriod), toString(nextLeased)], SEP)
63 + func getLeasingNodeEntry (nodeAddress,currentLeased,nextLeased) = {
64 +     let valueString = makeString(["%d%d%d%d", toString(currentPeriodHeight), toString(currentLeased), toString(nextPeriodHeight), toString(nextLeased)], SEP)
65 65      StringEntry(keyLeasingNodeData(nodeAddress), valueString)
66 66      }
67 67  
68 68  
69 69  func getLeasingNodeData (nodeAddress) = {
70 70      let leasingDataStringRaw = getString(this, keyLeasingNodeData(nodeAddress))
71 71      match leasingDataStringRaw {
72 72          case ds: String => 
73 73              let dataList = split(ds, SEP)
74 74              let nodeCurrentPeriod = parseIntValue(dataList[1])
75 75              let nodeCurrentLeased = parseIntValue(dataList[2])
76 76              let nodeNextPeriod = parseIntValue(dataList[3])
77 77              let nodeNextLeased = parseIntValue(dataList[4])
78 78              if ((nodeNextPeriod > height))
79 -                 then $Tuple4(nodeCurrentPeriod, nodeCurrentLeased, nodeNextPeriod, nodeNextLeased)
80 -                 else $Tuple4(currentPeriodHeight, nodeNextLeased, nextPeriodHeight, nodeNextLeased)
79 +                 then $Tuple2(nodeCurrentLeased, nodeNextLeased)
80 +                 else $Tuple2(nodeNextLeased, nodeNextLeased)
81 81          case _ => 
82 -             $Tuple4(0, 0, 0, 0)
82 +             $Tuple2(0, 0)
83 83      }
84 84      }
85 85  
86 86  
87 87  func getUserLeasingEntry (nodeAddress,userAddress,userCurrentPeriod,userCurrentLeased,userNextPeriod,userNextLeased) = {
88 88      let valueString = makeString(["%d%d%d%d", toString(userCurrentPeriod), toString(userCurrentLeased), toString(userNextPeriod), toString(userNextLeased)], SEP)
89 89      StringEntry(keyUserLeasingNodeData(userAddress, nodeAddress), valueString)
90 90      }
91 91  
92 92  
93 93  func getUserLeasingData (nodeAddress,userAddress) = {
94 94      let leasingDataStringRaw = getString(this, keyUserLeasingNodeData(userAddress, nodeAddress))
95 95      match leasingDataStringRaw {
96 96          case ds: String => 
97 97              let dataList = split(ds, SEP)
98 98              let userCurrentPeriod = parseIntValue(dataList[1])
99 99              let userCurrentLeased = parseIntValue(dataList[2])
100 100              let userNextPeriod = parseIntValue(dataList[3])
101 101              let userNextLeased = parseIntValue(dataList[4])
102 102              if ((userNextPeriod > height))
103 103                  then $Tuple4(userCurrentPeriod, userCurrentLeased, userNextPeriod, userNextLeased)
104 104                  else $Tuple4(currentPeriodHeight, userNextLeased, nextPeriodHeight, userNextLeased)
105 105          case _ => 
106 106              $Tuple4(0, 0, 0, 0)
107 107      }
108 108      }
109 109  
110 110  
111 111  func getUserToClaimEntry (userAddress,currentPeriod,toClaim,nextPeriod,toUnlock) = {
112 112      let valueString = makeString(["%d%d%d%d", toString(currentPeriod), toString(toClaim), toString(nextPeriod), toString(toUnlock)], SEP)
113 113      StringEntry(keyUserToClaim(userAddress), valueString)
114 114      }
115 115  
116 116  
117 117  func getUserToClaimBalance (userAddress) = {
118 118      let userToClaimDataRaw = getString(this, keyUserToClaim(userAddress))
119 119      match userToClaimDataRaw {
120 120          case ds: String => 
121 121              let dataList = split(ds, SEP)
122 122              let currentPeriod = parseIntValue(dataList[1])
123 123              let toClaim = parseIntValue(dataList[2])
124 124              let nextPeriod = parseIntValue(dataList[3])
125 125              let toUnlock = parseIntValue(dataList[4])
126 126              if ((nextPeriod > height))
127 127                  then $Tuple4(currentPeriod, toClaim, nextPeriod, toUnlock)
128 128                  else $Tuple4(currentPeriodHeight, (toClaim + toUnlock), nextPeriodHeight, 0)
129 129          case _ => 
130 130              $Tuple4(0, 0, 0, 0)
131 131      }
132 132      }
133 133  
134 134  
135 135  func getUserLeasingNodeList (userAddress) = {
136 136      let leasingDataStringRaw = getString(this, keyUserLeasingNodeList(userAddress))
137 137      match leasingDataStringRaw {
138 138          case ds: String => 
139 139              let dataList = split_51C(ds, SEP)
140 140              dataList
141 141          case _ => 
142 142              nil
143 143      }
144 144      }
145 145  
146 146  
147 147  func getUserNodeListEntry (userAddress,nodeList) = if ((size(nodeList) == 0))
148 148      then DeleteEntry(keyUserLeasingNodeList(userAddress))
149 149      else StringEntry(keyUserLeasingNodeList(userAddress), makeString_11C(nodeList, SEP))
150 150  
151 151  
152 152  func addNodeToNodeList (userAddress,nodeAddress) = {
153 153      let nodeList = getUserLeasingNodeList(userAddress)
154 154      if (containsElement(nodeList, nodeAddress))
155 155          then nodeList
156 156          else (nodeList :+ nodeAddress)
157 157      }
158 158  
159 159  
160 160  func removeNodeFromNodeList (userAddress,nodeAddress) = {
161 161      let nodeList = getUserLeasingNodeList(userAddress)
162 162      match indexOf(nodeList, nodeAddress) {
163 163          case index: Int => 
164 164              removeByIndex(nodeList, index)
165 165          case _ => 
166 166              nodeList
167 167      }
168 168      }
169 169  
170 170  
171 171  func getStakeActions (nodeAddress,userAddress,i) = {
172 172      let checks = [if ((size(i.payments) == 1))
173 173          then true
174 174          else throwErr("payment size should be exactly 1"), if ((i.payments[0].assetId == assetIdBytes))
175 175          then true
176 176          else throwErr(makeString(["payment assetId should be:", assetIdString], " ")), if (isValidAddress(nodeAddress))
177 177          then true
178 178          else throwErr(makeString(["node address is not valid:", nodeAddress], " ")), if (isValidAddress(userAddress))
179 179          then true
180 180          else throwErr(makeString(["user address is not valid:", userAddress], " "))]
181 181      if ((checks == checks))
182 182          then {
183 183              let userLeasingAmount = i.payments[0].amount
184 -             let $t070397147 = getLeasingNodeData(nodeAddress)
185 -             let nodeCurrentPeriod = $t070397147._1
186 -             let nodeCurrentLeased = $t070397147._2
187 -             let nodeNextPeriod = $t070397147._3
188 -             let nodeNextLeased = $t070397147._4
184 +             let $t069347007 = getLeasingNodeData(nodeAddress)
185 +             let nodeCurrentLeased = $t069347007._1
186 +             let nodeNextLeased = $t069347007._2
189 187              let newNodeNextLease = (nodeNextLeased + userLeasingAmount)
190 -             let $t072157336 = getUserLeasingData(nodeAddress, userAddress)
191 -             let userCurrentPeriod = $t072157336._1
192 -             let userCurrentLeased = $t072157336._2
193 -             let userNextPeriod = $t072157336._3
194 -             let userNextLeased = $t072157336._4
188 +             let $t070757196 = getUserLeasingData(nodeAddress, userAddress)
189 +             let userCurrentPeriod = $t070757196._1
190 +             let userCurrentLeased = $t070757196._2
191 +             let userNextPeriod = $t070757196._3
192 +             let userNextLeased = $t070757196._4
195 193              let newUserNextLeased = (userNextLeased + userLeasingAmount)
196 - [getLeasingNodeEntry(nodeAddress, nodeCurrentPeriod, nodeCurrentLeased, nodeNextPeriod, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
194 + [getLeasingNodeEntry(nodeAddress, nodeCurrentLeased, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
197 195              }
198 196          else throw("Strict value is not equal to itself.")
199 197      }
200 198  
201 199  
202 200  func getUnstakeActions (nodeAddress,userAddress,unstakeAmount) = {
203 -     let $t080248132 = getLeasingNodeData(nodeAddress)
204 -     let nodeCurrentPeriod = $t080248132._1
205 -     let nodeCurrentLeased = $t080248132._2
206 -     let nodeNextPeriod = $t080248132._3
207 -     let nodeNextLeased = $t080248132._4
208 -     let $t081378258 = getUserLeasingData(nodeAddress, userAddress)
209 -     let userCurrentPeriod = $t081378258._1
210 -     let userCurrentLeased = $t081378258._2
211 -     let userNextPeriod = $t081378258._3
212 -     let userNextLeased = $t081378258._4
201 +     let $t078497922 = getLeasingNodeData(nodeAddress)
202 +     let nodeCurrentLeased = $t078497922._1
203 +     let nodeNextLeased = $t078497922._2
204 +     let $t079278048 = getUserLeasingData(nodeAddress, userAddress)
205 +     let userCurrentPeriod = $t079278048._1
206 +     let userCurrentLeased = $t079278048._2
207 +     let userNextPeriod = $t079278048._3
208 +     let userNextLeased = $t079278048._4
213 209      let checks = [if ((unstakeAmount > 0))
214 210          then true
215 211          else throwErr("unstake amount should be greater than 0"), if ((userNextLeased >= unstakeAmount))
216 212          then true
217 213          else throwErr("unstake amount should be less or equal user staked amount"), if ((nodeNextLeased >= unstakeAmount))
218 214          then true
219 215          else throwErr("unstake amount should be less or equal node staked amount"), if (isValidAddress(nodeAddress))
220 216          then true
221 217          else throwErr(makeString(["node address is not valid:", nodeAddress], " ")), if (isValidAddress(userAddress))
222 218          then true
223 219          else throwErr(makeString(["user address is not valid:", userAddress], " "))]
224 220      if ((checks == checks))
225 221          then {
226 222              let newNodeNextLease = (nodeNextLeased - unstakeAmount)
227 223              let newUserNextLeased = (userNextLeased - unstakeAmount)
228 -             let $t089519083 = getUserToClaimBalance(userAddress)
229 -             let currentPeriod = $t089519083._1
230 -             let toClaim = $t089519083._2
231 -             let nextPeriod = $t089519083._3
232 -             let toUnlock = $t089519083._4
224 +             let $t087418873 = getUserToClaimBalance(userAddress)
225 +             let currentPeriod = $t087418873._1
226 +             let toClaim = $t087418873._2
227 +             let nextPeriod = $t087418873._3
228 +             let toUnlock = $t087418873._4
233 229              let newToUnlock = (toUnlock + unstakeAmount)
234 230              let removeNodeActions = if ((newUserNextLeased == 0))
235 231                  then [getUserNodeListEntry(userAddress, removeNodeFromNodeList(userAddress, nodeAddress))]
236 232                  else nil
237 -             ([getLeasingNodeEntry(nodeAddress, nodeCurrentPeriod, nodeCurrentLeased, nodeNextPeriod, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, toClaim, nextPeriod, newToUnlock)] ++ removeNodeActions)
233 +             ([getLeasingNodeEntry(nodeAddress, nodeCurrentLeased, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, toClaim, nextPeriod, newToUnlock)] ++ removeNodeActions)
238 234              }
239 235          else throw("Strict value is not equal to itself.")
240 236      }
241 237  
242 238  
243 239  func getClaimUnlockedActions (userAddress,claimAmount) = {
244 -     let $t097509837 = getUserToClaimBalance(userAddress)
245 -     let currentPeriod = $t097509837._1
246 -     let toClaim = $t097509837._2
247 -     let nextPeriod = $t097509837._3
248 -     let toUnlock = $t097509837._4
240 +     let $t095059592 = getUserToClaimBalance(userAddress)
241 +     let currentPeriod = $t095059592._1
242 +     let toClaim = $t095059592._2
243 +     let nextPeriod = $t095059592._3
244 +     let toUnlock = $t095059592._4
249 245      let checks = [if ((claimAmount > 0))
250 246          then true
251 247          else throwErr("claim amount should be greater than 0"), if ((toClaim >= claimAmount))
252 248          then true
253 249          else throwErr("claim amount should be less or equal unlocked amount"), if (isValidAddress(userAddress))
254 250          then true
255 251          else throwErr(makeString(["user address is not valid:", userAddress], " "))]
256 252      if ((checks == checks))
257 253          then {
258 254              let newToClaim = (toClaim - claimAmount)
259 255  [getUserToClaimEntry(userAddress, currentPeriod, newToClaim, nextPeriod, toUnlock), ScriptTransfer(addressFromStringValue(userAddress), claimAmount, assetIdBytes)]
260 256              }
261 257          else throw("Strict value is not equal to itself.")
262 258      }
263 259  
264 260  
265 261  func getStakeFromUnlockedActions (nodeAddress,userAddress,userLeasingAmount) = {
266 -     let $t01050410591 = getUserToClaimBalance(userAddress)
267 -     let currentPeriod = $t01050410591._1
268 -     let toClaim = $t01050410591._2
269 -     let nextPeriod = $t01050410591._3
270 -     let toUnlock = $t01050410591._4
262 +     let $t01025910346 = getUserToClaimBalance(userAddress)
263 +     let currentPeriod = $t01025910346._1
264 +     let toClaim = $t01025910346._2
265 +     let nextPeriod = $t01025910346._3
266 +     let toUnlock = $t01025910346._4
271 267      let available = (toUnlock + toClaim)
272 268      let checks = [if ((userLeasingAmount > 0))
273 269          then true
274 270          else throwErr("amount should be greater than 0"), if ((available >= userLeasingAmount))
275 271          then true
276 272          else throwErr("amount should be less or equal to available"), if (isValidAddress(nodeAddress))
277 273          then true
278 274          else throwErr(makeString(["node address is not valid:", nodeAddress], " ")), if (isValidAddress(userAddress))
279 275          then true
280 276          else throwErr(makeString(["user address is not valid:", userAddress], " "))]
281 277      if ((checks == checks))
282 278          then {
283 -             let $t01106811176 = getLeasingNodeData(nodeAddress)
284 -             let nodeCurrentPeriod = $t01106811176._1
285 -             let nodeCurrentLeased = $t01106811176._2
286 -             let nodeNextPeriod = $t01106811176._3
287 -             let nodeNextLeased = $t01106811176._4
279 +             let $t01082310896 = getLeasingNodeData(nodeAddress)
280 +             let nodeCurrentLeased = $t01082310896._1
281 +             let nodeNextLeased = $t01082310896._2
288 282              let newNodeNextLease = (nodeNextLeased + userLeasingAmount)
289 -             let $t01124411365 = getUserLeasingData(nodeAddress, userAddress)
290 -             let userCurrentPeriod = $t01124411365._1
291 -             let userCurrentLeased = $t01124411365._2
292 -             let userNextPeriod = $t01124411365._3
293 -             let userNextLeased = $t01124411365._4
283 +             let $t01096411085 = getUserLeasingData(nodeAddress, userAddress)
284 +             let userCurrentPeriod = $t01096411085._1
285 +             let userCurrentLeased = $t01096411085._2
286 +             let userNextPeriod = $t01096411085._3
287 +             let userNextLeased = $t01096411085._4
294 288              let newUserNextLeased = (userNextLeased + userLeasingAmount)
295 289              let newToUnlock = max([0, (toUnlock - userLeasingAmount)])
296 290              let newToClaim = min([toClaim, (toClaim + (toUnlock - userLeasingAmount))])
297 - [getLeasingNodeEntry(nodeAddress, nodeCurrentPeriod, nodeCurrentLeased, nodeNextPeriod, nodeNextLeased), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, newToClaim, nextPeriod, newToUnlock), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
291 + [getLeasingNodeEntry(nodeAddress, nodeCurrentLeased, nodeNextLeased), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, newToClaim, nextPeriod, newToUnlock), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
298 292              }
299 293          else throw("Strict value is not equal to itself.")
300 294      }
301 295  
302 296  
303 297  func getSetNewPeriodLengthActions (newPeriodLength) = {
304 298      let check = [if ((newPeriodLength > 0))
305 299          then true
306 300          else throwErr("period length should be greater than 0")]
307 301      if ((check == check))
308 302          then if ((periodOffsetHeight == -1))
309 303              then [IntegerEntry(keyPeriodLength, newPeriodLength), IntegerEntry(keyPeriodOffsetHeight, height)]
310 304              else {
311 305                  let newPeriodOffsetId = (currentPeriodId + 1)
312 306                  let newOffsetHeight = ((periodLength * (newPeriodOffsetId - periodOffsetId)) + periodOffsetHeight)
313 307  [IntegerEntry(keyPeriodOffsetId, newPeriodOffsetId), IntegerEntry(keyPeriodOffsetHeight, newOffsetHeight), IntegerEntry(keyPeriodLength, newPeriodLength)]
314 308                  }
315 309          else throw("Strict value is not equal to itself.")
316 310      }
317 311  
318 312  
319 313  @Callable(i)
320 314  func setNewPeriodLength (newPeriodLength) = getSetNewPeriodLengthActions(newPeriodLength)
321 315  
322 316  
323 317  
324 318  @Callable(i)
325 319  func getUserData (userAddress) = {
326 -     let $t01292213009 = getUserToClaimBalance(userAddress)
327 -     let currentPeriod = $t01292213009._1
328 -     let toClaim = $t01292213009._2
329 -     let nextPeriod = $t01292213009._3
330 -     let toUnlock = $t01292213009._4
320 +     let $t01260712694 = getUserToClaimBalance(userAddress)
321 +     let currentPeriod = $t01260712694._1
322 +     let toClaim = $t01260712694._2
323 +     let nextPeriod = $t01260712694._3
324 +     let toUnlock = $t01260712694._4
331 325      let nodeList = getUserLeasingNodeList(userAddress)
332 326      $Tuple2(nil, $Tuple4(toClaim, toUnlock, (toUnlock + toClaim), nodeList))
333 327      }
334 328  
335 329  
336 330  
337 331  @Callable(i)
338 332  func stakeFor (nodeAddress,userAddress) = getStakeActions(nodeAddress, userAddress, i)
339 333  
340 334  
341 335  
342 336  @Callable(i)
343 337  func stake (nodeAddress) = {
344 338      let userAddress = toString(i.caller)
345 339      getStakeActions(nodeAddress, userAddress, i)
346 340      }
347 341  
348 342  
349 343  
350 344  @Callable(i)
351 345  func stakeFromUnlocked (nodeAddress,amount) = {
352 346      let userAddress = toString(i.caller)
353 347      getStakeFromUnlockedActions(nodeAddress, userAddress, amount)
354 348      }
355 349  
356 350  
357 351  
358 352  @Callable(i)
359 353  func unstake (nodeAddress,amount) = {
360 354      let userAddress = toString(i.caller)
361 355      getUnstakeActions(nodeAddress, userAddress, amount)
362 356      }
363 357  
364 358  
365 359  
366 360  @Callable(i)
367 361  func claim (amount) = {
368 362      let userAddress = toString(i.caller)
369 363      getClaimUnlockedActions(userAddress, amount)
370 364      }
371 365  
372 366  
373 367  
374 368  @Callable(i)
375 369  func claimAll () = {
376 370      let userAddress = toString(i.caller)
377 -     let $t01396714054 = getUserToClaimBalance(userAddress)
378 -     let currentPeriod = $t01396714054._1
379 -     let toClaim = $t01396714054._2
380 -     let nextPeriod = $t01396714054._3
381 -     let toUnlock = $t01396714054._4
371 +     let $t01365213739 = getUserToClaimBalance(userAddress)
372 +     let currentPeriod = $t01365213739._1
373 +     let toClaim = $t01365213739._2
374 +     let nextPeriod = $t01365213739._3
375 +     let toUnlock = $t01365213739._4
382 376      getClaimUnlockedActions(userAddress, toClaim)
383 377      }
384 378  
385 379

Old	New		Differences
60	60		}
61	61
62	62
63		-	func getLeasingNodeEntry (nodeAddress,~~currentPeriod,~~currentLeased~~,nextPeriod~~,nextLeased) = {
64		-	let valueString = makeString(["%d%d%d%d", toString(~~currentPeriod~~), toString(currentLeased), toString(~~nextPeriod~~), toString(nextLeased)], SEP)
	63	+	func getLeasingNodeEntry (nodeAddress,currentLeased,nextLeased) = {
	64	+	let valueString = makeString(["%d%d%d%d", toString(currentPeriodHeight), toString(currentLeased), toString(nextPeriodHeight), toString(nextLeased)], SEP)
65	65		StringEntry(keyLeasingNodeData(nodeAddress), valueString)
66	66		}
67	67

76	76		let nodeNextPeriod = parseIntValue(dataList[3])
77	77		let nodeNextLeased = parseIntValue(dataList[4])
78	78		if ((nodeNextPeriod > height))
79		-	then $~~Tuple4~~(~~nodeCurrentPeriod,~~ nodeCurrentLeased~~, nodeNextPeriod~~, nodeNextLeased)
80		-	else $~~Tuple4~~(~~currentPeriodHeight,~~ nodeNextLeased~~, nextPeriodHeight~~, nodeNextLeased)
	79	+	then $Tuple2(nodeCurrentLeased, nodeNextLeased)
	80	+	else $Tuple2(nodeNextLeased, nodeNextLeased)
81	81		case _ =>
82		-	$~~Tuple4~~(0, 0~~, 0, 0~~)
	82	+	$Tuple2(0, 0)
83	83		}
84	84		}
85	85

181	181		if ((checks == checks))
182	182		then {
183	183		let userLeasingAmount = i.payments[0].amount
184		-	let $t070397147 = getLeasingNodeData(nodeAddress)
185		-	let nodeCurrentPeriod = $t070397147._1
186		-	let nodeCurrentLeased = $t070397147._2
187		-	let nodeNextPeriod = $t070397147._3
188		-	let nodeNextLeased = $t070397147._4
	184	+	let $t069347007 = getLeasingNodeData(nodeAddress)
	185	+	let nodeCurrentLeased = $t069347007._1
	186	+	let nodeNextLeased = $t069347007._2
189	187		let newNodeNextLease = (nodeNextLeased + userLeasingAmount)
190		-	let $~~t072157336~~ = getUserLeasingData(nodeAddress, userAddress)
191		-	let userCurrentPeriod = $~~t072157336~~._1
192		-	let userCurrentLeased = $~~t072157336~~._2
193		-	let userNextPeriod = $~~t072157336~~._3
194		-	let userNextLeased = $~~t072157336~~._4
	188	+	let $t070757196 = getUserLeasingData(nodeAddress, userAddress)
	189	+	let userCurrentPeriod = $t070757196._1
	190	+	let userCurrentLeased = $t070757196._2
	191	+	let userNextPeriod = $t070757196._3
	192	+	let userNextLeased = $t070757196._4
195	193		let newUserNextLeased = (userNextLeased + userLeasingAmount)
196		-	[getLeasingNodeEntry(nodeAddress, ~~nodeCurrentPeriod,~~ nodeCurrentLeased~~, nodeNextPeriod~~, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
	194	+	[getLeasingNodeEntry(nodeAddress, nodeCurrentLeased, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
197	195		}
198	196		else throw("Strict value is not equal to itself.")
199	197		}
200	198
201	199
202	200		func getUnstakeActions (nodeAddress,userAddress,unstakeAmount) = {
203		-	let $t080248132 = getLeasingNodeData(nodeAddress)
204		-	let nodeCurrentPeriod = $t080248132._1
205		-	let nodeCurrentLeased = $t080248132._2
206		-	let nodeNextPeriod = $t080248132._3
207		-	let nodeNextLeased = $t080248132._4
208		-	let $t081378258 = getUserLeasingData(nodeAddress, userAddress)
209		-	let userCurrentPeriod = $t081378258._1
210		-	let userCurrentLeased = $t081378258._2
211		-	let userNextPeriod = $t081378258._3
212		-	let userNextLeased = $t081378258._4
	201	+	let $t078497922 = getLeasingNodeData(nodeAddress)
	202	+	let nodeCurrentLeased = $t078497922._1
	203	+	let nodeNextLeased = $t078497922._2
	204	+	let $t079278048 = getUserLeasingData(nodeAddress, userAddress)
	205	+	let userCurrentPeriod = $t079278048._1
	206	+	let userCurrentLeased = $t079278048._2
	207	+	let userNextPeriod = $t079278048._3
	208	+	let userNextLeased = $t079278048._4
213	209		let checks = [if ((unstakeAmount > 0))
214	210		then true
215	211		else throwErr("unstake amount should be greater than 0"), if ((userNextLeased >= unstakeAmount))

225	221		then {
226	222		let newNodeNextLease = (nodeNextLeased - unstakeAmount)
227	223		let newUserNextLeased = (userNextLeased - unstakeAmount)
228		-	let $~~t089519083~~ = getUserToClaimBalance(userAddress)
229		-	let currentPeriod = $~~t089519083~~._1
230		-	let toClaim = $~~t089519083~~._2
231		-	let nextPeriod = $~~t089519083~~._3
232		-	let toUnlock = $~~t089519083~~._4
	224	+	let $t087418873 = getUserToClaimBalance(userAddress)
	225	+	let currentPeriod = $t087418873._1
	226	+	let toClaim = $t087418873._2
	227	+	let nextPeriod = $t087418873._3
	228	+	let toUnlock = $t087418873._4
233	229		let newToUnlock = (toUnlock + unstakeAmount)
234	230		let removeNodeActions = if ((newUserNextLeased == 0))
235	231		then [getUserNodeListEntry(userAddress, removeNodeFromNodeList(userAddress, nodeAddress))]
236	232		else nil
237		-	([getLeasingNodeEntry(nodeAddress, ~~nodeCurrentPeriod,~~ nodeCurrentLeased~~, nodeNextPeriod~~, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, toClaim, nextPeriod, newToUnlock)] ++ removeNodeActions)
	233	+	([getLeasingNodeEntry(nodeAddress, nodeCurrentLeased, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, toClaim, nextPeriod, newToUnlock)] ++ removeNodeActions)
238	234		}
239	235		else throw("Strict value is not equal to itself.")
240	236		}
241	237
242	238
243	239		func getClaimUnlockedActions (userAddress,claimAmount) = {
244		-	let $~~t097509837~~ = getUserToClaimBalance(userAddress)
245		-	let currentPeriod = $~~t097509837~~._1
246		-	let toClaim = $~~t097509837~~._2
247		-	let nextPeriod = $~~t097509837~~._3
248		-	let toUnlock = $~~t097509837~~._4
	240	+	let $t095059592 = getUserToClaimBalance(userAddress)
	241	+	let currentPeriod = $t095059592._1
	242	+	let toClaim = $t095059592._2
	243	+	let nextPeriod = $t095059592._3
	244	+	let toUnlock = $t095059592._4
249	245		let checks = [if ((claimAmount > 0))
250	246		then true
251	247		else throwErr("claim amount should be greater than 0"), if ((toClaim >= claimAmount))

263	259
264	260
265	261		func getStakeFromUnlockedActions (nodeAddress,userAddress,userLeasingAmount) = {
266		-	let $~~t01050410591~~ = getUserToClaimBalance(userAddress)
267		-	let currentPeriod = $~~t01050410591~~._1
268		-	let toClaim = $~~t01050410591~~._2
269		-	let nextPeriod = $~~t01050410591~~._3
270		-	let toUnlock = $~~t01050410591~~._4
	262	+	let $t01025910346 = getUserToClaimBalance(userAddress)
	263	+	let currentPeriod = $t01025910346._1
	264	+	let toClaim = $t01025910346._2
	265	+	let nextPeriod = $t01025910346._3
	266	+	let toUnlock = $t01025910346._4
271	267		let available = (toUnlock + toClaim)
272	268		let checks = [if ((userLeasingAmount > 0))
273	269		then true

280	276		else throwErr(makeString(["user address is not valid:", userAddress], " "))]
281	277		if ((checks == checks))
282	278		then {
283		-	let $t01106811176 = getLeasingNodeData(nodeAddress)
284		-	let nodeCurrentPeriod = $t01106811176._1
285		-	let nodeCurrentLeased = $t01106811176._2
286		-	let nodeNextPeriod = $t01106811176._3
287		-	let nodeNextLeased = $t01106811176._4
	279	+	let $t01082310896 = getLeasingNodeData(nodeAddress)
	280	+	let nodeCurrentLeased = $t01082310896._1
	281	+	let nodeNextLeased = $t01082310896._2
288	282		let newNodeNextLease = (nodeNextLeased + userLeasingAmount)
289		-	let $~~t01124411365~~ = getUserLeasingData(nodeAddress, userAddress)
290		-	let userCurrentPeriod = $~~t01124411365~~._1
291		-	let userCurrentLeased = $~~t01124411365~~._2
292		-	let userNextPeriod = $~~t01124411365~~._3
293		-	let userNextLeased = $~~t01124411365~~._4
	283	+	let $t01096411085 = getUserLeasingData(nodeAddress, userAddress)
	284	+	let userCurrentPeriod = $t01096411085._1
	285	+	let userCurrentLeased = $t01096411085._2
	286	+	let userNextPeriod = $t01096411085._3
	287	+	let userNextLeased = $t01096411085._4
294	288		let newUserNextLeased = (userNextLeased + userLeasingAmount)
295	289		let newToUnlock = max([0, (toUnlock - userLeasingAmount)])
296	290		let newToClaim = min([toClaim, (toClaim + (toUnlock - userLeasingAmount))])
297		-	[getLeasingNodeEntry(nodeAddress, ~~nodeCurrentPeriod,~~ nodeCurrentLeased~~, nodeNextPeriod~~, nodeNextLeased), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, newToClaim, nextPeriod, newToUnlock), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
	291	+	[getLeasingNodeEntry(nodeAddress, nodeCurrentLeased, nodeNextLeased), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, newToClaim, nextPeriod, newToUnlock), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
298	292		}
299	293		else throw("Strict value is not equal to itself.")
300	294		}

323	317
324	318		@Callable(i)
325	319		func getUserData (userAddress) = {
326		-	let $~~t01292213009~~ = getUserToClaimBalance(userAddress)
327		-	let currentPeriod = $~~t01292213009~~._1
328		-	let toClaim = $~~t01292213009~~._2
329		-	let nextPeriod = $~~t01292213009~~._3
330		-	let toUnlock = $~~t01292213009~~._4
	320	+	let $t01260712694 = getUserToClaimBalance(userAddress)
	321	+	let currentPeriod = $t01260712694._1
	322	+	let toClaim = $t01260712694._2
	323	+	let nextPeriod = $t01260712694._3
	324	+	let toUnlock = $t01260712694._4
331	325		let nodeList = getUserLeasingNodeList(userAddress)
332	326		$Tuple2(nil, $Tuple4(toClaim, toUnlock, (toUnlock + toClaim), nodeList))
333	327		}

374	368		@Callable(i)
375	369		func claimAll () = {
376	370		let userAddress = toString(i.caller)
377		-	let $~~t01396714054~~ = getUserToClaimBalance(userAddress)
378		-	let currentPeriod = $~~t01396714054~~._1
379		-	let toClaim = $~~t01396714054~~._2
380		-	let nextPeriod = $~~t01396714054~~._3
381		-	let toUnlock = $~~t01396714054~~._4
	371	+	let $t01365213739 = getUserToClaimBalance(userAddress)
	372	+	let currentPeriod = $t01365213739._1
	373	+	let toClaim = $t01365213739._2
	374	+	let nextPeriod = $t01365213739._3
	375	+	let toUnlock = $t01365213739._4
382	376		getClaimUnlockedActions(userAddress, toClaim)
383	377		}
384	378

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let contractFile = "l2mp_leasing.ride"
5	5
6	6		let SEP = "__"
7	7
8	8		let scale8 = 100000000
9	9
10	10		func throwErr (msg) = throw(((contractFile + ": ") + msg))
11	11
12	12
13	13		let keyAssetId = makeString(["%s", "assetId"], SEP)
14	14
15	15		let keyPeriodOffsetId = makeString(["%s", "offsetId"], SEP)
16	16
17	17		let keyPeriodOffsetHeight = makeString(["%s", "offsetHeight"], SEP)
18	18
19	19		let keyPeriodLength = makeString(["%s", "periodLength"], SEP)
20	20
21	21		let periodOffsetId = valueOrElse(getInteger(this, keyPeriodOffsetId), 0)
22	22
23	23		let periodLength = valueOrElse(getInteger(this, keyPeriodLength), 10000)
24	24
25	25		let periodOffsetHeight = valueOrElse(getInteger(this, keyPeriodOffsetHeight), -1)
26	26
27	27		let currentPeriodId = if (if ((height > periodOffsetHeight))
28	28		then (periodOffsetHeight != -1)
29	29		else false)
30	30		then (((height - periodOffsetHeight) / periodLength) + periodOffsetId)
31	31		else max([0, (periodOffsetId - 1)])
32	32
33	33		let currentPeriodHeight = (periodOffsetHeight + ((currentPeriodId - periodOffsetId) * periodLength))
34	34
35	35		let nextPeriodHeight = (currentPeriodHeight + periodLength)
36	36
37	37		func keyLeasingNodeData (nodeAddress) = makeString(["%s", nodeAddress], SEP)
38	38
39	39
40	40		func keyUserLeasingNodeList (userAddress) = makeString(["%s%s", "userLeasingNodeList", userAddress], SEP)
41	41
42	42
43	43		func keyUserLeasingNodeData (userAddress,nodeAddress) = makeString(["%s%s", nodeAddress, userAddress], SEP)
44	44
45	45
46	46		func keyUserToClaim (userAddress) = makeString(["%s%s", "toClaim", userAddress], SEP)
47	47
48	48
49	49		let assetIdString = valueOrElse(getString(this, keyAssetId), "WAVES")
50	50
51	51		let assetIdBytes = if ((assetIdString == "WAVES"))
52	52		then unit
53	53		else fromBase58String(assetIdString)
54	54
55	55		func isValidAddress (address) = match addressFromString(address) {
56	56		case a: Address =>
57	57		true
58	58		case _ =>
59	59		false
60	60		}
61	61
62	62
63		-	func getLeasingNodeEntry (nodeAddress,~~currentPeriod,~~currentLeased~~,nextPeriod~~,nextLeased) = {
64		-	let valueString = makeString(["%d%d%d%d", toString(~~currentPeriod~~), toString(currentLeased), toString(~~nextPeriod~~), toString(nextLeased)], SEP)
	63	+	func getLeasingNodeEntry (nodeAddress,currentLeased,nextLeased) = {
	64	+	let valueString = makeString(["%d%d%d%d", toString(currentPeriodHeight), toString(currentLeased), toString(nextPeriodHeight), toString(nextLeased)], SEP)
65	65		StringEntry(keyLeasingNodeData(nodeAddress), valueString)
66	66		}
67	67
68	68
69	69		func getLeasingNodeData (nodeAddress) = {
70	70		let leasingDataStringRaw = getString(this, keyLeasingNodeData(nodeAddress))
71	71		match leasingDataStringRaw {
72	72		case ds: String =>
73	73		let dataList = split(ds, SEP)
74	74		let nodeCurrentPeriod = parseIntValue(dataList[1])
75	75		let nodeCurrentLeased = parseIntValue(dataList[2])
76	76		let nodeNextPeriod = parseIntValue(dataList[3])
77	77		let nodeNextLeased = parseIntValue(dataList[4])
78	78		if ((nodeNextPeriod > height))
79		-	then $~~Tuple4~~(~~nodeCurrentPeriod,~~ nodeCurrentLeased~~, nodeNextPeriod~~, nodeNextLeased)
80		-	else $~~Tuple4~~(~~currentPeriodHeight,~~ nodeNextLeased~~, nextPeriodHeight~~, nodeNextLeased)
	79	+	then $Tuple2(nodeCurrentLeased, nodeNextLeased)
	80	+	else $Tuple2(nodeNextLeased, nodeNextLeased)
81	81		case _ =>
82		-	$~~Tuple4~~(0, 0~~, 0, 0~~)
	82	+	$Tuple2(0, 0)
83	83		}
84	84		}
85	85
86	86
87	87		func getUserLeasingEntry (nodeAddress,userAddress,userCurrentPeriod,userCurrentLeased,userNextPeriod,userNextLeased) = {
88	88		let valueString = makeString(["%d%d%d%d", toString(userCurrentPeriod), toString(userCurrentLeased), toString(userNextPeriod), toString(userNextLeased)], SEP)
89	89		StringEntry(keyUserLeasingNodeData(userAddress, nodeAddress), valueString)
90	90		}
91	91
92	92
93	93		func getUserLeasingData (nodeAddress,userAddress) = {
94	94		let leasingDataStringRaw = getString(this, keyUserLeasingNodeData(userAddress, nodeAddress))
95	95		match leasingDataStringRaw {
96	96		case ds: String =>
97	97		let dataList = split(ds, SEP)
98	98		let userCurrentPeriod = parseIntValue(dataList[1])
99	99		let userCurrentLeased = parseIntValue(dataList[2])
100	100		let userNextPeriod = parseIntValue(dataList[3])
101	101		let userNextLeased = parseIntValue(dataList[4])
102	102		if ((userNextPeriod > height))
103	103		then $Tuple4(userCurrentPeriod, userCurrentLeased, userNextPeriod, userNextLeased)
104	104		else $Tuple4(currentPeriodHeight, userNextLeased, nextPeriodHeight, userNextLeased)
105	105		case _ =>
106	106		$Tuple4(0, 0, 0, 0)
107	107		}
108	108		}
109	109
110	110
111	111		func getUserToClaimEntry (userAddress,currentPeriod,toClaim,nextPeriod,toUnlock) = {
112	112		let valueString = makeString(["%d%d%d%d", toString(currentPeriod), toString(toClaim), toString(nextPeriod), toString(toUnlock)], SEP)
113	113		StringEntry(keyUserToClaim(userAddress), valueString)
114	114		}
115	115
116	116
117	117		func getUserToClaimBalance (userAddress) = {
118	118		let userToClaimDataRaw = getString(this, keyUserToClaim(userAddress))
119	119		match userToClaimDataRaw {
120	120		case ds: String =>
121	121		let dataList = split(ds, SEP)
122	122		let currentPeriod = parseIntValue(dataList[1])
123	123		let toClaim = parseIntValue(dataList[2])
124	124		let nextPeriod = parseIntValue(dataList[3])
125	125		let toUnlock = parseIntValue(dataList[4])
126	126		if ((nextPeriod > height))
127	127		then $Tuple4(currentPeriod, toClaim, nextPeriod, toUnlock)
128	128		else $Tuple4(currentPeriodHeight, (toClaim + toUnlock), nextPeriodHeight, 0)
129	129		case _ =>
130	130		$Tuple4(0, 0, 0, 0)
131	131		}
132	132		}
133	133
134	134
135	135		func getUserLeasingNodeList (userAddress) = {
136	136		let leasingDataStringRaw = getString(this, keyUserLeasingNodeList(userAddress))
137	137		match leasingDataStringRaw {
138	138		case ds: String =>
139	139		let dataList = split_51C(ds, SEP)
140	140		dataList
141	141		case _ =>
142	142		nil
143	143		}
144	144		}
145	145
146	146
147	147		func getUserNodeListEntry (userAddress,nodeList) = if ((size(nodeList) == 0))
148	148		then DeleteEntry(keyUserLeasingNodeList(userAddress))
149	149		else StringEntry(keyUserLeasingNodeList(userAddress), makeString_11C(nodeList, SEP))
150	150
151	151
152	152		func addNodeToNodeList (userAddress,nodeAddress) = {
153	153		let nodeList = getUserLeasingNodeList(userAddress)
154	154		if (containsElement(nodeList, nodeAddress))
155	155		then nodeList
156	156		else (nodeList :+ nodeAddress)
157	157		}
158	158
159	159
160	160		func removeNodeFromNodeList (userAddress,nodeAddress) = {
161	161		let nodeList = getUserLeasingNodeList(userAddress)
162	162		match indexOf(nodeList, nodeAddress) {
163	163		case index: Int =>
164	164		removeByIndex(nodeList, index)
165	165		case _ =>
166	166		nodeList
167	167		}
168	168		}
169	169
170	170
171	171		func getStakeActions (nodeAddress,userAddress,i) = {
172	172		let checks = [if ((size(i.payments) == 1))
173	173		then true
174	174		else throwErr("payment size should be exactly 1"), if ((i.payments[0].assetId == assetIdBytes))
175	175		then true
176	176		else throwErr(makeString(["payment assetId should be:", assetIdString], " ")), if (isValidAddress(nodeAddress))
177	177		then true
178	178		else throwErr(makeString(["node address is not valid:", nodeAddress], " ")), if (isValidAddress(userAddress))
179	179		then true
180	180		else throwErr(makeString(["user address is not valid:", userAddress], " "))]
181	181		if ((checks == checks))
182	182		then {
183	183		let userLeasingAmount = i.payments[0].amount
184		-	let $t070397147 = getLeasingNodeData(nodeAddress)
185		-	let nodeCurrentPeriod = $t070397147._1
186		-	let nodeCurrentLeased = $t070397147._2
187		-	let nodeNextPeriod = $t070397147._3
188		-	let nodeNextLeased = $t070397147._4
	184	+	let $t069347007 = getLeasingNodeData(nodeAddress)
	185	+	let nodeCurrentLeased = $t069347007._1
	186	+	let nodeNextLeased = $t069347007._2
189	187		let newNodeNextLease = (nodeNextLeased + userLeasingAmount)
190		-	let $~~t072157336~~ = getUserLeasingData(nodeAddress, userAddress)
191		-	let userCurrentPeriod = $~~t072157336~~._1
192		-	let userCurrentLeased = $~~t072157336~~._2
193		-	let userNextPeriod = $~~t072157336~~._3
194		-	let userNextLeased = $~~t072157336~~._4
	188	+	let $t070757196 = getUserLeasingData(nodeAddress, userAddress)
	189	+	let userCurrentPeriod = $t070757196._1
	190	+	let userCurrentLeased = $t070757196._2
	191	+	let userNextPeriod = $t070757196._3
	192	+	let userNextLeased = $t070757196._4
195	193		let newUserNextLeased = (userNextLeased + userLeasingAmount)
196		-	[getLeasingNodeEntry(nodeAddress, ~~nodeCurrentPeriod,~~ nodeCurrentLeased~~, nodeNextPeriod~~, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
	194	+	[getLeasingNodeEntry(nodeAddress, nodeCurrentLeased, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
197	195		}
198	196		else throw("Strict value is not equal to itself.")
199	197		}
200	198
201	199
202	200		func getUnstakeActions (nodeAddress,userAddress,unstakeAmount) = {
203		-	let $t080248132 = getLeasingNodeData(nodeAddress)
204		-	let nodeCurrentPeriod = $t080248132._1
205		-	let nodeCurrentLeased = $t080248132._2
206		-	let nodeNextPeriod = $t080248132._3
207		-	let nodeNextLeased = $t080248132._4
208		-	let $t081378258 = getUserLeasingData(nodeAddress, userAddress)
209		-	let userCurrentPeriod = $t081378258._1
210		-	let userCurrentLeased = $t081378258._2
211		-	let userNextPeriod = $t081378258._3
212		-	let userNextLeased = $t081378258._4
	201	+	let $t078497922 = getLeasingNodeData(nodeAddress)
	202	+	let nodeCurrentLeased = $t078497922._1
	203	+	let nodeNextLeased = $t078497922._2
	204	+	let $t079278048 = getUserLeasingData(nodeAddress, userAddress)
	205	+	let userCurrentPeriod = $t079278048._1
	206	+	let userCurrentLeased = $t079278048._2
	207	+	let userNextPeriod = $t079278048._3
	208	+	let userNextLeased = $t079278048._4
213	209		let checks = [if ((unstakeAmount > 0))
214	210		then true
215	211		else throwErr("unstake amount should be greater than 0"), if ((userNextLeased >= unstakeAmount))
216	212		then true
217	213		else throwErr("unstake amount should be less or equal user staked amount"), if ((nodeNextLeased >= unstakeAmount))
218	214		then true
219	215		else throwErr("unstake amount should be less or equal node staked amount"), if (isValidAddress(nodeAddress))
220	216		then true
221	217		else throwErr(makeString(["node address is not valid:", nodeAddress], " ")), if (isValidAddress(userAddress))
222	218		then true
223	219		else throwErr(makeString(["user address is not valid:", userAddress], " "))]
224	220		if ((checks == checks))
225	221		then {
226	222		let newNodeNextLease = (nodeNextLeased - unstakeAmount)
227	223		let newUserNextLeased = (userNextLeased - unstakeAmount)
228		-	let $~~t089519083~~ = getUserToClaimBalance(userAddress)
229		-	let currentPeriod = $~~t089519083~~._1
230		-	let toClaim = $~~t089519083~~._2
231		-	let nextPeriod = $~~t089519083~~._3
232		-	let toUnlock = $~~t089519083~~._4
	224	+	let $t087418873 = getUserToClaimBalance(userAddress)
	225	+	let currentPeriod = $t087418873._1
	226	+	let toClaim = $t087418873._2
	227	+	let nextPeriod = $t087418873._3
	228	+	let toUnlock = $t087418873._4
233	229		let newToUnlock = (toUnlock + unstakeAmount)
234	230		let removeNodeActions = if ((newUserNextLeased == 0))
235	231		then [getUserNodeListEntry(userAddress, removeNodeFromNodeList(userAddress, nodeAddress))]
236	232		else nil
237		-	([getLeasingNodeEntry(nodeAddress, ~~nodeCurrentPeriod,~~ nodeCurrentLeased~~, nodeNextPeriod~~, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, toClaim, nextPeriod, newToUnlock)] ++ removeNodeActions)
	233	+	([getLeasingNodeEntry(nodeAddress, nodeCurrentLeased, newNodeNextLease), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, toClaim, nextPeriod, newToUnlock)] ++ removeNodeActions)
238	234		}
239	235		else throw("Strict value is not equal to itself.")
240	236		}
241	237
242	238
243	239		func getClaimUnlockedActions (userAddress,claimAmount) = {
244		-	let $~~t097509837~~ = getUserToClaimBalance(userAddress)
245		-	let currentPeriod = $~~t097509837~~._1
246		-	let toClaim = $~~t097509837~~._2
247		-	let nextPeriod = $~~t097509837~~._3
248		-	let toUnlock = $~~t097509837~~._4
	240	+	let $t095059592 = getUserToClaimBalance(userAddress)
	241	+	let currentPeriod = $t095059592._1
	242	+	let toClaim = $t095059592._2
	243	+	let nextPeriod = $t095059592._3
	244	+	let toUnlock = $t095059592._4
249	245		let checks = [if ((claimAmount > 0))
250	246		then true
251	247		else throwErr("claim amount should be greater than 0"), if ((toClaim >= claimAmount))
252	248		then true
253	249		else throwErr("claim amount should be less or equal unlocked amount"), if (isValidAddress(userAddress))
254	250		then true
255	251		else throwErr(makeString(["user address is not valid:", userAddress], " "))]
256	252		if ((checks == checks))
257	253		then {
258	254		let newToClaim = (toClaim - claimAmount)
259	255		[getUserToClaimEntry(userAddress, currentPeriod, newToClaim, nextPeriod, toUnlock), ScriptTransfer(addressFromStringValue(userAddress), claimAmount, assetIdBytes)]
260	256		}
261	257		else throw("Strict value is not equal to itself.")
262	258		}
263	259
264	260
265	261		func getStakeFromUnlockedActions (nodeAddress,userAddress,userLeasingAmount) = {
266		-	let $~~t01050410591~~ = getUserToClaimBalance(userAddress)
267		-	let currentPeriod = $~~t01050410591~~._1
268		-	let toClaim = $~~t01050410591~~._2
269		-	let nextPeriod = $~~t01050410591~~._3
270		-	let toUnlock = $~~t01050410591~~._4
	262	+	let $t01025910346 = getUserToClaimBalance(userAddress)
	263	+	let currentPeriod = $t01025910346._1
	264	+	let toClaim = $t01025910346._2
	265	+	let nextPeriod = $t01025910346._3
	266	+	let toUnlock = $t01025910346._4
271	267		let available = (toUnlock + toClaim)
272	268		let checks = [if ((userLeasingAmount > 0))
273	269		then true
274	270		else throwErr("amount should be greater than 0"), if ((available >= userLeasingAmount))
275	271		then true
276	272		else throwErr("amount should be less or equal to available"), if (isValidAddress(nodeAddress))
277	273		then true
278	274		else throwErr(makeString(["node address is not valid:", nodeAddress], " ")), if (isValidAddress(userAddress))
279	275		then true
280	276		else throwErr(makeString(["user address is not valid:", userAddress], " "))]
281	277		if ((checks == checks))
282	278		then {
283		-	let $t01106811176 = getLeasingNodeData(nodeAddress)
284		-	let nodeCurrentPeriod = $t01106811176._1
285		-	let nodeCurrentLeased = $t01106811176._2
286		-	let nodeNextPeriod = $t01106811176._3
287		-	let nodeNextLeased = $t01106811176._4
	279	+	let $t01082310896 = getLeasingNodeData(nodeAddress)
	280	+	let nodeCurrentLeased = $t01082310896._1
	281	+	let nodeNextLeased = $t01082310896._2
288	282		let newNodeNextLease = (nodeNextLeased + userLeasingAmount)
289		-	let $~~t01124411365~~ = getUserLeasingData(nodeAddress, userAddress)
290		-	let userCurrentPeriod = $~~t01124411365~~._1
291		-	let userCurrentLeased = $~~t01124411365~~._2
292		-	let userNextPeriod = $~~t01124411365~~._3
293		-	let userNextLeased = $~~t01124411365~~._4
	283	+	let $t01096411085 = getUserLeasingData(nodeAddress, userAddress)
	284	+	let userCurrentPeriod = $t01096411085._1
	285	+	let userCurrentLeased = $t01096411085._2
	286	+	let userNextPeriod = $t01096411085._3
	287	+	let userNextLeased = $t01096411085._4
294	288		let newUserNextLeased = (userNextLeased + userLeasingAmount)
295	289		let newToUnlock = max([0, (toUnlock - userLeasingAmount)])
296	290		let newToClaim = min([toClaim, (toClaim + (toUnlock - userLeasingAmount))])
297		-	[getLeasingNodeEntry(nodeAddress, ~~nodeCurrentPeriod,~~ nodeCurrentLeased~~, nodeNextPeriod~~, nodeNextLeased), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, newToClaim, nextPeriod, newToUnlock), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
	291	+	[getLeasingNodeEntry(nodeAddress, nodeCurrentLeased, nodeNextLeased), getUserLeasingEntry(nodeAddress, userAddress, userCurrentPeriod, userCurrentLeased, userNextPeriod, newUserNextLeased), getUserToClaimEntry(userAddress, currentPeriod, newToClaim, nextPeriod, newToUnlock), getUserNodeListEntry(userAddress, addNodeToNodeList(userAddress, nodeAddress))]
298	292		}
299	293		else throw("Strict value is not equal to itself.")
300	294		}
301	295
302	296
303	297		func getSetNewPeriodLengthActions (newPeriodLength) = {
304	298		let check = [if ((newPeriodLength > 0))
305	299		then true
306	300		else throwErr("period length should be greater than 0")]
307	301		if ((check == check))
308	302		then if ((periodOffsetHeight == -1))
309	303		then [IntegerEntry(keyPeriodLength, newPeriodLength), IntegerEntry(keyPeriodOffsetHeight, height)]
310	304		else {
311	305		let newPeriodOffsetId = (currentPeriodId + 1)
312	306		let newOffsetHeight = ((periodLength * (newPeriodOffsetId - periodOffsetId)) + periodOffsetHeight)
313	307		[IntegerEntry(keyPeriodOffsetId, newPeriodOffsetId), IntegerEntry(keyPeriodOffsetHeight, newOffsetHeight), IntegerEntry(keyPeriodLength, newPeriodLength)]
314	308		}
315	309		else throw("Strict value is not equal to itself.")
316	310		}
317	311
318	312
319	313		@Callable(i)
320	314		func setNewPeriodLength (newPeriodLength) = getSetNewPeriodLengthActions(newPeriodLength)
321	315
322	316
323	317
324	318		@Callable(i)
325	319		func getUserData (userAddress) = {
326		-	let $~~t01292213009~~ = getUserToClaimBalance(userAddress)
327		-	let currentPeriod = $~~t01292213009~~._1
328		-	let toClaim = $~~t01292213009~~._2
329		-	let nextPeriod = $~~t01292213009~~._3
330		-	let toUnlock = $~~t01292213009~~._4
	320	+	let $t01260712694 = getUserToClaimBalance(userAddress)
	321	+	let currentPeriod = $t01260712694._1
	322	+	let toClaim = $t01260712694._2
	323	+	let nextPeriod = $t01260712694._3
	324	+	let toUnlock = $t01260712694._4
331	325		let nodeList = getUserLeasingNodeList(userAddress)
332	326		$Tuple2(nil, $Tuple4(toClaim, toUnlock, (toUnlock + toClaim), nodeList))
333	327		}
334	328
335	329
336	330
337	331		@Callable(i)
338	332		func stakeFor (nodeAddress,userAddress) = getStakeActions(nodeAddress, userAddress, i)
339	333
340	334
341	335
342	336		@Callable(i)
343	337		func stake (nodeAddress) = {
344	338		let userAddress = toString(i.caller)
345	339		getStakeActions(nodeAddress, userAddress, i)
346	340		}
347	341
348	342
349	343
350	344		@Callable(i)
351	345		func stakeFromUnlocked (nodeAddress,amount) = {
352	346		let userAddress = toString(i.caller)
353	347		getStakeFromUnlockedActions(nodeAddress, userAddress, amount)
354	348		}
355	349
356	350
357	351
358	352		@Callable(i)
359	353		func unstake (nodeAddress,amount) = {
360	354		let userAddress = toString(i.caller)
361	355		getUnstakeActions(nodeAddress, userAddress, amount)
362	356		}
363	357
364	358
365	359
366	360		@Callable(i)
367	361		func claim (amount) = {
368	362		let userAddress = toString(i.caller)
369	363		getClaimUnlockedActions(userAddress, amount)
370	364		}
371	365
372	366
373	367
374	368		@Callable(i)
375	369		func claimAll () = {
376	370		let userAddress = toString(i.caller)
377		-	let $~~t01396714054~~ = getUserToClaimBalance(userAddress)
378		-	let currentPeriod = $~~t01396714054~~._1
379		-	let toClaim = $~~t01396714054~~._2
380		-	let nextPeriod = $~~t01396714054~~._3
381		-	let toUnlock = $~~t01396714054~~._4
	371	+	let $t01365213739 = getUserToClaimBalance(userAddress)
	372	+	let currentPeriod = $t01365213739._1
	373	+	let toClaim = $t01365213739._2
	374	+	let nextPeriod = $t01365213739._3
	375	+	let toUnlock = $t01365213739._4
382	376		getClaimUnlockedActions(userAddress, toClaim)
383	377		}
384	378
385	379

github/deemru/w8io/169f3d6 
72.28 ms ◑