Ignore IntelliJ project files
[fifth.git] / imageFile / f / 5TH_AUTORUN
1 D> \listF\listLIB\5TH_GFX include\r
2 D> \listF\5TH_LOGO include\r
3 \r
4 : tmpmsg 200000 100 do\r
5         dup c@ dup FC = if drop doexit else emit 1+ then\r
6 loop drop ;\r
7 .( Messages from core: )\r
8 colhigh\r
9 tmpmsg\r
10 colnorm\r
11 forget tmpmsg\r
12 \r
13 \r
14 D> \listF\listLIB\5TH_DRVKBD include\r
15 D> \listF\listLIB\5TH_UICMD include\r
16 D> \listF\5TH_QUICKPATH include\r
17 \r
18 Dstr \listF\5TH_ET" tmpstr\r
19 : lde tmpstr include ; rh tmpstr\r
20 \r
21 Dstr \listF\TXT_HELP" tmpstr\r
22 : help tmpstr fs. ; rh tmpstr\r
23 \r
24 Dstr \listF\5TH_BOOT" tmpstr\r
25 : putboot\r
26 tmpstr fsDloadnew\r
27 dup dynp [ 400 4 * ] [ 400 20 * ] disksave\r
28 dynde ; rh tmpstr\r
29 \r
30 fslsr\r
31 \r
32 .( type 'help' to get help )\r