supp fichiers temporaires
This commit is contained in:
f1iwq2
120
UnitDebug.~dfm
120
UnitDebug.~dfm
@@ -1,120 +0,0 @@
|
|||||||
object FormDebug: TFormDebug
|
|
||||||
Left = 402
|
|
||||||
Top = 33
|
|
||||||
BorderStyle = bsSingle
|
|
||||||
Caption = 'FormDebug'
|
|
||||||
ClientHeight = 639
|
|
||||||
ClientWidth = 759
|
|
||||||
Color = clWhite
|
|
||||||
TransparentColorValue = clTeal
|
|
||||||
Font.Charset = DEFAULT_CHARSET
|
|
||||||
Font.Color = clWhite
|
|
||||||
Font.Height = -11
|
|
||||||
Font.Name = 'MS Sans Serif'
|
|
||||||
Font.Style = []
|
|
||||||
OldCreateOrder = False
|
|
||||||
Position = poMainFormCenter
|
|
||||||
OnClose = FormClose
|
|
||||||
OnCreate = FormCreate
|
|
||||||
PixelsPerInch = 96
|
|
||||||
TextHeight = 13
|
|
||||||
object Label1: TLabel
|
|
||||||
Left = 456
|
|
||||||
Top = 52
|
|
||||||
Width = 108
|
|
||||||
Height = 13
|
|
||||||
Caption = 'Niveau du Debug (0-3)'
|
|
||||||
Color = clWhite
|
|
||||||
Font.Charset = DEFAULT_CHARSET
|
|
||||||
Font.Color = clBlue
|
|
||||||
Font.Height = -11
|
|
||||||
Font.Name = 'MS Sans Serif'
|
|
||||||
Font.Style = []
|
|
||||||
ParentColor = False
|
|
||||||
ParentFont = False
|
|
||||||
end
|
|
||||||
object Label2: TLabel
|
|
||||||
Left = 448
|
|
||||||
Top = 12
|
|
||||||
Width = 131
|
|
||||||
Height = 18
|
|
||||||
Caption = 'Fen'#234'tre de d'#233'bug'
|
|
||||||
Font.Charset = ANSI_CHARSET
|
|
||||||
Font.Color = clWindowText
|
|
||||||
Font.Height = -16
|
|
||||||
Font.Name = 'Arial'
|
|
||||||
Font.Style = [fsBold, fsItalic]
|
|
||||||
ParentFont = False
|
|
||||||
end
|
|
||||||
object Label3: TLabel
|
|
||||||
Left = 456
|
|
||||||
Top = 84
|
|
||||||
Width = 265
|
|
||||||
Height = 209
|
|
||||||
AutoSize = False
|
|
||||||
Caption = 'Label3'
|
|
||||||
Color = clGray
|
|
||||||
Font.Charset = ANSI_CHARSET
|
|
||||||
Font.Color = clWindow
|
|
||||||
Font.Height = -16
|
|
||||||
Font.Name = 'Arial Narrow'
|
|
||||||
Font.Style = []
|
|
||||||
ParentColor = False
|
|
||||||
ParentFont = False
|
|
||||||
WordWrap = True
|
|
||||||
end
|
|
||||||
object EditNivDebug: TEdit
|
|
||||||
Left = 576
|
|
||||||
Top = 52
|
|
||||||
Width = 73
|
|
||||||
Height = 21
|
|
||||||
Font.Charset = DEFAULT_CHARSET
|
|
||||||
Font.Color = clBlue
|
|
||||||
Font.Height = -11
|
|
||||||
Font.Name = 'MS Sans Serif'
|
|
||||||
Font.Style = []
|
|
||||||
ParentFont = False
|
|
||||||
TabOrder = 0
|
|
||||||
Text = 'EditNivDebug'
|
|
||||||
OnKeyPress = EditNivDebugKeyPress
|
|
||||||
end
|
|
||||||
object MemoEvtDet: TMemo
|
|
||||||
Left = 456
|
|
||||||
Top = 308
|
|
||||||
Width = 209
|
|
||||||
Height = 281
|
|
||||||
Color = clBlack
|
|
||||||
Font.Charset = DEFAULT_CHARSET
|
|
||||||
Font.Color = clYellow
|
|
||||||
Font.Height = -11
|
|
||||||
Font.Name = 'MS Sans Serif'
|
|
||||||
Font.Style = []
|
|
||||||
Lines.Strings = (
|
|
||||||
'Tableau des '#233'v'#232'nements d'#233'tecteurs')
|
|
||||||
ParentFont = False
|
|
||||||
TabOrder = 1
|
|
||||||
end
|
|
||||||
object ButtonEcrLog: TButton
|
|
||||||
Left = 456
|
|
||||||
Top = 596
|
|
||||||
Width = 97
|
|
||||||
Height = 25
|
|
||||||
Caption = 'Ecrire le log'
|
|
||||||
TabOrder = 2
|
|
||||||
OnClick = ButtonEcrLogClick
|
|
||||||
end
|
|
||||||
object RichEditDebug: TRichEdit
|
|
||||||
Left = 0
|
|
||||||
Top = 0
|
|
||||||
Width = 433
|
|
||||||
Height = 633
|
|
||||||
Color = clMaroon
|
|
||||||
Lines.Strings = (
|
|
||||||
'RichEditDebug')
|
|
||||||
TabOrder = 3
|
|
||||||
end
|
|
||||||
object SaveDialog: TSaveDialog
|
|
||||||
Left = 616
|
|
||||||
Top = 16
|
|
||||||
end
|
|
||||||
end
|
|
||||||
@@ -1,91 +0,0 @@
|
|||||||
unit UnitDebug;
|
|
||||||
|
|
||||||
interface
|
|
||||||
|
|
||||||
uses
|
|
||||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
|
||||||
Dialogs, StdCtrls ,UnitPrinc, ComCtrls;
|
|
||||||
|
|
||||||
type
|
|
||||||
TFormDebug = class(TForm)
|
|
||||||
EditNivDebug: TEdit;
|
|
||||||
Label1: TLabel;
|
|
||||||
MemoEvtDet: TMemo;
|
|
||||||
Label2: TLabel;
|
|
||||||
SaveDialog: TSaveDialog;
|
|
||||||
ButtonEcrLog: TButton;
|
|
||||||
Label3: TLabel;
|
|
||||||
RichEditDebug: TRichEdit;
|
|
||||||
procedure FormClose(Sender: TObject; var Action: TCloseAction);
|
|
||||||
procedure FormCreate(Sender: TObject);
|
|
||||||
procedure ButtonEcrLogClick(Sender: TObject);
|
|
||||||
procedure EditNivDebugKeyPress(Sender: TObject; var Key: Char);
|
|
||||||
private
|
|
||||||
{ Déclarations privées }
|
|
||||||
public
|
|
||||||
{ Déclarations publiques }
|
|
||||||
end;
|
|
||||||
|
|
||||||
var
|
|
||||||
FormDebug: TFormDebug;
|
|
||||||
|
|
||||||
implementation
|
|
||||||
|
|
||||||
{$R *.dfm}
|
|
||||||
|
|
||||||
procedure TFormDebug.FormClose(Sender: TObject; var Action: TCloseAction);
|
|
||||||
begin
|
|
||||||
//Action := TCloseAction.caNone;
|
|
||||||
//DebugOuv:=False;
|
|
||||||
//NivDebug:=0;
|
|
||||||
end;
|
|
||||||
|
|
||||||
procedure TFormDebug.FormCreate(Sender: TObject);
|
|
||||||
var s: string;
|
|
||||||
begin
|
|
||||||
EditNivDebug.Text:='0';
|
|
||||||
s:='Cette fenêtre permet d''afficher des informations sur le ';
|
|
||||||
s:=s+'comportement du programme. Positionner le niveau de 1 à 3 pour';
|
|
||||||
s:=s+' afficher des informations plus ou moins détaillées.';
|
|
||||||
Label3.caption:=s;
|
|
||||||
end;
|
|
||||||
|
|
||||||
procedure TFormDebug.ButtonEcrLogClick(Sender: TObject);
|
|
||||||
var s : string;
|
|
||||||
i : integer;
|
|
||||||
fte : textFile;
|
|
||||||
begin
|
|
||||||
s:=GetCurrentDir;
|
|
||||||
SaveDialog.InitialDir:=s;
|
|
||||||
if SaveDialog.Execute then
|
|
||||||
begin
|
|
||||||
s:=SaveDialog.FileName;
|
|
||||||
assignFile(fte,s);
|
|
||||||
rewrite(fte);
|
|
||||||
writeln(fte,s);
|
|
||||||
with RichEdit1 do
|
|
||||||
for i:=1 to Lines.Count do
|
|
||||||
begin
|
|
||||||
writeln(fte,Lines[i]);
|
|
||||||
end;
|
|
||||||
closefile(fte);
|
|
||||||
end;
|
|
||||||
end;
|
|
||||||
|
|
||||||
procedure TFormDebug.EditNivDebugKeyPress(Sender: TObject; var Key: Char);
|
|
||||||
var i,e : integer;
|
|
||||||
begin
|
|
||||||
if ord(Key) = VK_RETURN then
|
|
||||||
begin
|
|
||||||
Key := #0; // prevent beeping
|
|
||||||
val(EditNivDebug.text,i,e);
|
|
||||||
if e=0 then
|
|
||||||
begin
|
|
||||||
if (i>=0) and (i<=3) then NivDebug:=i
|
|
||||||
else EditNivDebug.text:='3';
|
|
||||||
end
|
|
||||||
else EditNivDebug.text:='0';
|
|
||||||
end;
|
|
||||||
end;
|
|
||||||
|
|
||||||
end.
|
|
||||||
1037
UnitPrinc.~dfm
1037
UnitPrinc.~dfm
File diff suppressed because it is too large
Load Diff
5522
UnitPrinc.~pas
5522
UnitPrinc.~pas
File diff suppressed because it is too large
Load Diff
@@ -1,41 +0,0 @@
|
|||||||
/******************************************
|
|
||||||
/ fichier de configuration de client-GL.log
|
|
||||||
/ gily - f1iwq - 2018
|
|
||||||
/******************************************
|
|
||||||
/ ce programme permet de commander les signaux complexes avec ou sans
|
|
||||||
/ CDM rail. Il a trois modes de fonctionnement:
|
|
||||||
/
|
|
||||||
/ Mode 1 = sans CDM rail. Le programme ne gère que la centrale LENZ ou compatible.
|
|
||||||
/ Il faut connecter le PC en USB ou par éthernet à la centrale (nécessite l'interface LI100 ETH)
|
|
||||||
/
|
|
||||||
/ Mode 2 = Avec CDM rail, ce programme doit être connecté au réseau par l'interface
|
|
||||||
/ ethernet ; CDM est connecté par USB, et dans ce cas,
|
|
||||||
/ mettre 0 dans le numéro de port COM (inutilisé) ainsi que la variable avec ou sans initialisation
|
|
||||||
/ des aiguillages à 0.
|
|
||||||
/
|
|
||||||
/ Mode 3 = Avec CDM Rail, ce programme connecté au réseau par l'interface Ethernet et CDM
|
|
||||||
/ Rail est connecté au réseau par l'USB.
|
|
||||||
/
|
|
||||||
/
|
|
||||||
/ Taille de la fonte de la fenêtre
|
|
||||||
16
|
|
||||||
/
|
|
||||||
/ Adresse IP V4 du PC sur lequel s'execute CDM : port
|
|
||||||
127.0.0.1:9999
|
|
||||||
/
|
|
||||||
/ Adresse IP V4 de l'interface LI-USB Ethernet : port
|
|
||||||
/ par défaut le port est 5550
|
|
||||||
/ ne pas connecter le port ou mettre 0 si on travaille avec l'interface USB
|
|
||||||
192.168.1.23:5550
|
|
||||||
/
|
|
||||||
/ port COM de l'adresse USB de l'interface LI100
|
|
||||||
/ attention de 1 à 9 - Si le port de l'interface USB LI100 >9, il faut le changer
|
|
||||||
/ manuellement dans le gestionnaire des périphériques
|
|
||||||
/ mettre 0 si inutilisée ou si CDM est utilisé en parallèle de ce programme (car CDM utilise la liaison USB)
|
|
||||||
/ Le programme ne tentera pas de se connecter à la centrale si CDM rail est détécté (
|
|
||||||
/
|
|
||||||
3
|
|
||||||
/
|
|
||||||
/ Avec (1) ou sans (0) initialisation des aiguillages au démarrage selon le tableau ci après
|
|
||||||
1
|
|
||||||
/
|
|
||||||
112
config.~cfg
112
config.~cfg
@@ -1,112 +0,0 @@
|
|||||||
/******************************************
|
|
||||||
/ fichier de configuration de signaux complexes
|
|
||||||
/ cap de bouheyre avec signaux - 2018
|
|
||||||
/****************************************
|
|
||||||
/ Sans Log=0 / Avec Log=1 : génère un fichier log
|
|
||||||
Log=0
|
|
||||||
/ Affichage du débug du calcul des routes, et enregistrement dans le log si la variable précédente est à 1
|
|
||||||
TraceDet=0
|
|
||||||
/ si 1 envoie un 0 après le pilotage des décodeurs LEB
|
|
||||||
RazSignaux=0
|
|
||||||
/
|
|
||||||
/ modélisation des aiguillages : détermine les éléments connectés aux 3 branches des aiguilles (Pointe, Droit, Dévié (S)
|
|
||||||
/ adresse d'aiguillage[B],P=élément vers pointe D=élément vers Droit, S=élément vers dévié
|
|
||||||
/ B pour adresse d'aiguillage déja utilisée
|
|
||||||
/ Elément = détecteur (valeur uniquement numérique) ou aiguillage (adresse [TRI,TJS,TJD]+branche de connexion (P S ou D)
|
|
||||||
/ Exemples : 1,P518,D523,S3P signifie : définition de l'aiguillage @1 : sur pointe relié au détecteur 518
|
|
||||||
/ sur Droit relié au détecteur 518
|
|
||||||
/ sur Dévié, relié à l'aiguillage 3 en pointe
|
|
||||||
/ Voir la documentation des signaux complexes pour une description complete
|
|
||||||
/ S'il n'y a pas de détecteur connecté à une branche d'aiguillage, mettre 0.
|
|
||||||
1,P2P,D3P,S1BS
|
|
||||||
1B,P553,D16P,S1S
|
|
||||||
2,P1P,D4P,S2BS
|
|
||||||
2B,P521,D16D,S2S
|
|
||||||
3,P1D,D522,S5BP
|
|
||||||
4,P2D,D554,S6BP
|
|
||||||
5,P9P,S15P,D5BS
|
|
||||||
5B,P3S,S5D,D545
|
|
||||||
6,P10P,S546,D6BS
|
|
||||||
6B,P4S,D545,S6D
|
|
||||||
7,P15S,D566,S565
|
|
||||||
8,P20P,D566,S565
|
|
||||||
9,P5P,D530,S17P
|
|
||||||
10,P6P,D530,S18P
|
|
||||||
13,P17S,D563,S564
|
|
||||||
14,P18S,D563,S564
|
|
||||||
15,P5S,D546,S7P
|
|
||||||
16,P1BD,S16BS,D2BD
|
|
||||||
16B,P0,S16S,D557
|
|
||||||
17,P9S,D531,S13P
|
|
||||||
18,P10S,D562,S14P
|
|
||||||
20,P8P,D547,S0
|
|
||||||
21,P25P,S537,D23S
|
|
||||||
22,P24P,S561,D25S
|
|
||||||
23,P569,S21D,D538
|
|
||||||
24,P22P,S26P,D513
|
|
||||||
25,P21P,S22D,D570
|
|
||||||
26,P24S,S515,D514
|
|
||||||
28,P30P,S29P,D570
|
|
||||||
29,P28S,D516,S31P
|
|
||||||
30,P28P,D32S,S539
|
|
||||||
31TRI,27,P28S,D518,S0,S2-517
|
|
||||||
32,P571,D538,S30D
|
|
||||||
0
|
|
||||||
//
|
|
||||||
/ modélisation du réseau par branche
|
|
||||||
/ 1 ligne par branche - le sens de parcours de la description n'a pas d'importance.
|
|
||||||
/ Chaque ligne (branche) doit comporter au moins un détecteur et au moins aiguillage
|
|
||||||
/ @ détecteur A=@aiguillage
|
|
||||||
/ chaque ligne doit commencer par un aiguillage et se terminer par un aiguillage
|
|
||||||
/ Terminer par les brances par 0
|
|
||||||
/ Exemple : 519 est un détecteur - A2 est l'aiguillage 2 - A1B est l'aiguillage 1bis
|
|
||||||
/
|
|
||||||
/ rouge - jaune
|
|
||||||
A20,547,561,A22,A24,A26,515,518,A31,A29,A28,A30,539,522,A3,A1,A2,A4,A6B,545,A5B,A3
|
|
||||||
A26,514,517,A31
|
|
||||||
A26,515,518,A31
|
|
||||||
A24,513,516,A29
|
|
||||||
/grande boucle extérieure départ de couche rouge: de 569 à 569
|
|
||||||
A23,538,A32,571,553,A1B,A16,A2B,521,569,A23
|
|
||||||
/ grande boucle intérieure
|
|
||||||
A21,A25,570,A28
|
|
||||||
A4,554,537,A21
|
|
||||||
/ couche jaune
|
|
||||||
A10,530,A9,A5,A15,546,A6
|
|
||||||
A18,562,531,A17
|
|
||||||
A14,563,A13
|
|
||||||
A14,564,A13
|
|
||||||
/
|
|
||||||
A7,565,A8
|
|
||||||
A7,566,A8
|
|
||||||
A16B,557,0
|
|
||||||
0
|
|
||||||
/
|
|
||||||
/ liste des signaux
|
|
||||||
/ la liste doit être terminée par une adresse à 0
|
|
||||||
/ forme : 2=2 feux(carré violet/blanc) / 3=3 feux / 4=4 feux (carré) / 5=5 feux (carré + blanc)
|
|
||||||
/ 7=7 feux (carré+blanc + ralentissement / 9=9 feux (blanc ou violet + rappel ralentissement)
|
|
||||||
/ type de décodeur : 0=feu virtuel 1=digital Bahn 2=CDF 3=LDT 4=LEB
|
|
||||||
/ l'énumération des détecteurs ne nécessite pas de parenthèses si il est seul, mais il faut des parenthèses si
|
|
||||||
/ le signal concerne plusieurs voies (donc détecteurs)
|
|
||||||
/ Notation de chaque ligne:
|
|
||||||
/ adresse de base du signal, forme, réserve, type de décodeur [, (détecteur,..detecteur , élément suivant ..) ,
|
|
||||||
/ avec ou sans demande de verrouillage du feu au carré (0 ou 1)]
|
|
||||||
161,4,0,4,(538,A32),0
|
|
||||||
169,9,0,4,(539,A30),0,
|
|
||||||
177,9,0,4,(569,A23),0
|
|
||||||
185,4,0,4,(570,A25),0
|
|
||||||
193,4,0,4,(516,A29),0
|
|
||||||
201,2,0,4,(517,31TRI,518,31TRI),0
|
|
||||||
209,9,0,4,(561,547),0
|
|
||||||
217,2,0,4,(514,A26,515,A26),0
|
|
||||||
225,9,0,4,(516,A29),0
|
|
||||||
233,4,0,4,(547,A20),0
|
|
||||||
1001,3,0,0,(537,554),0
|
|
||||||
1003,3,0,0,(553,A1B),0
|
|
||||||
1005,3,0,0,(571,553),0
|
|
||||||
1007,3,0,0,(554,A4),0
|
|
||||||
1009,3,0,0,(522,539),0
|
|
||||||
1011,3,0,0,(521,569),0
|
|
||||||
1013,3,0,0,(565,A7),0
|
|
||||||
0
|
|
||||||
158
config.~~cfg
158
config.~~cfg
@@ -1,158 +0,0 @@
|
|||||||
/******************************************
|
|
||||||
/ fichier de configuration de comm_lenz
|
|
||||||
/ gily - f1iwq - 2018
|
|
||||||
/******************************************
|
|
||||||
/ ce programme permet de commander les signaux complexes avec ou sans
|
|
||||||
/ CDM rail. Avec CDM rail, ce programme doit être connecté au réseau par l'interface
|
|
||||||
/ ethernet (nécessite l'interface LI100 ETH) ; CDM est connecté par USB, et dans ce cas,
|
|
||||||
/ mettre 0 dans le numéro de port COM (inutilisé) ainsi que la variable avec ou sans initialisation
|
|
||||||
/ des aiguillages à 0.
|
|
||||||
/
|
|
||||||
/ Adresse IP V4 de l'interface LI-USB Ethernet : port
|
|
||||||
/ ne pas connecter le port ou mettre 0 si on travaille avec l'interface USB
|
|
||||||
192.168.1.23:5550
|
|
||||||
/
|
|
||||||
/ port COM de l'adresse USB de l'interface LI100
|
|
||||||
/ attention de 1 à 9 - Si le port de l'interface USB LI100 >9, il faut le changer
|
|
||||||
/ manuellement dans le gestionnaire des périphériques
|
|
||||||
/ mettre 0 si inutilisée ou si CDM est utilisé en parallèle de ce programme (car CDM utilise la liaison USB)
|
|
||||||
/4
|
|
||||||
4
|
|
||||||
/
|
|
||||||
/ dernière adresse d'aiguillages du réseau. Si 0, 80 sera utilisé.
|
|
||||||
32
|
|
||||||
/ Avec (1) ou sans (0) initialisation des aiguillages au démarrage selon le tableau ci après
|
|
||||||
1
|
|
||||||
/ Valeurs des initialisations des aiguillages au démarrage -----------------------------------------------
|
|
||||||
/ @ aiguillage, position 1=dévié 2=droit, temporisation de manoeuvre en 1/10eme de seconde ,
|
|
||||||
/ 0=pilotage normal 1=pilotage inversé
|
|
||||||
/ une position différente de 1 ou 2 sera à 1. Une temporisation de 0 sera à 5.
|
|
||||||
/ la liste doit être terminée par 0,0,0
|
|
||||||
1,2,3,0
|
|
||||||
2,2,3,0
|
|
||||||
3,2,3,0
|
|
||||||
4,1,3,0
|
|
||||||
5,1,3,0
|
|
||||||
6,1,3,0
|
|
||||||
7,1,3,0
|
|
||||||
8,2,3,0
|
|
||||||
9,2,3,0
|
|
||||||
10,2,3,0
|
|
||||||
11,2,3,0
|
|
||||||
12,1,3,0
|
|
||||||
13,1,3,0
|
|
||||||
14,1,3,0
|
|
||||||
15,1,3,0
|
|
||||||
16,1,4,0
|
|
||||||
17,1,3,0
|
|
||||||
18,2,4,0
|
|
||||||
19,1,4,0
|
|
||||||
20,2,4,0
|
|
||||||
21,2,3,0
|
|
||||||
22,2,3,0
|
|
||||||
23,1,3,0
|
|
||||||
24,1,3,0
|
|
||||||
25,1,3,0
|
|
||||||
26,2,3,0
|
|
||||||
27,2,3,0
|
|
||||||
28,2,3,0
|
|
||||||
29,2,3,0
|
|
||||||
30,2,3,0
|
|
||||||
31,1,3,0
|
|
||||||
32,1,3,0
|
|
||||||
0,0,0,0
|
|
||||||
/
|
|
||||||
/ liste des adresses des signaux et leur forme, pour affichage de l'image correspondante ,
|
|
||||||
/ avec ou sans bouton de commande pour le feu blanc, type de décodeur.
|
|
||||||
/ la liste doit être terminée par une adresse à 0
|
|
||||||
/ adresse de base du signal, forme, avec ou sans bouton de commande du feu blanc, type de décodeur
|
|
||||||
/ forme : 2=2 feux(carré violet/blanc) / 3=3 feux / 4=4 feux / 5=5 feux (carré + blanc ou violet)
|
|
||||||
/ 7=7 feux (blanc ou violet + ralentissement / 9=9 feux (blanc ou violet + rappel ralentissement)
|
|
||||||
/ type de décodeur : 1=digital Bahn 2=CDF 3=LDT
|
|
||||||
/
|
|
||||||
176,7,0,1
|
|
||||||
190,7,0,1
|
|
||||||
204,9,0,1
|
|
||||||
218,7,0,1
|
|
||||||
232,2,1,1
|
|
||||||
260,9,1,1
|
|
||||||
274,3,0,1
|
|
||||||
288,7,0,1
|
|
||||||
302,9,0,1
|
|
||||||
316,7,1,1
|
|
||||||
330,7,0,1
|
|
||||||
344,9,0,1
|
|
||||||
358,9,0,1
|
|
||||||
392,3,0,1
|
|
||||||
420,7,0,1
|
|
||||||
448,7,0,1
|
|
||||||
462,9,0,1
|
|
||||||
476,9,0,1
|
|
||||||
600,7,0,1
|
|
||||||
0,0
|
|
||||||
/
|
|
||||||
/ modélisation des aiguillages : détermine les éléments connectés aux 3 branches des aiguilles (Pointe, Droit, Dévié (S)
|
|
||||||
/ adresse d'aiguillage,P=élément vers pointe D=élément vers Droit, S=élément vers dévié.
|
|
||||||
/ Elément = détecteur (valeur uniquement numérique) ou aiguillage (adresse+branche de connexion (P S ou D)
|
|
||||||
/ Exemple : 1,P518,D523,S3P signifie : définition de l'aiguillage @1 : sur pointe relié au détecteur 518
|
|
||||||
/ sur Droit relié au détecteur 518
|
|
||||||
/ sur Dévié, relié à l'aiguillage 3 en pointe
|
|
||||||
/ Pour une TJD : 26TJD,D[28S,529],S[28D,530]
|
|
||||||
/ D[ ] : éléments connectés à la TJD en position D (droite), le 1er est l'adresse de la 2eme TJD et sa position
|
|
||||||
/ S[ ] : éléments connectés à la TJD en position S (déviée) , le 2eme est l'élément extérieur à la TJD
|
|
||||||
/
|
|
||||||
/ S'il n'y a pas de détecteur connecté à une branche d'aiguillage, mettre 0.
|
|
||||||
1,P518,D523,S3P
|
|
||||||
2,P12S,S5S,D519
|
|
||||||
3,P1S,S5D,D4P
|
|
||||||
4,P3D,S514,D6S
|
|
||||||
5,P515,S2S,D3S
|
|
||||||
6,P516,S4D,D0
|
|
||||||
7,P527,S520,D519
|
|
||||||
8,P527,S522,D521
|
|
||||||
9,P526,S515,D513
|
|
||||||
10,P19P,S528,D29P
|
|
||||||
11,P18P,D30D,S525
|
|
||||||
12,P517,D20S,S2P
|
|
||||||
17,P525,D535,S528
|
|
||||||
18,P11P,S517,D23P
|
|
||||||
19,P10P,S518,D22P
|
|
||||||
20,P520,D21P,S12D
|
|
||||||
21,P20D,S28D,D28D
|
|
||||||
22,P19D,S538,D537
|
|
||||||
23,P18D,S534,D538
|
|
||||||
24,P538,S533,D32S
|
|
||||||
25,P31S,D529,S27P
|
|
||||||
26TJD,D[28S,529],S[28D,530]
|
|
||||||
27,P25S,D530,S537
|
|
||||||
28TJD,D[26S,21S],S[26D,21D]
|
|
||||||
29,P10D,S30S,D513
|
|
||||||
30,P524,S29D,D11D
|
|
||||||
31,P534,S25P,D0
|
|
||||||
32,P22S,S24D,D0
|
|
||||||
0
|
|
||||||
//
|
|
||||||
/ modélisation du réseau par branche
|
|
||||||
/ 1 ligne par branche - le sens de parcours de la branche est arbitraire.
|
|
||||||
/ Chaque ligne (branche) doit commmencer et finir par un détecteur
|
|
||||||
/ @ détecteur A=@aiguillage
|
|
||||||
/ Terminer par 0
|
|
||||||
/ Exemple : 519 est un détecteur - A2 est l'aiguillage 2
|
|
||||||
/
|
|
||||||
519,A2,A12,517,A18,A11,A30,524,521,A8,527,A7,519
|
|
||||||
527,A7,520,A20,A12,517
|
|
||||||
518,A1,A3,A4,514,522,A8,527
|
|
||||||
523,526,A9,513,A29,A10,A19,518,A1,523
|
|
||||||
526,A9,515,A5,A2,A12,517
|
|
||||||
517,A18,A11,525,A17,528,A10,A19,518
|
|
||||||
525,A17,535,533,A24,538,A23,A18,A11,A30,524
|
|
||||||
520,A20,A21,A28,A26,530,A27,A25,A31,534,A23,A18,A11,A30,524
|
|
||||||
520,A20,A21,A28,A26,529,A25,A31,534,A23,A18,A11,A30,524
|
|
||||||
513,A29,A10,A19,A22,537,A27,A25,A31,534
|
|
||||||
513,A29,A10,A19,A22,A32,A24,538
|
|
||||||
0
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
Reference in New Issue
Block a user