' ********************************************************************** ' ** Program: Hello_uk.BAS - Version : 1.1 - 27 January 2006 ** ' ** Compiler: Bascom 8051 IDE and LIB 2.0.11.0 ** ' ** Hardware: GMM 5115 ** ' ** Firm: grifo(r) ITALIAN TECHNOLOGY ** ' ** Via Dell' Artigiano 8/6 40016 San Giorgio di Piano (BO) ** ' ** Tel.+39 051 892 052 Fax +39 051 893 661 ** ' ** http://www.grifo.com http://www.grifo.it ** ' ** ** ' ** Made by: Graziano GAIBA ** ' ********************************************************************** ' ' Hello_uk.BAS - Rel. 1.1 - 27.01.2006 by Graziano Gaiba ' Program preloaded im mini modules. ' Makes the on-board LED blink. ' ' NOTE: Check presence of 89C5115.DAT file in BASCOM-8051 root directory and ' copy it if not available; furthermore inside "Options | Compiler | Misc" ' window perform the following settings: ' Register File = 89C5115.DAT ' Byte End(Hex) = A0 ' Size warning = Not selected ' '*********************************************************************** ' '*************************** Compiler directives *********************** ' $regfile "89c5115.dat" $romstart = &H0 ' Start address of code in FLASH $ramstart = &H0 ' Start address of external RAM $ramsize = &H100 ' 256 bytes of external RAM $crystal = 14745600 ' Microprocessor clock frequency $baud = 19200 ' Serial communication speed $large ' 16 bit addressing $map ' Generates info for each line ' ' ' '***************************** Main program **************************** ' Main: ' Set as output the TTL signal connected to the LED P1.0 = 1 Do ' Turn on LED P1.0 = 0 ' Pause for 200 milliseconds Waitms 200 ' Turn off LED P1.0 = 1 ' Pause for 200 milliseconds Waitms 200 ' Loops forever Loop End ' '************************ End of Main program ************************** '