[meteora1005]

错误在这一句：if abs(Ex)>W && abs(Ey)>W
在第一次进入while时Ex =161.2233，Ey =-300，然后进入if后应该对EX和Ey作修改，但你没有，所以到这句一直执行if后的命令然后continue，所以才会出不了循环。你想办法每次循环后对Ex和Ey作一下修改吧。
我不常上QQ，但我会常上论坛的，有什么问题发帖子吧，呵呵