Skip to content

Commit

Permalink
init
Browse files Browse the repository at this point in the history
  • Loading branch information
pqr committed Jan 15, 2011
0 parents commit d68cb42
Show file tree
Hide file tree
Showing 124 changed files with 58,965 additions and 0 deletions.
Empty file added .hgignore
Empty file.
5 changes: 5 additions & 0 deletions BASENFK/models/Sarge/description.txt
Original file line number Diff line number Diff line change
@@ -0,0 +1,5 @@
Model: Sarge
Skins: red, blue, default, nuker
Author: Needle (mailto: eagla [at] yandex.ru)
This model is for NFK 075 or Tribes X
This model replaces previous sarge model.
14 changes: 14 additions & 0 deletions BASENFK/nfksetup.ini
Original file line number Diff line number Diff line change
@@ -0,0 +1,14 @@
[video]
fullscreen=1
bitdepth=32
vsync=0

[sound]
soundtype=2
[DirectConnectHistory]
IP0=195.239.6.183
IP1=169.254.244.174
IP2=80.80.120.83
IP3=217.74.40.6
IP4=192.168.55.1
IP5=195.209.236.15
12 changes: 12 additions & 0 deletions BASENFK/system/icons/ico.lst
Original file line number Diff line number Diff line change
@@ -0,0 +1,12 @@
c:\!export\nfk_dev\basenfk\system\icons\iconw_gauntlet.tga
c:\!export\nfk_dev\basenfk\system\icons\iconw_machinegun.tga
c:\!export\nfk_dev\basenfk\system\icons\iconw_shotgun.tga
c:\!export\nfk_dev\basenfk\system\icons\iconw_grenade.tga
c:\!export\nfk_dev\basenfk\system\icons\iconw_rocket.tga
c:\!export\nfk_dev\basenfk\system\icons\iconw_lightning.tga
c:\!export\nfk_dev\basenfk\system\icons\iconw_railgun.tga
c:\!export\nfk_dev\basenfk\system\icons\iconw_plasma.tga
c:\!export\nfk_dev\basenfk\system\icons\iconw_bfg.tga
c:\!export\nfk_dev\basenfk\system\icons\noammo.tga
c:\!export\nfk_dev\basenfk\system\icons\iconh_red1.tga
c:\!export\nfk_dev\basenfk\system\icons\iconr_yellow.tga
240 changes: 240 additions & 0 deletions BOT.DPR
Original file line number Diff line number Diff line change
@@ -0,0 +1,240 @@
{
BOT.DLL for Need For Kill
(c) 3d[Power]
http://www.3dpower.org
unit: bot.dpr
purpose: system procedures.
warning: do not modify this unit.
}

library bot;

uses
SysUtils,
Classes,
Windows,
bot_defs in 'bot_defs.pas',
bot_ai in 'bot_ai.pas',
bot_console in 'bot_console.pas',
bot_register in 'bot_register.pas',
bot_util in 'bot_util.pas';

// ==========================================

// --------------------------------------------------------------

// DO NOT MODIFY.
procedure DLL_RegisterProc1(AProc : TCallProcWordWordFunc);
begin
SetAngle := AProc;
end;

procedure DLL_RegisterProc2(AProc : TCallTextProc; ProcID:byte);
begin
case ProcID of
1 : AddMessage := AProc;
2 : RegisterConsoleCommand := AProc;
end;
end;

// DO NOT MODIFY.
procedure DLL_RegisterProc3(AProc : TCallProcSTR; ProcID:byte);
begin
case ProcID of
1 : GetSystemVariable := AProc;
end;
end;

// DO NOT MODIFY.
procedure DLL_RegisterProc4(AProc : TCallProcCreatePlayer; ProcID:byte);
begin
sys_CreatePlayer := AProc;
end;

// DO NOT MODIFY.
procedure DLL_RegisterProc5(AProc : TCallProcWordByteFunc; ProcID:byte);
begin
case ProcID of
1 : SetKeys := AProc;
3 : SetWeapon := AProc;
4 : SetBalloon := AProc;
end;
end;

// DO NOT MODIFY.
procedure DLL_RegisterProc6(AProc : TCallProcWordWord_Bool; ProcID:byte);
begin
case ProcID of
1 : Test_Blocked := AProc;
end;
end;

// DO NOT MODIFY.
procedure DLL_RegisterProc7(AProc : TCallProcWordWordString; ProcID:byte);
begin
case ProcID of
1 : debug_textout := AProc;
2 : debug_textoutc := AProc;
end;
end;

