Program Logic Manual - All about the IBM 1130 Computing System

MAINS• ENTER FROM• PHASE 1•SETIOBIINITIALIZE INTERRUPT •BRANCH• ADDRESSES• •XA2 *. A3• 2501NO •READ TO BUFFERREADER ON• SYSTEMOP •0• : A COMPLETEP• YES• •. ..X. F2 • .•.••ASX• CARD TYPEXDUB:..•DATA••D04 AlB2 .. B3 .•.. . .. .. •...RA..:...E0P...003 G5I .. YES•. BUFFER A • X.:. Hs1 2 '...r..! ..... X: ERROR STOP • :..•E0S.••005 Al.. BUSY .. ...D. .. .. ...4. •• NO • NOUVERMCI• •UPDATE VERSION ••AND MODEL LEVEL.NUMBER •X• •Fl • •••••• •DIADDRESSSAVE S ADDRESS OFSECTORFOLLOWINGCUSHION• • •003.F1 •.X• • ••.NOC2 SET INDICATOR•AO ON Al START.READINTO• BUFFE A •C3• POINT ADDRESS •: IMPPEAIINS. .02 *.D3* IS *.BUFFER A2 •BUSYN • • UtP0A NI9 .*• YESF2 •.X.• • .XTPAKF2NO WAIT FOR I/0ISOPERATIONSPACKING .*COMPLETE..REQUIRED••003••1)?•••XSL1 i05FE LAST .5 CORPROCESSED TODISK••XxE2 E3.....E5:HOOKY ADDRESS • .•.. • ... I *. ND +IN/TIAL/ZE FOR •BUFFER A ......BEGINNING OF : SUBWIla TO •*. BU Y ..NEW PHASE• A2 * .. ..i • •• YES ....• YES•MODIFYF3 ADDRESSIN:•SUBROUTINE TO A.•o FE •000.: •: ...X. Fl.003.*.G5*X XSL3 IG2G5• F I L•PACK DATA FROM SECTORRASTA OR A2 TO B PROCESSED TO• • • DISK• • •x: •H2 . H3.:. "LA .:." xi 90,tAna•• YES115COMPLETE SLETENTRIES FORTHIS PHASE•X▪J2CLEAR A2 BUSYINDICATORA5 •.6..•4.0• •• A5 •• • J5• ••UPDATE SIFT ON .DISK •• •. ••••..X. Fl •Flowchart SYL03. System Loader, Phase 2188