;INSTALLFONTS 1.12 1996 BY A.T.R.

Echo "INSTALLFONTS 1.12 1996 BY A.T.R."
Wait 1
If Exists SYS:Fonts/PSX.font
 Echo "lsche alte <PSX>-Fonts.."
 Wait 1
 delete >NIL: SYS:Fonts/PSX#? ALL
EndIf

If Exists SYS:Fonts/PSXPro.font
 Echo "Font <PSXPro> ist bereits installiert"
 Wait 1
Else
 Echo "Font <PSXPro> wird installiert.."
 Wait 1
 Copy >NIL: Fonts/PSX#? ALL SYS:Fonts
EndIf

If Exists SYS:Fonts/2001.font
 Echo "Font <2001> ist bereits installiert"
 Wait 1
Else
 Echo "Font <2001> wird installiert.."
 Wait 1
 Copy >NIL: Fonts/2001#? ALL SYS:Fonts
EndIf

Echo "OK."
EndCLI
