w8 · tx · 4VA···by2

tx · 4VA9Jdo7PcCJVeouVNwTq65UHCkCX1X5LJaRC8Q5Qby2

3Mv8VUoVKevJodzBJKsqHEdrheDruTeNcye:  -0.04000000 Waves

2020.09.01 20:41 [1158642] smart account 3Mv8VUoVKevJodzBJKsqHEdrheDruTeNcye > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "4VA9Jdo7PcCJVeouVNwTq65UHCkCX1X5LJaRC8Q5Qby2",
    "fee": 4000000,
    "feeAssetId": null,
    "timestamp": 1598982134594,
    "version": 1,
    "sender": "3Mv8VUoVKevJodzBJKsqHEdrheDruTeNcye",
    "senderPublicKey": "FPgnjQzRFcjm83CEBmAzXmUFV6ghHwvr2FcP65idu6qw",
    "proofs": [
        "2cPLMczD7QYvA3HdPjf8uhw3hLhXZf38R3nYKBD8qTiq3gVgTpCgwGALo718fMEtAy7uL8yi9VqauvY6L6hMoijB"
    ],
    "script": "base64:AAIDAAAAAAAAABEIARIECgIBARIFCgMBAQESAAAAAA0BAAAACXNldENvb3JkcwAAAAMAAAADa2V5AAAACGxhdGl0dWRlAAAACWxvbmdpdHVkZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAxwb3NpdGlvbkxhdF8FAAAAA2tleQUAAAAIbGF0aXR1ZGUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAMcG9zaXRpb25Mb25fBQAAAANrZXkFAAAACWxvbmdpdHVkZQUAAAADbmlsAQAAAAtzZXRHYW1lRGF0YQAAAAIAAAAJcGxheWVyS2V5AAAAC29wcG9uZW50S2V5BAAAAAZnYW1lSWQJAAEsAAAAAgkAASwAAAACBQAAAAlwbGF5ZXJLZXkCAAAAAV8FAAAAC29wcG9uZW50S2V5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAB2dhbWVJZF8FAAAACXBsYXllcktleQUAAAAGZ2FtZUlkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACW9wcG9uZW50XwUAAAAJcGxheWVyS2V5BQAAAAtvcHBvbmVudEtleQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAdnYW1lSWRfBQAAAAtvcHBvbmVudEtleQUAAAAGZ2FtZUlkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACW9wcG9uZW50XwUAAAALb3Bwb25lbnRLZXkFAAAACXBsYXllcktleQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAVnYW1lXwUAAAAGZ2FtZUlkBgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAlnYW1lVHVybl8FAAAABmdhbWVJZAUAAAAJcGxheWVyS2V5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAC2dhbWVXaW5uZXJfBQAAAAZnYW1lSWQCAAAAAAUAAAADbmlsAQAAAAlnZXRHYW1lSWQAAAABAAAAA2tleQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAdnYW1lSWRfBQAAAANrZXkBAAAAA3NpbgAAAAEAAAADcmFkBAAAAAZmYWN0b3IJAABpAAAAAgUAAAADcmFkAAAAAAAACZZeAwkAAGYAAAACAAAAAAAAAAAABQAAAANyYWQEAAAACHBvc2l0aXZlCQEAAAABLQAAAAEFAAAAA3JhZAMJAABmAAAAAgUAAAAIcG9zaXRpdmUAAAAAAAAJll4EAAAABG5vcm0JAABkAAAAAgUAAAAIcG9zaXRpdmUJAABoAAAAAgUAAAAGZmFjdG9yAAAAAAAACZZeAwkAAGYAAAACBQAAAARub3JtAAAAAAAABMsvBAAAAAFhCQAAaAAAAAIJAABoAAAAAgAAAAAAAAAAEAkAAGUAAAACBQAAAARub3JtAAAAAAAABMsvCQAAZQAAAAIAAAAAAAAEyy8JAABlAAAAAgUAAAAEbm9ybQAAAAAAAATLLwkAAGkAAAACCQAAaAAAAAIFAAAAAWEAAAAAAAABhqAJAABlAAAAAgAAAABy5baVkgkAAGkAAAACBQAAAAFhAAAAAAAAAAAEBAAAAAFhCQAAaAAAAAIJAABoAAAAAgAAAAAAAAAAEAUAAAAEbm9ybQkAAGUAAAACAAAAAAAABMsvBQAAAARub3JtCQAAaQAAAAIJAABoAAAAAgkBAAAAAS0AAAABBQAAAAFhAAAAAAAAAYagCQAAZQAAAAIAAAAAcuW2lZIJAABpAAAAAgUAAAABYQAAAAAAAAAABAMJAABmAAAAAgUAAAAIcG9zaXRpdmUAAAAAAAAEyy8EAAAAAWEJAABoAAAAAgkAAGgAAAACAAAAAAAAAAAQCQAAZQAAAAIFAAAACHBvc2l0aXZlAAAAAAAABMsvCQAAZQAAAAIAAAAAAAAEyy8JAABlAAAAAgUAAAAIcG9zaXRpdmUAAAAAAAAEyy8JAABpAAAAAgkAAGgAAAACBQAAAAFhAAAAAAAAAYagCQAAZQAAAAIAAAAAcuW2lZIJAABpAAAAAgUAAAABYQAAAAAAAAAABAQAAAABYQkAAGgAAAACCQAAaAAAAAIAAAAAAAAAABAFAAAACHBvc2l0aXZlCQAAZQAAAAIAAAAAAAAEyy8FAAAACHBvc2l0aXZlCQAAaQAAAAIJAABoAAAAAgkBAAAAAS0AAAABBQAAAAFhAAAAAAAAAYagCQAAZQAAAAIAAAAAcuW2lZIJAABpAAAAAgUAAAABYQAAAAAAAAAABAMJAABmAAAAAgUAAAADcmFkAAAAAAAACZZeBAAAAARub3JtCQAAZQAAAAIFAAAAA3JhZAkAAGgAAAACBQAAAAZmYWN0b3IAAAAAAAAJll4DCQAAZgAAAAIFAAAABG5vcm0AAAAAAAAEyy8EAAAAAWEJAABoAAAAAgkAAGgAAAACAAAAAAAAAAAQCQAAZQAAAAIFAAAABG5vcm0AAAAAAAAEyy8JAABlAAAAAgAAAAAAAATLLwkAAGUAAAACBQAAAARub3JtAAAAAAAABMsvCQAAaQAAAAIJAABoAAAAAgkBAAAAAS0AAAABBQAAAAFhAAAAAAAAAYagCQAAZQAAAAIAAAAAcuW2lZIJAABpAAAAAgUAAAABYQAAAAAAAAAABAQAAAABYQkAAGgAAAACCQAAaAAAAAIAAAAAAAAAABAFAAAABG5vcm0JAABlAAAAAgAAAAAAAATLLwUAAAAEbm9ybQkAAGkAAAACCQAAaAAAAAIFAAAAAWEAAAAAAAABhqAJAABlAAAAAgAAAABy5baVkgkAAGkAAAACBQAAAAFhAAAAAAAAAAAEAwkAAGYAAAACBQAAAANyYWQAAAAAAAAEyy8EAAAAAWEJAABoAAAAAgkAAGgAAAACAAAAAAAAAAAQCQAAZQAAAAIFAAAAA3JhZAAAAAAAAATLLwkAAGUAAAACAAAAAAAABMsvCQAAZQAAAAIFAAAAA3JhZAAAAAAAAATLLwkAAGkAAAACCQAAaAAAAAIJAQAAAAEtAAAAAQUAAAABYQAAAAAAAAGGoAkAAGUAAAACAAAAAHLltpWSCQAAaQAAAAIFAAAAAWEAAAAAAAAAAAQEAAAAAWEJAABoAAAAAgkAAGgAAAACAAAAAAAAAAAQBQAAAANyYWQJAABlAAAAAgAAAAAAAATLLwUAAAADcmFkCQAAaQAAAAIJAABoAAAAAgUAAAABYQAAAAAAAAGGoAkAAGUAAAACAAAAAHLltpWSCQAAaQAAAAIFAAAAAWEAAAAAAAAAAAQBAAAAA2NvcwAAAAEAAAADcmFkCQEAAAADc2luAAAAAQkAAGUAAAACAAAAAAAAAmWXBQAAAANyYWQBAAAABGFzaW4AAAABAAAAAXgDCQAAZwAAAAIA///////+eWAFAAAAAXgA///////9mmkDCQAAZwAAAAIFAAAAAXgAAAAAAAABhqAAAAAAAAACZZcDCQAAZgAAAAIAAAAAAAAAAAAFAAAAAXgEAAAAAngxCQAAaAAAAAIA//////////8FAAAAAXgEAAAABHZhbDIJAABkAAAAAgkAAGkAAAACCQAAaAAAAAIA////////+K8FAAAAAngxAAAAAAAAAYagAAAAAAAAAB0CBAAAAAR2YWw0CQAAZQAAAAIJAABpAAAAAgkAAGgAAAACBQAAAAR2YWwyBQAAAAJ4MQAAAAAAAAGGoAAAAAAAAABS2wQAAAAEdmFsNgkAAGQAAAACCQAAaQAAAAIJAABoAAAAAgUAAAAEdmFsNAUAAAACeDEAAAAAAAABhqAAAAAAAAACZZAEAAAABHJvb3QJAABsAAAABgkAAGUAAAACAAAAAAAAAYagBQAAAAJ4MQAAAAAAAAAABQAAAAAAAAAABQAAAAAAAAAAAQAAAAAAAAAABQUAAAAISEFMRkVWRU4JAQAAAAEtAAAAAQkAAGUAAAACAAAAAAAAAmWXCQAAaQAAAAIJAABoAAAAAgUAAAAEcm9vdAUAAAAEdmFsNgAAAAAAAAGGoAQAAAAEdmFsMgkAAGQAAAACCQAAaQAAAAIJAABoAAAAAgD////////4rwUAAAABeAAAAAAAAAGGoAAAAAAAAAAdAgQAAAAEdmFsNAkAAGUAAAACCQAAaQAAAAIJAABoAAAAAgUAAAAEdmFsMgUAAAABeAAAAAAAAAGGoAAAAAAAAABS2wQAAAAEdmFsNgkAAGQAAAACCQAAaQAAAAIJAABoAAAAAgUAAAAEdmFsNAUAAAABeAAAAAAAAAGGoAAAAAAAAAJlkAQAAAAEcm9vdAkAAGwAAAAGCQAAZQAAAAIAAAAAAAABhqAFAAAAAXgAAAAAAAAAAAUAAAAAAAAAAAUAAAAAAAAAAAEAAAAAAAAAAAUFAAAACEhBTEZFVkVOCQAAZQAAAAIAAAAAAAACZZcJAABpAAAAAgkAAGgAAAACBQAAAARyb290BQAAAAR2YWw2AAAAAAAAAYagAQAAAARhdGFuAAAAAQAAAAF4BAAAAAV4UG93MgkAAGkAAAACCQAAaAAAAAIFAAAAAXgFAAAAAXgAAAAAAAABhqADCQAAZgAAAAIA///////+eWAFAAAAAXgJAABlAAAAAgD///////2aaQkAAGkAAAACCQAAaAAAAAIFAAAAAXgAAAAAAAABhqAJAABkAAAAAgUAAAAFeFBvdzIAAAAAAAAAbWADCQAAZgAAAAIFAAAAAXgAAAAAAAABhqAJAABlAAAAAgAAAAAAAAJllwkAAGkAAAACCQAAaAAAAAIFAAAAAXgAAAAAAAABhqAJAABkAAAAAgUAAAAFeFBvdzIAAAAAAAAAbWAJAABpAAAAAgkAAGgAAAACBQAAAAF4AAAAAAAAAYagCQAAZAAAAAIAAAAAAAABhqAJAABpAAAAAgkAAGgAAAACAAAAAAAAAG1gBQAAAAV4UG93MgAAAAAAAAGGoAEAAAAFYXRhbjIAAAACAAAAAXkAAAABeAMJAABmAAAAAgUAAAABeAAAAAAAAAAAAAkBAAAABGF0YW4AAAABCQAAaQAAAAIFAAAAAXkFAAAAAXgDAwkAAGYAAAACAAAAAAAAAAAABQAAAAF4CQAAZwAAAAIFAAAAAXkAAAAAAAAAAAAHCQAAZAAAAAIJAQAAAARhdGFuAAAAAQkAAGkAAAACBQAAAAF5BQAAAAF4AAAAAAAABMsvAwMJAABmAAAAAgAAAAAAAAAAAAUAAAABeAkAAGYAAAACAAAAAAAAAAAABQAAAAF5BwkAAGUAAAACCQEAAAAEYXRhbgAAAAEJAABpAAAAAgUAAAABeQUAAAABeAAAAAAAAATLLwMDCQAAAAAAAAIFAAAAAXgAAAAAAAAAAAAJAABmAAAAAgUAAAABeQAAAAAAAAAAAAcAAAAAAAACZZcDAwkAAAAAAAACBQAAAAF4AAAAAAAAAAAACQAAZgAAAAIAAAAAAAAAAAAFAAAAAXkHAP///////ZppAAAAAAAAAAAAAQAAABVjYWxjdWxhdGVTaG90RGlzdGFuY2UAAAACAAAAAXYAAAAFcGl0Y2gJAABpAAAAAgkAAGgAAAACCQAAaAAAAAIAAAAAAAAAAAIFAAAAAXYJAABpAAAAAgkAAGgAAAACCQEAAAADY29zAAAAAQUAAAAFcGl0Y2gJAQAAAANzaW4AAAABBQAAAAVwaXRjaAAAAAAAAAGGoAAAAAAAAA72uQEAAAALZ3BzRGlzdGFuY2UAAAAEAAAABGxhdDEAAAAEbG9uMQAAAARsYXQyAAAABGxvbjIEAAAAB2RMYXRTaW4JAQAAAANzaW4AAAABCQAAaQAAAAIJAABlAAAAAgUAAAAEbGF0MQUAAAAEbGF0MgAAAAAAAAAAAgQAAAAHZExvblNpbgkBAAAAA3NpbgAAAAEJAABpAAAAAgkAAGUAAAACBQAAAARsb24xBQAAAARsb24yAAAAAAAAAAACBAAAAANoYXYJAABkAAAAAgkAAGgAAAACBQAAAAdkTGF0U2luBQAAAAdkTGF0U2luCQAAaAAAAAIJAABpAAAAAgkAAGgAAAACCQEAAAADY29zAAAAAQUAAAAEbGF0MQkBAAAAA2NvcwAAAAEFAAAABGxhdDIAAAAAAAABhqAJAABpAAAAAgkAAGgAAAACBQAAAAdkTG9uU2luBQAAAAdkTG9uU2luAAAAAAAAAYagBAAAAAV0aGV0YQkAAGgAAAACAAAAAAAAAAACCQEAAAAEYXNpbgAAAAEJAABsAAAABgkAAGkAAAACBQAAAANoYXYAAAAAAAAAA+gAAAAAAAAAAAcAAAAAAAAAAAUAAAAAAAAAAAEAAAAAAAAAAAUFAAAACEhBTEZFVkVOCQAAaAAAAAIAAAAAAABhNrgFAAAABXRoZXRhAQAAABdjYWxjdWxhdGVJbXBhY3RQb3NpdGlvbgAAAAQAAAADbGF0AAAAA2xvbgAAAARkaXN0AAAAA3lhdwQAAAAGc2luTGF0CQEAAAADc2luAAAAAQUAAAADbGF0BAAAAAZjb3NMYXQJAQAAAANjb3MAAAABBQAAAANsYXQEAAAABXNpblRoCQEAAAADc2luAAAAAQkAAGkAAAACBQAAAARkaXN0AAAAAAAAYTa4BAAAAAVjb3NUaAkBAAAAA2NvcwAAAAEJAABpAAAAAgUAAAAEZGlzdAAAAAAAAGE2uAQAAAAGbmV3TGF0CQEAAAAEYXNpbgAAAAEJAABkAAAAAgkAAGkAAAACCQAAaAAAAAIFAAAABnNpbkxhdAUAAAAFY29zVGgAAAAAAAABhqAJAABpAAAAAgkAAGgAAAACCQAAaAAAAAIFAAAABmNvc0xhdAUAAAAFc2luVGgJAQAAAANjb3MAAAABBQAAAAN5YXcAAAAAAlQL5AAEAAAABm5ld0xvbgkAAGQAAAACBQAAAANsb24JAQAAAAVhdGFuMgAAAAIJAABpAAAAAgkAAGgAAAACCQAAaAAAAAIJAQAAAANzaW4AAAABBQAAAAN5YXcFAAAABXNpblRoBQAAAAZjb3NMYXQAAAAAAAABhqAJAABlAAAAAgUAAAAFY29zVGgJAABpAAAAAgkAAGgAAAACBQAAAAZzaW5MYXQJAQAAAANzaW4AAAABBQAAAAZuZXdMYXQAAAAAAAABhqAJAARMAAAAAgUAAAAGbmV3TGF0CQAETAAAAAIFAAAABm5ld0xvbgUAAAADbmlsAQAAAA1jYWxjdWxhdGVTaG90AAAABQAAAAVwaXRjaAAAAAN5YXcAAAAFZm9yY2UAAAAJcGxheWVyS2V5AAAAC29wcG9uZW50S2V5BAAAAA5wbGF5ZXJMYXRpdHVkZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAxwb3NpdGlvbkxhdF8FAAAACXBsYXllcktleQQAAAAPcGxheWVyTG9uZ2l0dWRlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAADHBvc2l0aW9uTG9uXwUAAAAJcGxheWVyS2V5BAAAABBvcHBvbmVudExhdGl0dWRlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAADHBvc2l0aW9uTGF0XwUAAAALb3Bwb25lbnRLZXkEAAAAEW9wcG9uZW50TG9uZ2l0dWRlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAADHBvc2l0aW9uTG9uXwUAAAALb3Bwb25lbnRLZXkEAAAAFmRpc3RhbmNlQmV0d2VlblBsYXllcnMJAQAAAAtncHNEaXN0YW5jZQAAAAQFAAAADnBsYXllckxhdGl0dWRlBQAAAA9wbGF5ZXJMb25naXR1ZGUFAAAAEG9wcG9uZW50TGF0aXR1ZGUFAAAAEW9wcG9uZW50TG9uZ2l0dWRlBAAAAA9vcHRpbWFsVmVsb2NpdHkJAABpAAAAAgkAAGgAAAACBQAAABZkaXN0YW5jZUJldHdlZW5QbGF5ZXJzAAAAAAAADva5AAAAAAAAAYagBAAAAA9wbGF5ZXJTaG90UmVhY2gJAQAAABVjYWxjdWxhdGVTaG90RGlzdGFuY2UAAAACCQAAaQAAAAIJAABoAAAAAgUAAAAPb3B0aW1hbFZlbG9jaXR5BQAAAAVmb3JjZQAAAAAAAAGGoAUAAAAFcGl0Y2gEAAAADmltcGFjdFBvc2l0aW9uCQEAAAAXY2FsY3VsYXRlSW1wYWN0UG9zaXRpb24AAAAEBQAAAA5wbGF5ZXJMYXRpdHVkZQUAAAAPcGxheWVyTG9uZ2l0dWRlBQAAAA9wbGF5ZXJTaG90UmVhY2gFAAAAA3lhdwQAAAAOaW1wYWN0RGlzdGFuY2UJAQAAAAtncHNEaXN0YW5jZQAAAAQJAAGRAAAAAgUAAAAOaW1wYWN0UG9zaXRpb24AAAAAAAAAAAAJAAGRAAAAAgUAAAAOaW1wYWN0UG9zaXRpb24AAAAAAAAAAAEFAAAAEG9wcG9uZW50TGF0aXR1ZGUFAAAAEW9wcG9uZW50TG9uZ2l0dWRlCQAETAAAAAIFAAAADmltcGFjdERpc3RhbmNlCQAETAAAAAIFAAAAFmRpc3RhbmNlQmV0d2VlblBsYXllcnMFAAAADmltcGFjdFBvc2l0aW9uAQAAABdjb29yZGluYXRlc1RvQW5nbGVJblJhZAAAAAQAAAAEbGF0MQAAAARsb24xAAAABGxhdDIAAAAEbG9uMgQAAAAEZExvbgkAAGUAAAACBQAAAARsb24xBQAAAARsb24yBAAAAAF5CQAAaQAAAAIJAABoAAAAAgkBAAAAA3NpbgAAAAEFAAAABGRMb24JAQAAAANjb3MAAAABBQAAAARsYXQyAAAAAAAAAYagBAAAAAF4CQAAaQAAAAIJAABlAAAAAgkAAGgAAAACCQEAAAADY29zAAAAAQUAAAAEbGF0MQkBAAAAA3NpbgAAAAEFAAAABGxhdDIJAABpAAAAAgkAAGgAAAACCQAAaAAAAAIJAQAAAANzaW4AAAABBQAAAARsYXQxCQEAAAADY29zAAAAAQUAAAAEbGF0MgkBAAAAA2NvcwAAAAEFAAAABGRMb24AAAAAAAABhqAAAAAAAAABhqAJAABqAAAAAgkAAGQAAAACCQEAAAAFYXRhbjIAAAACBQAAAAF5BQAAAAF4AAAAAAAACZZeAAAAAAAACZZeAAAAAwAAAAFpAQAAAAlzdGFydEdhbWUAAAACAAAACGxhdGl0dWRlAAAACWxvbmdpdHVkZQQAAAAFYXNzZXQFAAAABHVuaXQEAAAAB3BheW1lbnQJAQAAAAV2YWx1ZQAAAAEIBQAAAAFpAAAAB3BheW1lbnQEAAAABmNhbGxlcgkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIEAAAAEG9wcG9uZW50TGF0aXR1ZGUJAABpAAAAAgkAAGgAAAACBQAAAAhsYXRpdHVkZQAAAAAAAAAG0QAAAAAAAAGGoAQAAAARb3Bwb25lbnRMb25naXR1ZGUJAABpAAAAAgkAAGgAAAACBQAAAAlsb25naXR1ZGUAAAAAAAAABtEAAAAAAAABhqAEAAAAC2Nvb3JkaW5hdGVzCQEAAAAJc2V0Q29vcmRzAAAAAwUAAAAGY2FsbGVyBQAAABBvcHBvbmVudExhdGl0dWRlBQAAABFvcHBvbmVudExvbmdpdHVkZQQAAAAIb3BlbkdhbWUJAAQdAAAAAgUAAAAEdGhpcwIAAAAIb3BlbkdhbWUDAwkAAAAAAAACCAUAAAAHcGF5bWVudAAAAAdhc3NldElkBQAAAAVhc3NldAkAAGcAAAACCAUAAAAHcGF5bWVudAAAAAZhbW91bnQAAAAAAAAAAAEHBAAAAAZnYW1lSWQJAAQdAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAdnYW1lSWRfBQAAAAZjYWxsZXIDAwkBAAAAAiE9AAAAAgUAAAAGZ2FtZUlkAgAAAAAJAQAAAAIhPQAAAAIFAAAABmdhbWVJZAUAAAAEdW5pdAcJAAACAAAAAQIAAAA8UGxlYXNlIGZpbmlzaCB5b3VyIGN1cnJlbnQgZ2FtZSwgYmVmb3JlIHN0YXJ0aW5nIGFub3RoZXIgb25lAwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAAIb3BlbkdhbWUJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAACG9wZW5HYW1lBQAAAAZjYWxsZXIFAAAAC2Nvb3JkaW5hdGVzAwMJAAAAAAAAAgUAAAAIb3BlbkdhbWUCAAAAAAYJAAAAAAAAAgUAAAAIb3BlbkdhbWUFAAAABmNhbGxlcgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAIb3BlbkdhbWUFAAAABmNhbGxlcgUAAAALY29vcmRpbmF0ZXMEAAAADnBsYXllckxhdGl0dWRlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAADHBvc2l0aW9uTGF0XwkBAAAABXZhbHVlAAAAAQUAAAAIb3BlbkdhbWUEAAAAD3BsYXllckxvbmdpdHVkZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAxwb3NpdGlvbkxvbl8JAQAAAAV2YWx1ZQAAAAEFAAAACG9wZW5HYW1lBAAAABZkaXN0YW5jZUJldHdlZW5QbGF5ZXJzCQEAAAALZ3BzRGlzdGFuY2UAAAAEBQAAAA5wbGF5ZXJMYXRpdHVkZQUAAAAPcGxheWVyTG9uZ2l0dWRlBQAAABBvcHBvbmVudExhdGl0dWRlBQAAABFvcHBvbmVudExvbmdpdHVkZQQAAAAEaGFzaAkAAfcAAAABCQABmgAAAAEFAAAAFmRpc3RhbmNlQmV0d2VlblBsYXllcnMEAAAABm51bWJlcgkABLEAAAABBQAAAARoYXNoBAAAAAZvZmZzZXQJAABlAAAAAgkAAGoAAAACBQAAAAZudW1iZXIJAABpAAAAAgAAAAAAAAmWXgAAAAAAAAAABAkAAGkAAAACAAAAAAAACZZeAAAAAAAAAAAIBAAAAAlwbGF5ZXJZYXcJAQAAABdjb29yZGluYXRlc1RvQW5nbGVJblJhZAAAAAQFAAAADnBsYXllckxhdGl0dWRlBQAAAA9wbGF5ZXJMb25naXR1ZGUFAAAAEG9wcG9uZW50TGF0aXR1ZGUFAAAAEW9wcG9uZW50TG9uZ2l0dWRlBAAAAA9wbGF5ZXJPZmZzZXRZYXcJAABkAAAAAgUAAAAJcGxheWVyWWF3BQAAAAZvZmZzZXQEAAAAC29wcG9uZW50WWF3CQAAagAAAAIJAABkAAAAAgUAAAAJcGxheWVyWWF3AAAAAAAABMsvAAAAAAAACZZeBAAAABFvcHBvbmVudE9mZnNldFlhdwkAAGQAAAACBQAAAAtvcHBvbmVudFlhdwUAAAAGb2Zmc2V0CQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAhvcGVuR2FtZQIAAAAACQAETAAAAAIJAAGRAAAAAgUAAAALY29vcmRpbmF0ZXMAAAAAAAAAAAAJAARMAAAAAgkAAZEAAAACBQAAAAtjb29yZGluYXRlcwAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAABJvcHBvbmVudE9mZnNldFlhd18FAAAABmNhbGxlcgUAAAAPcGxheWVyT2Zmc2V0WWF3CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAEm9wcG9uZW50T2Zmc2V0WWF3XwkBAAAABXZhbHVlAAAAAQUAAAAIb3BlbkdhbWUFAAAAEW9wcG9uZW50T2Zmc2V0WWF3CQEAAAALc2V0R2FtZURhdGEAAAACCQEAAAAFdmFsdWUAAAABBQAAAAhvcGVuR2FtZQUAAAAGY2FsbGVyCQAAAgAAAAECAAAAFFBsZWFzZSBwYXkgdGhlIHRva2VuAAAAAWkBAAAAC2V4ZWN1dGVTaG90AAAAAwAAAAVwaXRjaAAAAAN5YXcAAAAFZm9yY2UEAAAABWFzc2V0BQAAAAR1bml0BAAAAAZjYWxsZXIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBAAAAAhvcHBvbmVudAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAlvcHBvbmVudF8FAAAABmNhbGxlcgQAAAAGZ2FtZUlkCQEAAAAJZ2V0R2FtZUlkAAAAAQUAAAAGY2FsbGVyAwkBAAAAAiE9AAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAlnYW1lVHVybl8FAAAABmdhbWVJZAUAAAAGY2FsbGVyCQAAAgAAAAECAAAAGlBsZWFzZSB3YWl0IGZvciB5b3VyIHR1cm4uBAAAAAhzaG90RGF0YQkBAAAADWNhbGN1bGF0ZVNob3QAAAAFBQAAAAVwaXRjaAUAAAADeWF3BQAAAAVmb3JjZQUAAAAGY2FsbGVyBQAAAAhvcHBvbmVudAMJAABmAAAAAgkAAGQAAAACCQAAaQAAAAIJAAGRAAAAAgUAAAAIc2hvdERhdGEAAAAAAAAAAAEAAAAAAAAAAAUAAAAAADuaygAJAAGRAAAAAgUAAAAIc2hvdERhdGEAAAAAAAAAAAAJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAABWdhbWVfBQAAAAZnYW1lSWQHCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAC2dhbWVXaW5uZXJfBQAAAAZnYW1lSWQFAAAABmNhbGxlcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAdnYW1lSWRfBQAAAAZjYWxsZXICAAAAAAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAdnYW1lSWRfBQAAAAhvcHBvbmVudAIAAAAACQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAEWxhc3RTaG90RGlzdGFuY2VfBQAAAAZnYW1lSWQJAAGRAAAAAgUAAAAIc2hvdERhdGEAAAAAAAAAAAAJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAMbGFzdFNob3RMYXRfBQAAAAZnYW1lSWQJAAGRAAAAAgUAAAAIc2hvdERhdGEAAAAAAAAAAAIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAMbGFzdFNob3RMb25fBQAAAAZnYW1lSWQJAAGRAAAAAgUAAAAIc2hvdERhdGEAAAAAAAAAAAMFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIAAAAAAAAAAAIFAAAABWFzc2V0BQAAAANuaWwJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAJZ2FtZVR1cm5fBQAAAAZnYW1lSWQFAAAACG9wcG9uZW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAEWxhc3RTaG90RGlzdGFuY2VfBQAAAAZnYW1lSWQJAAGRAAAAAgUAAAAIc2hvdERhdGEAAAAAAAAAAAAJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAMbGFzdFNob3RMYXRfBQAAAAZnYW1lSWQJAAGRAAAAAgUAAAAIc2hvdERhdGEAAAAAAAAAAAIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAMbGFzdFNob3RMb25fBQAAAAZnYW1lSWQJAAGRAAAAAgUAAAAIc2hvdERhdGEAAAAAAAAAAAMFAAAAA25pbAAAAAFpAQAAAAZmYXVjZXQAAAAABAAAAAVhc3NldAUAAAAEdW5pdAQAAAAGY2FsbGVyCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAAHYmFsYW5jZQkAA+sAAAACCAUAAAABaQAAAAZjYWxsZXIFAAAABWFzc2V0AwkAAGYAAAACAAAAAAAAAABkBQAAAAdiYWxhbmNlCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgAAAAAAAAAAZAUAAAAFYXNzZXQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQUAAAADbmlsAAAAAEnK5PM=",
    "chainId": 84,
    "height": 1158642,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: CdvicDoFfBEvFkq5nwX58kFgTufo5CLiRVQoToYzXDW
