tx · GVigW9kJ7L5kKsj4N9WQkGSwosJv6oNaS5FM7MXUjXCy

3MqbTfLJ5nrYh6fUbS38Hfpe6T8MP5K5HiT:  -0.04000000 Waves

2020.08.26 14:53 [1149640] smart account 3MqbTfLJ5nrYh6fUbS38Hfpe6T8MP5K5HiT > SELF 0.00000000 Waves

{ "type": 13, "id": "GVigW9kJ7L5kKsj4N9WQkGSwosJv6oNaS5FM7MXUjXCy", "fee": 4000000, "feeAssetId": null, "timestamp": 1598442851913, "version": 1, "sender": "3MqbTfLJ5nrYh6fUbS38Hfpe6T8MP5K5HiT", "senderPublicKey": "EzWkAi3pMjNqjjV3PpJiHWrButTm4aorR4p173qwdGeL", "proofs": [ "6oGQKiBt1Bfe6mpk72jmHucfvSfmsDywj9t7Rm6toEUegif27u4AEyGKYjBKD19Qjgko5eF19rweAJhypQFb6zT" ], "script": "base64:AAIDAAAAAAAAABEIARIECgIBARIFCgMBAQESAAAAAAwBAAAACXNldENvb3JkcwAAAAMAAAADa2V5AAAACGxhdGl0dWRlAAAACWxvbmdpdHVkZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAxwb3NpdGlvbkxhdF8FAAAAA2tleQUAAAAIbGF0aXR1ZGUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAMcG9zaXRpb25Mb25fBQAAAANrZXkFAAAACWxvbmdpdHVkZQUAAAADbmlsAQAAAAtzZXRHYW1lRGF0YQAAAAIAAAAJcGxheWVyS2V5AAAAC29wcG9uZW50S2V5BAAAAAZnYW1lSWQJAAEsAAAAAgkAASwAAAACBQAAAAlwbGF5ZXJLZXkCAAAAAV8FAAAAC29wcG9uZW50S2V5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAB2dhbWVJZF8FAAAACXBsYXllcktleQUAAAAGZ2FtZUlkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACW9wcG9uZW50XwUAAAAJcGxheWVyS2V5BQAAAAtvcHBvbmVudEtleQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAdnYW1lSWRfBQAAAAtvcHBvbmVudEtleQUAAAAGZ2FtZUlkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACW9wcG9uZW50XwUAAAALb3Bwb25lbnRLZXkFAAAACXBsYXllcktleQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAVnYW1lXwUAAAAGZ2FtZUlkBgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAlnYW1lVHVybl8FAAAABmdhbWVJZAUAAAAJcGxheWVyS2V5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAC2dhbWVXaW5uZXJfBQAAAAZnYW1lSWQCAAAAAAUAAAADbmlsAQAAAAlnZXRHYW1lSWQAAAABAAAAA2tleQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAdnYW1lSWRfBQAAAANrZXkBAAAAA3NpbgAAAAEAAAADcmFkBAAAAAZmYWN0b3IJAABpAAAAAgUAAAADcmFkAAAAAAAACZZeAwkAAGYAAAACAAAAAAAAAAAABQAAAANyYWQEAAAACHBvc2l0aXZlCQEAAAABLQAAAAEFAAAAA3JhZAMJAABmAAAAAgUAAAAIcG9zaXRpdmUAAAAAAAAJll4EAAAABG5vcm0JAABkAAAAAgUAAAAIcG9zaXRpdmUJAABoAAAAAgUAAAAGZmFjdG9yAAAAAAAACZZeAwkAAGYAAAACBQAAAARub3JtAAAAAAAABMsvBAAAAAFhCQAAaAAAAAIJAABoAAAAAgAAAAAAAAAAEAkAAGUAAAACBQAAAARub3JtAAAAAAAABMsvCQAAZQAAAAIAAAAAAAAEyy8JAABlAAAAAgUAAAAEbm9ybQAAAAAAAATLLwkAAGkAAAACCQAAaAAAAAIFAAAAAWEAAAAAAAABhqAJAABlAAAAAgAAAABy5baVkgkAAGkAAAACBQAAAAFhAAAAAAAAAAAEBAAAAAFhCQAAaAAAAAIJAABoAAAAAgAAAAAAAAAAEAUAAAAEbm9ybQkAAGUAAAACAAAAAAAABMsvBQAAAARub3JtCQAAaQAAAAIJAABoAAAAAgkBAAAAAS0AAAABBQAAAAFhAAAAAAAAAYagCQAAZQAAAAIAAAAAcuW2lZIJAABpAAAAAgUAAAABYQAAAAAAAAAABAMJAABmAAAAAgUAAAAIcG9zaXRpdmUAAAAAAAAEyy8EAAAAAWEJAABoAAAAAgkAAGgAAAACAAAAAAAAAAAQCQAAZQAAAAIFAAAACHBvc2l0aXZlAAAAAAAABMsvCQAAZQAAAAIAAAAAAAAEyy8JAABlAAAAAgUAAAAIcG9zaXRpdmUAAAAAAAAEyy8JAABpAAAAAgkAAGgAAAACBQAAAAFhAAAAAAAAAYagCQAAZQAAAAIAAAAAcuW2lZIJAABpAAAAAgUAAAABYQAAAAAAAAAABAQAAAABYQkAAGgAAAACCQAAaAAAAAIAAAAAAAAAABAFAAAACHBvc2l0aXZlCQAAZQAAAAIAAAAAAAAEyy8FAAAACHBvc2l0aXZlCQAAaQAAAAIJAABoAAAAAgkBAAAAAS0AAAABBQAAAAFhAAAAAAAAAYagCQAAZQAAAAIAAAAAcuW2lZIJAABpAAAAAgUAAAABYQAAAAAAAAAABAMJAABmAAAAAgUAAAADcmFkAAAAAAAACZZeBAAAAARub3JtCQAAZQAAAAIFAAAAA3JhZAkAAGgAAAACBQAAAAZmYWN0b3IAAAAAAAAJll4DCQAAZgAAAAIFAAAABG5vcm0AAAAAAAAEyy8EAAAAAWEJAABoAAAAAgkAAGgAAAACAAAAAAAAAAAQCQAAZQAAAAIFAAAABG5vcm0AAAAAAAAEyy8JAABlAAAAAgAAAAAAAATLLwkAAGUAAAACBQAAAARub3JtAAAAAAAABMsvCQAAaQAAAAIJAABoAAAAAgkBAAAAAS0AAAABBQAAAAFhAAAAAAAAAYagCQAAZQAAAAIAAAAAcuW2lZIJAABpAAAAAgUAAAABYQAAAAAAAAAABAQAAAABYQkAAGgAAAACCQAAaAAAAAIAAAAAAAAAABAFAAAABG5vcm0JAABlAAAAAgAAAAAAAATLLwUAAAAEbm9ybQkAAGkAAAACCQAAaAAAAAIFAAAAAWEAAAAAAAABhqAJAABlAAAAAgAAAABy5baVkgkAAGkAAAACBQAAAAFhAAAAAAAAAAAEAwkAAGYAAAACBQAAAANyYWQAAAAAAAAEyy8EAAAAAWEJAABoAAAAAgkAAGgAAAACAAAAAAAAAAAQCQAAZQAAAAIFAAAAA3JhZAAAAAAAAATLLwkAAGUAAAACAAAAAAAABMsvCQAAZQAAAAIFAAAAA3JhZAAAAAAAAATLLwkAAGkAAAACCQAAaAAAAAIJAQAAAAEtAAAAAQUAAAABYQAAAAAAAAGGoAkAAGUAAAACAAAAAHLltpWSCQAAaQAAAAIFAAAAAWEAAAAAAAAAAAQEAAAAAWEJAABoAAAAAgkAAGgAAAACAAAAAAAAAAAQBQAAAANyYWQJAABlAAAAAgAAAAAAAATLLwUAAAADcmFkCQAAaQAAAAIJAABoAAAAAgUAAAABYQAAAAAAAAGGoAkAAGUAAAACAAAAAHLltpWSCQAAaQAAAAIFAAAAAWEAAAAAAAAAAAQBAAAAA2NvcwAAAAEAAAADcmFkCQEAAAADc2luAAAAAQkAAGUAAAACAAAAAAAAAmWXBQAAAANyYWQBAAAABGFzaW4AAAABAAAAAXgDCQAAZwAAAAIA///////+eWAFAAAAAXgA///////9mmkDCQAAZwAAAAIFAAAAAXgAAAAAAAABhqAAAAAAAAACZZcDCQAAZgAAAAIAAAAAAAAAAAAFAAAAAXgEAAAAAngxCQAAaAAAAAIA//////////8FAAAAAXgEAAAABHZhbDIJAABkAAAAAgkAAGkAAAACCQAAaAAAAAIA////////+K8FAAAAAngxAAAAAAAAAYagAAAAAAAAAB0CBAAAAAR2YWw0CQAAZQAAAAIJAABpAAAAAgkAAGgAAAACBQAAAAR2YWwyBQAAAAJ4MQAAAAAAAAGGoAAAAAAAAABS2wQAAAAEdmFsNgkAAGQAAAACCQAAaQAAAAIJAABoAAAAAgUAAAAEdmFsNAUAAAACeDEAAAAAAAABhqAAAAAAAAACZZAEAAAABHJvb3QJAABsAAAABgkAAGUAAAACAAAAAAAAAYagBQAAAAJ4MQAAAAAAAAAABQAAAAAAAAAABQAAAAAAAAAAAQAAAAAAAAAABQUAAAAISEFMRkVWRU4JAQAAAAEtAAAAAQkAAGUAAAACAAAAAAAAAmWXCQAAaQAAAAIJAABoAAAAAgUAAAAEcm9vdAUAAAAEdmFsNgAAAAAAAAGGoAQAAAAEdmFsMgkAAGQAAAACCQAAaQAAAAIJAABoAAAAAgD////////4rwUAAAABeAAAAAAAAAGGoAAAAAAAAAAdAgQAAAAEdmFsNAkAAGUAAAACCQAAaQAAAAIJAABoAAAAAgUAAAAEdmFsMgUAAAABeAAAAAAAAAGGoAAAAAAAAABS2wQAAAAEdmFsNgkAAGQAAAACCQAAaQAAAAIJAABoAAAAAgUAAAAEdmFsNAUAAAABeAAAAAAAAAGGoAAAAAAAAAJlkAQAAAAEcm9vdAkAAGwAAAAGCQAAZQAAAAIAAAAAAAABhqAFAAAAAXgAAAAAAAAAAAUAAAAAAAAAAAUAAAAAAAAAAAEAAAAAAAAAAAUFAAAACEhBTEZFVkVOCQAAZQAAAAIAAAAAAAACZZcJAABpAAAAAgkAAGgAAAACBQAAAARyb290BQAAAAR2YWw2AAAAAAAAAYagAQAAAARhdGFuAAAAAQAAAAF4BAAAAAV4UG93MgkAAGkAAAACCQAAaAAAAAIFAAAAAXgFAAAAAXgAAAAAAAABhqADCQAAZgAAAAIA///////+eWAFAAAAAXgJAABlAAAAAgD///////2aaQkAAGkAAAACCQAAaAAAAAIFAAAAAXgAAAAAAAABhqAJAABkAAAAAgUAAAAFeFBvdzIAAAAAAAAAbWADCQAAZgAAAAIFAAAAAXgAAAAAAAABhqAJAABlAAAAAgAAAAAAAAJllwkAAGkAAAACCQAAaAAAAAIFAAAAAXgAAAAAAAABhqAJAABkAAAAAgUAAAAFeFBvdzIAAAAAAAAAbWAJAABpAAAAAgkAAGgAAAACBQAAAAF4AAAAAAAAAYagCQAAZAAAAAIAAAAAAAABhqAJAABpAAAAAgkAAGgAAAACAAAAAAAAAG1gBQAAAAV4UG93MgAAAAAAAAGGoAEAAAAFYXRhbjIAAAACAAAAAXkAAAABeAMJAABmAAAAAgUAAAABeAAAAAAAAAAAAAkBAAAABGF0YW4AAAABCQAAaQAAAAIFAAAAAXkFAAAAAXgDAwkAAGYAAAACAAAAAAAAAAAABQAAAAF4CQAAZwAAAAIFAAAAAXkAAAAAAAAAAAAHCQAAZAAAAAIJAQAAAARhdGFuAAAAAQkAAGkAAAACBQAAAAF5BQAAAAF4AAAAAAAABMsvAwMJAABmAAAAAgAAAAAAAAAAAAUAAAABeAkAAGYAAAACAAAAAAAAAAAABQAAAAF5BwkAAGUAAAACCQEAAAAEYXRhbgAAAAEJAABpAAAAAgUAAAABeQUAAAABeAAAAAAAAATLLwMDCQAAAAAAAAIFAAAAAXgAAAAAAAAAAAAJAABmAAAAAgUAAAABeQAAAAAAAAAAAAcAAAAAAAACZZcDAwkAAAAAAAACBQAAAAF4AAAAAAAAAAAACQAAZgAAAAIAAAAAAAAAAAAFAAAAAXkHAP///////ZppAAAAAAAAAAAAAQAAABVjYWxjdWxhdGVTaG90RGlzdGFuY2UAAAACAAAAAXYAAAAFcGl0Y2gJAABpAAAAAgkAAGgAAAACCQAAaAAAAAIAAAAAAAAAAAIFAAAAAXYJAABpAAAAAgkAAGgAAAACCQEAAAADY29zAAAAAQUAAAAFcGl0Y2gJAQAAAANzaW4AAAABBQAAAAVwaXRjaAAAAAAAAAGGoAAAAAAAAA72uQEAAAALZ3BzRGlzdGFuY2UAAAAEAAAABGxhdDEAAAAEbG9uMQAAAARsYXQyAAAABGxvbjIEAAAAB2RMYXRTaW4JAQAAAANzaW4AAAABCQAAaQAAAAIJAABlAAAAAgUAAAAEbGF0MQUAAAAEbGF0MgAAAAAAAAAAAgQAAAAHZExvblNpbgkBAAAAA3NpbgAAAAEJAABpAAAAAgkAAGUAAAACBQAAAARsb24xBQAAAARsb24yAAAAAAAAAAACBAAAAANoYXYJAABkAAAAAgkAAGgAAAACBQAAAAdkTGF0U2luBQAAAAdkTGF0U2luCQAAaAAAAAIJAABpAAAAAgkAAGgAAAACCQEAAAADY29zAAAAAQUAAAAEbGF0MQkBAAAAA2NvcwAAAAEFAAAABGxhdDIAAAAAAAABhqAJAABpAAAAAgkAAGgAAAACBQAAAAdkTG9uU2luBQAAAAdkTG9uU2luAAAAAAAAAYagBAAAAAV0aGV0YQkAAGgAAAACAAAAAAAAAAACCQEAAAAEYXNpbgAAAAEJAABsAAAABgkAAGkAAAACBQAAAANoYXYAAAAAAAAAA+gAAAAAAAAAAAcAAAAAAAAAAAUAAAAAAAAAAAEAAAAAAAAAAAUFAAAACEhBTEZFVkVOCQAAaAAAAAIAAAAAAABhNrgFAAAABXRoZXRhAQAAABdjYWxjdWxhdGVJbXBhY3RQb3NpdGlvbgAAAAQAAAADbGF0AAAAA2xvbgAAAARkaXN0AAAAA3lhdwQAAAAGc2luTGF0CQEAAAADc2luAAAAAQUAAAADbGF0BAAAAAZjb3NMYXQJAQAAAANjb3MAAAABBQAAAANsYXQEAAAABXNpblRoCQEAAAADc2luAAAAAQkAAGkAAAACBQAAAARkaXN0AAAAAAAAYTa4BAAAAAVjb3NUaAkBAAAAA2NvcwAAAAEJAABpAAAAAgUAAAAEZGlzdAAAAAAAAGE2uAQAAAAGbmV3TGF0CQEAAAAEYXNpbgAAAAEJAABkAAAAAgkAAGkAAAACCQAAaAAAAAIFAAAABnNpbkxhdAUAAAAFY29zVGgAAAAAAAABhqAJAABpAAAAAgkAAGgAAAACCQAAaAAAAAIFAAAABmNvc0xhdAUAAAAFc2luVGgJAQAAAANjb3MAAAABBQAAAAN5YXcAAAAAAlQL5AAEAAAABm5ld0xvbgkAAGQAAAACBQAAAANsb24JAQAAAAVhdGFuMgAAAAIJAABpAAAAAgkAAGgAAAACCQAAaAAAAAIJAQAAAANzaW4AAAABBQAAAAN5YXcFAAAABXNpblRoBQAAAAZjb3NMYXQAAAAAAAABhqAJAABlAAAAAgUAAAAFY29zVGgJAABpAAAAAgkAAGgAAAACBQAAAAZzaW5MYXQJAQAAAANzaW4AAAABBQAAAAZuZXdMYXQAAAAAAAABhqAJAARMAAAAAgUAAAAGbmV3TGF0CQAETAAAAAIFAAAABm5ld0xvbgUAAAADbmlsAQAAAA1jYWxjdWxhdGVTaG90AAAABQAAAAVwaXRjaAAAAAN5YXcAAAAFZm9yY2UAAAAJcGxheWVyS2V5AAAAC29wcG9uZW50S2V5BAAAAA5wbGF5ZXJMYXRpdHVkZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAxwb3NpdGlvbkxhdF8FAAAACXBsYXllcktleQQAAAAPcGxheWVyTG9uZ2l0dWRlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAADHBvc2l0aW9uTG9uXwUAAAAJcGxheWVyS2V5BAAAABBvcHBvbmVudExhdGl0dWRlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAADHBvc2l0aW9uTGF0XwUAAAALb3Bwb25lbnRLZXkEAAAAEW9wcG9uZW50TG9uZ2l0dWRlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAADHBvc2l0aW9uTG9uXwUAAAALb3Bwb25lbnRLZXkEAAAAFmRpc3RhbmNlQmV0d2VlblBsYXllcnMJAQAAAAtncHNEaXN0YW5jZQAAAAQFAAAADnBsYXllckxhdGl0dWRlBQAAAA9wbGF5ZXJMb25naXR1ZGUFAAAAEG9wcG9uZW50TGF0aXR1ZGUFAAAAEW9wcG9uZW50TG9uZ2l0dWRlBAAAAA9vcHRpbWFsVmVsb2NpdHkJAABpAAAAAgkAAGgAAAACBQAAABZkaXN0YW5jZUJldHdlZW5QbGF5ZXJzAAAAAAAADva5AAAAAAAAAYagBAAAAA9wbGF5ZXJTaG90UmVhY2gJAQAAABVjYWxjdWxhdGVTaG90RGlzdGFuY2UAAAACCQAAaQAAAAIJAABoAAAAAgUAAAAPb3B0aW1hbFZlbG9jaXR5BQAAAAVmb3JjZQAAAAAAAAGGoAUAAAAFcGl0Y2gEAAAADmltcGFjdFBvc2l0aW9uCQEAAAAXY2FsY3VsYXRlSW1wYWN0UG9zaXRpb24AAAAEBQAAAA5wbGF5ZXJMYXRpdHVkZQUAAAAPcGxheWVyTG9uZ2l0dWRlBQAAAA9wbGF5ZXJTaG90UmVhY2gFAAAAA3lhdwQAAAAOaW1wYWN0RGlzdGFuY2UJAQAAAAtncHNEaXN0YW5jZQAAAAQJAAGRAAAAAgUAAAAOaW1wYWN0UG9zaXRpb24AAAAAAAAAAAAJAAGRAAAAAgUAAAAOaW1wYWN0UG9zaXRpb24AAAAAAAAAAAEFAAAAEG9wcG9uZW50TGF0aXR1ZGUFAAAAEW9wcG9uZW50TG9uZ2l0dWRlCQAETAAAAAIFAAAADmltcGFjdERpc3RhbmNlBQAAAA5pbXBhY3RQb3NpdGlvbgAAAAMAAAABaQEAAAAJc3RhcnRHYW1lAAAAAgAAAAhsYXRpdHVkZQAAAAlsb25naXR1ZGUEAAAABWFzc2V0AQAAAAAEAAAAB3BheW1lbnQJAQAAAAV2YWx1ZQAAAAEIBQAAAAFpAAAAB3BheW1lbnQEAAAABmNhbGxlcgkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIEAAAAC2Nvb3JkaW5hdGVzCQEAAAAJc2V0Q29vcmRzAAAAAwUAAAAGY2FsbGVyCQAAaQAAAAIJAABoAAAAAgUAAAAIbGF0aXR1ZGUAAAAAAAAABtEAAAAAAAABhqAJAABpAAAAAgkAAGgAAAACBQAAAAlsb25naXR1ZGUAAAAAAAAABtEAAAAAAAABhqAEAAAACG9wZW5HYW1lCQAEHQAAAAIFAAAABHRoaXMCAAAACG9wZW5HYW1lAwMJAAAAAAAAAggFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAUAAAAFYXNzZXQJAABnAAAAAggFAAAAB3BheW1lbnQAAAAGYW1vdW50AAAAAAAAAAABBwQAAAAGZ2FtZUlkCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAAHZ2FtZUlkXwUAAAAGY2FsbGVyAwMJAQAAAAIhPQAAAAIFAAAABmdhbWVJZAIAAAAACQEAAAACIT0AAAACBQAAAAZnYW1lSWQFAAAABHVuaXQHCQAAAgAAAAECAAAAPFBsZWFzZSBmaW5pc2ggeW91ciBjdXJyZW50IGdhbWUsIGJlZm9yZSBzdGFydGluZyBhbm90aGVyIG9uZQMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEFAAAACG9wZW5HYW1lCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAhvcGVuR2FtZQUAAAAGY2FsbGVyBQAAAAtjb29yZGluYXRlcwMDCQAAAAAAAAIFAAAACG9wZW5HYW1lAgAAAAAGCQAAAAAAAAIFAAAACG9wZW5HYW1lBQAAAAZjYWxsZXIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAACG9wZW5HYW1lBQAAAAZjYWxsZXIFAAAAC2Nvb3JkaW5hdGVzCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAhvcGVuR2FtZQIAAAAACQAETAAAAAIJAAGRAAAAAgUAAAALY29vcmRpbmF0ZXMAAAAAAAAAAAAJAARMAAAAAgkAAZEAAAACBQAAAAtjb29yZGluYXRlcwAAAAAAAAAAAQkBAAAAC3NldEdhbWVEYXRhAAAAAgkBAAAABXZhbHVlAAAAAQUAAAAIb3BlbkdhbWUFAAAABmNhbGxlcgkAAAIAAAABAgAAABRQbGVhc2UgcGF5IHRoZSB0b2tlbgAAAAFpAQAAAAtleGVjdXRlU2hvdAAAAAMAAAAFcGl0Y2gAAAADeWF3AAAABWZvcmNlBAAAAAVhc3NldAEAAAAABAAAAAZjYWxsZXIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBAAAAAhvcHBvbmVudAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAlvcHBvbmVudF8FAAAABmNhbGxlcgQAAAAGZ2FtZUlkCQEAAAAJZ2V0R2FtZUlkAAAAAQUAAAAGY2FsbGVyAwkBAAAAAiE9AAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAlnYW1lVHVybl8FAAAABmdhbWVJZAUAAAAGY2FsbGVyCQAAAgAAAAECAAAAGlBsZWFzZSB3YWl0IGZvciB5b3VyIHR1cm4uBAAAAAhzaG90RGF0YQkBAAAADWNhbGN1bGF0ZVNob3QAAAAFBQAAAAVwaXRjaAUAAAADeWF3BQAAAAVmb3JjZQUAAAAGY2FsbGVyBQAAAAhvcHBvbmVudAMJAABmAAAAAgkAAGQAAAACCQAAaQAAAAIJAAGRAAAAAgUAAAAIc2hvdERhdGEAAAAAAAAAAAAAAAAAAAAAAAUAAAAAADuaygAJAAGRAAAAAgUAAAAIc2hvdERhdGEAAAAAAAAAAAAJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAABWdhbWVfBQAAAAZnYW1lSWQHCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAC2dhbWVXaW5uZXJfBQAAAAZnYW1lSWQFAAAABmNhbGxlcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAABFsYXN0U2hvdERpc3RhbmNlXwUAAAAGZ2FtZUlkCQABkQAAAAIFAAAACHNob3REYXRhAAAAAAAAAAAACQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAADGxhc3RTaG90TGF0XwUAAAAGZ2FtZUlkCQABkQAAAAIFAAAACHNob3REYXRhAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAADGxhc3RTaG90TG9uXwUAAAAGZ2FtZUlkCQABkQAAAAIFAAAACHNob3REYXRhAAAAAAAAAAACBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyAAAAAAAAAAACBQAAAAVhc3NldAUAAAADbmlsCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACWdhbWVUdXJuXwUAAAAGZ2FtZUlkBQAAAAhvcHBvbmVudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAABFsYXN0U2hvdERpc3RhbmNlXwUAAAAGZ2FtZUlkCQABkQAAAAIFAAAACHNob3REYXRhAAAAAAAAAAAACQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAADGxhc3RTaG90TGF0XwUAAAAGZ2FtZUlkCQABkQAAAAIFAAAACHNob3REYXRhAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAADGxhc3RTaG90TG9uXwUAAAAGZ2FtZUlkCQABkQAAAAIFAAAACHNob3REYXRhAAAAAAAAAAACBQAAAANuaWwAAAABaQEAAAAGZmF1Y2V0AAAAAAQAAAAFYXNzZXQBAAAAAAQAAAAGY2FsbGVyCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAAHYmFsYW5jZQkAA+sAAAACCAUAAAABaQAAAAZjYWxsZXIFAAAABWFzc2V0AwkAAGYAAAACAAAAAAAAAABkBQAAAAdiYWxhbmNlCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgAAAAAAAAAAZAUAAAAFYXNzZXQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQUAAAADbmlsAAAAAME5HLA=", "chainId": 84, "height": 1149640, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: DfNpWHBxSUcJti3jxdDgaZZv75RiuWqLpy6a1kzoqvHH Next: 7MS76qDfDaU8kAu19e9Nb1fkVMHKNnPpGDHppaouzmxb Diff:
OldNewDifferences
11 {-# STDLIB_VERSION 3 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-func setCoords (key,latitude,longitude) = [DataEntry(("positionLat_" + key), latitude), DataEntry(("positionLong_" + key), longitude)]
4+func setCoords (key,latitude,longitude) = [DataEntry(("positionLat_" + key), latitude), DataEntry(("positionLon_" + key), longitude)]
55
66
77 func setGameData (playerKey,opponentKey) = {
2323 let norm = (positive + (factor * 628318))
2424 if ((norm > 314159))
2525 then {
26- let norm2 = (norm - 314159)
27- let a = ((16 * norm2) * (314159 - norm2))
28- let b = (493480220050 - (a / 4))
29- ((a * 100000) / b)
26+ let a = ((16 * (norm - 314159)) * (314159 - (norm - 314159)))
27+ ((a * 100000) / (493480220050 - (a / 4)))
3028 }
3129 else {
3230 let a = ((16 * norm) * (314159 - norm))
33- let b = (493480220050 - (a / 4))
34- ((-(a) * 100000) / b)
31+ ((-(a) * 100000) / (493480220050 - (a / 4)))
3532 }
3633 }
3734 else if ((positive > 314159))
3835 then {
39- let norm = (positive - 314159)
40- let a = ((16 * norm) * (314159 - norm))
41- let b = (493480220050 - (a / 4))
42- ((a * 100000) / b)
36+ let a = ((16 * (positive - 314159)) * (314159 - (positive - 314159)))
37+ ((a * 100000) / (493480220050 - (a / 4)))
4338 }
4439 else {
4540 let a = ((16 * positive) * (314159 - positive))
46- let b = (493480220050 - (a / 4))
47- ((-(a) * 100000) / b)
41+ ((-(a) * 100000) / (493480220050 - (a / 4)))
4842 }
4943 }
5044 else if ((rad > 628318))
5246 let norm = (rad - (factor * 628318))
5347 if ((norm > 314159))
5448 then {
55- let norm2 = (norm - 314159)
56- let a = ((16 * norm2) * (314159 - norm2))
57- let b = (493480220050 - (a / 4))
58- ((-(a) * 100000) / b)
49+ let a = ((16 * (norm - 314159)) * (314159 - (norm - 314159)))
50+ ((-(a) * 100000) / (493480220050 - (a / 4)))
5951 }
6052 else {
6153 let a = ((16 * norm) * (314159 - norm))
62- let b = (493480220050 - (a / 4))
63- ((a * 100000) / b)
54+ ((a * 100000) / (493480220050 - (a / 4)))
6455 }
6556 }
6657 else if ((rad > 314159))
6758 then {
68- let norm = (rad - 314159)
69- let a = ((16 * norm) * (314159 - norm))
70- let b = (493480220050 - (a / 4))
71- ((-(a) * 100000) / b)
59+ let a = ((16 * (rad - 314159)) * (314159 - (rad - 314159)))
60+ ((-(a) * 100000) / (493480220050 - (a / 4)))
7261 }
7362 else {
7463 let a = ((16 * rad) * (314159 - rad))
75- let b = (493480220050 - (a / 4))
76- ((a * 100000) / b)
64+ ((a * 100000) / (493480220050 - (a / 4)))
7765 }
7866 }
7967
8169 func cos (rad) = sin((157079 - rad))
8270
8371
84-func asin (x) = {
85- let xPow2 = ((x * x) / 10000000000)
86- let xPow3 = ((x * x) * x)
87- let val2 = (xPow3 / 60000000000)
88- let val3 = (((xPow3 * 3) / 400000000000) * xPow2)
89- let val4 = ((((xPow3 * 15) / 3360000000000) * xPow2) * xPow2)
90- let val5 = (((((xPow3 * 105) / 34560000000000) * xPow2) * xPow2) * xPow2)
91- ((((x + val2) + val3) + val4) + val5)
92- }
72+func asin (x) = if ((-100000 >= x))
73+ then -157079
74+ else if ((x >= 100000))
75+ then 157079
76+ else if ((0 > x))
77+ then {
78+ let x1 = (-1 * x)
79+ let val2 = (((-1873 * x1) / 100000) + 7426)
80+ let val4 = (((val2 * x1) / 100000) - 21211)
81+ let val6 = (((val4 * x1) / 100000) + 157072)
82+ let root = pow((100000 - x1), 5, 5, 1, 5, HALFEVEN)
83+ -((157079 - ((root * val6) / 100000)))
84+ }
85+ else {
86+ let val2 = (((-1873 * x) / 100000) + 7426)
87+ let val4 = (((val2 * x) / 100000) - 21211)
88+ let val6 = (((val4 * x) / 100000) + 157072)
89+ let root = pow((100000 - x), 5, 5, 1, 5, HALFEVEN)
90+ (157079 - ((root * val6) / 100000))
91+ }
9392
9493
95-func atan (x) = if ((x > 100000))
96- then {
97- let xInv = (10000000000 / x)
98- let xInvPow2 = ((xInv * xInv) / 10000000000)
99- let xInvPow3 = ((xInv * xInv) * xInv)
100- let val2 = (xInvPow3 / 30000000000)
101- let val3 = ((xInvPow3 / 50000000000) * xInvPow2)
102- let val4 = (((xInvPow3 / 70000000000) * xInvPow2) * xInvPow2)
103- let val5 = ((((xInvPow3 / 90000000000) * xInvPow2) * xInvPow2) * xInvPow2)
104- (((((157080 - xInv) + val2) - val3) + val4) - val5)
105- }
106- else if ((-100000 > x))
107- then {
108- let xInv = (10000000000 / x)
109- let xInvPow2 = ((xInv * xInv) / 10000000000)
110- let xInvPow3 = ((xInv * xInv) * xInv)
111- let val2 = (xInvPow3 / 30000000000)
112- let val3 = ((xInvPow3 / 50000000000) * xInvPow2)
113- let val4 = (((xInvPow3 / 70000000000) * xInvPow2) * xInvPow2)
114- let val5 = ((((xInvPow3 / 90000000000) * xInvPow2) * xInvPow2) * xInvPow2)
115- (((((val2 - val3) + val4) - 157080) - xInv) - val5)
116- }
117- else {
118- let xPow2 = ((x * x) / 10000000000)
119- let xPow3 = ((x * x) * x)
120- let val2 = (xPow3 / 30000000000)
121- let val3 = ((xPow3 / 50000000000) * xPow2)
122- let val4 = (((xPow3 / 70000000000) * xPow2) * xPow2)
123- let val5 = ((((xPow3 / 90000000000) * xPow2) * xPow2) * xPow2)
124- ((((x - val2) + val3) - val4) + val5)
125- }
94+func atan (x) = {
95+ let xPow2 = ((x * x) / 100000)
96+ if ((-100000 > x))
97+ then (-157079 - ((x * 100000) / (xPow2 + 28000)))
98+ else if ((x > 100000))
99+ then (157079 - ((x * 100000) / (xPow2 + 28000)))
100+ else ((x * 100000) / (100000 + ((28000 * xPow2) / 100000)))
101+ }
126102
127103
128104 func atan2 (y,x) = if ((x > 0))
138114 else if (if ((x == 0))
139115 then (y > 0)
140116 else false)
141- then 157080
117+ then 157079
142118 else if (if ((x == 0))
143119 then (0 > y)
144120 else false)
145- then -157080
121+ then -157079
146122 else 0
147123
148124
149-func sqrt (x) = if ((2 > x))
150- then x
151- else {
152- let x1 = ((316 + (x / 316)) / 2)
153- let x2 = ((x1 + (x / x1)) / 2)
154- let x3 = ((x2 + (x / x2)) / 2)
155- let x4 = ((x3 + (x / x3)) / 2)
156- let x5 = ((x4 + (x / x4)) / 2)
157- let x6 = ((x5 + (x / x5)) / 2)
158- let x7 = ((x6 + (x / x6)) / 2)
159- let x8 = ((x7 + (x / x7)) / 2)
160- let x9 = ((x8 + (x / x8)) / 2)
161- ((x9 + (x / x9)) / 2)
162- }
125+func calculateShotDistance (v,pitch) = (((2 * v) * ((cos(pitch) * sin(pitch)) / 100000)) / 980665)
163126
164127
165-func getShotDistance (v,pitch) = (((2 * ((v * v) / 100000)) * ((cos(pitch) * sin(pitch)) / 100000)) / 980665)
166-
167-
168-func distance (lat1,lon1,lat2,lon2) = {
169- let dLat = (lat1 - lat2)
170- let dLon = (lon1 - lon2)
171- let dLatSin = sin((dLat / 2))
172- let dLonSin = sin((dLon / 2))
128+func gpsDistance (lat1,lon1,lat2,lon2) = {
129+ let dLatSin = sin(((lat1 - lat2) / 2))
130+ let dLonSin = sin(((lon1 - lon2) / 2))
173131 let hav = ((dLatSin * dLatSin) + (((cos(lat1) * cos(lat2)) / 100000) * ((dLonSin * dLonSin) / 100000)))
174- let theta = (2 * asin(sqrt(hav)))
175- (637100000 * theta)
132+ let theta = (2 * asin(pow((hav / 1000), 7, 5, 1, 5, HALFEVEN)))
133+ (6371000 * theta)
176134 }
177135
178136
179-func impact (lat,lon,dist,yaw) = {
180- let th = (dist / 637100)
137+func calculateImpactPosition (lat,lon,dist,yaw) = {
181138 let sinLat = sin(lat)
182139 let cosLat = cos(lat)
183- let sinTh = sin(th)
184- let cosTh = cos(th)
140+ let sinTh = sin((dist / 6371000))
141+ let cosTh = cos((dist / 6371000))
185142 let newLat = asin((((sinLat * cosTh) / 100000) + (((cosLat * sinTh) * cos(yaw)) / 10000000000)))
186- let newLon = (lon + (atan2((((sin(yaw) * sinTh) * cosLat) / 100000), (cosTh - ((sinLat * sinLat) / 100000))) * 100))
143+ let newLon = (lon + atan2((((sin(yaw) * sinTh) * cosLat) / 100000), (cosTh - ((sinLat * sin(newLat)) / 100000))))
187144 [newLat, newLon]
188145 }
189146
190147
191-func gotHit (pitch,yaw,force,playerKey,opponentKey) = {
192- let playerLat = getIntegerValue(this, ("positionLat_" + playerKey))
193- let playerLon = getIntegerValue(this, ("positionLong_" + playerKey))
194- let opponentLat = getIntegerValue(this, ("positionLat_" + opponentKey))
195- let opponentLon = getIntegerValue(this, ("positionLat_" + opponentKey))
196- let distanceBetweenPlayers = (distance(playerLat, playerLon, opponentLat, opponentLon) / 100000)
197- let optimalVelocity = (sqrt(((distanceBetweenPlayers * 980665) / 10000)) * 1000)
198- let playerShotReach = getShotDistance(((optimalVelocity * force) / 100000), pitch)
199- let impactPosition = impact(playerLat, playerLon, playerShotReach, yaw)
200- let impactDistance = (distance(impactPosition[0], impactPosition[1], opponentLat, opponentLon) / 100000)
201- (100 > impactDistance)
148+func calculateShot (pitch,yaw,force,playerKey,opponentKey) = {
149+ let playerLatitude = getIntegerValue(this, ("positionLat_" + playerKey))
150+ let playerLongitude = getIntegerValue(this, ("positionLon_" + playerKey))
151+ let opponentLatitude = getIntegerValue(this, ("positionLat_" + opponentKey))
152+ let opponentLongitude = getIntegerValue(this, ("positionLon_" + opponentKey))
153+ let distanceBetweenPlayers = gpsDistance(playerLatitude, playerLongitude, opponentLatitude, opponentLongitude)
154+ let optimalVelocity = ((distanceBetweenPlayers * 980665) / 100000)
155+ let playerShotReach = calculateShotDistance(((optimalVelocity * force) / 100000), pitch)
156+ let impactPosition = calculateImpactPosition(playerLatitude, playerLongitude, playerShotReach, yaw)
157+ let impactDistance = gpsDistance(impactPosition[0], impactPosition[1], opponentLatitude, opponentLongitude)
158+impactDistance :: impactPosition
202159 }
203160
204161
205162 @Callable(i)
206163 func startGame (latitude,longitude) = {
164+ let asset = base58''
165+ let payment = value(i.payment)
207166 let caller = toString(i.caller)
208167 let coordinates = setCoords(caller, ((latitude * 1745) / 100000), ((longitude * 1745) / 100000))
209168 let openGame = getString(this, "openGame")
210- let gameId = getString(this, ("gameId_" + caller))
211- let gameIsActive = getBoolean(this, ("gameId_" + getGameId(caller)))
212- if (if (if (if ((gameId != ""))
213- then (gameId != unit)
169+ if (if ((payment.assetId == asset))
170+ then (payment.amount >= 1)
214171 else false)
215- then (gameIsActive != false)
216- else false)
217- then (gameIsActive != unit)
218- else false)
219- then throw("Please finish your current game, before starting another one")
220- else if (!(isDefined(openGame)))
221- then WriteSet(DataEntry("openGame", caller) :: coordinates)
222- else if (if ((openGame == ""))
223- then true
224- else (openGame == caller))
225- then WriteSet(DataEntry("openGame", caller) :: coordinates)
226- else WriteSet([DataEntry("openGame", ""), coordinates[0], coordinates[1], setGameData(value(openGame), caller)])
172+ then {
173+ let gameId = getString(this, ("gameId_" + caller))
174+ if (if ((gameId != ""))
175+ then (gameId != unit)
176+ else false)
177+ then throw("Please finish your current game, before starting another one")
178+ else if (!(isDefined(openGame)))
179+ then WriteSet(DataEntry("openGame", caller) :: coordinates)
180+ else if (if ((openGame == ""))
181+ then true
182+ else (openGame == caller))
183+ then WriteSet(DataEntry("openGame", caller) :: coordinates)
184+ else WriteSet([DataEntry("openGame", ""), coordinates[0], coordinates[1], setGameData(value(openGame), caller)])
185+ }
186+ else throw("Please pay the token")
227187 }
228188
229189
230190
231191 @Callable(i)
232192 func executeShot (pitch,yaw,force) = {
193+ let asset = base58''
233194 let caller = toString(i.caller)
234195 let opponent = getStringValue(this, ("opponent_" + caller))
235196 let gameId = getGameId(caller)
236197 if ((getStringValue(this, ("gameTurn_" + gameId)) != caller))
237- then throw("please wait for your turn")
238- else if (gotHit(pitch, yaw, force, caller, opponent))
239- then WriteSet([DataEntry(("game_" + gameId), false), DataEntry(("gameWinner_" + gameId), caller)])
240- else WriteSet([DataEntry(("gameTurn_" + gameId), opponent)])
198+ then throw("Please wait for your turn.")
199+ else {
200+ let shotData = calculateShot(pitch, yaw, force, caller, opponent)
201+ if ((((shotData[0] / 5) + 1000000000) > shotData[0]))
202+ then ScriptResult(WriteSet([DataEntry(("game_" + gameId), false), DataEntry(("gameWinner_" + gameId), caller), DataEntry(("lastShotDistance_" + gameId), shotData[0]), DataEntry(("lastShotLat_" + gameId), shotData[1]), DataEntry(("lastShotLon_" + gameId), shotData[2])]), TransferSet([ScriptTransfer(i.caller, 2, asset)]))
203+ else WriteSet([DataEntry(("gameTurn_" + gameId), opponent), DataEntry(("lastShotDistance_" + gameId), shotData[0]), DataEntry(("lastShotLat_" + gameId), shotData[1]), DataEntry(("lastShotLon_" + gameId), shotData[2])])
204+ }
205+ }
206+
207+
208+
209+@Callable(i)
210+func faucet () = {
211+ let asset = base58''
212+ let caller = toString(i.caller)
213+ let balance = assetBalance(i.caller, asset)
214+ if ((100 > balance))
215+ then TransferSet([ScriptTransfer(i.caller, 100, asset)])
216+ else TransferSet(nil)
241217 }
242218
243219
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 3 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-func setCoords (key,latitude,longitude) = [DataEntry(("positionLat_" + key), latitude), DataEntry(("positionLong_" + key), longitude)]
4+func setCoords (key,latitude,longitude) = [DataEntry(("positionLat_" + key), latitude), DataEntry(("positionLon_" + key), longitude)]
55
66
77 func setGameData (playerKey,opponentKey) = {
88 let gameId = ((playerKey + "_") + opponentKey)
99 [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), "")]
1010 }
1111
1212
1313 func getGameId (key) = getStringValue(this, ("gameId_" + key))
1414
1515
1616 func sin (rad) = {
1717 let factor = (rad / 628318)
1818 if ((0 > rad))
1919 then {
2020 let positive = -(rad)
2121 if ((positive > 628318))
2222 then {
2323 let norm = (positive + (factor * 628318))
2424 if ((norm > 314159))
2525 then {
26- let norm2 = (norm - 314159)
27- let a = ((16 * norm2) * (314159 - norm2))
28- let b = (493480220050 - (a / 4))
29- ((a * 100000) / b)
26+ let a = ((16 * (norm - 314159)) * (314159 - (norm - 314159)))
27+ ((a * 100000) / (493480220050 - (a / 4)))
3028 }
3129 else {
3230 let a = ((16 * norm) * (314159 - norm))
33- let b = (493480220050 - (a / 4))
34- ((-(a) * 100000) / b)
31+ ((-(a) * 100000) / (493480220050 - (a / 4)))
3532 }
3633 }
3734 else if ((positive > 314159))
3835 then {
39- let norm = (positive - 314159)
40- let a = ((16 * norm) * (314159 - norm))
41- let b = (493480220050 - (a / 4))
42- ((a * 100000) / b)
36+ let a = ((16 * (positive - 314159)) * (314159 - (positive - 314159)))
37+ ((a * 100000) / (493480220050 - (a / 4)))
4338 }
4439 else {
4540 let a = ((16 * positive) * (314159 - positive))
46- let b = (493480220050 - (a / 4))
47- ((-(a) * 100000) / b)
41+ ((-(a) * 100000) / (493480220050 - (a / 4)))
4842 }
4943 }
5044 else if ((rad > 628318))
5145 then {
5246 let norm = (rad - (factor * 628318))
5347 if ((norm > 314159))
5448 then {
55- let norm2 = (norm - 314159)
56- let a = ((16 * norm2) * (314159 - norm2))
57- let b = (493480220050 - (a / 4))
58- ((-(a) * 100000) / b)
49+ let a = ((16 * (norm - 314159)) * (314159 - (norm - 314159)))
50+ ((-(a) * 100000) / (493480220050 - (a / 4)))
5951 }
6052 else {
6153 let a = ((16 * norm) * (314159 - norm))
62- let b = (493480220050 - (a / 4))
63- ((a * 100000) / b)
54+ ((a * 100000) / (493480220050 - (a / 4)))
6455 }
6556 }
6657 else if ((rad > 314159))
6758 then {
68- let norm = (rad - 314159)
69- let a = ((16 * norm) * (314159 - norm))
70- let b = (493480220050 - (a / 4))
71- ((-(a) * 100000) / b)
59+ let a = ((16 * (rad - 314159)) * (314159 - (rad - 314159)))
60+ ((-(a) * 100000) / (493480220050 - (a / 4)))
7261 }
7362 else {
7463 let a = ((16 * rad) * (314159 - rad))
75- let b = (493480220050 - (a / 4))
76- ((a * 100000) / b)
64+ ((a * 100000) / (493480220050 - (a / 4)))
7765 }
7866 }
7967
8068
8169 func cos (rad) = sin((157079 - rad))
8270
8371
84-func asin (x) = {
85- let xPow2 = ((x * x) / 10000000000)
86- let xPow3 = ((x * x) * x)
87- let val2 = (xPow3 / 60000000000)
88- let val3 = (((xPow3 * 3) / 400000000000) * xPow2)
89- let val4 = ((((xPow3 * 15) / 3360000000000) * xPow2) * xPow2)
90- let val5 = (((((xPow3 * 105) / 34560000000000) * xPow2) * xPow2) * xPow2)
91- ((((x + val2) + val3) + val4) + val5)
92- }
72+func asin (x) = if ((-100000 >= x))
73+ then -157079
74+ else if ((x >= 100000))
75+ then 157079
76+ else if ((0 > x))
77+ then {
78+ let x1 = (-1 * x)
79+ let val2 = (((-1873 * x1) / 100000) + 7426)
80+ let val4 = (((val2 * x1) / 100000) - 21211)
81+ let val6 = (((val4 * x1) / 100000) + 157072)
82+ let root = pow((100000 - x1), 5, 5, 1, 5, HALFEVEN)
83+ -((157079 - ((root * val6) / 100000)))
84+ }
85+ else {
86+ let val2 = (((-1873 * x) / 100000) + 7426)
87+ let val4 = (((val2 * x) / 100000) - 21211)
88+ let val6 = (((val4 * x) / 100000) + 157072)
89+ let root = pow((100000 - x), 5, 5, 1, 5, HALFEVEN)
90+ (157079 - ((root * val6) / 100000))
91+ }
9392
9493
95-func atan (x) = if ((x > 100000))
96- then {
97- let xInv = (10000000000 / x)
98- let xInvPow2 = ((xInv * xInv) / 10000000000)
99- let xInvPow3 = ((xInv * xInv) * xInv)
100- let val2 = (xInvPow3 / 30000000000)
101- let val3 = ((xInvPow3 / 50000000000) * xInvPow2)
102- let val4 = (((xInvPow3 / 70000000000) * xInvPow2) * xInvPow2)
103- let val5 = ((((xInvPow3 / 90000000000) * xInvPow2) * xInvPow2) * xInvPow2)
104- (((((157080 - xInv) + val2) - val3) + val4) - val5)
105- }
106- else if ((-100000 > x))
107- then {
108- let xInv = (10000000000 / x)
109- let xInvPow2 = ((xInv * xInv) / 10000000000)
110- let xInvPow3 = ((xInv * xInv) * xInv)
111- let val2 = (xInvPow3 / 30000000000)
112- let val3 = ((xInvPow3 / 50000000000) * xInvPow2)
113- let val4 = (((xInvPow3 / 70000000000) * xInvPow2) * xInvPow2)
114- let val5 = ((((xInvPow3 / 90000000000) * xInvPow2) * xInvPow2) * xInvPow2)
115- (((((val2 - val3) + val4) - 157080) - xInv) - val5)
116- }
117- else {
118- let xPow2 = ((x * x) / 10000000000)
119- let xPow3 = ((x * x) * x)
120- let val2 = (xPow3 / 30000000000)
121- let val3 = ((xPow3 / 50000000000) * xPow2)
122- let val4 = (((xPow3 / 70000000000) * xPow2) * xPow2)
123- let val5 = ((((xPow3 / 90000000000) * xPow2) * xPow2) * xPow2)
124- ((((x - val2) + val3) - val4) + val5)
125- }
94+func atan (x) = {
95+ let xPow2 = ((x * x) / 100000)
96+ if ((-100000 > x))
97+ then (-157079 - ((x * 100000) / (xPow2 + 28000)))
98+ else if ((x > 100000))
99+ then (157079 - ((x * 100000) / (xPow2 + 28000)))
100+ else ((x * 100000) / (100000 + ((28000 * xPow2) / 100000)))
101+ }
126102
127103
128104 func atan2 (y,x) = if ((x > 0))
129105 then atan((y / x))
130106 else if (if ((0 > x))
131107 then (y >= 0)
132108 else false)
133109 then (atan((y / x)) + 314159)
134110 else if (if ((0 > x))
135111 then (0 > y)
136112 else false)
137113 then (atan((y / x)) - 314159)
138114 else if (if ((x == 0))
139115 then (y > 0)
140116 else false)
141- then 157080
117+ then 157079
142118 else if (if ((x == 0))
143119 then (0 > y)
144120 else false)
145- then -157080
121+ then -157079
146122 else 0
147123
148124
149-func sqrt (x) = if ((2 > x))
150- then x
151- else {
152- let x1 = ((316 + (x / 316)) / 2)
153- let x2 = ((x1 + (x / x1)) / 2)
154- let x3 = ((x2 + (x / x2)) / 2)
155- let x4 = ((x3 + (x / x3)) / 2)
156- let x5 = ((x4 + (x / x4)) / 2)
157- let x6 = ((x5 + (x / x5)) / 2)
158- let x7 = ((x6 + (x / x6)) / 2)
159- let x8 = ((x7 + (x / x7)) / 2)
160- let x9 = ((x8 + (x / x8)) / 2)
161- ((x9 + (x / x9)) / 2)
162- }
125+func calculateShotDistance (v,pitch) = (((2 * v) * ((cos(pitch) * sin(pitch)) / 100000)) / 980665)
163126
164127
165-func getShotDistance (v,pitch) = (((2 * ((v * v) / 100000)) * ((cos(pitch) * sin(pitch)) / 100000)) / 980665)
166-
167-
168-func distance (lat1,lon1,lat2,lon2) = {
169- let dLat = (lat1 - lat2)
170- let dLon = (lon1 - lon2)
171- let dLatSin = sin((dLat / 2))
172- let dLonSin = sin((dLon / 2))
128+func gpsDistance (lat1,lon1,lat2,lon2) = {
129+ let dLatSin = sin(((lat1 - lat2) / 2))
130+ let dLonSin = sin(((lon1 - lon2) / 2))
173131 let hav = ((dLatSin * dLatSin) + (((cos(lat1) * cos(lat2)) / 100000) * ((dLonSin * dLonSin) / 100000)))
174- let theta = (2 * asin(sqrt(hav)))
175- (637100000 * theta)
132+ let theta = (2 * asin(pow((hav / 1000), 7, 5, 1, 5, HALFEVEN)))
133+ (6371000 * theta)
176134 }
177135
178136
179-func impact (lat,lon,dist,yaw) = {
180- let th = (dist / 637100)
137+func calculateImpactPosition (lat,lon,dist,yaw) = {
181138 let sinLat = sin(lat)
182139 let cosLat = cos(lat)
183- let sinTh = sin(th)
184- let cosTh = cos(th)
140+ let sinTh = sin((dist / 6371000))
141+ let cosTh = cos((dist / 6371000))
185142 let newLat = asin((((sinLat * cosTh) / 100000) + (((cosLat * sinTh) * cos(yaw)) / 10000000000)))
186- let newLon = (lon + (atan2((((sin(yaw) * sinTh) * cosLat) / 100000), (cosTh - ((sinLat * sinLat) / 100000))) * 100))
143+ let newLon = (lon + atan2((((sin(yaw) * sinTh) * cosLat) / 100000), (cosTh - ((sinLat * sin(newLat)) / 100000))))
187144 [newLat, newLon]
188145 }
189146
190147
191-func gotHit (pitch,yaw,force,playerKey,opponentKey) = {
192- let playerLat = getIntegerValue(this, ("positionLat_" + playerKey))
193- let playerLon = getIntegerValue(this, ("positionLong_" + playerKey))
194- let opponentLat = getIntegerValue(this, ("positionLat_" + opponentKey))
195- let opponentLon = getIntegerValue(this, ("positionLat_" + opponentKey))
196- let distanceBetweenPlayers = (distance(playerLat, playerLon, opponentLat, opponentLon) / 100000)
197- let optimalVelocity = (sqrt(((distanceBetweenPlayers * 980665) / 10000)) * 1000)
198- let playerShotReach = getShotDistance(((optimalVelocity * force) / 100000), pitch)
199- let impactPosition = impact(playerLat, playerLon, playerShotReach, yaw)
200- let impactDistance = (distance(impactPosition[0], impactPosition[1], opponentLat, opponentLon) / 100000)
201- (100 > impactDistance)
148+func calculateShot (pitch,yaw,force,playerKey,opponentKey) = {
149+ let playerLatitude = getIntegerValue(this, ("positionLat_" + playerKey))
150+ let playerLongitude = getIntegerValue(this, ("positionLon_" + playerKey))
151+ let opponentLatitude = getIntegerValue(this, ("positionLat_" + opponentKey))
152+ let opponentLongitude = getIntegerValue(this, ("positionLon_" + opponentKey))
153+ let distanceBetweenPlayers = gpsDistance(playerLatitude, playerLongitude, opponentLatitude, opponentLongitude)
154+ let optimalVelocity = ((distanceBetweenPlayers * 980665) / 100000)
155+ let playerShotReach = calculateShotDistance(((optimalVelocity * force) / 100000), pitch)
156+ let impactPosition = calculateImpactPosition(playerLatitude, playerLongitude, playerShotReach, yaw)
157+ let impactDistance = gpsDistance(impactPosition[0], impactPosition[1], opponentLatitude, opponentLongitude)
158+impactDistance :: impactPosition
202159 }
203160
204161
205162 @Callable(i)
206163 func startGame (latitude,longitude) = {
164+ let asset = base58''
165+ let payment = value(i.payment)
207166 let caller = toString(i.caller)
208167 let coordinates = setCoords(caller, ((latitude * 1745) / 100000), ((longitude * 1745) / 100000))
209168 let openGame = getString(this, "openGame")
210- let gameId = getString(this, ("gameId_" + caller))
211- let gameIsActive = getBoolean(this, ("gameId_" + getGameId(caller)))
212- if (if (if (if ((gameId != ""))
213- then (gameId != unit)
169+ if (if ((payment.assetId == asset))
170+ then (payment.amount >= 1)
214171 else false)
215- then (gameIsActive != false)
216- else false)
217- then (gameIsActive != unit)
218- else false)
219- then throw("Please finish your current game, before starting another one")
220- else if (!(isDefined(openGame)))
221- then WriteSet(DataEntry("openGame", caller) :: coordinates)
222- else if (if ((openGame == ""))
223- then true
224- else (openGame == caller))
225- then WriteSet(DataEntry("openGame", caller) :: coordinates)
226- else WriteSet([DataEntry("openGame", ""), coordinates[0], coordinates[1], setGameData(value(openGame), caller)])
172+ then {
173+ let gameId = getString(this, ("gameId_" + caller))
174+ if (if ((gameId != ""))
175+ then (gameId != unit)
176+ else false)
177+ then throw("Please finish your current game, before starting another one")
178+ else if (!(isDefined(openGame)))
179+ then WriteSet(DataEntry("openGame", caller) :: coordinates)
180+ else if (if ((openGame == ""))
181+ then true
182+ else (openGame == caller))
183+ then WriteSet(DataEntry("openGame", caller) :: coordinates)
184+ else WriteSet([DataEntry("openGame", ""), coordinates[0], coordinates[1], setGameData(value(openGame), caller)])
185+ }
186+ else throw("Please pay the token")
227187 }
228188
229189
230190
231191 @Callable(i)
232192 func executeShot (pitch,yaw,force) = {
193+ let asset = base58''
233194 let caller = toString(i.caller)
234195 let opponent = getStringValue(this, ("opponent_" + caller))
235196 let gameId = getGameId(caller)
236197 if ((getStringValue(this, ("gameTurn_" + gameId)) != caller))
237- then throw("please wait for your turn")
238- else if (gotHit(pitch, yaw, force, caller, opponent))
239- then WriteSet([DataEntry(("game_" + gameId), false), DataEntry(("gameWinner_" + gameId), caller)])
240- else WriteSet([DataEntry(("gameTurn_" + gameId), opponent)])
198+ then throw("Please wait for your turn.")
199+ else {
200+ let shotData = calculateShot(pitch, yaw, force, caller, opponent)
201+ if ((((shotData[0] / 5) + 1000000000) > shotData[0]))
202+ then ScriptResult(WriteSet([DataEntry(("game_" + gameId), false), DataEntry(("gameWinner_" + gameId), caller), DataEntry(("lastShotDistance_" + gameId), shotData[0]), DataEntry(("lastShotLat_" + gameId), shotData[1]), DataEntry(("lastShotLon_" + gameId), shotData[2])]), TransferSet([ScriptTransfer(i.caller, 2, asset)]))
203+ else WriteSet([DataEntry(("gameTurn_" + gameId), opponent), DataEntry(("lastShotDistance_" + gameId), shotData[0]), DataEntry(("lastShotLat_" + gameId), shotData[1]), DataEntry(("lastShotLon_" + gameId), shotData[2])])
204+ }
205+ }
206+
207+
208+
209+@Callable(i)
210+func faucet () = {
211+ let asset = base58''
212+ let caller = toString(i.caller)
213+ let balance = assetBalance(i.caller, asset)
214+ if ((100 > balance))
215+ then TransferSet([ScriptTransfer(i.caller, 100, asset)])
216+ else TransferSet(nil)
241217 }
242218
243219

github/deemru/w8io/169f3d6 
50.54 ms