IBM 5100 Communications Manual

Sample APL Program
V AASENIIAALL ;1
1::1 ATHIS ROUTINE WILL SEND THE LARGE CHARACTER
2- AARRAY CHAR TO THE 5100 IN 10 ROW SECTIONS
(-,FOR PI~INTING AND TAPE USING THE AUTO COMMAND,
I ~- 0
S: CHAI~[I+\ :1.0;::t
6 ~(30=I~I+l0)/E
'"( 'CONTINUE'
B··. (A/ ' CONT INUE ' ::::I~) IS
<? -.0
1..:1.0::1 E : 'STOP'
[11J ~(A/'STOP'=M)/O
I:: :1.2::1 'EI~I~OR"
The character array
'char'
is:
ABCDEFGH I ,J
1< Lr1N(] P(~ I~BT
UVW)(YZABCn
EFGH I ·JI< LMN
(] P(~ RSTUVW)(
YZABCDEFGH
I ,JI< I...MND P(~ I~
STUV~,I)(YZAB
CDEFGH I ,..11< 1 •. ,
t1NO P(~ I~STUV
t'J)(Y:Z(.~IBCDEF
GH I . ..JI< LMNO P
(~ I~DTUV~JXY:Z
(.~BCDEFGH I.J
1< L t1 N0 P (~ I~~ ST
UVW)(YZABCD
EFGH I . ..JI< I...Mi\l
(] P(~ I~STUVliJ)(
"{:Z,~~BCDEFGH
1-.11< I...MNO P(~ R
STUVI ..... IXYZAB
CDEFGH I . ..JI< L
~'1ND P(~ I~STUV
l,JXYZI~BCDEF
GH I ..JI< I... t·1 NO P
(~ I~STI...IVI .. ~XY:Z
f~)BCDEFI3H 1. ..1
I{ I... t·1 ND P(~ I~ST
UVt"I;<Y·Z(.~BCD
EFGH I .J\( I...MN
The extended display
with
~AUTO contains:
~OUTSEL BYS
.~(.~UTO
AUTOSEND
ABCDEFGHI.,J
1< LM N0 PQ I~ ST
UV,WXYZABCD
EFGH I JI< LMN
[) P(~ RSTUV~JX
YZp-,HCDEFGH
I \.J1< I...MN(] P(~ R
STUVWXYZAB
CD:EF'GH I JI< I...
riND P(~ RSTUV
CONTINUE
WXYZABCDEF
GHIJI<LMNOP
(~R~:)TUVI.,JXYZ
(.~:BiCDEFGH I ,J
1< I...MND P(~ RST
UVWXYZABCD
EFGH I . ..JI< I...MN
D pn I<STUVliJ:X:
YZABCDEFGH
I ..J 1< I... M r-.[t:l P (:~ I~
CONTINUE
STUV~IJXY2:P-IB
CDEFGH I ,..II<\'"
MNO P(·~ I:~BTUV
1.,J;{Y:Z(.·i:OCDEF
[iH I . .JI< I...MNCt P
(~ HGTUVI..·JXYZ
(.~IBCDEFGHI . ...I
1< Lr'iND P(~ HS"r
I...IV~J)( Y Z(.~BC:O
EFGH I -JI< LMN
:::;TDP
The printed output is:
(.iBCDEFGH:t: . .,J
1< LMND P(~ RST
UVWXYZABCD
EFGHI,JI{LMN
(] P(~ RBTUVW:X:
YZ,~BCDEFGH
I JI< LMNO P(~ I~
STUVWXYZAB
CDEFGH I JI< L
MNO P('-i I~STUV
WXYZ(.~BCDEF
GH I .J\( I...MND P
(~ RSTUVWXYZ
ABCDEFGHIJ
1< I...MNO P(~ R~:) T
UV~JXYZABCD
EFG HI .,J 1< I... (1 N
[) P(~ I~STUVWX
YZ(.iBCDEFGH
I ,,JI( LMNO P(~ R
BTUV~JXYZAB
CDEFGHIJI(I...
MNDP(~RBTUV
I",IXYZABCDEF
GH I JI< L~iN(] p
(~ I~ BTUVWXYZ
I~BCDEFGH I . ..J
1< I...MND P(~ I~ST
U\J~JXYZABCD
EFGH I ,JI< I...MN
Appendix B. Sample Tape Communications and Programs 41

IBM 5100 Specifications

General

Brand	IBM
Model	5100
Category	Laptop
Language	English