ChipMaster's bwBASIC This also includes history going back to v2.10. *WARN* some binary files might have been corrupted by CRLF.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

33 lines
1.0 KiB

  1. //BWBGEN JOB CLASS=C,REGION=0K
  2. //*
  3. //CREATE EXEC PGM=IEFBR14
  4. //DD1 DD DSN=&&ZIPS,DISP=(,PASS),
  5. // DCB=(RECFM=U,LRECL=0,BLKSIZE=6233),
  6. // SPACE=(6233,(220,220,44)),UNIT=SYSALLDA
  7. //*
  8. //UNZIP1 PROC MINPREF='MINIZIP',BWBPREF='BWBASIC'
  9. //MINI EXEC PGM=MINIUNZ,PARM='dd:input dd:output'
  10. //STEPLIB DD DSN=&MINPREF..LINKLIB,DISP=SHR
  11. //INPUT DD DSN=&BWBPREF..ALLZIPS,DISP=SHR
  12. //OUTPUT DD DSN=&&ZIPS,DISP=(OLD,PASS)
  13. //SYSIN DD DUMMY
  14. //SYSPRINT DD SYSOUT=*
  15. //SYSTERM DD SYSOUT=*
  16. // PEND
  17. //*
  18. //UNZIP2 PROC IN=,OUT=,MINPREF='MINIZIP',BWBPREF='BWBASIC'
  19. //MINI EXEC PGM=MINIUNZ,PARM='-a dd:input dd:output'
  20. //STEPLIB DD DSN=&MINPREF..LINKLIB,DISP=SHR
  21. //INPUT DD DSN=&&ZIPS(&IN),DISP=(OLD,PASS)
  22. //OUTPUT DD DSN=&BWBPREF..&OUT,DISP=SHR
  23. //SYSIN DD DUMMY
  24. //SYSPRINT DD SYSOUT=*
  25. //SYSTERM DD SYSOUT=*
  26. // PEND
  27. //*
  28. //S1 EXEC UNZIP1
  29. //S2 EXEC UNZIP2,IN='BWBSRC',OUT='SOURCE'
  30. //S3 EXEC UNZIP2,IN='BWBINC',OUT='INCLUDE'
  31. //S4 EXEC UNZIP2,IN='BWBJCL',OUT='JCL'
  32. //