Accueil Explorer Aide
Connexion
mbuesch
/
awlsim
Suivre 3
Voter 2
Fork 1
Fichiers Pull Requests 0
Aborescence: 78e5e27697
Branches Tags
awlsim
/
tests
/
tc999_projects
/
binaeruntersetzer.awl

binaeruntersetzer.awl 1.8 KB
Historique Raw

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106 
  1. FUNCTION "Binäruntersetzer FC" : VOID
    2. 

  2. TITLE =Binaeruntersetzer
    3. 

  3. VERSION : 0.1
    4. 

  4. 

  5. BEGIN
    6. 

  6. NETWORK
    7. 

  7. TITLE =Merker 1
    8. 

  8. 

  9.       U     "b1"; 
    10. 

  10.       FP    "b1_fm"; 
    11. 

  11.       =     "b1_imp"; 
    12. 

  12. NETWORK
    13. 

  13. TITLE =Merker rueckwaerts
    14. 

  14. 

  15.       U     "A0"; 
    16. 

  16.       U     "A1"; 
    17. 

  17.       U     "A2"; 
    18. 

  18.       S     "MRUECK"; 
    19. 

  19.       UN    "A0"; 
    20. 

  20.       UN    "A1"; 
    21. 

  21.       UN    "A2"; 
    22. 

  22.       R     "MRUECK"; 
    23. 

  23.       NOP   0; 
    24. 

  24. NETWORK
    25. 

  25. TITLE =Merker Ausgang 0
    26. 

  26. 

  27.       UN    "MRUECK"; 
    28. 

  28.       U     "b1_imp"; 
    29. 

  29.       UN    "A0"; 
    30. 

  30.       UN    "A1"; 
    31. 

  31.       UN    "A2"; 
    32. 

  32.       S     "temp_A0"; 
    33. 

  33.       U     "MRUECK"; 
    34. 

  34.       U     "b1_imp"; 
    35. 

  35.       U     "A0"; 
    36. 

  36.       UN    "A1"; 
    37. 

  37.       UN    "A2"; 
    38. 

  38.       R     "temp_A0"; 
    39. 

  39.       NOP   0; 
    40. 

  40. NETWORK
    41. 

  41. TITLE =Merker Ausgang 1
    42. 

  42. 

  43.       UN    "MRUECK"; 
    44. 

  44.       U     "b1_imp"; 
    45. 

  45.       U     "A0"; 
    46. 

  46.       UN    "A1"; 
    47. 

  47.       UN    "A2"; 
    48. 

  48.       S     "temp_A1"; 
    49. 

  49.       U     "MRUECK"; 
    50. 

  50.       U     "b1_imp"; 
    51. 

  51.       U     "A0"; 
    52. 

  52.       U     "A1"; 
    53. 

  53.       UN    "A2"; 
    54. 

  54.       R     "temp_A1"; 
    55. 

  55.       NOP   0; 
    56. 

  56. NETWORK
    57. 

  57. TITLE =Merker Ausgang 2
    58. 

  58. 

  59.       UN    "MRUECK"; 
    60. 

  60.       U     "b1_imp"; 
    61. 

  61.       U     "A0"; 
    62. 

  62.       U     "A1"; 
    63. 

  63.       UN    "A2"; 
    64. 

  64.       S     "temp_A2"; 
    65. 

  65.       U     "MRUECK"; 
    66. 

  66.       U     "b1_imp"; 
    67. 

  67.       U     "A0"; 
    68. 

  68.       U     "A1"; 
    69. 

  69.       U     "A2"; 
    70. 

  70.       R     "temp_A2"; 
    71. 

  71.       NOP   0; 
    72. 

  72. NETWORK
    73. 

  73. TITLE =Ausgang 0
    74. 

  74. 

  75.       U     "temp_A0"; 
    76. 

  76.       =     "A0"; 
    77. 

  77. NETWORK
    78. 

  78. TITLE =Ausgang 1
    79. 

  79. 

  80.       U     "temp_A1"; 
    81. 

  81.       =     "A1"; 
    82. 

  82. NETWORK
    83. 

  83. TITLE =Ausgang 2
    84. 

  84. 

  85.       U     "temp_A2"; 
    86. 

  86.       =     "A2"; 
    87. 

  87. END_FUNCTION
    88. 

  88. 

  89. 

  90. ORGANIZATION_BLOCK "CYCLE"
    91. 

  91. BEGIN
    92. 

  92. 	// Eingangssignal simulieren
    93. 

  93. 	UN	M 16.0
    94. 

  94. 	L	S5T#1S
    95. 

  95. 	SE	T 1
    96. 

  96. 	U	T 1
    97. 

  97. 	=	M 16.0
    98. 

  98. 	X	M 16.0
    99. 

  99. 	X	M 16.1
    100. 

  100. 	=	M 16.1
    101. 

  101. 	=	"b1"
    102. 

  102. 

  103. 	// Binaeruntersetzer aufrufen
    104. 

  104. 	CALL	FC 4
    105. 

  105. END_ORGANIZATION_BLOCK
    106. 

  106.