как объеденить скрипты

[Deffol]

именно тут с бегинами все верно...я уже объеденил скрипты вот таким образом:

PHP код:

begin 
if fromclient then 
case pck[1] of 
#$B9: 
begin 
if pck=HStr('B9 57 76 00 2F 00 1C 04 32 04 42 04 00 00') then 
begin 
buf:=HStr('9E 57 5D 8C C8 97 43 FF DD 12 45 78 B3 07 44 55 00'); 
sendtoserver; 
buf:=HStr('67 57 04'); 
SendToServer; 
pck:=''; 
end; 
if pck=HStr('B9 57 76 00 2F 00 1C 04 3F 04 40 04 00 00') then 
begin 
buf:=HStr('9E 57 5D E3 FC 9A 43 F6 01 0E 45 D2 B4 E0 43 65 00'); 
sendtoserver; 
buf:=HStr('67 57 04'); 
SendToServer; 
pck:=''; 
end; 
end; 
end; 
end. 


ну и еще можно вставлять сколько влезет мест...

Добавлено через 9 минут
SeregaZ, а хотя да, там бегина не хватает я просто не заметил, писал по памяти