- writememory(getadr(obuf, pass), ptr++, pass);
- /* LD GR2,OLEN */
- writememory(0x1020, ptr++, pass);
- writememory(getadr(len, pass), ptr++, pass);
+ writememory(getadr(prog, obuf, pass), ptr++, pass);
+ /* LAD GR2,OLEN */
+ writememory(0x1220, ptr++, pass);
+ writememory(getadr(prog, len, pass), ptr++, pass);