Lines Matching full:addr
170 : +c! ( N C-ADDR/U K -- C-ADDR/U )
171 3 pick 3 pick ( n c-addr/u k -- n c-addr/u k n c-addr )
172 rot + c! ( n c-addr/u k n c-addr -- n c-addr/u )
173 rot drop ( n c-addr/u -- c-addr/u )
179 : namespace ( C-ADDR/U N -- ) also menu-namespace +c! evaluate previous ;
180 : menukeyN ( N -- ADDR ) s" menukeyN" 7 namespace ;
181 : init_stateN ( N -- ADDR ) s" init_stateN" 10 namespace ;
182 : toggle_stateN ( N -- ADDR ) s" toggle_stateN" 12 namespace ;
183 : cycle_stateN ( N -- ADDR ) s" cycle_stateN" 11 namespace ;
184 : init_textN ( N -- C-ADDR ) s" init_textN" 9 namespace ;
187 : kernel[x] ( N -- C-ADDR/U ) s" kernel[x]" 7 +c! ;
188 : menu_init[x] ( N -- C-ADDR/U ) s" menu_init[x]" 10 +c! ;
189 : menu_command[x] ( N -- C-ADDR/U ) s" menu_command[x]" 13 +c! ;
190 : menu_caption[x] ( N -- C-ADDR/U ) s" menu_caption[x]" 13 +c! ;
191 : ansi_caption[x] ( N -- C-ADDR/U ) s" ansi_caption[x]" 13 +c! ;
192 : menu_keycode[x] ( N -- C-ADDR/U ) s" menu_keycode[x]" 13 +c! ;
193 : toggled_text[x] ( N -- C-ADDR/U ) s" toggled_text[x]" 13 +c! ;
194 : toggled_ansi[x] ( N -- C-ADDR/U ) s" toggled_ansi[x]" 13 +c! ;
195 : menu_caption[x][y] ( N M -- C-ADDR/U ) s" menu_caption[x][y]" 16 +c! 13 +c! ;
196 : ansi_caption[x][y] ( N M -- C-ADDR/U ) s" ansi_caption[x][y]" 16 +c! 13 +c! ;
248 : acpimenuitem ( -- C-Addr/U | -1 )
296 then ( -- c-addr/u )
316 then ( c-addr/u -- c-addr/u c-addr/u,-1 | 0 )
338 over c@ delim? ( c-addr/u -- c-addr/u bool )
340 false ( c-addr/u -- c-addr/u bool )
343 1- swap 1+ swap ( c-addr/u -- c-addr'/u' )
345 ( c-addr/u -- c-addr'/u' )
348 2drop ( c-addr/u -- )
356 then ( -- c-addr/u )
361 2dup ( c-addr/u -- c-addr/u c-addr/u )
367 1- swap 1+ swap \ c-addr++ u--
370 2drop ( c-addr/u c-addr'/u' -- c-addr/u )
382 ( c-addr/u -- c-addr'/u' )
387 over kernlen @ ( c-addr/u -- c-addr/u c-addr/u2 )
411 2drop ( c-addr/u c-addr/u2 -- c-addr/u )
414 2drop ( c-addr/u -- ) exit
417 kernlen @ - swap kernlen @ + swap ( c-addr/u -- c-addr'/u' )
427 [char] 0 s" (Y of Z)" ( x -- x y c-addr/u )
477 2drop ( c-addr/u ) drop ( bool )
481 2drop ( c-addr/u ) drop ( bool )
484 else ( 2 ) 2drop ( c-addr/u ) then ( 1 ) then
565 ( n y y n n c-addr/u -- n y )
571 ( n y y n n c-addr/u -- n y )
626 dup acpimenuitem ( n -- n n c-addr/u | n n -1 )
628 13 +c! ( n n c-addr/u -- n c-addr/u )
661 printmenuitem ( c-addr/u -- n )
698 s" Autoboot in N seconds. [Space] to pause" ( n -- n c-addr/u )
701 rot 48 + -rot ( n c-addr/u -- n' c-addr/u ) \ convert to ASCII
702 12 +c! ( n' c-addr/u -- c-addr/u ) \ replace 'N' above
705 type ( c-addr/u -- ) \ print message
708 spaces ( n c-addr/u -- n c-addr ) \ erase message
709 2drop ( n c-addr -- )
739 ( re-assign: N N Addr -- N )
745 0 menu_timeout ! ( 0 Addr -- )
746 0 menu_timeout_enabled ! ( 0 Addr -- )
840 2 pick ( n c-addr/u -- n c-addr/u n )
841 init_textN ( n c-addr/u n -- n c-addr/u c-addr )
843 \ now we have the buffer c-addr on top
844 \ ( followed by c-addr/u of current caption )
849 rot 1+ \ bring alt addr to top and increment
850 -rot -rot \ bring buffer addr to top
852 1+ \ increment buffer addr
856 2drop \ buffer len/addr
857 drop \ alt addr
884 2 pick ( n c-addr/u -- n c-addr/u n ) \ key pressed
900 dup init_textN count ( n -- n c-addr/u )
903 2 pick ( n c-addr/u -- n c-addr/u n ) \ key pressed
930 dup 48 + ( n addr k -- n addr k k' )
933 3 pick swap ( n addr k k' -- n addr k n k' ) \ (n,k') as (x,y)
939 ( n addr k n k' -- n addr k c-addr/u )
948 drop ( n addr k -1 -- n addr k ) \ getenv cruft
949 drop 0 ( n addr k -- n addr 0 ) \ new value to store later
951 2 pick [char] 0 ( n addr 0 -- n addr 0 n 48 ) \ (n,48) as (x,y)
957 ( n addr 0 n 48 -- n addr 0 c-addr/u )
969 \ addr - address of our internal cycle_stateN variable
971 \ c-addr/u - string value we intend to store to menu_caption[x]
977 4 pick ( n addr k c-addr/u -- n addr k c-addr/u n )
985 swap ! ( n addr k -- n ) \ update array state variable
1059 s" menu_timeout_command" getenv -1 <> if ( Addr C -1 -- | Addr )
1060 drop ( just testing existence right now: Addr -- )