ViewVC Help
View File | Revision Log | View Changeset | Root Listing
root/Oni2/oup/current/Global/DatLinks.pas
(Generate patch)

Comparing oup/current/Global/DatLinks.pas (file contents):
Revision 122 by alloc, Fri Mar 23 01:41:15 2007 UTC vs.
Revision 123 by alloc, Fri Mar 23 01:53:44 2007 UTC

# Line 55 | Line 55 | begin
55   end;
56  
57  
58
58   function AKEV(Connection: TDataAccess; FileID: Integer): TDatLinkList;
59   const
60    types: array[0..16] of String[4] =
# Line 74 | Line 73 | begin
73   end;
74  
75  
77
76   function AKOT(Connection: TDataAccess; FileID: Integer): TDatLinkList;
77   const
78    types: array[0..4] of String[4] =
# Line 92 | Line 90 | begin
90   end;
91  
92  
95
93   function CBPI(Connection: TDataAccess; FileID: Integer): TDatLinkList;
94   var
95    i: Integer;
# Line 107 | Line 104 | begin
104   end;
105  
106  
110
107   function CBPM(Connection: TDataAccess; FileID: Integer): TDatLinkList;
108   var
109    i: Integer;
# Line 122 | Line 118 | begin
118   end;
119  
120  
125
121   function CONS(Connection: TDataAccess; FileID: Integer): TDatLinkList;
122   const
123    types: array[0..1] of String[4] =
# Line 140 | Line 135 | begin
135   end;
136  
137  
143
138   function CRSA(Connection: TDataAccess; FileID: Integer): TDatLinkList;
139   var
140    packages: Integer;
# Line 161 | Line 155 | begin
155   end;
156  
157  
164
158   function DOOR(Connection: TDataAccess; FileID: Integer): TDatLinkList;
159   const
160    types: array[0..2] of String[4] =
# Line 179 | Line 172 | begin
172   end;
173  
174  
182
175   function DPge(Connection: TDataAccess; FileID: Integer): TDatLinkList;
176   const
177    types: array[0..0] of String[4] =
# Line 197 | Line 189 | begin
189   end;
190  
191  
200
192   function FILM(Connection: TDataAccess; FileID: Integer): TDatLinkList;
193   const
194    types: array[0..1] of String[4] =
# Line 215 | Line 206 | begin
206   end;
207  
208  
218
209   function FXLR(Connection: TDataAccess; FileID: Integer): TDatLinkList;
210   const
211    types: array[0..1] of String[4] =
# Line 233 | Line 223 | begin
223   end;
224  
225  
236
226   function GMAN(Connection: TDataAccess; FileID: Integer): TDatLinkList;
227   var
228    packages: Integer;
# Line 254 | Line 243 | begin
243   end;
244  
245  
257
246   function HPge(Connection: TDataAccess; FileID: Integer): TDatLinkList;
247   const
248    types: array[0..0] of String[4] =
# Line 272 | Line 260 | begin
260   end;
261  
262  
275
263   function IGHH(Connection: TDataAccess; FileID: Integer): TDatLinkList;
264   const
265    types: array[0..1] of String[4] =
# Line 290 | Line 277 | begin
277   end;
278  
279  
293
280   function IGPA(Connection: TDataAccess; FileID: Integer): TDatLinkList;
281   var
282    packages: Integer;
# Line 311 | Line 297 | begin
297   end;
298  
299  
314
300   function IGPG(Connection: TDataAccess; FileID: Integer): TDatLinkList;
301   const
302    types: array[0..3] of String[4] =
# Line 333 | Line 318 | begin
318   end;
319  
320  
336
321   function IGSA(Connection: TDataAccess; FileID: Integer): TDatLinkList;
322   var
323    packages: Integer;
# Line 354 | Line 338 | begin
338   end;
339  
340  
357
341   function IGSt(Connection: TDataAccess; FileID: Integer): TDatLinkList;
342   const
343    types: array[0..0] of String[4] =
# Line 372 | Line 355 | begin
355   end;
356  
357  
375
358   function Impt(Connection: TDataAccess; FileID: Integer): TDatLinkList;
359   const
360    types: array[0..0] of String[4] =
# Line 390 | Line 372 | begin
372   end;
373  
374  
393
375   function IPge(Connection: TDataAccess; FileID: Integer): TDatLinkList;
376   const
377    types: array[0..0] of String[4] =
# Line 408 | Line 389 | begin
389   end;
390  
391  
411
392   function KeyI(Connection: TDataAccess; FileID: Integer): TDatLinkList;
393   var
394    i: Integer;
# Line 423 | Line 403 | begin
403   end;
404  
405  
426
406   function M3GA(Connection: TDataAccess; FileID: Integer): TDatLinkList;
407   var
408    packages: Integer;
# Line 444 | Line 423 | begin
423   end;
424  
425  
447
426   function M3GM(Connection: TDataAccess; FileID: Integer): TDatLinkList;
427   const
428    types: array[0..7] of String[4] =
# Line 462 | Line 440 | begin
440   end;
441  
442  
465
443   function Mtrl(Connection: TDataAccess; FileID: Integer): TDatLinkList;
444   const
445    types: array[0..0] of String[4] =
# Line 480 | Line 457 | begin
457   end;
458  
459  
483
460   function OBDC(Connection: TDataAccess; FileID: Integer): TDatLinkList;
461   var
462    packages: Integer;
# Line 501 | Line 477 | begin
477   end;
478  
479  
504
480   function OBOA(Connection: TDataAccess; FileID: Integer): TDatLinkList;
481   var
482    packages: Integer;
# Line 530 | Line 505 | begin
505   end;
506  
507  
533
508   function OFGA(Connection: TDataAccess; FileID: Integer): TDatLinkList;
509   var
510    packages: Integer;
# Line 559 | Line 533 | begin
533   end;
534  
535  
562
536   function ONCC(Connection: TDataAccess; FileID: Integer): TDatLinkList;
537   var
538    i: Integer;
# Line 608 | Line 581 | begin
581   end;
582  
583  
611
584   function ONCV(Connection: TDataAccess; FileID: Integer): TDatLinkList;
585   begin
586    SetLength(Result, 1);
# Line 618 | Line 590 | begin
590   end;
591  
592  
621
593   function ONLV(Connection: TDataAccess; FileID: Integer): TDatLinkList;
594   const
595    types: array[0..12] of String[4] =
# Line 646 | Line 617 | begin
617   end;
618  
619  
649
620   function ONOA(Connection: TDataAccess; FileID: Integer): TDatLinkList;
621   var
622    packages: Integer;
# Line 667 | Line 637 | begin
637   end;
638  
639  
670
640   function ONSK(Connection: TDataAccess; FileID: Integer): TDatLinkList;
641   var
642    i: Integer;
# Line 682 | Line 651 | begin
651   end;
652  
653  
685
654   function ONVL(Connection: TDataAccess; FileID: Integer): TDatLinkList;
655   var
656    packages: Integer;
# Line 703 | Line 671 | begin
671   end;
672  
673  
706
674   function ONWC(Connection: TDataAccess; FileID: Integer): TDatLinkList;
675   var
676    i: Integer;
# Line 748 | Line 715 | begin
715   end;
716  
717  
751
718   function OPge(Connection: TDataAccess; FileID: Integer): TDatLinkList;
719   begin
720    SetLength(Result, 1);
# Line 758 | Line 724 | begin
724   end;
725  
726  
761
727   function PSpc(Connection: TDataAccess; FileID: Integer): TDatLinkList;
728   begin
729    SetLength(Result, 1);
# Line 768 | Line 733 | begin
733   end;
734  
735  
771
736   function PSpL(Connection: TDataAccess; FileID: Integer): TDatLinkList;
737   var
738    packages: Integer;
# Line 789 | Line 753 | begin
753   end;
754  
755  
792
756   function PSUI(Connection: TDataAccess; FileID: Integer): TDatLinkList;
757   var
758    i: Integer;
# Line 804 | Line 767 | begin
767   end;
768  
769  
807
770   function StNA(Connection: TDataAccess; FileID: Integer): TDatLinkList;
771   var
772    packages: Integer;
# Line 825 | Line 787 | begin
787   end;
788  
789  
828
790   function TMRA(Connection: TDataAccess; FileID: Integer): TDatLinkList;
791   var
792    packages: Integer;
# Line 846 | Line 807 | begin
807   end;
808  
809  
849
810   function TRAC(Connection: TDataAccess; FileID: Integer): TDatLinkList;
811   var
812    packages: Integer;
# Line 870 | Line 830 | begin
830   end;
831  
832  
873
833   function TRAM(Connection: TDataAccess; FileID: Integer): TDatLinkList;
834   var
835    i: Integer;
# Line 885 | Line 844 | begin
844   end;
845  
846  
888
847   function TRAS(Connection: TDataAccess; FileID: Integer): TDatLinkList;
848   begin
849    SetLength(Result, 1);
# Line 895 | Line 853 | begin
853   end;
854  
855  
898
856   function TRBS(Connection: TDataAccess; FileID: Integer): TDatLinkList;
857   var
858    i: Integer;
# Line 910 | Line 867 | begin
867   end;
868  
869  
913
870   function TRCM(Connection: TDataAccess; FileID: Integer): TDatLinkList;
871   const
872    types: array[0..2] of String[4] =
# Line 928 | Line 884 | begin
884   end;
885  
886  
931
887   function TRGA(Connection: TDataAccess; FileID: Integer): TDatLinkList;
888   var
889    packages: Integer;
# Line 949 | Line 904 | begin
904   end;
905  
906  
952
907   function TRGE(Connection: TDataAccess; FileID: Integer): TDatLinkList;
908   begin
909    SetLength(Result, 1);
# Line 959 | Line 913 | begin
913   end;
914  
915  
962
916   function TRIG(Connection: TDataAccess; FileID: Integer): TDatLinkList;
917   const
918    types: array[0..3] of String[4] =
# Line 983 | Line 936 | begin
936   end;
937  
938  
986
939   function TRMA(Connection: TDataAccess; FileID: Integer): TDatLinkList;
940   var
941    packages: Integer;
# Line 1004 | Line 956 | begin
956   end;
957  
958  
1007
959   function TRSC(Connection: TDataAccess; FileID: Integer): TDatLinkList;
960   var
961    packages: Integer;
# Line 1025 | Line 976 | begin
976   end;
977  
978  
1028
979   function TSFF(Connection: TDataAccess; FileID: Integer): TDatLinkList;
980   var
981    packages: Integer;
# Line 1050 | Line 1000 | begin
1000   end;
1001  
1002  
1053
1003   function TSFT(Connection: TDataAccess; FileID: Integer): TDatLinkList;
1004   var
1005    i: Integer;
# Line 1065 | Line 1014 | begin
1014   end;
1015  
1016  
1068
1017   function TURR(Connection: TDataAccess; FileID: Integer): TDatLinkList;
1018   var
1019    i: Integer;
# Line 1090 | Line 1038 | begin
1038   end;
1039  
1040  
1093
1041   function TXAN(Connection: TDataAccess; FileID: Integer): TDatLinkList;
1042   var
1043    packages: Integer;
# Line 1111 | Line 1058 | begin
1058   end;
1059  
1060  
1114
1061   function TXMA(Connection: TDataAccess; FileID: Integer): TDatLinkList;
1062   var
1063    packages: Integer;
# Line 1132 | Line 1078 | begin
1078   end;
1079  
1080  
1135
1081   function TXMB(Connection: TDataAccess; FileID: Integer): TDatLinkList;
1082   var
1083    packages: Integer;
# Line 1153 | Line 1098 | begin
1098   end;
1099  
1100  
1156
1101   function TXMP(Connection: TDataAccess; FileID: Integer): TDatLinkList;
1102   begin
1103    SetLength(Result, 2);
# Line 1166 | Line 1110 | begin
1110   end;
1111  
1112  
1169
1113   function TxtC(Connection: TDataAccess; FileID: Integer): TDatLinkList;
1114   begin
1115    SetLength(Result, 1);
# Line 1176 | Line 1119 | begin
1119   end;
1120  
1121  
1179
1122   function WMCL(Connection: TDataAccess; FileID: Integer): TDatLinkList;
1123   var
1124    packages: Integer;
# Line 1197 | Line 1139 | begin
1139   end;
1140  
1141  
1200
1142   function WMDD(Connection: TDataAccess; FileID: Integer): TDatLinkList;
1143   var
1144    packages: Integer;
# Line 1218 | Line 1159 | begin
1159   end;
1160  
1161  
1221
1162   function WMMB(Connection: TDataAccess; FileID: Integer): TDatLinkList;
1163   var
1164    packages: Integer;
# Line 1239 | Line 1179 | begin
1179   end;
1180  
1181  
1242
1182   function WPge(Connection: TDataAccess; FileID: Integer): TDatLinkList;
1183   begin
1184    SetLength(Result, 2);
# Line 1312 | Line 1251 | initialization
1251    DatLinksManager.InsertDatLinkHandler('AISA', AISA);
1252    DatLinksManager.InsertDatLinkHandler('AKEV', AKEV);
1253    DatLinksManager.InsertDatLinkHandler('AKOT', AKOT);
1254 <  DatLinksManager.InsertDatLinkHandler('CBPI', AISA);
1255 <  DatLinksManager.InsertDatLinkHandler('CBPM', AKEV);
1256 <  DatLinksManager.InsertDatLinkHandler('CONS', AKOT);
1257 <  DatLinksManager.InsertDatLinkHandler('CRSA', AISA);
1258 <  DatLinksManager.InsertDatLinkHandler('DOOR', AKEV);
1259 <  DatLinksManager.InsertDatLinkHandler('DPge', AKOT);
1260 <  DatLinksManager.InsertDatLinkHandler('FILM', AISA);
1261 <  DatLinksManager.InsertDatLinkHandler('FXLR', AKEV);
1262 <  DatLinksManager.InsertDatLinkHandler('GMAN', AKOT);
1263 <  DatLinksManager.InsertDatLinkHandler('HPge', AISA);
1264 <  DatLinksManager.InsertDatLinkHandler('IGHH', AKEV);
1265 <  DatLinksManager.InsertDatLinkHandler('IGPA', AKOT);
1266 < end.
1254 >  DatLinksManager.InsertDatLinkHandler('CBPI', CBPI);
1255 >  DatLinksManager.InsertDatLinkHandler('CBPM', CBPM);
1256 >  DatLinksManager.InsertDatLinkHandler('CONS', CONS);
1257 >  DatLinksManager.InsertDatLinkHandler('CRSA', CRSA);
1258 >  DatLinksManager.InsertDatLinkHandler('DOOR', DOOR);
1259 >  DatLinksManager.InsertDatLinkHandler('DPge', DPge);
1260 >  DatLinksManager.InsertDatLinkHandler('FILM', FILM);
1261 >  DatLinksManager.InsertDatLinkHandler('FXLR', FXLR);
1262 >  DatLinksManager.InsertDatLinkHandler('GMAN', GMAN);
1263 >  DatLinksManager.InsertDatLinkHandler('HPge', HPge);
1264 >  DatLinksManager.InsertDatLinkHandler('IGHH', IGHH);
1265 >  DatLinksManager.InsertDatLinkHandler('IGPA', IGPA);
1266 >  DatLinksManager.InsertDatLinkHandler('IGPG', IGPG);
1267 >  DatLinksManager.InsertDatLinkHandler('IGSA', IGSA);
1268 >  DatLinksManager.InsertDatLinkHandler('IGSt', IGSt);
1269 >  DatLinksManager.InsertDatLinkHandler('Impt', Impt);
1270 >  DatLinksManager.InsertDatLinkHandler('IPge', IPge);
1271 >  DatLinksManager.InsertDatLinkHandler('KeyI', KeyI);
1272 >  DatLinksManager.InsertDatLinkHandler('M3GA', M3GA);
1273 >  DatLinksManager.InsertDatLinkHandler('M3GM', M3GM);
1274 >  DatLinksManager.InsertDatLinkHandler('Mtrl', Mtrl);
1275 >  DatLinksManager.InsertDatLinkHandler('OBDC', OBDC);
1276 >  DatLinksManager.InsertDatLinkHandler('OBOA', OBOA);
1277 >  DatLinksManager.InsertDatLinkHandler('OFGA', OFGA);
1278 >  DatLinksManager.InsertDatLinkHandler('ONCC', ONCC);
1279 >  DatLinksManager.InsertDatLinkHandler('ONCV', ONCV);
1280 >  DatLinksManager.InsertDatLinkHandler('ONLV', ONLV);
1281 >  DatLinksManager.InsertDatLinkHandler('ONOA', ONOA);
1282 >  DatLinksManager.InsertDatLinkHandler('ONSK', ONSK);
1283 >  DatLinksManager.InsertDatLinkHandler('ONVL', ONVL);
1284 >  DatLinksManager.InsertDatLinkHandler('ONWC', ONWC);
1285 >  DatLinksManager.InsertDatLinkHandler('OPge', OPge);
1286 >  DatLinksManager.InsertDatLinkHandler('PSpc', PSpc);
1287 >  DatLinksManager.InsertDatLinkHandler('PSpL', PSpL);
1288 >  DatLinksManager.InsertDatLinkHandler('PSUI', PSUI);
1289 >  DatLinksManager.InsertDatLinkHandler('StNA', StNA);
1290 >  DatLinksManager.InsertDatLinkHandler('TMRA', TMRA);
1291 >  DatLinksManager.InsertDatLinkHandler('TRAC', TRAC);
1292 >  DatLinksManager.InsertDatLinkHandler('TRAM', TRAM);
1293 >  DatLinksManager.InsertDatLinkHandler('TRAS', TRAS);
1294 >  DatLinksManager.InsertDatLinkHandler('TRBS', TRBS);
1295 >  DatLinksManager.InsertDatLinkHandler('TRCM', TRCM);
1296 >  DatLinksManager.InsertDatLinkHandler('TRGA', TRGA);
1297 >  DatLinksManager.InsertDatLinkHandler('TRGE', TRGE);
1298 >  DatLinksManager.InsertDatLinkHandler('TRIG', TRIG);
1299 >  DatLinksManager.InsertDatLinkHandler('TRMA', TRMA);
1300 >  DatLinksManager.InsertDatLinkHandler('TRSC', TRSC);
1301 >  DatLinksManager.InsertDatLinkHandler('TSFF', TSFF);
1302 >  DatLinksManager.InsertDatLinkHandler('TSFT', TSFT);
1303 >  DatLinksManager.InsertDatLinkHandler('TURR', TURR);
1304 >  DatLinksManager.InsertDatLinkHandler('TXAN', TXAN);
1305 >  DatLinksManager.InsertDatLinkHandler('TXMA', TXMA);
1306 >  DatLinksManager.InsertDatLinkHandler('TXMB', TXMB);
1307 >  DatLinksManager.InsertDatLinkHandler('TXMP', TXMP);
1308 >  DatLinksManager.InsertDatLinkHandler('TxtC', TxtC);
1309 >  DatLinksManager.InsertDatLinkHandler('WMCL', WMCL);
1310 >  DatLinksManager.InsertDatLinkHandler('WMDD', WMDD);
1311 >  DatLinksManager.InsertDatLinkHandler('WMMB', WMMB);
1312 >  DatLinksManager.InsertDatLinkHandler('WPge', WPge);
1313 > end.

Diff Legend

Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)