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 CommanderPC間作溝通。有時間考量的應用程式,要預防在程式關鍵路徑中使用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