--- a +++ b/branches/PackMLState/CODESYS_Control_Win_V3/Plc Logic/Application/Function Blocks/MessageQueue/AddMessageToQueue/svnobj @@ -0,0 +1,44 @@ +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 +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 Ð Ð + Ú Ð - Ð Ð + Ú Ð -Ð Ð + Ú Ð -Ð Ð +$ Ú Ð -Ð Ð +& Ú Ð -Ð Ð +' Ú Ð -Ð Ð +) Ú Ð -Ð Ð +* Ú Ð -Ð Ð +( Ú Ð -Ð Ð +% Ú Ð -Ð Ð + Ú Ð -Ð Ð ++ Ú Ð -Ð Ð +. Ú Ð -Ð Ð +/ Ú Ð -Ð Ð +0 Ú Ð -Ð Ð +1 Ú Ð -Ð Ð +2 Ú Ð - Ð Ð +3 Ú Ð - Ð Ð +4 Ú Ð - Ð Ð +5 Ú Ð - Ð Ð +6 Ú Ð - Ð Ð +, Ú Ð -!Ð Ð +7 Ú Ð -"Ð Ð +9 Ú Ð -#Ð Ð +- Ú Ð -$Ð Ð +< Ú Ð -Ð Ð += Ú Ð -Ð Ð + Ú Ð -%Ð Ð + Ú Ð -Ð Ð + Ú Ð -Ð Ð + Ú Ð -&Ð Ð + Ú Ð -Ð'(ÐE Ð Ð + Ú Ð -)Ð Ð + Ú Ð -*Ð Ð + Ú Ð -+Ð Ð + Ú Ð -,Ð Ð + Ú Ð --Ð Ð +! Ú Ð -.Ð Ð +" Ú Ð -/Ð Ð +# Ú Ð --Ð Ð + Ú Ð - \ No newline at end of file