BCX Console Demonstration Program S58.bas
DIM
a$ GetSystemDirectory
(
a$,
256
)
? a$