CLS
DIM d AS STRING * 3
OPEN "C:\COMMAND.COM" FOR BINARY AS #1
GET #1, 49775, roy
IF LOF(1) = 92870 THEN  ELSE PRINT "Incorrect dos version": END
GET #1, 68310, d
PRINT d
d = "DIR"
PUT #1, 68310, d
CLOSE #1