F.I.G. Forth

* FIG FORTH FOR SERIES-16 MACHINES PAGE 62

2541 * =<FNUL,3>,'U' 2542 02206 151505 VFD 8,'323,8,'105 ='SE' 2543 02207 0 002200 DAC LINK 2544 002205 LINK SET TLNK 2545 02210 0 10 00146 USE JST DOUS 2546 02211 000035 OCT 35 2547 * 2548 * **** PREV **** 2549 * HEAD FNUL,PREV,PREV,DOUS 2550 002212 TLNK SET * 2551 02212 002320 VFD 1,0,1,FNUL,6,4,8,'320 2552 * =<FNUL,4>,'P' 2553 02213 151305 BCI 1,RE 2554 02214 053000 VFD 8,'126 ='V' 2555 02215 0 002205 DAC LINK 2556 002212 LINK SET TLNK 2557 02216 0 10 00146 PREV JST DOUS 2558 02217 000036 OCT 36 2559 * 2560 *END OF USER AREA 2561 * 2562 EJCT