// DO NOT MODIFY.
procedure DLL_RegisterProc8(AProc : TCallProcBrickStruct); begin GetBrickStruct := AProc; end;
procedure DLL_RegisterProc9(AProc : TCallProcObjectsStruct); begin GetObjStruct := AProc; end;
procedure DLL_RegisterProc10(AProc : TCallProcSpecailObjectsStruct); begin GetSpecObjStruct := AProc; end;
procedure DLL_RegisterProc11(AProc : TCallProcWord); begin RemoveBot := AProc; end;
procedure DLL_RegisterProc12(AProc : TCallProcChat); begin SendBotChat := AProc; end;
// ================================================


// MainLoop. NFK.EXE calls this procedure 50 times per second. (in game)
procedure DLL_MainLoop();
begin
MAIN_Loop;
end;

// NFK loads a map. and begin game. It should be warmup time for now..
procedure DLL_EVENT_BeginGame;
begin
CMD_Register;
EVENT_BeginGame;
end;

// Game Reborn. It happends at game start, or at map restart. (it also called after DLL_EVENT_BeginGame (once));
procedure DLL_EVENT_MapChanged;
begin
EVENT_MapChanged;
end;

// Map changed by "map" command, or by callvote
procedure DLL_EVENT_ResetGame;
begin
EVENT_ResetGame;
end;

// NFK.EXE query bot.dll version.
function DLL_QUERY_VERSION:shortstring;
begin
result := BotVersion;
end;

// DO NOT MODIFY
procedure DLL_SYSTEM_AddPlayer(Player : TPlayerEx);
var i : byte;
begin
for i := 0 to 7 do if players[i] = nil then // free cell
begin
players[i] := Tplayer.Create;
players[i].DXID := Player.DXID;
players[i].netname := player.netname;
players[i].bot := player.bot;
exit;
end;
end;

// DO NOT MODIFY
procedure DLL_SYSTEM_RemoveAllPlayers();
var i : byte;
begin
for i := 0 to high(Players) do if players[i] <> nil then // free cell
players[i] := nil;
end;

// DO NOT MODIFY
procedure DLL_SYSTEM_RemovePlayer(DXID:word);
begin
RemovePlayer(DXID);
end;

// DO NOT MODIFY
procedure DLL_DMGReceived(TargetDXID, AttackerDXID:Word; dmg : word);
begin
EVENT_DMGReceived(TargetDXID, AttackerDXID, dmg);
end;

procedure DLL_ChatReceived(DXID:Word; Text : shortstring);
begin
EVENT_ChatReceived(DXID, Text);
end;

procedure DLL_AddModel(s : shortstring);
begin
ModelList.Add(s);
end;

// DO NOT MODIFY
procedure DLL_SYSTEM_UpdatePlayer(Player : TPlayerEx);
var i : byte;
begin
// update all player info
for i := 0 to 7 do if players[i] <> nil then // free cell
if players[i].DXID = Player.DXID then
with players[i] do begin
dead := player.dead;
bot := player.bot;
refire := player.refire;
weapchg := player.weapchg;
weapon := player.weapon;
threadweapon := player.threadweapon;
dir := player.dir;
gantl_state := player.gantl_state;
air := player.air;
team := player.team;
health := player.health;
armor := player.armor;
frags := player.frags;
netname := player.netname;
nfkmodel := player.nfkmodel;
crouch := player.crouch;
balloon := player.balloon;
flagcarrier := player.flagcarrier;
Location := player.Location;
item_quad := player.item_quad;
item_regen := player.item_regen;
item_battle := player.item_battle;
item_flight := player.item_flight;
item_haste := player.item_haste;
item_invis := player.item_invis;
have_rl := player.have_rl;
have_gl := player.have_gl;
have_rg := player.have_rg;
have_bfg := player.have_bfg;
have_sg := player.have_sg;
have_sh := player.have_sh;
have_mg := player.have_mg;
have_pl := player.have_pl;
ammo_mg := player.ammo_mg;
ammo_sg := player.ammo_sg;
ammo_gl := player.ammo_gl;
ammo_rl := player.ammo_rl;
ammo_sh := player.ammo_sh;
ammo_rg := player.ammo_rg;
ammo_pl := player.ammo_pl;
ammo_bfg := player.ammo_bfg;
x := player.x;
y := player.y;
cx := player.cx;
cy := player.cy;
InertiaX := player.InertiaX;
InertiaY := player.InertiaY;
if not bot then fangle := player.fangle;
exit;
end;
end;

