@] SKOLMAN_MWS ˇ agrEssOr [, post #2
<CHRP-BOOT> <COMPATIBLE> MacRISC MacRISC3 MacRISC4 </COMPATIBLE> <BOOT-SCRIPT> : my-max-boot-num 2 ; : my-boot-default 1 ; : my-boot-delay d# 100 ; \ unit = 100 ms : my-print-menu ( -- ) ." Boot selector menu" cr ." MorphOS " cr ." 1: MorphOS " cr ." 2: OSX " cr ; : my-boot-case ( num -- ) case 1 of " hd:2,\boot.img rd" endof 2 of " hd:6,\\:tbxi" endof endcase ['] $boot catch drop user-abort ; : my-input-num ( wait-period max-boot-num default-num -- boot-num ) 1 \ loop-inc = 1 3 pick 0 do 0d emit ." press 1-" ( wait-period max-boot-num default-num loop-inc ) 2 pick ascii 0 + emit dup 1 = if ." within " 3 pick i - d# 10 / .d ." seconds" then ." (default: " over ascii 0 + emit ." ) : " d# 100 ms key? if key ( wait-period max-boot-num default-num loop-inc key ) dup 0d = if \ return pressed drop leave then ascii 0 - ( wait-period max-boot-num default-num loop-inc num ) dup 1 5 pick ( wait-period max-boot-num default-num loop-inc num num 1 max-boot-num ) between if rot drop swap leave then ( wait-period max-boot-num default-num loop-inc num ) 2drop 0 \ loop-inc = 0 then dup +loop drop ( wait-period max-boot-num boot-num ) nip nip ; load-base release-load-area stdout @ 0 = if false to _normal-boot install-console then true to use-console? false to ignore-output? dev /multiboot flash-dev-icon-off device-end erase-screen my-print-menu my-boot-delay my-max-boot-num my-boot-default my-input-num my-boot-case </BOOT-SCRIPT>
Przytrzymanie lewego bądź prawego klawisza shift też nie pomaga?
Odepnij huba i zobacz z tymi klawiszami. Chociaż wątpie, że to przez huba.
@R-Tea, post #4
boot _nazwa_dysku_:,\boot.img bm
boot hd:,\boot.img bm
dev /aliases .properties
@] SKOLMAN_MWS ˇ agrEssOr [, post #18
@Norbert, post #16
Czekamy na odzew ze strony R-tea.
@R-Tea, post #22
Efekt jest połowiczny. Owszem, mam już boot menu, ale odpala się ono zawsze - nawet, gdy go nie chcę i niczego nie dotykam na klawiaturze czy myszce.