The Microcontroller Idea Book - Jan Axelson's Lakeview Research

Calling Assembly-language Routines
Listing 13-8. (page 2 of 2)
310 REM store starting address of source
320 B=S : GOSUB 500 : DBY(1BH)=BH : DBY(19H)=BL
330 PH0. “ram low = ”,BL
340 PH0. “ram high = ”,BH
350 PRINT “press ENTER to begin programming”
360 X=GET : IF X0DH THEN 360
370 REM program the EPROM
380 PRINT “programming in progress...”
390 PGM
400 REM check for errors
410 IF (DBY(1EH).OR.DBY(1FH))=0 THEN PRINT “programming OK”
: GOTO 470
420 REM on error, calculate address that failed to program
430 DC=DBY(19H)+256*DBY(1BH)-1
440 PH0. “ERROR: Source address ”,DC," = “,XBY(DC)
450 DP=DBY(18H)+256*DBY(1AH)
460 PH0. “ Destination address ”,DP," = “,XBY(DP)
470 END
500 REM separate B into high (BH) and low (BL) bytes
510 BL=(B.AND.0FFH)
520 BH=INT(B/256)
530 RETURN
A General-purpose EPROM Programmer
With Listing B-2, you can use an 8052-BASIC system as a general-purpose programmer
for EPROM, EEPROM, or NV RAM. The program will read any file in Intel Hex format,
and store it at the addresses specified in the file.
For example, you can add a socket for an 8K EPROM, EEPROM, or NV RAM addressed
at A000h-BFFFh in combined code/data memory. For EEPROM or NVRAM, wire the
socket exactly like U8 in Figure 4-3, except wire pin 1 of U9 to chip-select A000h (pin 10
of U6 in Figure 3-1) instead of to 8000h. For EPROM programming, also connect Figure
4-5’s circuits to pins 1 and 28 of the EPROM, for the programming voltages.
The Microcontroller Idea Book 237