|
7 | 7 | // This file is part of Solo Forth
|
8 | 8 | // http://programandala.net/en.program.solo_forth.html
|
9 | 9 |
|
10 |
| -// Last modified: 202101042314. |
| 10 | +// Last modified: 202101061748. |
11 | 11 |
|
12 | 12 | // Description {{{1
|
13 | 13 | == Description
|
@@ -387,6 +387,28 @@ configured as double-sided and 80-track in the emulator.
|
387 | 387 | [#_run_trdos]
|
388 | 388 | === In TR-DOS
|
389 | 389 |
|
| 390 | +// tag::trdos_disk_drives[] |
| 391 | + |
| 392 | +[IMPORTANT] |
| 393 | +-- |
| 394 | +[#trdosdiskdrives] |
| 395 | +The TR-DOS version of Solo Forth uses numbers as disk drive |
| 396 | +identifiers (the same numbers TR-DOS uses internally) instead of the |
| 397 | +letters used by the TR-DOS BASIC interface: |
| 398 | + |
| 399 | +.TR-DOS disk drive identifiers |
| 400 | +|=== |
| 401 | +| Drive | In TR-DOS | In Solo Forth |
| 402 | + |
| 403 | +| 1st | A | 0 |
| 404 | +| 2nd | B | 1 |
| 405 | +| 3rd | C | 2 |
| 406 | +| 4th | D | 3 |
| 407 | +|=== |
| 408 | +-- |
| 409 | + |
| 410 | +// end::trdos_disk_drives[] |
| 411 | + |
390 | 412 | // tag::run_pentagon[]
|
391 | 413 |
|
392 | 414 | // On Pentagon 128 {{{3
|
@@ -530,19 +552,8 @@ configured as double-sided and 80-track in the emulator.
|
530 | 552 | Notice that the library is split into two disks because the maximun
|
531 | 553 | capacity of a TR-DOS disk is only 640 KiB.
|
532 | 554 |
|
533 |
| -Also notice that the TR-DOS version of Solo Forth uses numbers as disk |
534 |
| -drive identifiers (the same numbers TR-DOS uses internally) instead of |
535 |
| -the letters used by the TR-DOS BASIC interface: |
536 |
| - |
537 |
| -.TR-DOS disk drive identifiers |
538 |
| -|=== |
539 |
| -| Drive | In TR-DOS | In Solo Forth |
540 |
| - |
541 |
| -| 1st | A | 0 |
542 |
| -| 2nd | B | 1 |
543 |
| -| 3rd | C | 2 |
544 |
| -| 4th | D | 3 |
545 |
| -|=== |
| 555 | +Also remember in Solo Forth the <<trdosdiskdrives,TR-DOS disk drive |
| 556 | +identifiers>> are numbers 0..3 instead of letters A..D. |
546 | 557 | --
|
547 | 558 |
|
548 | 559 | 3. Type `1 set-drive throw` to make drive 1 (i.e. the second one,
|
|
0 commit comments