simh-testsetgenerator/I650/sw/run_is.ini
Roberto Sancho Villa 13cb294274 I650: Release 3
New Hardware support:
- IBM 653 Storage Unit: provides machine opcodes
  for Floating Point, Immediate Access Storage (IAS),
  Three Index registers, Cards Punch-read
  synchronizers 2 and 3.
New Software included:
- FORTRANSIT: version II (S), plus run time PACKAGE
  with standard Fortran functions.
- Reorganized sw directory, separating each language
  in its own folder. Each one Includes a 00_readme.txt
  file with restoration notes and comments.
New features:
- Support for SOAP opcode mnemonics in addition
  to regular IBM mnemonics
- FAST / REALTIME CPU options
- PROP pseudo register
- CARDDECK ECHOLAST command
2018-05-18 21:58:24 +02:00

46 lines
879 B
INI

; set console -n log=log.txt
; set debug -n debug.txt
; set debug stdout
; set cpu debug=cmd;data;detail
; params: %1 source card deck to run with Floating Point Interpretive System (IS)
; %2 input card deck (if empty, do not attach input card)
; Load is main deck into drum (1 word per card format), but does not execute it
set cpu 2k
echo ***
echo *** Load is main deck into drum
echo ***
att cdr1 -q bell/is.dck
d csw 7019519999
d ar 8000
go
; Now put is program in reader and read it
carddeck -q join %1 as deck_in.dck
if "%2" != "" carddeck -q join deck_in.dck %2 as deck_in.dck
att cdr1 -q deck_in.dck
set cdr1 wiring=is
att cdp1 -n -q deck_out_run.dck
set cdp1 echo, print, wiring=is
att cdp0 -n -q print.txt
echo ***
echo *** Read and run is program
echo ***
d csw 7019511333
d ar 8000
go
:end