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.
 
 
 
 
 
 

29 lines
701 B

  1. //BWBGEN JOB CLASS=C,REGION=0K
  2. //*
  3. //RUNBW PROC BWBPREF='BWBASIC'
  4. //BWBASIC EXEC PGM=BWBASIC,PARM='DD:INPUT'
  5. //STEPLIB DD DSN=&BWBPREF..LINKLIB,DISP=SHR
  6. //SYSIN DD DUMMY
  7. //SYSPRINT DD SYSOUT=*,DCB=(RECFM=F,LRECL=132,BLKSIZE=132)
  8. //SYSTERM DD SYSOUT=*,DCB=(RECFM=F,LRECL=132,BLKSIZE=132)
  9. // PEND
  10. //*
  11. //CLEAN PROC BWBPREF='BWBASIC'
  12. //DELETE EXEC PGM=IEFBR14
  13. //DD0 DD DSN=&BWBPREF..ALLZIPS,DISP=(MOD,DELETE),
  14. // UNIT=SYSALLDA,SPACE=(TRK,(0))
  15. //DD3 DD DSN=&BWBPREF..NCALIB,DISP=(MOD,DELETE),
  16. // UNIT=SYSALLDA,SPACE=(TRK,(0))
  17. // PEND
  18. //*
  19. //S1 EXEC RUNBW
  20. //INPUT DD *
  21. x = 1
  22. print "hello, world",x
  23. x = 2
  24. print "hello, world",x
  25. quit
  26. /*
  27. //S2 EXEC CLEAN
  28. //