Text Window Input-Output Control

version 2 by Erik Temple

  • Home page
  • Beginning
  • Previous



  • Chapter - Hacked yes-no question routine

    Include (-

    [ YesOrNo i j;
    for (::) {
        RunParagraphOn();
    ProcessRulebook( (+ yes-no prompting rules +) );

        KeyboardPrimitive(buffer, parse);
    j = parse-->0;

    if (j) { ! at least one word entered
    i = parse-->1;
    if (i == YES1__WD or YES2__WD or YES3__WD) rtrue;
    if (i == NO1__WD or NO2__WD or NO3__WD) rfalse;
    }
    L__M(##Quit, 1);
    }
    ];

    -) instead of "Yes/No Questions" in "Parser.i6t"



    Text Window Input-Output Control ends here.