diff --git a/src/game/g_basic.pas b/src/game/g_basic.pas
index 132e76ee156f3aeb2c56eab19b16582201a059c6..40b8e4ed43f29f851d7dd9abf6e50ff2f258cff4 100644 (file)
--- a/src/game/g_basic.pas
+++ b/src/game/g_basic.pas
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*)
-{$MODE DELPHI}
+{$INCLUDE g_amodes.inc}
unit g_basic;
interface
b := abs(vy);
if a = 0 then
- c := 0
+ c := 90
else
c := RadToDeg(ArcTan(b/a));