exports DLL_RegisterProc1,DLL_RegisterProc2, DLL_RegisterProc3,
DLL_RegisterProc4, DLL_RegisterProc5,DLL_RegisterProc6,
DLL_RegisterProc7, DLL_RegisterProc8,DLL_RegisterProc9,
DLL_RegisterProc10,DLL_RegisterProc11,DLL_RegisterProc12,
DLL_EVENT_BeginGame, DLL_EVENT_ResetGame, DLL_EVENT_MapChanged,
DLL_MainLoop, DLL_SYSTEM_UpdatePlayer, DLL_SYSTEM_AddPlayer,
DLL_SYSTEM_RemoveAllPlayers, DLL_SYSTEM_RemovePlayer, DLL_AddModel,
DLL_DMGReceived, DLL_ChatReceived, DLL_CMD, DLL_QUERY_VERSION;

begin
Randomize;
ModelList := TStringList.Create;
end.
16 changes: 16 additions & 0 deletions CLEAN.BAT
Original file line number Diff line number Diff line change
@@ -0,0 +1,16 @@
TITLE CLEANING...
REM CLEAN SCRIPT by NEOFF and BITNIK
@Echo off
cls
color 2
Echo Cleaning Trash Files...
del /s *.~*
del /s *.dcu
del /s *.dsk
del /s *.dsm
del /s *.rsm
del /s *.cfg
del /s *.rar
del /s *.ddp
cls
Exit
42 changes: 42 additions & 0 deletions COMPILE.txt
Original file line number Diff line number Diff line change
@@ -0,0 +1,42 @@
HOWTO COMPILE NFK !?

������ ��� ����������� ����� ��� ��������� � ��������� ����� ���'� :)
����������� �� ���� ���� ��� �������, � ������ �������� ���� ������� exile, �� ��� ��� �������� ������� !

��� ������ ����������:
1) ����� 7 - ����� �������
2) ���� ���������
3) ����� PowerDrow
4) ��������� dclsockets70.bpl
5) ����� FastNet.v5.6.3.D5-7.FS
6) ���� � ���� ���������� �������

������ ������� ����� 7 � ��� ��� �����, ����� ����� ������� ��������� ��� (NFK) :)
������ NFK.SDK.Lite 62B~64 ����������� ������� ������: http://nfk.pro2d.ru/files/NFK-SDK-62B.rar,
���� ������� �� ��� � ��� � ������ 40 ����������� �������� ������.
(����� ������������ �������, ������ �� ������ ����� �������� ������ �� ���), ������
��� ��� ����� �����������, ��� �����-�� �������� �� ��������� ������� � ������
� ���� ���������� �������� ������ � ��� :) �� ����� ��� �����, ������ ������
����� Power����, ����� http://nfk.pro2d.ru/files/PowerDrow.rar
�� ��� ���� ��������� ����� �� ��� �����������, �� ��� ��������� �����������
� ����� ������ ������ ������� ����������������, �� ��� ������ ������� ��� ����
��������� ��� ������ ���� ����������� ������� (FastNet.v5.6.3.D5-7.FS): http://nfk.pro2d.ru/files/Hrenovina.rar
������ ����� ����� �������� ��� ��� �����, � ��� �� �����, ���� ��� � ��������� ;)

�� � ������, ����� �� ��������� �� �� ��� ����� �� ������ �� ��������:

1) ��������� ����� 7 Menu: Components -> Install Packages -> ������ ADD
-> C:\Program Files\Borland\Delphi7\Bin\dclsockets70.bpl

2) ������������� ���������, ��������� PowerDraw24pwr\Source\PowerGrafixD6.dpk ������ Install, ������ Save ALL
������ �� ���� ����� PoweDraw24pwr �������� �� ���������� �:
C:\Program Files\Borland\Delphi7\Lib\

3) ������ ������������� �� ��������� Hrenovina.rar, ��������� FastNet.v5.6.3.D5-7.FS\Fastnet\lib\DCLNMF70.dpk,
���� Install, ����� ���� Save ALL, ������ ����� �� ���������� FastNet.v5.6.3.D5-7.FS\Fastnet\lib\ ��������:
C:\Program Files\Borland\Delphi7\Lib\

���� �� ����, ����� ��������� :)

� ��� ��� �� ������� ����� �������� ����� � ����� ������� ���� - ������ ������ ���� � ������ �������
���� ��� ���� �� ������������ � ��������� �� ����... �������� ������� ������ ���-�� � DXINPUT...
3 changes: 3 additions & 0 deletions DOCS/040bugs!!!!!!!1.txt
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
-���, ���� ��� ���� ��� - ����� �������� ����� �� 2 ���� (������, ������ �����) � CTF, �� �� ������������ ������-����� �������� �� ������ ������...

- �� ��������� ��� (����� ������ 5) � ������ ����� ���� ���������� ������ � ���������� ������� ������� 4
Loading

0 comments on commit d68cb42

Please sign in to comment.