t_stat
ng_boot(int32 unit, DEVICE *dptr)
{
t_stat r;
set_cmd (0, "CPU 56K");
set_cmd (0, "NG TYPE=LOGO");
set_cmd (0, "PCLK ENABLED");
set_cmd (0, "KE ENABLED");
set_cmd (0, "RF ENABLED");
attach_cmd (0, "RF dummy");
sim_set_memory_load_file (BOOT_CODE_ARRAY, BOOT_CODE_SIZE);
r = load_cmd (0, BOOT_CODE_FILENAME);
sim_set_memory_load_file (NULL, 0);
cpu_set_boot (0400);
sim_printf ("List of 11LOGO commands:\n");
sim_printf (
"AND, BACK, BUTFIRST, BUTLAST, COUNT, CTF, DIFFERENCE, DISPLAY, DO,\n"
"EDIT, ELSE, EMPTYP, END, EQUAL, ERASETRACE, FIRST, FORWARD, FPRINT,\n"
"FPUT, GO, GREATER, HEADING, HERE, HIDETURTLE, HOME, IF, KILLDISPLAY,\n"
"LAMPOFF, LAMPON, LAST, LEFT, LESS, LEVEL, LIST, LISTP, LPUT, MAKE,\n"
"MOD, NEWSNAP, NUMBERP, OF, OUTPUT, PENDOWN, PENUP, PRINT, PRODUCT,\n"
"QUOTIENT, REQUEST, RIGHT, RUG, SENTENCE, SETHEADING, SETTURTLE, SETX,\n"
"SETXY, SETY, SHOW, SHOWTURTLE, SNAP, STARTDISPLAY, STF, STOP, SUM,\n"
"THEN, TO, TOOT, TRACE, TYPE, VERSION, WIPE, WIPECLEAN, WORD, WORDP,\n"
"XCOR, YCOR.\n\n");
sim_printf ("MIT AI memo 315 documents a later version of 11LOGO but may be helpful\n");
sim_printf ("in exploring the software. It can currently be found here:\n");
sim_printf ("https://dspace.mit.edu/handle/1721.1/6228\n\n");
sim_printf ("To get started with turtle graphics, type STARTDISPLAY.\n\n\n");
return r;
}
void
ICR::pulser::RPL2::set_external_trigger()
{
detach_cmd(m_int_trig);
attach_cmd(m_ext_trig);
}
