|
SET CASH=0
CALL NEWMODEL
IF ERRORLEVEL=0 GOTO HAPPY
SET PATH=|%BUYNEWMODEL%
SET RUNPATH\%SELLOUTOLDMODEL%\%SELLOUTJUNK%\
SET X=$
SET NEWMODELCOST=?€
FOR X=Y;IF Y=OLDMODEL THEN SELL Y
SET Z=CASH+X
CHECK Z;IF Z=>NEWMODELCOST THEN BUY NEWMODEL;
:HAPPY
PRINT 'WELCOME NEW GRAFIC BOARD'
DOLOOP;
...HIC ....
|