set device to print
@  1,  4  SAY "VILLAGE  HHNUM     RESPONDENT        DATE     ROUND"
@  2,  4  GET  USED->VILLAGE
@  2, 15  GET  USED->HHNUM
@  2, 21  GET  USED->RESPONDENT
@  2, 39  GET  USED->DATE
@  2, 52  GET  USED->ROUND
@  4,  0  SAY "NAME of the field:"
@  4, 19  GET  USED->NAME
@  4, 46  SAY "GONA(g/f):"
@  4, 57  GET  USED->GONA
@  4, 61  SAY "SOIL:"
@  4, 67  GET  USED->SOIL
@  5,  0  SAY "Still on field?      Product         Amount      Measured in"
@  6,  2  SAY "(ONFARM#)          (ITEM#)        (QUANT#)       (UNIT#)"
@  7,  1  SAY "1."
@  7,  6  GET  USED->ONFARM1
@  7, 18  GET  USED->ITEM1
@  7, 37  GET  USED->QUANT1
@  7, 47  GET  USED->UNIT1
@  9,  1  SAY "2."
@  9,  6  GET  USED->ONFARM2
@  9, 18  GET  USED->ITEM2
@  9, 37  GET  USED->QUANT2
@  9, 47  GET  USED->UNIT2
@ 11,  1  SAY "3."
@ 11,  6  GET  USED->ONFARM3
@ 11, 18  GET  USED->ITEM3
@ 11, 37  GET  USED->QUANT3
@ 11, 47  GET  USED->UNIT3
@ 13,  1  SAY "4."
@ 13,  6  GET  USED->ONFARM4
@ 13, 18  GET  USED->ITEM4
@ 13, 37  GET  USED->QUANT4
@ 13, 47  GET  USED->UNIT4
@ 15,  1  SAY "5."
@ 15,  6  GET  USED->ONFARM5
@ 15, 18  GET  USED->ITEM5
@ 15, 37  GET  USED->QUANT5
@ 15, 47  GET  USED->UNIT5
@ 17,  1  SAY "6."
@ 17,  6  GET  USED->ONFARM6
@ 17, 18  GET  USED->ITEM6
@ 17, 37  GET  USED->QUANT6
@ 17, 47  GET  USED->UNIT6
@ 19,  1  SAY "7."
@ 19,  6  GET  USED->ONFARM7
@ 19, 18  GET  USED->ITEM7
@ 19, 37  GET  USED->QUANT7
@ 19, 47  GET  USED->UNIT7
@ 21,  1  SAY "8."
@ 21,  6  GET  USED->ONFARM8
@ 21, 18  GET  USED->ITEM8
@ 21, 37  GET  USED->QUANT8
@ 21, 47  GET  USED->UNIT8
READ
@  2,  0  SAY "Expenditures on:"
@  4,  0  SAY "TRACTOR :"
@  4, 11  GET  USED->TRACTOR
@  5,  0  SAY "CHEMICALS:"
@  5, 12  GET  USED->CHEMICALS
@  6,  0  SAY "LABOUR:"
@  6,  9  GET  USED->LABOUR
@  7,  0  SAY "TRANSPORT:"
@  7, 12  GET  USED->TRANSPORT
@  8,  0  SAY "OTHERS:"
@  8,  9  GET  USED->OTHERS
@  9,  0  SAY "OWNLABOUR:"
@  9, 12  GET  USED->OWNLABOUR
@ 11,  6  SAY "PROBLEM faced:       Is it ALWAYS faced?   Is it WORSE this year?"
@ 13,  0  SAY "1."
@ 13,  5  GET  USED->PROBLEM1
@ 13, 35  GET  USED->ALWAYS1
@ 13, 57  GET  USED->WORSE1
@ 15,  0  SAY "2."
@ 15,  5  GET  USED->PROBLEM2
@ 15, 35  GET  USED->ALWAYS2
@ 15, 57  GET  USED->WORSE2
@ 17,  0  SAY "3."
@ 17,  5  GET  USED->PROBLEM3
@ 17, 35  GET  USED->ALWAYS3
@ 17, 57  GET  USED->WORSE3
READ
@  2,  3  SAY "Does he OWN this farm (y/n)?"
@  2, 32  GET  USED->OWN
@  4,  2  SAY "Things given to the owner of the land:"
@  6,  6  SAY "Item given OUT:      VALUE:     TIME given out:"
@  8,  0  SAY "1."
@  8,  6  GET  USED->OUT1
@  8, 27  GET  USED->VALUE1
@  8, 38  GET  USED->TIME1
@ 10,  0  SAY "2."
@ 10,  6  GET  USED->OUT2
@ 10, 27  GET  USED->VALUE2
@ 10, 38  GET  USED->TIME2
@ 12,  0  SAY "3."
@ 12,  6  GET  USED->OUT3
@ 12, 27  GET  USED->VALUE3
@ 12, 38  GET  USED->TIME3