NOTE MLwiN macro code generated by MLPowSim
NOTE b23 - number of units
ERASE c1011 c1012
GENErate 1 b23 c1
PUT b23 1 c4
PUT b23 1 c5
NAME c1 'l1id' c4 'cons' c5 'resp'
CLEAr
RESP c5
IDEN 1 c1
EXPL 1 c4
SETV 1 c4
ERROR 0
URAN b41 c501
CALC c501 = (c501-0.5)*0.08
PICK 1 c998 b51
CALC c501 = c501+b51
URAN b41 c502
CALC c502 = (c502-0.5)*0.4
PICK 1 c996 b51
CALC c502 = c502+b51
BATCH 1
LOOP b40 1 b41
    PICK b40 c501 b51
    EDIT 1 c1098 b51
    PICK b40 c502 b51
    EDIT 1 c1096 b51
    PUT b23 1 c5
    SIMU c5
    METH 1
    START
    JOIN c1098 c1096 c1011 c1011
    SEPICK c1001
    JOIN c1001 c1012 c1012
ENDL
OBEY analyse.txt
PAUSE 1