$ od -c -N 50000 [Indigo]<Dicentra>Boggs>SCI-Program.BFS!1>bravo.ts
0000000 @ V [ B R A V O V e r s i o
0000020 n 7 . 6 S e p t e m b e r
0000040 2 5 , 1 9 8 2 ] { 6 , 2 , 0
0000060 , 6 } g ' s c i 1 . b c p l 033 @
0000100 G [ s c i 1 . b c p l . ] { 7 ,
0000120 2 , 6 7 , 1 1 5 } d { 7 , 2 , 6
0000140 7 , 6 7 } t @ T [ M a y 3 0 ,
0000160 1 9 8 3 1 : 5 0 P M ] {
0000200 6 , 2 , 1 5 3 2 4 , 1 5 3 2 4 }
0000220 i ' \r \r \r 033 { 6 , 2 , 1 5 3 2 5
0000240 , 1 5 3 2 5 } i ' i f 341 341 t e s
0000260 t n m b e r 341 341 341 341 u m n 341 b
0000300 e r g e 1 0 0 \r
0000320 341 341 341 i f s o 367 367 367 367 367 c o n n
0000340 = n u m b e r g e 1 0 0
0000360 ? 341 341 341 341 341 341 341 341 l e 1 0 0
0000400 341 341 341 341 341 s 1 0 0 ? # 341 $ 1
0000420 , $ 2 033 { 7 , 2 , 1 5 3 2 5 ,
0000440 1 5 3 3 0 } i ' l e t 033 { 1 ,
0000460 2 , 1 5 2 7 4 , 1 5 3 2 4 } d {
0000500 6 , 2 , 1 5 3 3 5 , 1 5 3 3 5 }
0000520 i ' l e t p i n = n u m b
0000540 e r l s 1 0 0 ? 033 { 6 , 2 ,
0000560 1 5 3 6 5 , 1 5 3 6 5 } i ' n
0000600 u m b e r , n u m b e r - 1 0
0000620 0 033 { 1 , 2 , 1 5 4 1 1 , 1 6 0
0000640 3 6 } d { 1 , 2 , 1 5 4 1 1 , 1
0000660 5 4 1 1 } p ' 033 @ P [ s c i 1 .
0000700 b c p l . ] { 1 , 2 , 0 , 2 7 5
0000720 0 1 } q \r @ E \0 \0 \0 \0 \0 \0 \0 \0 \0
0000740 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0
*
0001000 { 6 , 2 , 0 , 3 0 1 7 1 } q \r @
0001020 E 1 4 } p ' 033 @ P [ s c i 1 . b
0001040 c p l . ] { 6 , 2 , 0 , 3 0 1 5
0001060 2 } q \r @ E { 7 , 4 , 1 3 1 1 ,
0001100 1 3 1 7 } r { 7 , 4 , 1 7 0 6 ,
0001120 1 7 1 4 } 033 { 6 , 4 , 1 6 7 7 ,
0001140 1 6 7 7 } f ' 033 y { 6 , 4 , 6 3
0001160 4 5 , 6 3 5 3 } r ' 033 { 7 , 4 ,
0001200 6 3 5 7 , 6 4 0 5 } r { 6 , 4 ,
0001220 6 3 2 7 , 6 3 4 0 } 033 { 1 , 4 ,
0001240 6 3 1 1 , 6 3 4 1 } d { 6 , 4 ,
0001260 6 3 4 1 , 6 3 4 1 } i { 6 , 2 ,
0001300 2 4 1 2 , 2 4 1 7 } 033 { 6 , 4 ,
0001320 6 3 4 7 , 6 3 4 7 } i ' ; P u
0001340 t s ( d s p , c p u T y p e )
0001360 033 { 6 , 2 , 2 4 2 0 , 2 4 2 0 }
0001400 i ' ; P u t s ( d s p , b o
0001420 a r d T y p e ) 033 { 6 , 4 , 6 2
0001440 2 3 , 6 2 2 3 } f ' 033 y { 6 , 4
0001460 , 1 0 0 6 0 , 1 0 0 6 6 } r ' c
0001500 p u T y p e 033 { 6 , 4 , 1 0 0 6
0001520 0 , 1 0 0 6 6 } a ' e q $ V
0001540 033 { 6 , 4 , 1 0 0 6 7 , 1 0 0 7
0001560 4 } f ' 033 y { 6 , 4 , 1 0 5 3 7
0001600 , 1 0 5 4 5 } r ' c p u T y p e
0001620 e q $ V 033 { 6 , 4 , 1 0 5 3
0001640 7 , 1 0 5 5 3 } f ' 033 n { 6 , 4
0001660 , 1 0 5 3 7 , 1 0 5 5 3 } p ' 033
0001700 @ P [ s c i . b c p l . ] { 6 ,
0001720 4 , 0 , 1 4 6 4 5 } w d y 1 0 5
0001740 4 , { 6 , 2 , 1 3 0 , 1 3 0 } f
0001760 ' 033 y { 6 , 2 , 1 0 3 6 , 1 0 4
0002000 4 } r ' c p u T y p e 033 { 6 , 2
0002020 , 1 0 3 6 , 1 0 4 4 } f ' 033 y {
0002040 6 , 2 , 2 1 4 4 2 , 2 1 4 5 0 }
0002060 r ' c p u T y p e e q $ V 033
0002100 { 6 , 2 , 2 1 4 4 2 , 2 1 4 5 6
0002120 } f ' 033 y { 6 , 2 , 2 1 6 0 0 ,
0002140 2 1 6 0 6 } r ' c p u T y p e
0002160 e q $ V 033 { 6 , 2 , 2 1 6 0 0
0002200 , 2 1 6 1 4 } f ' 033 y { 6 , 2 ,
0002220 2 4 0 1 4 , 2 4 0 2 2 } 033 n { 6
0002240 , 2 , 2 4 0 1 4 , 2 4 0 2 2 } r
0002260 ' 033 { 6 , 2 , 2 4 0 1 4 , 2 4 0
0002300 3 0 } f ' 033 n { 1 , 2 , 2 5 1 7
0002320 , 2 5 6 2 } d { 1 , 2 , 2 3 6 3
0002340 , 2 4 4 6 } a ' 033 { 7 , 2 , 2 3
0002360 6 3 , 2 3 7 3 } i ' l e t 033 {
0002400 6 , 2 , 1 0 4 5 , 1 0 5 7 } d {
0002420 6 , 2 , 1 0 4 5 , 1 0 4 5 } p '
0002440 033 @ P [ s c i 1 . b c p l . ] {
0002460 6 , 2 , 0 , 3 0 1 1 3 } q \r @ E
0002500 i ' 177 { 6 , 2 , 1 2 4 1 0 , 1 2
0002520 4 1 0 } i ' \r
0002540 e n d c a s e 033 { 6
0002560 , 2 , 1 2 4 7 6 , 1 2 4 7 6 } i
0002600 ' \r e n d c a
0002620 s e 033 { 6 , 2 , 1 2 4 3 7 , 1 2
0002640 4 3 7 } i ' 177 { 6 , 2 , 1 2 4 6
0002660 0 , 1 2 4 6 0 } i ' 177 { 6 , 2 ,
0002700 1 2 4 1 0 , 1 2 4 1 0 } i ' \r
0002720 033 {
0002740 6 , 2 , 1 3 4 7 3 , 1 3 4 7 3 }
0002760 i ' \r \r a n s 341 d M u l t i b
0003000 u s 033 { 6 , 2 , 1 3 5 1 1 , 1 3
0003020 5 1 1 } i ' ( ) b e 341 341 b e \r
0003040 [ \r ] 033 { 1 , 2 , 1 3 5 2 1 , 1
0003060 3 5 2 2 } i { 1 , 2 , 1 1 3 5 7
0003100 , 1 2 2 6 3 } 033 { 7 , 2 , 1 3 5
0003120 2 1 , 1 3 5 3 7 } d { 7 , 2 , 1
0003140 3 5 6 1 , 1 3 6 0 2 } r '
0003160 033 { 7 , 2 , 1 3 6 5 7 , 1 3 7 0
0003200 0 } 033 { 7 , 2 , 1 3 7 5 3 , 1 3
0003220 7 7 1 } d { 7 , 2 , 1 4 0 4 3 ,
0003240 1 4 0 6 1 } d { 7 , 2 , 1 4 1 5
0003260 7 , 1 4 1 7 5 } d { 7 , 2 , 1 4
0003300 2 3 6 , 1 4 2 5 4 } d { 1 , 2 ,
0003320 1 3 4 7 5 , 1 3 5 1 6 } i { 1 ,
0003340 2 , 1 4 2 6 1 , 1 4 4 1 3 } 033 {
0003360 1 , 2 , 1 3 6 5 2 , 1 3 6 5 3 }
0003400 033 { 6 , 2 , 1 1 3 5 6 , 1 1 3 5
0003420 6 } i ' M u l t i b u s ( ) ;
0003440 e n d c a s e ] 033 { 6 , 2 ,
0003460 1 1 3 3 5 , 1 1 3 5 3 } d { 1 ,
0003500 2 , 1 1 3 6 6 , 1 2 3 4 2 } d {
0003520 1 , 2 , 1 1 4 4 3 , 1 1 4 6 2 }
0003540 d { 6 , 2 , 1 1 1 7 1 , 1 1 1 7
0003560 2 } r ' \r 033 { 6 , 2
0003600 , 1 1 1 7 1 , 1 1 1 7 1 } i ' :
0003620 \r 341 341 341 341 341 341
0003640 341 341 341 341 s w i t c h o n b o
0003660 a r d 341 T y p e i n t o \r
0003700 c a s e m u l
0003720 t i b u s : [ M u l t i b u
0003740 s ( ) ; e n d c a z 341 s e ]
0003760 \r c a s e 033 {
0004000 6 , 2 , 1 1 1 7 2 , 1 1 1 7 2 }
0004020 r ' \r [ \r
0004040 033 { 7 , 2 , 1 1 2
0004060 6 0 , 1 1 2 6 3 } i ' 033 {
0004100 7 , 2 , 1 1 3 4 3 , 1 1 3 4 6 }
0004120 033 { 6 , 2 , 1 1 2 4 6 , 1 1 2 4
0004140 6 } i ' \r
0004160 [ 033 { 6 , 2 , 1 1 3 7 0 , 1 1
0004200 3 7 0 } i ' d a n d e l i o n
0004220 : \r c a
0004240 s e u n i v e r s a l : \r
0004260 ] \r
0004300 e n d c a s e \r
0004320 ] 033 { 7 , 2 , 1 3 1
0004340 7 3 , 1 3 2 0 2 } a ' E a n d C
0004360 341 C 033 { 6 , 2 , 1 3 0 3 2 , 1 3
0004400 0 3 2 } i ' \r \r a n d D a n d
0004420 e l i o n E ( ) b e \r [ \r ] \r
0004440 \r a n d D a n d e l i o n C (
0004460 ) b e \r [ \r ] 033 { 6 , 2 , 1 3
0004500 0 3 3 , 1 3 0 3 3 } i ' l 363 033 {
0004520 1 , 2 , 1 3 0 3 5 , 1 3 0 6 0 }
0004540 i { 1 , 2 , 1 3 1 1 7 , 1 3 2 5
0004560 1 } 033 { 1 , 2 , 1 3 2 1 4 , 1 3
0004600 2 1 5 } 033 { 1 , 2 , 1 3 3 5 4 ,
0004620 1 3 3 7 7 } 033 { 1 , 2 , 1 3 5 3
0004640 3 , 1 3 5 3 4 } 033 { 6 , 2 , 1 3
0004660 0 3 4 , 1 3 0 3 4 } i ' \r a n d
0004700 U n i v e r s a l ( ) b e \r
0004720 [ \r ] \r 033 { 1 , 2 , 1 3 0 3 5 ,
0004740 1 3 0 5 7 } i { 1 , 2 , 1 3 0 6
0004760 5 , 1 3 2 1 7 } 033 { 1 , 2 , 1 3
0005000 2 1 3 , 1 3 2 1 4 } 033 { 6 , 2 ,
0005020 1 1 1 7 2 , 1 1 1 7 2 } i ' (
0005040 s e l e c t o n b o a r d T y
0005060 p e i n t o \r
0005100 367 367 367 367 367 367 367 367 367 033 { 6 , 2 ,
0005120 1 1 4 3 7 , 1 1 4 3 7 } i ' [
0005140 U n i v e r s a l ( ) ; e n
0005160 e 341 d c a s e ] 033 { 6 , 2 , 1
0005200 1 4 0 3 , 1 1 4 0 3 } i ' [
0005220 D a n d e l i o n E ( ) ; e n
0005240 d c a s e ] 033 { 6 , 2 , 1 2 0
0005260 3 1 , 1 2 0 4 7 } d { 6 , 2 , 1
0005300 2 0 3 3 , 1 2 0 5 1 } d { 6 , 2
0005320 , 1 2 0 4 3 , 1 2 0 6 1 } d { 7
0005340 , 2 , 1 2 0 3 4 , 1 2 0 4 2 } i
0005360 ' D a n d e l i o n C ( ) ; 033
0005400 { 1 , 2 , 1 2 0 6 4 , 1 2 1 0 1
0005420 } i { 1 , 2 , 1 1 4 3 6 , 1 1 5
0005440 2 2 } 033 { 6 , 2 , 1 1 1 7 2 , 1
0005460 1 1 7 2 } i { 6 , 2 , 1 1 6 0 2
0005500 , 1 1 6 1 7 } 033 { 7 , 2 , 1 1 4
0005520 2 4 , 1 1 4 3 5 } i ' t o e k 341
0005540 341 k e n T y p e e q e d g e
0005560 P i n ? 033 { 1 , 2 , 1 1 5 0 2
0005600 , 1 1 5 6 6 } d { 1 , 2 , 1 1 3
0005620 6 6 , 1 1 5 0 1 } i ' 033 { 7 , 2
0005640 , 1 1 5 1 1 , 1 1 5 3 4 } d { 7
0005660 , 2 , 1 1 5 1 1 , 1 1 5 1 1 } d
0005700 { 7 , 2 , 1 1 5 1 1 , 1 1 5 1 1
0005720 } d { 7 , 2 , 1 1 5 1 1 , 1 1 5
0005740 2 2 } i ' t e s t t o k e n T
0005760 y p e e q e d g e P i n i
0006000 f s o 033 { 6 , 2 , 1 1 5 6 4 ,
0006020 1 1 5 7 6 } r ' i f n o t D
0006040 a n d e l i o n C ( ) 033 { 6 , 2
0006060 , 1 1 5 0 7 , 1 1 5 0 7 } d { 6
0006100 , 2 , 1 1 5 0 7 , 1 1 5 0 7 } d
0006120 { 1 , 2 , 1 1 6 6 0 , 1 2 3 0 5
0006140 } d { 6 , 2 , 1 2 7 3 , 1 2 7 3
0006160 } r ' \r [ \r 033 { 6 , 2 , 1 3 2 2
0006200 , 1 3 2 2 } i ' \r u n i v e r s
0006220 a l = 1 \r d a n 341 341 341 m u l
0006240 t i b u s = 2 \r d a n d e l
0006260 i o n = 2 341 3 \r ] \r 341 033 { 6
0006300 , 2 , 1 0 2 6 , 1 0 2 6 } i ' ;
0006320 b o a r d T y p e 033 { 1 , 2 ,
0006340 1 3 3 6 , 1 3 5 3 } i ' \r 033 { 6
0006360 , 2 , 1 3 0 , 1 3 0 } i ' \r g e
0006400 t " S c i 341 341 C I . d e c l "
0006420 033 { 6 , 2 , 1 3 0 , 1 4 6 } w n
0006440 y 6 0 5 , y 6 0 5 , y 6 0 5 , {
0006460 6 , 4 , 0 , 6 } i ' S C I . d e
0006500 c l \r 341 \r / / L a s t m o d
0006520 i f i e d b y B o g g s \r
0006540 \r 033 { 6 , 4 , 3 2 , 3 2 } t @ T
0006560 [ A p r i l 2 8 , 1 9 8 3
0006600 1 1 : 4 3 P M ] { 7 , 4 , 0
0006620 , 2 } i ' / / 033 { 6 , 4 , 7 7
0006640 , 7 7 } i ' \r 033 { 6 , 4 , 1 0 0
0006660 , 1 0 0 } i ' m a n i f e s t \r
0006700 [ \r / / b o a r d t y p e s
0006720 \r u n i 341 033 { 1 , 4 , 1 3 2 , 1
0006740 3 4 } r { 1 , 2 , 1 3 5 6 , 1 4
0006760 3 0 } 033 { 1 , 4 , 1 6 5 , 2 0 2
0007000 } a ' \r \r 033 { 1 , 2 , 1 3 5 5 ,
0007020 1 4 2 6 } d { 1 , 2 , 1 3 1 4 ,
0007040 1 3 5 6 } d { 1 , 4 , 1 0 0 , 1
0007060 1 0 } i { 1 , 2 , 1 1 7 7 , 1 3
0007100 1 3 } 033 { 1 , 4 , 7 7 , 7 7 } d
0007120 { 1 , 2 , 1 1 7 7 , 1 3 1 3 } d
0007140 { 6 , 2 , 1 3 3 4 , 1 3 3 4 } w
0007160 m y 6 2 6 , y 6 2 6 , y 1 1 3 5
0007200 , { 6 , 2 , 1 3 3 4 , 1 3 3 4 }
0007220 w n y 5 0 1 , y 5 0 2 , y 5 0 2
0007240 , { 6 , 4 , 0 , 6 } g ' s c i .
0007260 b c p l 033 @ G [ s c i . b c p l
0007300 . ] { 1 , 4 , 2 0 3 7 , 2 1 2 0
0007320 } f ' 177 { 1 , 4 , 2 0 3 7 , 2 1
0007340 2 0 } d { 1 , 4 , 2 0 3 7 , 2 0
0007360 3 7 } d { 1 , 6 , 3 2 0 , 3 2 0
0007400 } i { 1 , 4 , 2 0 5 2 , 2 3 3 3
0007420 } 033 { 1 , 4 , 2 0 3 6 , 2 3 3 5
0007440 } d { 1 , 6 , 3 4 1 , 3 5 3 } i
0007460 ' \r / / T S P c o m m a n d
0007500 s \r 033 { 6 , 5 , 1 , 6 } i { 7 ,
0007520 6 , 3 , 1 2 } 033 { 6 , 5 , 0 , 7
0007540 } p ' 033 @ P [ S C I . d e c l .
0007560 ] { 7 , 5 , 4 , 7 } r ' c m 033 {
0007600 6 , 6 , 1 6 , 1 6 } e { 6 , 6 ,
0007620 0 , 6 3 4 } d { 6 , 6 , 0 , 0 }
0007640 i ' S c o 341 341 C I . D E 341 341 c a
0007660 341 341 d e c l S C I . b c p l
0007700 S C I 1 2 341 . b c p l L o a d
0007720 S C I . c m S C I . c m 033 { 6
0007740 , 6 , 0 , 5 4 } p ' 033 @ P [ S C
0007760 I . c m . ] { 6 , 6 , 0 , 5 4 }
0010000 w d y 1 2 0 0 , { 6 , 4 , 2 0 0
0010020 , 2 0 0 } i ' \r g e t " S c i
0010040 341 341 C I . d e c l " 033 { 6 , 4 ,
0010060 2 0 0 , 2 1 6 } p ' 033 @ P [ s c
0010100 i . b c p l . ] { 6 , 4 , 0 , 1
0010120 4 6 4 5 } w d y 1 2 2 6 , { 6 ,
0010140 2 , 1 2 7 7 3 , 1 2 7 7 3 } i '
0010160 \r t e s t t o k e n > > C 341 S
0010200 t r i n g . c h a r ^ 1 e q
0010220 $ E \r i f s o W s ( " 341
0010240 o u t , " 177 { 6 , 2 , 1 2 7 7
0010260 3 , 1 2 7 7 3 } i ' \r P u t T e
0010300 m p l a t e ( o u t , " $ C
0010320 $ 177 { 6 , 2 , 1 2 7 7 3 , 1 3 0
0010340 2 1 } d { 6 , 2 , 1 2 7 7 3 , 1
0010360 2 7 7 3 } i ' \r P u t s ( o u t
0010400 , t o k e n > > S t r i n g .
0010420 c h a r ^ 1 ) \r P u t s ( o u t
0010440 , $ * S \r 341 ) \r f o r i =
0010460 2 t o l e n 341 341 341 t o k e
0010500 n > > S t r i n g . l e n g t h
0010520 d o \r P u t s ( o u t ,
0010540 t o k e n > > S t r i n g . a
0010560 h c 341 341 341 c h a r ^ i ) ( 341 033 {
0010600 1 , 2 , 1 3 1 6 3 , 1 3 2 4 4 }
0010620 d { 1 , 2 , 1 3 1 6 3 , 1 3 1 6
0010640 4 } i { 1 , 2 , 1 5 0 6 0 , 1 5
0010660 0 7 6 } 033 { 6 , 2 , 1 5 0 4 4 ,
0010700 1 5 0 4 5 } r ' \r 033 { 6 , 2 , 1
0010720 3 5 2 0 , 1 3 5 2 0 } i ' \r i f
0010740 341 341 341 i f t o k e n > > S t
0010760 i r n g 367 S t r i n g . c h a r
0011000 ^ 2 e q 0 & 177 { 6 , 2 ,
0011020 1 3 5 2 0 , 1 3 5 2 0 } i ' \r l
0011040 e t c 2 = 033 { 6 , 2 , 1 3
0011060 5 2 0 , 1 3 5 3 1 } a { 7 , 2 ,
0011100 1 3 5 3 6 , 1 3 5 6 1 } 033 { 6 ,
0011120 2 , 1 3 5 5 6 , 1 3 5 5 6 } i '
0011140 \r l e t c 3 = t o k e n >
0011160 > S t r i n g . c h a r ^ 3 033 {
0011200 7 , 2 , 1 3 6 2 0 , 1 3 6 4 2 }
0011220 r ' t 033 { 6 , 2 , 1 3 6 3 2 , 1
0011240 3 6 3 2 } i ' 177 { 6 , 2 , 1 3 6
0011260 2 0 , 1 3 6 2 0 } r ' c 033 { 6 ,
0011300 2 , 1 3 6 2 6 , 1 3 6 2 6 } i '
0011320 $ * 033 { 6 , 2 , 1 3 6 2 7 , 1 3
0011340 6 2 7 } d { 6 , 2 , 1 3 6 3 3 ,
0011360 1 3 6 3 3 } i ' c 3 g e $ 177
0011400 { 6 , 2 , 1 3 5 2 0 , 1 3 5 2 0
0011420 } i ' \r f o r i 367 367 l e t
0011440 n u m b e r = 0 \r f o r i
0011460 = 1 341 341 2 t o t o k e
0011500 n > > S r i n g 341 341 341 341 t r i n
0011520 g . l e n g t h d o \r n u m b
0011540 e r = n u m b e r * 1 0 +
0011560 t o k e n > > S t r i n g . c h
0011600 a r ^ i 033 { 7 , 2 , 1 3 6 0 5 ,
0011620 1 3 6 1 2 } i ' 033 { 1 , 2
0011640 , 1 3 6 6 1 , 1 4 0 0 2 } d { 6
0011660 , 2 , 1 3 6 6 0 , 1 3 6 6 0 } i
0011700 ' \r i f n u m b e r 033 { 7 , 2
0011720 , 1 3 5 2 5 , 1 3 5 3 2 } r ' p
0011740 o i 341 341 i n 033 { 7 , 2 , 1 3 6 0
0011760 5 , 1 3 6 1 2 } 033 { 7 , 2 , 1 3
0012000 6 1 3 , 1 3 6 2 0 } 033 { 7 , 2 ,
0012020 1 3 6 5 3 , 1 3 6 6 0 } 033 { 6 ,
0012040 2 , 1 3 6 5 6 , 1 3 6 5 6 } i '
0012060 g r 341 e 1 & p i n l e
0012100 5 0 341 341 5 0 t h e n 033 { 6 ,
0012120 2 , 1 3 5 3 4 , 1 3 5 3 4 } i '
0012140 \r c o n n 367 177 { 7 , 2 , 1 3 5 2
0012160 5 , 1 3 5 2 7 } r ' n u m b e r
0012200 033 { 7 , 2 , 1 3 6 1 1 , 1 3 6 1
0012220 3 } 033 { 7 , 2 , 1 3 6 2 2 , 1 3
0012240 6 2 4 } 033 { 7 , 2 , 1 3 6 6 5 ,
0012260 1 3 6 6 7 } 033 { 7 , 2 , 1 3 7 0
0012300 3 , 1 3 7 0 5 } 033 { 6 , 2 , 1 3
0012320 5 4 0 , 1 3 5 4 0 } d { 6 , 2 ,
0012340 1 3 6 6 0 , 1 3 6 6 0 } i ' \r \r
0012360 l e t p 341 t o p 341 341 341 s i d e
0012400 , p i n 341 341 341 341 341 341 341 341 341 c o
0012420 n n , s i d e , p i n =
0012440 n i l , n i l , n i l 033 { 6
0012460 , 2 , 1 3 7 7 0 , 1 3 7 7 0 } i
0012500 ' \r [ c o n n = $ 1
0012520 ; s i d e = $ T ; p i n
0012540 = n u m b e r ] \r i f n
0012560 u m b e r g e 5 1 & p 341
0012600 341 n 341 n u m b e r l e 1 0
0012620 0 t h e n \r [ c o n n
0012640 = 2 ; s i d e = $ T ;
0012660 033 { 6 , 2 , 1 4 1 2 4 , 1 4 1 2
0012700 4 } i ' $ 033 { 6 , 2 , 1 4 1 4 2
0012720 , 1 4 1 4 2 } i ' p i n =
0012740 n u m b e r - 5 0 033 { 6 , 2
0012760 , 1 4 1 5 7 , 1 4 1 5 7 } d { 6
0013000 , 2 , 1 4 1 6 0 , 1 4 1 6 0 } d
0013020 { 6 , 2 , 1 4 1 6 2 , 1 4 1 6 2
0013040 } i ' ] \r i f n u m b e r
0013060 g e 1 0 1 & n u m b e r
0013100 l e 1 5 0 t h e n \r [
0013120 c o n n = $ 1 ; s i d e
0013140 = $ B ; p i n = n u m
0013160 b e r 341 - 1 0 0 ] \r i f n
0013200 u m b e r g e 1 5 1 & n
0013220 u m b e r l e 2 0 0 t h e
0013240 n \r [ \r 341 c o n n =
0013260 $ 2 ; s i d e = $ z B 341 341
0013300 B 341 ; i 341 p i n = n u m
0013320 b e r 341 - 1 5 0 ] 033 { 6 , 2
0013340 , 1 4 4 3 4 , 1 4 4 3 4 } i ' \r
0013360 033 { 6 , 2 , 1 3 6 6 1 , 1 3 6 6
0013400 1 } d { 6 , 2 , 1 4 4 3 4 , 1 4
0013420 4 3 4 } i ' P u t T e m p l a t
0013440 e ( o u t , " P $ C - $ C $
0013460 D " ) 341 , c o n n , s i d e
0013500 , p i n ) 033 { 6 , 2 , 1 4 4 6
0013520 7 , 1 4 4 6 7 } i ' 033 { 6 , 2
0013540 , 1 5 0 3 2 , 1 5 0 3 2 } i ' \r
0013560 033 { 1 , 2 , 1 5 0 3 3 , 1 5 0 3
0013600 3 } i { 1 , 2 , 1 3 5 2 1 , 1 3
0013620 6 6 0 } 033 { 6 , 2 , 1 5 1 7 3 ,
0013640 1 5 1 7 3 } i ' 033 { 1 , 2 , 1 5
0013660 1 7 3 , 1 5 3 3 3 } d { 6 , 2 ,
0013700 1 5 0 3 2 , 1 5 0 3 2 } i ' \r /
0013720 / t h i s a s s u m e s t
0013740 w o D B 3 7 c o n n e c t o
0013760 r s a r e p l u g g e d i
0014000 n . / 341 341 . . . 033 { 1 , 2 , 1 5
0014020 0 3 3 , 1 5 1 2 0 } d { 1 , 2 ,
0014040 1 5 1 7 3 , 1 5 1 7 4 } i ' 033 {
0014060 1 , 2 , 1 5 1 7 3 , 1 5 2 6 0 }
0014100 i ' \r 033 { 6 , 2 , 1 5 2 6 1 , 1
0014120 5 2 6 1 } i ' \r i f n u m b e
0014140 r g e 5 1 & n u m b e r
0014160 l e 8 7 t h e n \r [
0014200 033 { 6 , 2 , 1 5 1 7 3 , 1 5 1
0014220 7 3 } i ' \r l e t p i n 367 c o
0014240 n n , p i n = n i l , 341 ,
0014260 n i l 033 { 6 , 2 , 1 5 3 6 4 ,
0014300 1 5 3 6 4 } i ' c o n n = $
0014320 2 ; p i n = 367 n u m b e r
0014340 = n u m b e r - 5 0 033 { 7 ,
0014360 2 , 1 5 3 7 7 , 1 5 4 0 4 } r '
0014400 p i n 033 { 6 , 2 , 1 5 3 1 2 , 1
0014420 5 3 1 2 } i ' \r i f n u m b e
0014440 r g e 1 & n u m b e r
0014460 l e 5 0 t h e n \r
0014500 341 341 341 [ c o n n = $ 1 ;
0014520 p i n = n u m b e r ] 033
0014540 { 6 , 2 , 1 5 5 2 0 , 1 5 5 2 0
0014560 } i ' [ 341 ] \r 033 { 1 , 2 , 1 5
0014600 2 2 5 , 1 5 3 1 2 } d { 1 , 2 ,
0014620 1 5 4 3 6 , 1 5 4 3 7 } i ' 033 {
0014640 6 , 2 , 1 5 5 2 3 , 1 5 5 2 3 }
0014660 i ' \r p i n = s w i 341 341 341 s
0014700 e l e c t o n p i n i n t o
0014720 \r [ \r c a s e 1 :
0014740 1 9 033 { 1 , 2 , 1 5 5 2 4 , 1
0014760 5 5 7 6 } r ' 177 { 1 , 2 , 1 5 5
0015000 2 4 , 1 5 5 7 6 } d { 6 , 2 , 1
0015020 5 5 2 3 , 1 5 5 2 3 } i ' \r i f
0015040 p i n g e 1 & p i n
0015060 l e 6 9 341 341 1 9 t h e n p
0015100 i n = 1 9 - p i n \r i f p
0015120 i n g e 2 0 & p i n l
0015140 e 3 7 t h e n p i n - 341
0015160 = \r 033 { 6 , 2 , 1 3 6 6 0 , 1
0015200 3 6 6 0 } i ' \r 033 { 6 , 2 , 1 4
0015220 4 3 4 , 1 4 4 3 4 } i ' \r 033 { 6
0015240 , 2 , 1 5 6 4 5 , 1 5 6 4 5 } i
0015260 ' \r P u t T e m p l a t e ( o u
0015300 t , " J $ C $ D " , c o
0015320 n n , 341 341 , p i n ) 033 { 6 ,
0015340 2 , 1 5 6 4 4 , 1 5 6 4 4 } i '
0015360 p i n + \b \b \b \b \b \b 2 0 +
0015400 \b \b \b \b \b 5 7 - p i n 033 { 6 ,
0015420 2 , 1 5 6 4 4 , 1 5 6 5 1 } p '
0015440 033 @ P [ s c i 1 . b c p l . ] {
0015460 6 , 2 , 0 , 2 7 7 2 6 } q \r @ E
0015500 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0
*
0016000