set device to print
@  1, 23  SAY "KAYAN MATA-Each Record is a Woman"
@  3,  4  SAY "VILLAGE   HHNUM    RESPONDENT       DATE      ROUND  WIFENUM"
@  4,  4  GET  KM->VILLAGE
@  4, 15  GET  KM->HHNUM
@  4, 21  GET  KM->RESPONDENT
@  4, 39  GET  KM->DATE
@  4, 52  GET  KM->ROUND
@  4, 60  GET  KM->WIFENUM
@  6,  2  SAY "Kayan Ado      Number at  Value at  Number   Price   Value"
@  7, 17  SAY "Marriage   Marriage   Now    New Now   Now"
@  8,  0  GET  KM->ADO1
@  8, 19  GET  KM->OLDNUM1
@  8, 29  GET  KM->OLDVAL1
@  8, 39  GET  KM->NOWNUM1
@  8, 47  GET  KM->NOWPRICE1
@  8, 55  GET  KM->NOWVAL1
@ 10,  0  GET  KM->ADO2
@ 10, 19  GET  KM->OLDNUM2
@ 10, 29  GET  KM->OLDVAL2
@ 10, 39  GET  KM->NOWNUM2
@ 10, 47  GET  KM->NOWPRICE2
@ 10, 55  GET  KM->NOWVAL2
@ 12,  0  GET  KM->ADO3
@ 12, 19  GET  KM->OLDNUM3
@ 12, 29  GET  KM->OLDVAL3
@ 12, 39  GET  KM->NOWNUM3
@ 12, 47  GET  KM->NOWPRICE3
@ 12, 55  GET  KM->NOWVAL3
@ 14,  0  GET  KM->ADO4
@ 14, 19  GET  KM->OLDNUM4
@ 14, 29  GET  KM->OLDVAL4
@ 14, 39  GET  KM->NOWNUM4
@ 14, 47  GET  KM->NOWPRICE4
@ 14, 55  GET  KM->NOWVAL4
@ 16,  0  GET  KM->ADO5
@ 16, 19  GET  KM->OLDNUM5
@ 16, 29  GET  KM->OLDVAL5
@ 16, 39  GET  KM->NOWNUM5
@ 16, 47  GET  KM->NOWPRICE5
@ 16, 55  GET  KM->NOWVAL5
@ 17,  0  GET  KM->ADO6
@ 17, 19  GET  KM->OLDNUM6
@ 17, 29  GET  KM->OLDVAL6
@ 17, 39  GET  KM->NOWNUM6
@ 17, 47  GET  KM->NOWPRICE6
@ 17, 55  GET  KM->NOWVAL6
@ 18,  0  GET  KM->ADO7
@ 18, 19  GET  KM->OLDNUM7
@ 18, 29  GET  KM->OLDVAL7
@ 18, 39  GET  KM->NOWNUM7
@ 18, 47  GET  KM->NOWPRICE7
@ 18, 55  GET  KM->NOWVAL7
@ 19,  0  GET  KM->ADO8
@ 19, 19  GET  KM->OLDNUM8
@ 19, 29  GET  KM->OLDVAL8
@ 19, 39  GET  KM->NOWNUM8
@ 19, 47  GET  KM->NOWPRICE8
@ 19, 55  GET  KM->NOWVAL8
@ 20,  0  GET  KM->ADO9
@ 20, 19  GET  KM->OLDNUM9
@ 20, 29  GET  KM->OLDVAL9
@ 20, 39  GET  KM->NOWNUM9
@ 20, 47  GET  KM->NOWPRICE9
@ 20, 55  GET  KM->NOWVAL9
@ 21,  0  GET  KM->ADO10
@ 21, 19  GET  KM->OLDNUM10
@ 21, 29  GET  KM->OLDVAL10
@ 21, 39  GET  KM->NOWNUM10
@ 21, 47  GET  KM->NOWPRICE10
@ 21, 55  GET  KM->NOWVAL10
READ
@  1,  1  SAY "ANIMAL    Number when married   Number now"
@  3,  0  SAY "GUZOMA"
@  3, 19  GET  KM->GUZOMAOLD
@  3, 37  GET  KM->GUZOMA
@  5,  0  SAY "UWARGARKE"
@  5, 19  GET  KM->UWAROLD
@  5, 37  GET  KM->UWARGARKE
@  7,  0  SAY "KARSANA"
@  7, 19  GET  KM->KARSANAOLD
@  7, 37  GET  KM->KARSANA
@  9,  0  SAY "SA"
@  9, 19  GET  KM->SAOLD
@  9, 37  GET  KM->SA
@ 11,  0  SAY "DANMARAKI"
@ 11, 19  GET  KM->DANOLD
@ 11, 37  GET  KM->DANMARAKI
@ 13,  0  SAY "YARMARAKA"
@ 13, 19  GET  KM->YAROLD
@ 13, 37  GET  KM->YARMARAKA
@ 15,  0  SAY "NOMA"
@ 15, 19  GET  KM->NOMAOLD
@ 15, 37  GET  KM->NOMA
@ 17,  0  SAY "RAGO"
@ 17, 19  GET  KM->RAGOOLD
@ 17, 37  GET  KM->RAGO
READ
@  1,  0  SAY "Animal      Number when married   Number now"
@  3,  0  SAY "TUNKIYA"
@  3, 20  GET  KM->TUNKIYAOLD
@  3, 37  GET  KM->TUNKIYA
@  5,  0  SAY "JAKI"
@  5, 20  GET  KM->JAKIOLD
@  5, 37  GET  KM->JAKI
@  7,  0  SAY "AKUYA"
@  7, 20  GET  KM->AKUYAOLD
@  7, 37  GET  KM->AKUYA
@  9,  0  SAY "TAURE"
@  9, 20  GET  KM->TAUREOLD
@  9, 37  GET  KM->TAURE
@ 11,  0  SAY "YAYAYE"
@ 11, 20  GET  KM->YAYAYEOLD
@ 11, 37  GET  KM->YAYAYE
@ 13,  0  SAY "How much SADAKA was paid for this wife?"
@ 13, 41  GET  KM->SADAKA
@ 15,  0  SAY "How many years ago were they MARRIED?"
@ 15, 38  GET  KM->MARRIED
@ 17,  0  SAY "Is this her FIRST marriage?"
@ 17, 28  GET  KM->FIRST
@ 19,  0  SAY "Her AGE:"
@ 19, 10  GET  KM->AGE
@ 21,  0  SAY "How much CASH does she have now?"
@ 21, 33  GET  KM->CASH