Untitled

// ГОВНОПАТЧ dirty clipfuck hack   + $20


if (monstersmode>0) and  (PByte($004856CE)^=0) then
begin
// hack all clips procs
PByte($00484D8B)^:=20;
PByte($0048516F)^:=20;
PByte($0048556B)^:=20;
PByte($004856CA)^:=20;
PByte($00484D8F)^:=4;    //4
PByte($00485173)^:=4;
PByte($0048556F)^:=4;
PByte($004856CE)^:=4;

end;


if (monstersmode=0) and (PByte($004856CE)^=4) then
begin
// hack all clips procs
PByte($00484D8B)^:=$FA;
PByte($0048516F)^:=$FA;
PByte($0048556B)^:=$FA;
PByte($004856CA)^:=$FA;
PByte($00484D8F)^:=0;
PByte($00485173)^:=0;
PByte($0048556F)^:=0;
PByte($004856CE)^:=0;
end;


if (monstersmode>0) then begin
for i:=0 to 7 do if (players[i]<>nil) and (players[i].health>0) and (players[i].dxid=player1.dxid) then
begin
debug_textout(120, 136,  '^4#AMMO_SH: ^!'+inttostr( PByte(PCardinal($00757B80 + i * 4)^ + $20)^ ));
end;

for i:=0 to 7 do if (players[i]<>nil) and (players[i].health>0) then
begin
if players[i].crouch then PByte(PCardinal($00757B80 + i * 4)^ + $20)^:=8 else PByte(PCardinal($00757B80 + i * 4)^ + $20)^:=4;
end;

end;








// dirty clipfuck hack       + $20
// --определенное кол-во патронов к шафту это наш маркер для того чтобы понимать модель маленькая или большая большим моделяем даем определенное кол-во патронов и маленьким другое.

// проверяем если монтр мод активен то хакаем все сравнения в clipplayer (всего 4)
// присваиваем нужным мелким ботам нужное кол-во патронов к шафту ( мелким 8, другим 4)...
// если кто-то присел то ему тоже даем определенное кол-во патронов к шафту... согласно присяди (8) если встал то другое например (4)
// если монстр мод не активен то убираем хаки как было...

// если у игрока колво патронов 8 значит он либо сидит либо мелкая модель - логично ? вот и решение.

// в хаке использовать сравнение патронов с 4 это значит что если 4 то размер хитбокса большой.  если 8 то размер хитбокса маленький будет.
// также отметим что у всех моделей по умолчанию должно быть соотвествующее размеру его модели

// 1 check clip player CODE:00484D89                00484D8B = 20  was FA now FA  PByte($00484D8B)^:=20;   was 0 now 4   PByte($00484D8F)^:=4;    or 8
// 2 checkclipplayer_plasma  CODE:0048516D         0048516F = 20                  PByte($0048516F)^:=20;       PByte($00485173)^:=4;
// 3 checkclipplayer_rail_dude CODE:00485569       0048556B = 20                  PByte($0048556B)^:=20;       PByte($0048556F)^:=4;
// 4 checkclipplayer_rail  CODE: CODE:004856C8    004856CA = 20                   PByte($004856CA)^:=20;       PByte($004856CE)^:=4;