DEBUGIN


語法

            DEBUGIN Item { , Item}

 

操作

            這個指令允許使用者在運轉時間內經由終端機視窗送資料到BASIC Commander。

  • Item – 從除錯控制台接收的資料變數。為了操作上的方便，Debugin指令也支援顯示在終端機視窗的訊息及控制碼，使用者可以了解等待輸入的是哪種資訊。否則使用者要靠另一個除錯指令來提供這些資料。超過一個時可以用冒號分開。

  

說明

            有時需要BASIC Commander跟使用者去做溝通對話，可藉由在innoBASIC Workshop的終端視窗上對程式下DEBUGIN指令。這個方法可以用來做程式除錯，或當作從使用者端獲得資料的人機介面。例如：

 

DEBUGIN "Please enter your lucky number.", num, CR

 

            其它說明事項與DEBUG指令相同，使用時請參考DEBUG指令。

 

注意：DEBUGIN指令需要一些時間藉由USB介面在BASIC Commander和PC間作溝通。有時間考量的應用程式，要預防在程式關鍵路徑中使用DEBUGIN指令。在開發階段使用DEBUGIN指令除錯，時脈可能會跟DEBUGIN指令移除做正式操作時有所不同。如果DEBUGIN指令沒有被移除獨立操作，當USB介面沒有和PC連接時，程式會進入無效迴圈無止盡的等待資料輸入。

   

範例

Sub Main()
    Dim yourname As String * 20
    Dim Key As Byte

    Debugin "Please enter your name.", yourname, CR
    Debug "Hi ", yourname, "!"
   
    Do 
            Debugin CR,"Enter in DEC: ", Key, CR        ' say,  100
            Debug "The number in DEC is: ", Key, CR
            Debugin CR,"Enter in BIN: ", %BIN Key, CR   ' say, 01010101
            Debug "The number in BIN is: ", %BIN Key, CR   
            Debugin CR,"Enter HEX: ", %HEX Key, CR      ' say, FA  
            Debug "The number in Hex is: ", %HEX Key, CR   
            Debugin CR,"Enter a letter: ", %CHR Key, CR
            Debug "The letter is ", %CHR Key,", ASCII Code is ", Key, CR   
    Loop
End Sub