Показать сообщение отдельно
Старый 15.06.2009, 11:59   #5
котопес
Супер-модератор
Аватар для котопес
OFFLINE
Регистрация: 22.12.2008
Возраст: 48
Сообщений: 1,100
Благодарностей:
2,845 всего
Мнения: + 6425
Репутация: 9104

внесу свою долю лепты
PHP код:
; AUK
c1E1E
=AuctionBuyRequest:h(psize)h(ID:Get.ID)c(Group_p1:Get.AukP1)c(Category_p2)c(Subcategory_p3)d(hz2)c(IdNPC)c(ItemsInList:For.0003)h(ItemAukID)h(flag)d(ItemCena)
s1E1F=AuctionBuyAnswer:h(psize)h(ID:Get.ID)
c1E20=AuctionRequestList:h(psize)h(ID:Get.ID)c(IdNPC)c(Group_p1:Get.AukP1)c(Category_p2)c(Subcategory_p3)c(sort_p4:Get.AukSort)d(hz1)c(PageNumber page-1)d(hz2)
s1E21=AuctionAnswerList:h(psize)h(ID:Get.ID)c(req)d(hz)c(Group_p1:Get.AukP1)c(Category_p2)c(Subcategory_p3)c(sort_p4:Get.AukSort)d(hz1)c(PageNumer page-1)c(TotalPages)c(hz2)h(hz3)c(ItemsInList:For.0011)h(ItemAukID)h(flag '0'=ok,'1'=block)c(ItemGroup)h(ItemGID)h(kolichestvo '0'=odna)h(hzi1)d(ItemParams)d(ItemCena)d(CharId)a(0017CharName)d(hzi2)
; 
Message
c3A01
=SendMailRequest:h(psize)h(ID:Get.ID)a(0017CharName)a(0021MsgSubject)a(0202MessageText)h(ItemId)h(Items)h(hz1)c(hz2)
s3A02=SendMailResult:h(psize)h(ID:Get.ID)

и в T3Packets.fsc
function GetAukSort(ar1 : integer) : string;
// внешняя ф-ция, вызывается не из скрипта, а по аргументу
// :Get.AukSort
begin
  
case ar1 of
    0 
: result := 'Vozrastanie Ceny';
    
1 : result := 'Ubyvanie Ceny';
    
2 : result := 'Vozrastabie Urovnya';
    
3 : result := 'Ubyvanie Urovnya';
    else 
result := 'unknown'
  
end;
  
result := #2#3'23'+result+#15;
end;

function 
GetAukP1(ar1 : integer) : string;
// внешняя ф-ция, вызывается не из скрипта, а по аргументу
// :Get.AukP1
begin
  
case ar1 of
    0 
: result := 'Oruzhie';
    
1 : result := 'Bronya';
    
2 : result := 'Akcessuary';
    
3 : result := 'Shit';
    
4 : result := 'Predmety modifikacii';
    
5 : result := 'Predmety proizvodstva';
    
6 : result := 'Silovoy mayak';
    
7 : result := 'Doping';
    
8 : result := 'Eventovy predmet';
    
9 : result := 'Boepripasy';
    else 
result := 'unknown'
  
end;
  
result := #2#3'23'+result+#15;
end; 

BigData DBA/DataInfraOps
 
Ответить с цитированием
Сказали спасибо:
Екатерина (09.07.2011), broveymimo (12.01.2010), Недоступно (18.10.2009)