home *** CD-ROM | disk | FTP | other *** search
/ Jason Aller Floppy Collection / 189.img / TCS120S.ZIP / COLORS.PAS < prev    next >
Pascal/Delphi Source File  |  1989-03-24  |  159b  |  13 lines
  1. program colors;
  2.  
  3. uses crt,subs1;
  4.  
  5. var cnt:integer;
  6.  
  7. begin
  8.  for cnt:=1 to 128 do begin
  9.   ansicolor (cnt);
  10.   writeln (cnt);
  11.   delay (75);
  12.  end;
  13. end.