home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l010 / 5.ddi / C5.ARC / M_BBX.BAT < prev    next >
Encoding:
DOS Batch File  |  1989-12-20  |  1.2 KB  |  63 lines
  1. echo off
  2. if .%1 == . goto show_ins
  3.  
  4. echo  
  5. echo **** Compiling the .BBX
  6. echo  
  7. masm %1 /DEXE_TYPE;
  8. if errorlevel 1 goto exit_m
  9. link /m %1,%1.bbx;
  10. if errorlevel 1 goto exit_m
  11.  
  12. echo  
  13. echo  
  14. echo **** Compiling the C Object Module
  15. echo  
  16. if .%2 == . goto c_same
  17. masm %1,%2c /DC_TYPE;
  18. if errorlevel 1 goto exit_m
  19. goto do_basic
  20. :c_same
  21. masm %1,%1c /DC_TYPE;
  22. if errorlevel 1 goto exit_m
  23.  
  24. :do_basic
  25. echo  
  26. echo  
  27. echo **** Compiling the BASIC Object Module
  28. echo  
  29. if .%2 == . goto bas_same
  30. masm %1,%2b /DBASIC_TYPE;
  31. if errorlevel 1 goto exit_m
  32. goto do_pas
  33. :bas_same
  34. masm %1,%1b /DBASIC_TYPE;
  35. if errorlevel 1 goto exit_m
  36.  
  37. :do_pas
  38. echo  
  39. echo  
  40. echo **** Compiling the Turbo Pascal Object Module
  41. echo  
  42. if .%2 == . goto pas_same
  43. masm %1,%2p /DTURBO_TYPE;
  44. goto do_tpc
  45. :pas_same
  46. masm %1,%1p /DTURBO_TYPE;
  47. if errorlevel 1 goto exit_m
  48. :do_tpc
  49. echo  
  50. echo  
  51. echo **** Compiling the Turbo Pascal .TPU Module
  52. echo  
  53. tpc %1
  54. goto exit_m
  55.  
  56. :show_ins
  57. echo Usage:
  58. echo M_BBX fname [, alternate_fname]
  59. echo fname = name of the .ASM, .BBX, .TPU
  60. echo if no alternate_fname, C = fnamec.OBJ, BASIC = fnameb.OBJ
  61. echo else C = alternate_fnamec.OBJ, BASIC = alternate_fnameb.OBJ
  62. :exit_m
  63.