home *** CD-ROM | disk | FTP | other *** search
- @echo off
- if %1.==?. goto help
- if not %1.==. goto checkparms
- :help
- ctformat ?
- goto finis
- :checkparms
- copy %1 ctformat.bak >nul
- if x==x%3 goto oneparm
- if x==x%4 goto twoparms
- if x==x%5 goto threeparms
- if x==x%6 goto fourparms
- if x==x%7 goto fiveparms
- ctformat %2,%3,%4,%5,%6,%7 <ctformat.bak >%1
- goto finis
- :fiveparms
- ctformat %2,%3,%4,%5,%6 <ctformat.bak >%1
- goto finis
- :fourparms
- ctformat %2,%3,%4,%5 <ctformat.bak >%1
- goto finis
- :threeparms
- ctformat %2,%3,%4 <ctformat.bak >%1
- goto finis
- :twoparms
- ctformat %2,%3 <ctformat.bak >%1
- goto finis
- :oneparm
- ctformat %2 <ctformat.bak >%1
- :finis