proc main
init n0 55
assign s0 "afs4713.dw0 "
assign s1 "dhs3bcn.dw1 "
assign s2 "bdi.dw2"
assign s3 "afscom.dw3 "
assign s4 " "
assign s9 "\a51\afsv42\afsv42.hex"
execute "\afsapl\afsmnu"
endproc