PROGRAM MaterialHandlingSystem  
VAR  
    MaterialBoxes : ARRAY[0..2] OF BOOL; // 假設有3個料盒，每個料盒有一個布爾變量表示其狀態（亮/不亮）  
    CurrentMode : INT; // 當前模式（0=停止，1=工作模式，2=Teach模式）  
    WorkingSequence : ARRAY[0..2] OF INT; // 工作模式下的順序（1, 2, 3）  
    TeachSequence : ARRAY[0..9] OF INT; // Teach模式下的自定義順序，假設最多10個位置  
    TeachIndex : INT; // Teach模式下的當前索引  
    CycleCounter : INT; // 工作模式下的循環計數器  
    ErrorOccurred : BOOL; // 是否發生錯誤  
    ResetButtonPressed : BOOL; // 復位按鈕是否被按下  
END_VAR  
  
// 初始化程序  
IF CurrentMode = 0 THEN // 如果系統處于停止狀態  
    ErrorOccurred := FALSE; // 清除錯誤標志  
    CycleCounter := 0; // 清除循環計數器  
    TeachIndex := 0; // 清除Teach模式下的索引  
    // 初始化WorkingSequence和TeachSequence（這里省略，根據實際需要設置）  
END_IF;  
  
// 檢查復位按鈕  
IF ResetButtonPressed THEN  
    CurrentMode := 0; // 回到停止狀態  
    ErrorOccurred := FALSE; // 清除錯誤  
    CycleCounter := 0; // 清除循環計數器  
    TeachIndex := 0; // 清除Teach模式下的索引  
    // 可以添加更多復位相關的邏輯  
    ResetButtonPressed := FALSE; // 復位按鈕狀態復位  
END_IF;  
  
// 工作模式邏輯  
IF CurrentMode = 1 THEN  
    // 檢查當前料盒是否應該亮起  
    IF MaterialBoxes.WorkingSequence[CycleCounter] THEN  
        // 取料操作...  
        CycleCounter := CycleCounter + 1; // 增加循環計數器  
    ELSIF ErrorOccurred = FALSE THEN  
        // 如果順序錯誤且之前未報錯，則報警  
        ErrorOccurred := TRUE; // 設置錯誤標志  
        // 報警操作...  
    END_IF;  
      
    // 如果錯誤發生且當前料盒未亮起，則等待直到料盒亮起或復位  
    IF ErrorOccurred AND NOT MaterialBoxes.WorkingSequence[CycleCounter ] THEN  
        // 等待邏輯...  
    END_IF;  
END_IF;  
  
// Teach模式邏輯  
IF CurrentMode = 2 THEN  
    // 根據TeachSequence和TeachIndex來檢查料盒狀態并執行取料操作  
    // 這里需要額外的邏輯來接收用戶輸入并更新TeachSequence  
    // 省略Teach模式下的詳細邏輯
END_IF;  
  
// 其他邏輯，更新指示燈狀態
END_PROGRAM

引用

引用樓主dgl4245123于2024-04-09 15:34發表的 取料防錯系統。不要噴我，一般人搞不定�。。� :
不要噴我，大部分人都搞不定�。�！

在前輩在基礎上改了一下，是不是你想要的

大神好

引用

引用第36樓沖出槍林彈雨于2024-04-10 20:46發表的  :
PROGRAM MaterialHandlingSystem  
VAR  
    MaterialBoxes : ARRAY[0..2] OF BOOL; // 假設有3個料盒，每個料盒有一個布爾變量表示其狀態（亮/不亮）  
    CurrentMode : INT; // 當前模式（0=停止，1=工作模式，2=Teach模式）  
    WorkingSequence : ARRAY[0..2] OF INT; // 工作模式下的順序（1, 2, 3）  
.......

回頭我上個work3試試

引用

引用第37樓wyfeng1018于2024-04-11 11:02發表的  :


在前輩在基礎上改了一下，是不是你想要的

沒有看太懂，感覺很簡單,是我理解能力差嗎.沒有理解你要表達的意思嗎

Teach模式，先進行示教定義順序，記錄定義的順序，每次按這個順序執行不就可以了嗎。

就這么回事

這個用步進來做不是很簡單嗎，在示教模式下記錄位地址的動作順序，然后在工作模式下根據記錄下來的位地址動作順序來直接循環步進

主要是teach模式下的情況很多，并且擋位在哪個工作模式下，就teach哪一通道。比如1233  1232順序
工作模式可以用二進制撥碼開關來調節0-9就是10 種，甚至更多

題目都有問題，沒寫明白，讓人怎么做？

用觸摸屏，讓用戶自定義取料順序，這樣是不是更好

你好，哪里不清楚？！

引用

引用第44樓烏嘍牛于2024-04-23 07:48發表的  :
題目都有問題，沒寫明白，讓人怎么做？

操作數組下標或變址寄存器嗎？Teach模式下定義數組下標內的數組值