chrissy
/
P8000
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

add version : 2.6

This commit is contained in:
Oliver Lehmann 1990-02-09 05:15:51 +00:00
parent 73b6c807d9
commit 2c60b14c80
2 changed files with 14 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
WEGA/src/cmd/pburn/pb.c
View File

@ -3,9 +3,9 @@
pburn - programmer (c) zft/keaw abt.: basissoftware wae
wega p8000/16-bit-teil
version : 2.3
version : 2.6
(prom programmer)
datum : 20.11.1989
datum : 09.02.1990
bearbeiter: r. kuehle
@ -47,7 +47,7 @@
#define dia1 "\n\n\t\t pburn - prom programmer board"
#define cpr "\t\t (c) zft/keaw version 2.3\n"
#define cpr "\t\t (c) zft/keaw version 2.6\n"
#define dia2 "\t\t ===============================\n\n"
#define dia3 "menue:\n\tp - program\n\tl - list\n\tt - crc\n\tb - bytemode"
#define dia4 "\n\tf - file\n\tc - copy"

24
WEGA/src/cmd/pburn/pb.command.c
View File

@ -8,13 +8,11 @@
#define EOF "\n\n*** end of file\n"
#define re1 "\n\nread source promtyp"
#define cte "\n\nchange to destination promtyp"
#define re1 "\n\nread source prom"
#define cte "\n\nchange to destination prom"
#define rtr "\nready to read?"
#define rtc "\nready to copy?"
#define rtv "\nready to verify?"
#define des "destination "
#define sou "source "
#define npr "change to next prom?"
#define npl "change to next prom low_address?"
#define nph "change to next prom high_address?"
@ -35,7 +33,7 @@ extern long begadre1, begadre2, lange1, lange2, begadrf;
program()
{
do { do {printf ("\n%s",sou);
do { do {printf ("\n");
outoptf(); /*ausgabe filename [options]:*/
inoptf(); /*eingabe filename [options]*/
if (qflag==true) return;
@ -43,8 +41,7 @@ program()
openfile();
}while (errflag==true);
do
{printf ("%s",des);
/*ausgabe eprom [options]*/
{ /*ausgabe eprom [options]*/
if (board=='1') outopte();
else outopte1();
inopte(); /*eingabe eprom [options]*/
@ -79,7 +76,7 @@ list_crc()
{
bre='s';
do
{printf ("\n%s",sou);
{printf ("\n");
outopte();
inopte();
if (qflag==true) return;
@ -117,6 +114,7 @@ list_crc()
file()
{
bre='s';
do
{
if (next==true) {switch (bre)
@ -129,14 +127,14 @@ file()
if (cmdbuf[0] != 'y' || cmdbuf[1] != '\0') {qflag=true;
return;}}
do
{printf ("\n%s",sou);
{printf ("\n");
outopte();
inopte();
if (qflag==true) return;
}while (errflag==true);
if (next==false) {
do
{printf ("%s",des);
{
outoptf();
inoptf();
if (qflag==true) return;
@ -169,7 +167,7 @@ bytemode()
{
bre='s';
do
{printf ("\n%s",sou);
{printf ("\n");
if (board=='1') outopte();
else outopte1();
inopte();
@ -193,7 +191,7 @@ long c;
bre='s';
do
{printf ("\n%s",sou);
{printf ("\n");
outopte();
inopte();
if (qflag==true) return;
@ -203,7 +201,7 @@ long c;
begadre2=begadre1;
for (c=0;c<20;c++) namee2[c]=namee1[c];
do
{printf ("%s",des);
{
if (board=='1') outopte();
else outopte1();
inopte();