Next: EJPUpxVs3zJzoLTGnWByDYb6Vsz9w8DR7Vv2HvJ9Hdu2

Diff: 
Old New Differences
230 230  
231 231  @Callable(i)
232 232  func faucet () = {
233 -     let asset = base58''
233 +     let asset = unit
234 234      let caller = toString(i.caller)
235 235      let balance = assetBalance(i.caller, asset)
236 236      if ((100 > balance))
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  func setCoords (key,latitude,longitude) = [DataEntry(("positionLat_" + key), latitude), DataEntry(("positionLon_" + key), longitude)]
5 5  
6 6  
7 7  func setGameData (playerKey,opponentKey) = {
8 8      let gameId = ((playerKey + "_") + opponentKey)
9 9  [DataEntry(("gameId_" + playerKey), gameId), DataEntry(("opponent_" + playerKey), opponentKey), DataEntry(("gameId_" + opponentKey), gameId), DataEntry(("opponent_" + opponentKey), playerKey), DataEntry(("game_" + gameId), true), DataEntry(("gameTurn_" + gameId), playerKey), DataEntry(("gameWinner_" + gameId), "")]
10 10      }
11 11  
12 12  
13 13  func getGameId (key) = getStringValue(this, ("gameId_" + key))
14 14  
15 15  
16 16  func sin (rad) = {
17 17      let factor = (rad / 628318)
18 18      if ((0 > rad))
19 19          then {
20 20              let positive = -(rad)
21 21              if ((positive > 628318))
22 22                  then {
23 23                      let norm = (positive + (factor * 628318))
24 24                      if ((norm > 314159))
25 25                          then {
26 26                              let a = ((16 * (norm - 314159)) * (314159 - (norm - 314159)))
27 27                              ((a * 100000) / (493480220050 - (a / 4)))
28 28                              }
29 29                          else {
30 30                              let a = ((16 * norm) * (314159 - norm))
31 31                              ((-(a) * 100000) / (493480220050 - (a / 4)))
32 32                              }
33 33                      }
34 34                  else if ((positive > 314159))
35 35                      then {
36 36                          let a = ((16 * (positive - 314159)) * (314159 - (positive - 314159)))
37 37                          ((a * 100000) / (493480220050 - (a / 4)))
38 38                          }
39 39                      else {
40 40                          let a = ((16 * positive) * (314159 - positive))
41 41                          ((-(a) * 100000) / (493480220050 - (a / 4)))
42 42                          }
43 43              }
44 44          else if ((rad > 628318))
45 45              then {
46 46                  let norm = (rad - (factor * 628318))
47 47                  if ((norm > 314159))
48 48                      then {
49 49                          let a = ((16 * (norm - 314159)) * (314159 - (norm - 314159)))
50 50                          ((-(a) * 100000) / (493480220050 - (a / 4)))
51 51                          }
52 52                      else {
53 53                          let a = ((16 * norm) * (314159 - norm))
54 54                          ((a * 100000) / (493480220050 - (a / 4)))
55 55                          }
56 56                  }
57 57              else if ((rad > 314159))
58 58                  then {
59 59                      let a = ((16 * (rad - 314159)) * (314159 - (rad - 314159)))
60 60                      ((-(a) * 100000) / (493480220050 - (a / 4)))
61 61                      }
62 62                  else {
63 63                      let a = ((16 * rad) * (314159 - rad))
64 64                      ((a * 100000) / (493480220050 - (a / 4)))
65 65                      }
66 66      }
67 67  
68 68  
69 69  func cos (rad) = sin((157079 - rad))
70 70  
71 71  
72 72  func asin (x) = if ((-100000 >= x))
73 73      then -157079
74 74      else if ((x >= 100000))
75 75          then 157079
76 76          else if ((0 > x))
77 77              then {
78 78                  let x1 = (-1 * x)
79 79                  let val2 = (((-1873 * x1) / 100000) + 7426)
80 80                  let val4 = (((val2 * x1) / 100000) - 21211)
81 81                  let val6 = (((val4 * x1) / 100000) + 157072)
82 82                  let root = pow((100000 - x1), 5, 5, 1, 5, HALFEVEN)
83 83                  -((157079 - ((root * val6) / 100000)))
84 84                  }
85 85              else {
86 86                  let val2 = (((-1873 * x) / 100000) + 7426)
87 87                  let val4 = (((val2 * x) / 100000) - 21211)
88 88                  let val6 = (((val4 * x) / 100000) + 157072)
89 89                  let root = pow((100000 - x), 5, 5, 1, 5, HALFEVEN)
90 90                  (157079 - ((root * val6) / 100000))
91 91                  }
92 92  
93 93  
94 94  func atan (x) = {
95 95      let xPow2 = ((x * x) / 100000)
96 96      if ((-100000 > x))
97 97          then (-157079 - ((x * 100000) / (xPow2 + 28000)))
98 98          else if ((x > 100000))
99 99              then (157079 - ((x * 100000) / (xPow2 + 28000)))
100 100              else ((x * 100000) / (100000 + ((28000 * xPow2) / 100000)))
101 101      }
102 102  
103 103  
104 104  func atan2 (y,x) = if ((x > 0))
105 105      then atan((y / x))
106 106      else if (if ((0 > x))
107 107          then (y >= 0)
108 108          else false)
109 109          then (atan((y / x)) + 314159)
110 110          else if (if ((0 > x))
111 111              then (0 > y)
112 112              else false)
113 113              then (atan((y / x)) - 314159)
114 114              else if (if ((x == 0))
115 115                  then (y > 0)
116 116                  else false)
117 117                  then 157079
118 118                  else if (if ((x == 0))
119 119                      then (0 > y)
120 120                      else false)
121 121                      then -157079
122 122                      else 0
123 123  
124 124  
125 125  func calculateShotDistance (v,pitch) = (((2 * v) * ((cos(pitch) * sin(pitch)) / 100000)) / 980665)
126 126  
127 127  
128 128  func gpsDistance (lat1,lon1,lat2,lon2) = {
129 129      let dLatSin = sin(((lat1 - lat2) / 2))
130 130      let dLonSin = sin(((lon1 - lon2) / 2))
131 131      let hav = ((dLatSin * dLatSin) + (((cos(lat1) * cos(lat2)) / 100000) * ((dLonSin * dLonSin) / 100000)))
132 132      let theta = (2 * asin(pow((hav / 1000), 7, 5, 1, 5, HALFEVEN)))
133 133      (6371000 * theta)
134 134      }
135 135  
136 136  
137 137  func calculateImpactPosition (lat,lon,dist,yaw) = {
138 138      let sinLat = sin(lat)
139 139      let cosLat = cos(lat)
140 140      let sinTh = sin((dist / 6371000))
141 141      let cosTh = cos((dist / 6371000))
142 142      let newLat = asin((((sinLat * cosTh) / 100000) + (((cosLat * sinTh) * cos(yaw)) / 10000000000)))
143 143      let newLon = (lon + atan2((((sin(yaw) * sinTh) * cosLat) / 100000), (cosTh - ((sinLat * sin(newLat)) / 100000))))
144 144  [newLat, newLon]
145 145      }
146 146  
147 147  
148 148  func calculateShot (pitch,yaw,force,playerKey,opponentKey) = {
149 149      let playerLatitude = getIntegerValue(this, ("positionLat_" + playerKey))
150 150      let playerLongitude = getIntegerValue(this, ("positionLon_" + playerKey))
151 151      let opponentLatitude = getIntegerValue(this, ("positionLat_" + opponentKey))
152 152      let opponentLongitude = getIntegerValue(this, ("positionLon_" + opponentKey))
153 153      let distanceBetweenPlayers = gpsDistance(playerLatitude, playerLongitude, opponentLatitude, opponentLongitude)
154 154      let optimalVelocity = ((distanceBetweenPlayers * 980665) / 100000)
155 155      let playerShotReach = calculateShotDistance(((optimalVelocity * force) / 100000), pitch)
156 156      let impactPosition = calculateImpactPosition(playerLatitude, playerLongitude, playerShotReach, yaw)
157 157      let impactDistance = gpsDistance(impactPosition[0], impactPosition[1], opponentLatitude, opponentLongitude)
158 158  [impactDistance, distanceBetweenPlayers] :: impactPosition
159 159      }
160 160  
161 161  
162 162  func coordinatesToAngleInRad (lat1,lon1,lat2,lon2) = {
163 163      let dLon = (lon1 - lon2)
164 164      let y = ((sin(dLon) * cos(lat2)) / 100000)
165 165      let x = (((cos(lat1) * sin(lat2)) - (((sin(lat1) * cos(lat2)) * cos(dLon)) / 100000)) / 100000)
166 166      ((atan2(y, x) + 628318) % 628318)
167 167      }
168 168  
169 169  
170 170  @Callable(i)
171 171  func startGame (latitude,longitude) = {
172 172      let asset = unit
173 173      let payment = value(i.payment)
174 174      let caller = toString(i.caller)
175 175      let opponentLatitude = ((latitude * 1745) / 100000)
176 176      let opponentLongitude = ((longitude * 1745) / 100000)
177 177      let coordinates = setCoords(caller, opponentLatitude, opponentLongitude)
178 178      let openGame = getString(this, "openGame")
179 179      if (if ((payment.assetId == asset))
180 180          then (payment.amount >= 1)
181 181          else false)
182 182          then {
183 183              let gameId = getString(this, ("gameId_" + caller))
184 184              if (if ((gameId != ""))
185 185                  then (gameId != unit)
186 186                  else false)
187 187                  then throw("Please finish your current game, before starting another one")
188 188                  else if (!(isDefined(openGame)))
189 189                      then WriteSet(DataEntry("openGame", caller) :: coordinates)
190 190                      else if (if ((openGame == ""))
191 191                          then true
192 192                          else (openGame == caller))
193 193                          then WriteSet(DataEntry("openGame", caller) :: coordinates)
194 194                          else {
195 195                              let playerLatitude = getIntegerValue(this, ("positionLat_" + value(openGame)))
196 196                              let playerLongitude = getIntegerValue(this, ("positionLon_" + value(openGame)))
197 197                              let distanceBetweenPlayers = gpsDistance(playerLatitude, playerLongitude, opponentLatitude, opponentLongitude)
198 198                              let hash = sha256(toBytes(distanceBetweenPlayers))
199 199                              let number = toInt(hash)
200 200                              let offset = ((number % (628318 / 4)) - (628318 / 8))
201 201                              let playerYaw = coordinatesToAngleInRad(playerLatitude, playerLongitude, opponentLatitude, opponentLongitude)
202 202                              let playerOffsetYaw = (playerYaw + offset)
203 203                              let opponentYaw = ((playerYaw + 314159) % 628318)
204 204                              let opponentOffsetYaw = (opponentYaw + offset)
205 205                              WriteSet([DataEntry("openGame", ""), coordinates[0], coordinates[1], DataEntry(("opponentOffsetYaw_" + caller), playerOffsetYaw), DataEntry(("opponentOffsetYaw_" + value(openGame)), opponentOffsetYaw), setGameData(value(openGame), caller)])
206 206                              }
207 207              }
208 208          else throw("Please pay the token")
209 209      }
210 210  
211 211  
212 212  
213 213  @Callable(i)
214 214  func executeShot (pitch,yaw,force) = {
215 215      let asset = unit
216 216      let caller = toString(i.caller)
217 217      let opponent = getStringValue(this, ("opponent_" + caller))
218 218      let gameId = getGameId(caller)
219 219      if ((getStringValue(this, ("gameTurn_" + gameId)) != caller))
220 220          then throw("Please wait for your turn.")
221 221          else {
222 222              let shotData = calculateShot(pitch, yaw, force, caller, opponent)
223 223              if ((((shotData[1] / 5) + 1000000000) > shotData[0]))
224 224                  then ScriptResult(WriteSet([DataEntry(("game_" + gameId), false), DataEntry(("gameWinner_" + gameId), caller), DataEntry(("gameId_" + caller), ""), DataEntry(("gameId_" + opponent), ""), DataEntry(("lastShotDistance_" + gameId), shotData[0]), DataEntry(("lastShotLat_" + gameId), shotData[2]), DataEntry(("lastShotLon_" + gameId), shotData[3])]), TransferSet([ScriptTransfer(i.caller, 2, asset)]))
225 225                  else WriteSet([DataEntry(("gameTurn_" + gameId), opponent), DataEntry(("lastShotDistance_" + gameId), shotData[0]), DataEntry(("lastShotLat_" + gameId), shotData[2]), DataEntry(("lastShotLon_" + gameId), shotData[3])])
226 226              }
227 227      }
228 228  
229 229  
230 230  
231 231  @Callable(i)
232 232  func faucet () = {
233 -     let asset = base58''
233 +     let asset = unit
234 234      let caller = toString(i.caller)
235 235      let balance = assetBalance(i.caller, asset)
236 236      if ((100 > balance))
237 237          then TransferSet([ScriptTransfer(i.caller, 100, asset)])
238 238          else TransferSet(nil)
239 239      }
240 240  
241 241

Old	New		Differences
230	230
231	231		@Callable(i)
232	232		func faucet () = {
233		-	let asset = ~~base58''~~
	233	+	let asset = unit
234	234		let caller = toString(i.caller)
235	235		let balance = assetBalance(i.caller, asset)
236	236		if ((100 > balance))

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		func setCoords (key,latitude,longitude) = [DataEntry(("positionLat_" + key), latitude), DataEntry(("positionLon_" + key), longitude)]
5	5
6	6
7	7		func setGameData (playerKey,opponentKey) = {
8	8		let gameId = ((playerKey + "_") + opponentKey)
9	9		[DataEntry(("gameId_" + playerKey), gameId), DataEntry(("opponent_" + playerKey), opponentKey), DataEntry(("gameId_" + opponentKey), gameId), DataEntry(("opponent_" + opponentKey), playerKey), DataEntry(("game_" + gameId), true), DataEntry(("gameTurn_" + gameId), playerKey), DataEntry(("gameWinner_" + gameId), "")]
10	10		}
11	11
12	12
13	13		func getGameId (key) = getStringValue(this, ("gameId_" + key))
14	14
15	15
16	16		func sin (rad) = {
17	17		let factor = (rad / 628318)
18	18		if ((0 > rad))
19	19		then {
20	20		let positive = -(rad)
21	21		if ((positive > 628318))
22	22		then {
23	23		let norm = (positive + (factor * 628318))
24	24		if ((norm > 314159))
25	25		then {
26	26		let a = ((16 * (norm - 314159)) * (314159 - (norm - 314159)))
27	27		((a * 100000) / (493480220050 - (a / 4)))
28	28		}
29	29		else {
30	30		let a = ((16 * norm) * (314159 - norm))
31	31		((-(a) * 100000) / (493480220050 - (a / 4)))
32	32		}
33	33		}
34	34		else if ((positive > 314159))
35	35		then {
36	36		let a = ((16 * (positive - 314159)) * (314159 - (positive - 314159)))
37	37		((a * 100000) / (493480220050 - (a / 4)))
38	38		}
39	39		else {
40	40		let a = ((16 * positive) * (314159 - positive))
41	41		((-(a) * 100000) / (493480220050 - (a / 4)))
42	42		}
43	43		}
44	44		else if ((rad > 628318))
45	45		then {
46	46		let norm = (rad - (factor * 628318))
47	47		if ((norm > 314159))
48	48		then {
49	49		let a = ((16 * (norm - 314159)) * (314159 - (norm - 314159)))
50	50		((-(a) * 100000) / (493480220050 - (a / 4)))
51	51		}
52	52		else {
53	53		let a = ((16 * norm) * (314159 - norm))
54	54		((a * 100000) / (493480220050 - (a / 4)))
55	55		}
56	56		}
57	57		else if ((rad > 314159))
58	58		then {
59	59		let a = ((16 * (rad - 314159)) * (314159 - (rad - 314159)))
60	60		((-(a) * 100000) / (493480220050 - (a / 4)))
61	61		}
62	62		else {
63	63		let a = ((16 * rad) * (314159 - rad))
64	64		((a * 100000) / (493480220050 - (a / 4)))
65	65		}
66	66		}
67	67
68	68
69	69		func cos (rad) = sin((157079 - rad))
70	70
71	71
72	72		func asin (x) = if ((-100000 >= x))
73	73		then -157079
74	74		else if ((x >= 100000))
75	75		then 157079
76	76		else if ((0 > x))
77	77		then {
78	78		let x1 = (-1 * x)
79	79		let val2 = (((-1873 * x1) / 100000) + 7426)
80	80		let val4 = (((val2 * x1) / 100000) - 21211)
81	81		let val6 = (((val4 * x1) / 100000) + 157072)
82	82		let root = pow((100000 - x1), 5, 5, 1, 5, HALFEVEN)
83	83		-((157079 - ((root * val6) / 100000)))
84	84		}
85	85		else {
86	86		let val2 = (((-1873 * x) / 100000) + 7426)
87	87		let val4 = (((val2 * x) / 100000) - 21211)
88	88		let val6 = (((val4 * x) / 100000) + 157072)
89	89		let root = pow((100000 - x), 5, 5, 1, 5, HALFEVEN)
90	90		(157079 - ((root * val6) / 100000))
91	91		}
92	92
93	93
94	94		func atan (x) = {
95	95		let xPow2 = ((x * x) / 100000)
96	96		if ((-100000 > x))
97	97		then (-157079 - ((x * 100000) / (xPow2 + 28000)))
98	98		else if ((x > 100000))
99	99		then (157079 - ((x * 100000) / (xPow2 + 28000)))
100	100		else ((x * 100000) / (100000 + ((28000 * xPow2) / 100000)))
101	101		}
102	102
103	103
104	104		func atan2 (y,x) = if ((x > 0))
105	105		then atan((y / x))
106	106		else if (if ((0 > x))
107	107		then (y >= 0)
108	108		else false)
109	109		then (atan((y / x)) + 314159)
110	110		else if (if ((0 > x))
111	111		then (0 > y)
112	112		else false)
113	113		then (atan((y / x)) - 314159)
114	114		else if (if ((x == 0))
115	115		then (y > 0)
116	116		else false)
117	117		then 157079
118	118		else if (if ((x == 0))
119	119		then (0 > y)
120	120		else false)
121	121		then -157079
122	122		else 0
123	123
124	124
125	125		func calculateShotDistance (v,pitch) = (((2 * v) * ((cos(pitch) * sin(pitch)) / 100000)) / 980665)
126	126
127	127
128	128		func gpsDistance (lat1,lon1,lat2,lon2) = {
129	129		let dLatSin = sin(((lat1 - lat2) / 2))
130	130		let dLonSin = sin(((lon1 - lon2) / 2))
131	131		let hav = ((dLatSin * dLatSin) + (((cos(lat1) * cos(lat2)) / 100000) * ((dLonSin * dLonSin) / 100000)))
132	132		let theta = (2 * asin(pow((hav / 1000), 7, 5, 1, 5, HALFEVEN)))
133	133		(6371000 * theta)
134	134		}
135	135
136	136
137	137		func calculateImpactPosition (lat,lon,dist,yaw) = {
138	138		let sinLat = sin(lat)
139	139		let cosLat = cos(lat)
140	140		let sinTh = sin((dist / 6371000))
141	141		let cosTh = cos((dist / 6371000))
142	142		let newLat = asin((((sinLat * cosTh) / 100000) + (((cosLat * sinTh) * cos(yaw)) / 10000000000)))
143	143		let newLon = (lon + atan2((((sin(yaw) * sinTh) * cosLat) / 100000), (cosTh - ((sinLat * sin(newLat)) / 100000))))
144	144		[newLat, newLon]
145	145		}
146	146
147	147
148	148		func calculateShot (pitch,yaw,force,playerKey,opponentKey) = {
149	149		let playerLatitude = getIntegerValue(this, ("positionLat_" + playerKey))
150	150		let playerLongitude = getIntegerValue(this, ("positionLon_" + playerKey))
151	151		let opponentLatitude = getIntegerValue(this, ("positionLat_" + opponentKey))
152	152		let opponentLongitude = getIntegerValue(this, ("positionLon_" + opponentKey))
153	153		let distanceBetweenPlayers = gpsDistance(playerLatitude, playerLongitude, opponentLatitude, opponentLongitude)
154	154		let optimalVelocity = ((distanceBetweenPlayers * 980665) / 100000)
155	155		let playerShotReach = calculateShotDistance(((optimalVelocity * force) / 100000), pitch)
156	156		let impactPosition = calculateImpactPosition(playerLatitude, playerLongitude, playerShotReach, yaw)
157	157		let impactDistance = gpsDistance(impactPosition[0], impactPosition[1], opponentLatitude, opponentLongitude)
158	158		[impactDistance, distanceBetweenPlayers] :: impactPosition
159	159		}
160	160
161	161
162	162		func coordinatesToAngleInRad (lat1,lon1,lat2,lon2) = {
163	163		let dLon = (lon1 - lon2)
164	164		let y = ((sin(dLon) * cos(lat2)) / 100000)
165	165		let x = (((cos(lat1) * sin(lat2)) - (((sin(lat1) * cos(lat2)) * cos(dLon)) / 100000)) / 100000)
166	166		((atan2(y, x) + 628318) % 628318)
167	167		}
168	168
169	169
170	170		@Callable(i)
171	171		func startGame (latitude,longitude) = {
172	172		let asset = unit
173	173		let payment = value(i.payment)
174	174		let caller = toString(i.caller)
175	175		let opponentLatitude = ((latitude * 1745) / 100000)
176	176		let opponentLongitude = ((longitude * 1745) / 100000)
177	177		let coordinates = setCoords(caller, opponentLatitude, opponentLongitude)
178	178		let openGame = getString(this, "openGame")
179	179		if (if ((payment.assetId == asset))
180	180		then (payment.amount >= 1)
181	181		else false)
182	182		then {
183	183		let gameId = getString(this, ("gameId_" + caller))
184	184		if (if ((gameId != ""))
185	185		then (gameId != unit)
186	186		else false)
187	187		then throw("Please finish your current game, before starting another one")
188	188		else if (!(isDefined(openGame)))
189	189		then WriteSet(DataEntry("openGame", caller) :: coordinates)
190	190		else if (if ((openGame == ""))
191	191		then true
192	192		else (openGame == caller))
193	193		then WriteSet(DataEntry("openGame", caller) :: coordinates)
194	194		else {
195	195		let playerLatitude = getIntegerValue(this, ("positionLat_" + value(openGame)))
196	196		let playerLongitude = getIntegerValue(this, ("positionLon_" + value(openGame)))
197	197		let distanceBetweenPlayers = gpsDistance(playerLatitude, playerLongitude, opponentLatitude, opponentLongitude)
198	198		let hash = sha256(toBytes(distanceBetweenPlayers))
199	199		let number = toInt(hash)
200	200		let offset = ((number % (628318 / 4)) - (628318 / 8))
201	201		let playerYaw = coordinatesToAngleInRad(playerLatitude, playerLongitude, opponentLatitude, opponentLongitude)
202	202		let playerOffsetYaw = (playerYaw + offset)
203	203		let opponentYaw = ((playerYaw + 314159) % 628318)
204	204		let opponentOffsetYaw = (opponentYaw + offset)
205	205		WriteSet([DataEntry("openGame", ""), coordinates[0], coordinates[1], DataEntry(("opponentOffsetYaw_" + caller), playerOffsetYaw), DataEntry(("opponentOffsetYaw_" + value(openGame)), opponentOffsetYaw), setGameData(value(openGame), caller)])
206	206		}
207	207		}
208	208		else throw("Please pay the token")
209	209		}
210	210
211	211
212	212
213	213		@Callable(i)
214	214		func executeShot (pitch,yaw,force) = {
215	215		let asset = unit
216	216		let caller = toString(i.caller)
217	217		let opponent = getStringValue(this, ("opponent_" + caller))
218	218		let gameId = getGameId(caller)
219	219		if ((getStringValue(this, ("gameTurn_" + gameId)) != caller))
220	220		then throw("Please wait for your turn.")
221	221		else {
222	222		let shotData = calculateShot(pitch, yaw, force, caller, opponent)
223	223		if ((((shotData[1] / 5) + 1000000000) > shotData[0]))
224	224		then ScriptResult(WriteSet([DataEntry(("game_" + gameId), false), DataEntry(("gameWinner_" + gameId), caller), DataEntry(("gameId_" + caller), ""), DataEntry(("gameId_" + opponent), ""), DataEntry(("lastShotDistance_" + gameId), shotData[0]), DataEntry(("lastShotLat_" + gameId), shotData[2]), DataEntry(("lastShotLon_" + gameId), shotData[3])]), TransferSet([ScriptTransfer(i.caller, 2, asset)]))
225	225		else WriteSet([DataEntry(("gameTurn_" + gameId), opponent), DataEntry(("lastShotDistance_" + gameId), shotData[0]), DataEntry(("lastShotLat_" + gameId), shotData[2]), DataEntry(("lastShotLon_" + gameId), shotData[3])])
226	226		}
227	227		}
228	228
229	229
230	230
231	231		@Callable(i)
232	232		func faucet () = {
233		-	let asset = ~~base58''~~
	233	+	let asset = unit
234	234		let caller = toString(i.caller)
235	235		let balance = assetBalance(i.caller, asset)
236	236		if ((100 > balance))
237	237		then TransferSet([ScriptTransfer(i.caller, 100, asset)])
238	238		else TransferSet(nil)
239	239		}
240	240
241	241

github/deemru/w8io/3ef1775 
62.03 ms ◑