--- a/branches/PackMLState/Main_Escape_PLC/Plc Logic/Application/Function Blocks/MessageQueue/AddMessageToQueue/svnobj +++ b/branches/PackMLState/Main_Escape_PLC/Plc Logic/Application/Function Blocks/MessageQueue/AddMessageToQueue/svnobj @@ -1,6 +1,6 @@ -Gx_l E ! 0…jüo$ ¡N]¤ ù ”9ǯ S y s t e m . S t r i n g L{ f 8 a 5 8 4 6 6 - d 7 f 6 - 4 3 9 f - b b b 8 - d 4 6 0 0 e 4 1 d 0 9 9 } I m p l e m e n t a t i o n L{ 3 b 8 3 b 7 7 6 - f b 2 5 - 4 3 b 8 - 9 9 f 2 - 3 c 5 0 7 c 9 1 4 3 f c } T e x t D o c u m e n t L{ f 3 8 7 8 2 8 5 - 8 e 4 f - 4 9 0 b - b b 1 b - 9 a c b b 7 e b 0 4 d b } T e x t L i n e s L{ a 5 d e 0 b 0 b - 1 c b 5 - 4 9 1 3 - a c 2 1 - 9 d 7 0 2 9 3 e c 0 0 d } I d +Gx_l é ! 0…jüo° BMßg Û¾:& S y s t e m . S t r i n g L{ f 8 a 5 8 4 6 6 - d 7 f 6 - 4 3 9 f - b b b 8 - d 4 6 0 0 e 4 1 d 0 9 9 } I m p l e m e n t a t i o n L{ 3 b 8 3 b 7 7 6 - f b 2 5 - 4 3 b 8 - 9 9 f 2 - 3 c 5 0 7 c 9 1 4 3 f c } T e x t D o c u m e n t L{ f 3 8 7 8 2 8 5 - 8 e 4 f - 4 9 0 b - b b 1 b - 9 a c b b 7 e b 0 4 d b } T e x t L i n e s L{ a 5 d e 0 b 0 b - 1 c b 5 - 4 9 1 3 - a c 2 1 - 9 d 7 0 2 9 3 e c 0 0 d } I d l o n g T a g T e x t *I F I n Q u e u e > = 1 6 T H E N 8 A d d M e s s a g e T o Q u e u e : = F A L S E ; E L S E * I F I n I n d e x < = 0 T H E N " O l d I n d e x : = 1 5 ; - E L S E 2 O l d I n d e x : = I n I n d e x - 1 ; E N D _ I F V I F N O T ( C o m m a n d s [ O l d I n d e x ] = C o m m a n d ) T H E N R I F N O T ( V a l u e s [ O l d I n d e x ] = V a l u e ) T H E N 8 V a l u e s [ I n I n d e x ] : = V a l u e ; @ C o m m a n d s [ I n I n d e x ] : = C o m m a n d ; 0 I F I n I n d e x > = 1 5 T H E N & I n I n d e x : = 0 ; E L S E : I n I n d e x : = I n I n d e x + 1 ; E N D _ I F 4 I n Q u e u e : = I n Q u e u e + 1 ; !: A d d M e s s a g e T o Q u e u e : = T R U E ; " E L S E #B A d d M e s s a g e T o Q u e u e : = F A L S E ; $ E N D _ I F %< A d d M e s s a g e T o Q u e u e : = F A L S E ; & E N D _ I F 'I n t e r f a c e (L{ a 9 e d 5 b 7 e - 7 5 c 5 - 4 6 5 1 - a f 1 6 - d 2 c 2 7 e 9 8 c b 9 4 } )>M E T H O D A d d M e s s a g e T o Q u e u e : B O O L *V A R _ I N P U T +. C o m m a n d : C o m m a n d T y p e ; ," V a l u e : S T R I N G ; -E N D _ V A R .V A R / O l d I n d e x : I N T ; Ð ÐÐE Ð Ð + E L S E 2 O l d I n d e x : = I n I n d e x - 1 ; E N D _ I F ‚ I F N O T ( C o m m a n d s [ O l d I n d e x ] = C o m m a n d ) O R N O T T i m e o u t T i m e r . Q T H E N ‚ I F N O T ( V a l u e s [ O l d I n d e x ] = V a l u e ) O R N O T T i m e o u t T i m e r . Q T H E N 8 V a l u e s [ I n I n d e x ] : = V a l u e ; @ C o m m a n d s [ I n I n d e x ] : = C o m m a n d ; 0 I F I n I n d e x > = 1 5 T H E N & I n I n d e x : = 0 ; E L S E : I n I n d e x : = I n I n d e x + 1 ; E N D _ I F 4 I n Q u e u e : = I n Q u e u e + 1 ; !, N e w M e s s a g e : = t r u e ; ": A d d M e s s a g e T o Q u e u e : = T R U E ; # E L S E $B A d d M e s s a g e T o Q u e u e : = F A L S E ; % E N D _ I F &< A d d M e s s a g e T o Q u e u e : = F A L S E ; ' E N D _ I F (I n t e r f a c e )L{ a 9 e d 5 b 7 e - 7 5 c 5 - 4 6 5 1 - a f 1 6 - d 2 c 2 7 e 9 8 c b 9 4 } *>M E T H O D A d d M e s s a g e T o Q u e u e : B O O L +V A R _ I N P U T ,. C o m m a n d : C o m m a n d T y p e ; -" V a l u e : S T R I N G ; .E N D _ V A R /V A R 0 O l d I n d e x : I N T ; Ð ÐÐE!Ð Ð Ú Ð - Ð Ð Ú Ð -Ð Ð Ú Ð -Ð Ð @@ -22,23 +22,24 @@ 4 Ú Ð - Ð Ð 5 Ú Ð - Ð Ð 6 Ú Ð - Ð Ð -, Ú Ð -!Ð Ð -7 Ú Ð -"Ð Ð -9 Ú Ð -#Ð Ð -- Ú Ð -$Ð Ð +> Ú Ð -!Ð Ð +, Ú Ð -"Ð Ð +7 Ú Ð -#Ð Ð +9 Ú Ð -$Ð Ð +- Ú Ð -%Ð Ð < Ú Ð -Ð Ð = Ú Ð -Ð Ð - Ú Ð -%Ð Ð + Ú Ð -&Ð Ð Ú Ð -Ð Ð Ú Ð -Ð Ð - Ú Ð -&Ð Ð - Ú Ð -Ð'(ÐE Ð Ð - Ú Ð -)Ð Ð - Ú Ð -*Ð Ð - Ú Ð -+Ð Ð - Ú Ð -,Ð Ð - Ú Ð --Ð Ð -! Ú Ð -.Ð Ð -" Ú Ð -/Ð Ð -# Ú Ð --Ð Ð + Ú Ð -'Ð Ð + Ú Ð -Ð()ÐE Ð Ð + Ú Ð -*Ð Ð + Ú Ð -+Ð Ð + Ú Ð -,Ð Ð + Ú Ð --Ð Ð + Ú Ð -.Ð Ð +! Ú Ð -/Ð Ð +" Ú Ð -0Ð Ð +# Ú Ð -.Ð Ð Ú Ð - \ No newline at end of file