В какой версии\реализации Бейсика содержатся синтаксические конструкции "program S"

program Spi_Lcd8_Test
 
dim text as char[16]
 
' Port Expander module connections
dim SPExpanderRST as sbit at PORTB0_bit
    SPExpanderCS  as sbit at PORTB1_bit
    SPExpanderRST_Direction as sbit at DDB0_bit
    SPExpanderCS_Direction  as sbit at DDB1_bit
' End Port Expander module connections
 
main:
  text = "mikroE"
  ' If Port Expander Library uses SPI1 module
  SPI1_Init()                                ' Initialize SPI module used with PortExpander
 
  ' ' If Port Expander Library uses SPI2 module
  ' SPI2_Init()                              ' Initialize SPI module used with PortExpander
 
  SPI_Lcd8_Config(0)                         ' Intialize Lcd in 8bit mode via SPI
  SPI_Lcd8_Cmd(_LCD_CLEAR)                   ' Clear display
  SPI_Lcd8_Cmd(_LCD_CURSOR_OFF)              ' Turn cursor off
  SPI_Lcd8_Out(1,6, text)                    ' Print text to Lcd, 1st row, 6th column...
  SPI_Lcd8_Chr_CP("!")                       ' Append "!"
  SPI_Lcd8_Out(2,1, "mikroelektronika")      ' Print text to Lcd, 2nd row, 1st column...
  SPI_Lcd8_Out(3,1, text)                    ' For Lcd modules with more than two rows
  SPI_Lcd8_Out(4,15, text)                   ' For Lcd modules with more than two rows
end.