/* u2_term_ef_boil(): initial effects for loaded servers. */ void u2_term_ef_boil(c3_l ono_l) { if ( ono_l ) { u2_noun tid_l; for ( tid_l = 2; tid_l <= ono_l; tid_l++ ) { u2_noun tin = u2_dc("scot", c3__ud, tid_l); u2_noun pax = u2nq(c3__gold, c3__term, tin, u2_nul); u2_noun hud = u2nc(c3__wipe, u2_nul); u2_reck_plan(u2A, pax, hud); } } { u2_noun pax = u2nq(c3__gold, c3__term, '1', u2_nul); // u2_reck_plan(u2A, u2k(pax), u2nc(c3__init, u2k(u2h(u2A->own)))); u2_reck_plan(u2A, u2k(pax), u2nc(c3__blew, u2_term_get_blew(1))); u2_reck_plan(u2A, u2k(pax), u2nc(c3__hail, u2_nul)); u2z(pax); } }
/* u2_term_ef_winc(): window change. Just console right now. */ void u2_term_ef_winc(void) { u2_noun pax = u2nq(c3__gold, c3__term, '1', u2_nul); u2_reck_plan(u2A, pax, u2nc(c3__blew, u2_term_get_blew(1))); }
/* u2_term_ef_winc(): window change. Just console right now. */ void u2_term_ef_winc(void) { u2_noun pax = u2nq(u2_blip, c3__term, '1', u2_nul); u2_proc_plan(u2A, pax, u2nc(c3__blew, u2_term_get_blew(1))); }
/* u2_term_ef_bake(): initial effects for new terminal. */ void u2_term_ef_bake(u2_noun fav) { u2_noun pax = u2nq(c3__gold, c3__term, '1', u2_nul); u2_reck_plan(u2A, u2k(pax), u2nc(c3__boot, fav)); u2_reck_plan(u2A, u2k(pax), u2nc(c3__blew, u2_term_get_blew(1))); u2_reck_plan(u2A, u2k(pax), u2nc(c3__hail, u2_nul)); u2z(pax); }
/* u2_term_ef_boil(): initial effects for loaded servers. */ void u2_term_ef_boil(void) { { u2_noun pax = u2nq(u2_blip, c3__term, '1', u2_nul); // u2_proc_plan(u2A, u2k(pax), u2nc(c3__init, u2k(u2h(u2A->own)))); u2_proc_plan(u2A, u2k(pax), u2nc(c3__harm, u2_nul)); u2_proc_plan(u2A, u2k(pax), u2nc(c3__blew, u2_term_get_blew(1))); u2_proc_plan(u2A, u2k(pax), u2nc(c3__hail, u2_nul)); u2z(pax); } }
/* u2_lo_punt(): dump tank list. */ void u2_lo_punt(c3_l tab_l, u2_noun tac) { u2_noun blu = u2_term_get_blew(0); c3_l col_l = u2h(blu); u2_noun cat = tac; // We are calling nock here, but hopefully need no protection. // while ( u2_yes == u2_cr_du(cat) ) { u2_noun wol = u2_dc("wash", u2nc(tab_l, col_l), u2k(u2h(cat))); _lo_wall(u2_Arv, wol); cat = u2t(cat); } u2z(tac); u2z(blu); }