Fun with MouseText characters

13 replies [Last post]
mmphosis's picture
Offline
Joined: Aug 18 2005
Posts: 316

Inspired by Toolkitman and others ...

http://hoop-la.ca/apple2/2017/minos/

Enjoy! Wink

Comment viewing options

Select your preferred way to display the comments and click "Save settings" to activate your changes.
Toolkitman's picture
Offline
Joined: Nov 21 2010
Posts: 162
Re: Fun with MouseText characters

Really fine mmphosis!
i made something similar in Scratch programming lenguage one years ago have a look if this can be of any help the code is open source.

APPLE ][ like os in scratch

__________________

"gate gate paragate parasangate bodhi svahdl"
"Stay hungry, Stay Foolish!"
"Think Different"

macnoyd's picture
Offline
Joined: Oct 15 2012
Posts: 224
Re: Fun with MouseText characters

Very cool! Thanks for sharing!

__________________

macnoyd

Toolkitman's picture
Offline
Joined: Nov 21 2010
Posts: 162
Re: Fun with MouseText characters

mmphosis i have made a try to replicate something similar to your miniOS in Applesoft with ASCII characters for Apple //e this is the code:
if anyone want to implement it it's for free : ).

5 HOME<br />
10 PRINT "STARTING OS...."<br />
20 FOR N = 1 TO 1000<br />
22 NEXT N<br />
23 IF N = 1000 THEN GOTO 40<br />
30 HOME<br />
40 PRINT "INPUT YOUR NAME TO ENTER"<br />
221 INPUT A$<br />
240 HTAB 30 :PRINT A$<br />
250 PRINT "---------------------------------------"<br />
260 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
270 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
280 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
290 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
300 PRINT ". . ------------------- . . . . . . . ."<br />
310 PRINT ". . -                 - . . . . . . . ."<br />
320 PRINT ". . -                 - . . . . . . . ."<br />
330 PRINT ". . -                 - . . . . . . . ."<br />
340 PRINT ". . -                 - . . . . . . . ."<br />
350 PRINT ". . ------------------  . . . . . . . ."<br />
360 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
370 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
380 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
390 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
400 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
410 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
420 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
430 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
440 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
450 PRINT ". . . . . . . . . . . . . . . . . . . ." 

__________________

"gate gate paragate parasangate bodhi svahdl"
"Stay hungry, Stay Foolish!"
"Think Different"

Toolkitman's picture
Offline
Joined: Nov 21 2010
Posts: 162
Re: Fun with MouseText characters

This is more clear:

1 HOME<br />
2 PRINT""<br />
3 PRINT""<br />
4 PRINT""<br />
5 PRINT""<br />
6 PRINT""<br />
7 PRINT""<br />
9 PRINT""<br />
10 PRINT""<br />
19 HTAB 15:PRINT "STARTING OS...."<br />
20 FOR N = 1 TO 1000<br />
22 NEXT N<br />
23 IF N = 1000 THEN GOTO 40<br />
30 HOME<br />
40 PRINT "INPUT YOUR NAME TO ENTER"<br />
221 INPUT A$<br />
240 HTAB 30 :PRINT A$<br />
250 PRINT "---------------------------------------"<br />
260 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
270 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
280 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
290 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
300 PRINT ". . ------------------- . . . . . . . ."<br />
310 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
320 PRINT ". . -                 - . . . . . . . ."<br />
330 PRINT ". . -                 - . . . . . . . ."<br />
340 PRINT ". . -                 - . . . . . . . ."<br />
350 PRINT ". . ------------------  . . . . . . . ."<br />
360 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
370 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
380 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
390 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
400 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
410 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
420 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
430 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
440 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
450 PRINT ". . . . . . . . . . . . . . . . . . . ." 

__________________

"gate gate paragate parasangate bodhi svahdl"
"Stay hungry, Stay Foolish!"
"Think Different"

Toolkitman's picture
Offline
Joined: Nov 21 2010
Posts: 162
Re: Fun with MouseText characters

This is the best i have done to have it interactible : ).

1 HOME<br />
2 PRINT""<br />
3 PRINT""<br />
4 PRINT""<br />
5 PRINT""<br />
6 PRINT""<br />
7 PRINT""<br />
9 PRINT""<br />
10 PRINT""<br />
19 HTAB 15:PRINT "STARTING OS...."<br />
20 FOR N = 1 TO 1000<br />
22 NEXT N<br />
23 IF N = 1000 THEN GOTO 40<br />
30 HOME<br />
40 PRINT "INPUT YOUR NAME TO ENTER"<br />
221 INPUT A$<br />
240 HTAB 30 :PRINT A$<br />
250 PRINT "---------------------------------------"<br />
260 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
270 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
280 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
290 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
300 PRINT ". . ------------------- . . . . . . . ."<br />
310 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
320 PRINT ". . -                 - . . . . . . . ."<br />
330 PRINT ". . -                 - . . . . . . . ."<br />
340 PRINT ". . -                 - . . . . . . . ."<br />
350 PRINT ". . ------------------  . . . . . . . ."<br />
360 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
370 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
380 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
390 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
400 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
410 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
420 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
430 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
440 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
450 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
460 PRINT "INSERT COMMENT TO SHOW IN YOUR WINDOWS ":INPUT B$<br />
462 HOME<br />
470 PRINT "---------------------------------------"<br />
480 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
490 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
500 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
510 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
520 PRINT ". . ------------------- . . . . . . . ."<br />
530 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
540 HTAB 5 :PRINT B$<br />
550 PRINT ". . -                 - . . . . . . . ."<br />
560 PRINT ". . -                 - . . . . . . . ."<br />
570 PRINT ". . ------------------- . . . . . . . ."<br />
580 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
590 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
600 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
610 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
620 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
630 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
640 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
650 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
660 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
670 PRINT ". . . . . . . . . . . . . . . . . . . ."

__________________

"gate gate paragate parasangate bodhi svahdl"
"Stay hungry, Stay Foolish!"
"Think Different"

Toolkitman's picture
Offline
Joined: Nov 21 2010
Posts: 162
Re: Fun with MouseText characters

I have made an Empty Trash and Reset Function.

6 PRINT""<br />
7 PRINT""<br />
9 PRINT""<br />
10 PRINT""<br />
19 HTAB 15:PRINT "STARTING OS...."<br />
20 FOR N = 1 TO 1000<br />
22 NEXT N<br />
23 IF N = 1000 THEN GOTO 40<br />
30 HOME<br />
40 PRINT "INPUT YOUR NAME TO ENTER"<br />
221 INPUT A$<br />
240 HTAB 30 :PRINT A$<br />
250 PRINT "---------------------------------------"<br />
260 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
270 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
280 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
290 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
300 PRINT ". . ------------------- . . . . . . . ."<br />
310 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
320 PRINT ". . -                 - . . . . . . . ."<br />
330 PRINT ". . -                 - . . . . . . . ."<br />
340 PRINT ". . -                 - . . . . . . . ."<br />
350 PRINT ". . ------------------  . . . . . . . ."<br />
360 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
370 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
380 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
390 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
400 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
410 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
420 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
430 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
440 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
450 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
460 PRINT "INSERT COMMENT TO SHOW IN YOUR WINDOWS ":INPUT B$<br />
461 IF B$ = "EMPTY TRASH" THEN GOTO 680<br />
469 HOME<br />
470 PRINT "---------------------------------------"<br />
480 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
490 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
500 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
510 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
520 PRINT ". . ------------------- . . . . . . . ."<br />
530 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
540 HTAB 5 :PRINT B$<br />
550 PRINT ". . -                 - . . . . . . . ."<br />
560 PRINT ". . -                 - . . . . . . . ."<br />
570 PRINT ". . ------------------- . . . . . . . ."<br />
580 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
590 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
600 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
610 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
620 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
630 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
640 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
650 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
660 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
670 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
680 HOME<br />
690 PRINT "---------------------------------------"<br />
700 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
710 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
720 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
730 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
740 PRINT ". . ------------------- . . . . . . . ."<br />
750 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
760 HTAB 5 :PRINT B$<br />
770 PRINT ". . -                 - . . . . . . . ."<br />
780 PRINT ". . -                 - . . . . . . . ."<br />
790 PRINT ". . ------------------- . . . . . . . ."<br />
800 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
810 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
820 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
830 PRINT ". . . . . . . . . . . . . . . / . . . ."<br />
840 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
850 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
860 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
870 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
880 PRINT ". . . . . . . . . . . . . . .EMPTY. . ."<br />
890 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
900 PRINT "INSERT COMMENT TOSHOW IN YOUR WINDOWS": INPUT B$<br />
910 IF B$ = "RESET" GOTO 30

__________________

"gate gate paragate parasangate bodhi svahdl"
"Stay hungry, Stay Foolish!"
"Think Different"

Toolkitman's picture
Offline
Joined: Nov 21 2010
Posts: 162
Re: Fun with MouseText characters

I have corrected a bug that prevent to go out from the "fake" OS.

<br />
1 HOME<br />
2 PRINT""<br />
3 PRINT""<br />
4 PRINT""<br />
5 PRINT""<br />
6 PRINT""<br />
7 PRINT""<br />
9 PRINT""<br />
10 PRINT""<br />
19 HTAB 15:PRINT "STARTING OS...."<br />
20 FOR N = 1 TO 1000<br />
22 NEXT N<br />
23 IF N = 1000 THEN GOTO 40<br />
30 HOME<br />
40 PRINT "INPUT YOUR NAME TO ENTER"<br />
221 INPUT A$<br />
240 HTAB 30 :PRINT A$<br />
250 PRINT "---------------------------------------"<br />
260 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
270 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
280 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
290 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
300 PRINT ". . ------------------- . . . . . . . ."<br />
310 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
320 PRINT ". . -                 - . . . . . . . ."<br />
330 PRINT ". . -                 - . . . . . . . ."<br />
340 PRINT ". . -                 - . . . . . . . ."<br />
350 PRINT ". . ------------------  . . . . . . . ."<br />
360 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
370 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
380 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
390 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
400 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
410 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
420 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
430 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
440 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
450 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
460 PRINT "INSERT COMMENT TO SHOW IN YOUR WINDOWS ":INPUT B$<br />
461 IF B$ = "EMPTY TRASH" THEN GOTO 680<br />
469 HOME<br />
470 PRINT "---------------------------------------"<br />
480 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
490 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
500 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
510 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
520 PRINT ". . ------------------- . . . . . . . ."<br />
530 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
540 HTAB 5 :PRINT B$<br />
550 PRINT ". . -                 - . . . . . . . ."<br />
560 PRINT ". . -                 - . . . . . . . ."<br />
570 PRINT ". . ------------------- . . . . . . . ."<br />
580 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
590 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
600 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
610 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
620 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
630 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
640 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
650 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
660 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
670 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
680 HOME<br />
690 PRINT "---------------------------------------"<br />
700 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
710 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
720 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
730 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
740 PRINT ". . ------------------- . . . . . . . ."<br />
750 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
760 HTAB 5 :PRINT B$<br />
770 PRINT ". . -                 - . . . . . . . ."<br />
780 PRINT ". . -                 - . . . . . . . ."<br />
790 PRINT ". . ------------------- . . . . . . . ."<br />
800 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
810 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
820 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
830 PRINT ". . . . . . . . . . . . . . . / . . . ."<br />
840 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
850 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
860 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
870 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
880 PRINT ". . . . . . . . . . . . . . .EMPTY. . ."<br />
890 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
900 PRINT "INSERT COMMENT TO SHOW IN YOUR WINDOWS": INPUT B$<br />
910 IF B$ = "RESET" GOTO 30<br />
920 GOTO 470

__________________

"gate gate paragate parasangate bodhi svahdl"
"Stay hungry, Stay Foolish!"
"Think Different"

Toolkitman's picture
Offline
Joined: Nov 21 2010
Posts: 162
Re: Fun with MouseText characters

The latest modify for working like ecxpected!!!

1 HOME<br />
2 PRINT""<br />
3 PRINT""<br />
4 PRINT""<br />
5 PRINT""<br />
6 PRINT""<br />
7 PRINT""<br />
9 PRINT""<br />
10 PRINT""<br />
19 HTAB 15:PRINT "STARTING OS...."<br />
20 FOR N = 1 TO 1000<br />
22 NEXT N<br />
23 IF N = 1000 THEN GOTO 40<br />
30 HOME<br />
40 PRINT "INPUT YOUR NAME TO ENTER"<br />
221 INPUT A$<br />
240 HTAB 30 :PRINT A$<br />
250 PRINT "---------------------------------------"<br />
260 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
270 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
280 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
290 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
300 PRINT ". . ------------------- . . . . . . . ."<br />
310 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
320 PRINT ". . -                 - . . . . . . . ."<br />
330 PRINT ". . -                 - . . . . . . . ."<br />
340 PRINT ". . -                 - . . . . . . . ."<br />
350 PRINT ". . ------------------  . . . . . . . ."<br />
360 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
370 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
380 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
390 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
400 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
410 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
420 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
430 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
440 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
450 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
460 PRINT "INSERT COMMENT TO SHOW IN YOUR WINDOWS ":INPUT B$<br />
461 IF B$ = "EMPTY TRASH" THEN GOTO 680<br />
469 HOME<br />
470 PRINT "---------------------------------------"<br />
480 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
490 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
500 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
510 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
520 PRINT ". . ------------------- . . . . . . . ."<br />
530 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
540 HTAB 5 :PRINT B$<br />
550 PRINT ". . -                 - . . . . . . . ."<br />
560 PRINT ". . -                 - . . . . . . . ."<br />
570 PRINT ". . ------------------- . . . . . . . ."<br />
580 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
590 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
600 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
610 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
620 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
630 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
640 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
650 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
660 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
670 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
671 GOTO 460<br />
672 END<br />
680 HOME<br />
690 PRINT "---------------------------------------"<br />
700 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
710 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
720 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
730 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
740 PRINT ". . ------------------- . . . . . . . ."<br />
750 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
760 HTAB 5 :PRINT B$<br />
770 PRINT ". . -                 - . . . . . . . ."<br />
780 PRINT ". . -                 - . . . . . . . ."<br />
790 PRINT ". . ------------------- . . . . . . . ."<br />
800 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
810 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
820 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
830 PRINT ". . . . . . . . . . . . . . . / . . . ."<br />
840 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
850 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
860 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
870 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
880 PRINT ". . . . . . . . . . . . . . .EMPTY. . ."<br />
890 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
900 PRINT "INSERT COMMENT TO SHOW IN YOUR WINDOWS": INPUT B$<br />
910 IF B$ = "RESET" GOTO 30<br />
920 GOTO 469

__________________

"gate gate paragate parasangate bodhi svahdl"
"Stay hungry, Stay Foolish!"
"Think Different"

Toolkitman's picture
Offline
Joined: Nov 21 2010
Posts: 162
Re: Fun with MouseText characters

Not happy with only one line of text i have added 2 more lines and corrected the last bugs.

1 HOME<br />
2 PRINT""<br />
3 PRINT""<br />
4 PRINT""<br />
5 PRINT""<br />
6 PRINT""<br />
7 PRINT""<br />
9 PRINT""<br />
10 PRINT""<br />
19 HTAB 15:PRINT "STARTING OS...."<br />
20 FOR N = 1 TO 1000<br />
22 NEXT N<br />
23 IF N = 1000 THEN GOTO 40<br />
30 HOME<br />
40 PRINT "INPUT YOUR NAME TO ENTER"<br />
221 INPUT A$<br />
240 HTAB 30 :PRINT A$<br />
250 PRINT "---------------------------------------"<br />
260 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
270 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
280 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
290 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
300 PRINT ". . ------------------- . . . . . . . ."<br />
310 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
320 PRINT ". . -                 - . . . . . . . ."<br />
330 PRINT ". . -                 - . . . . . . . ."<br />
340 PRINT ". . -                 - . . . . . . . ."<br />
350 PRINT ". . ------------------  . . . . . . . ."<br />
360 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
370 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
380 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
390 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
400 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
410 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
420 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
430 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
440 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
450 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
460 PRINT "INSERT COMMENT TO SHOW IN YOUR WINDOWS ": INPUT B$ : INPUT D$ : INPUT F$<br />
463 IF F$ = "EMPTY TRASH" THEN GOTO 680<br />
466 IF F$ = "RESET" GOTO 30<br />
469 HOME<br />
470 PRINT "---------------------------------------"<br />
480 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
490 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
500 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
510 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
520 PRINT ". . ------------------- . . . . . . . ."<br />
530 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
540 HTAB 5 :PRINT B$<br />
550 HTAB 5 :PRINT D$<br />
560 HTAB 5 :PRINT F$<br />
570 PRINT ". . ------------------- . . . . . . . ."<br />
580 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
590 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
600 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
610 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
620 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
630 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
640 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
650 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
660 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
670 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
671 GOTO 460<br />
672 END<br />
680 HOME<br />
690 PRINT "---------------------------------------"<br />
700 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
710 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
720 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
730 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
740 PRINT ". . ------------------- . . . . . . . ."<br />
750 PRINT ". . -  WINDOWS        - . . . . . . . ."<br />
760 HTAB 5 :PRINT B$<br />
770 HTAB 5 :PRINT D$<br />
780 HTAB 5 :PRINT F$<br />
790 PRINT ". . ------------------- . . . . . . . ."<br />
800 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
810 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
820 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
830 PRINT ". . . . . . . . . . . . . . . / . . . ."<br />
840 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
850 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
860 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
870 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
880 PRINT ". . . . . . . . . . . . . . .EMPTY. . ."<br />
890 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
900 PRINT "INSERT COMMENT TO SHOW IN YOUR WINDOWS": INPUT B$<br />
930 IF F$ = "RESET" GOTO 30<br />
940 GOTO 469

__________________

"gate gate paragate parasangate bodhi svahdl"
"Stay hungry, Stay Foolish!"
"Think Different"

Toolkitman's picture
Offline
Joined: Nov 21 2010
Posts: 162
Re: Fun with MouseText characters

I have made some embellishments to the MINI OS.

1 HOME<br />
2 PRINT""<br />
3 PRINT""<br />
4 PRINT""<br />
5 PRINT""<br />
6 PRINT""<br />
7 PRINT""<br />
9 PRINT""<br />
10 PRINT""<br />
19 HTAB 15:PRINT "STARTING OS...."<br />
20 FOR N = 1 TO 1000<br />
22 NEXT N<br />
23 IF N = 1000 THEN GOTO 40<br />
30 HOME<br />
40 PRINT "INPUT YOUR NAME TO ENTER"<br />
221 INPUT A$<br />
240 PRINT "APPLE //E      D FOLDER", A$<br />
250 PRINT "---------------------------------------"<br />
260 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
270 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
280 PRINT ". . --------------------- . . . . . . ."<br />
290 PRINT ". . ! FOLDER            ! . . . . . . ."<br />
300 PRINT ". . --------------------- . . . . . . ."<br />
310 PRINT ". . -                 - . . . . . . . ."<br />
320 PRINT ". . -                 - . . . . . . . ."<br />
330 PRINT ". . -                 - . . . . . . . ."<br />
340 PRINT ". . -                 - . . . . . . . ."<br />
350 PRINT ". . ------------------  . . . . . . . ."<br />
360 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
370 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
380 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
390 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
400 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
410 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
420 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
430 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
440 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
450 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
460 PRINT "INSERT COMMENT TO SHOW IN YOUR WINDOWS ": INPUT B$ : INPUT D$ : INPUT F$<br />
463 IF F$ = "EMPTY TRASH" THEN GOTO 680<br />
466 IF F$ = "RESET" GOTO 30<br />
467 HOME<br />
468 PRINT "APPLE //E      D FOLDER", A$<br />
470 PRINT "---------------------------------------"<br />
480 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
490 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
500 PRINT ". . --------------------- . . . . . . ."<br />
510 PRINT ". . ! FOLDER            ! . . . . . . ."<br />
520 PRINT ". . --------------------- . . . . . . ."<br />
530 PRINT ". . -                 - . . . . . . . ."<br />
540 HTAB 5 :PRINT B$<br />
550 HTAB 5 :PRINT D$<br />
560 HTAB 5 :PRINT F$<br />
570 PRINT ". . ------------------- . . . . . . . ."<br />
580 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
590 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
600 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
610 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
620 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
630 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
640 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
650 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
660 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
670 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
671 GOTO 460<br />
672 END<br />
680 HOME<br />
681 PRINT "APPLE //E      D FOLDER", A$<br />
690 PRINT "---------------------------------------"<br />
700 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
710 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
720 PRINT ". . --------------------- . . . . . . ."<br />
730 PRINT ". . ! FOLDER            ! . . . . . . ."<br />
740 PRINT ". . --------------------- . . . . . . ."<br />
750 PRINT ". . -                 - . . . . . . . ."<br />
760 HTAB 5 :PRINT B$<br />
770 HTAB 5 :PRINT D$<br />
780 HTAB 5 :PRINT F$<br />
790 PRINT ". . ------------------- . . . . . . . ."<br />
800 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
810 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
820 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
830 PRINT ". . . . . . . . . . . . . . . / . . . ."<br />
840 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
850 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
860 PRINT ". . . . . . . . . . . . . . . --- . . ."<br />
870 PRINT ". . . . . . . . . . . . . . .TRASH. . ."<br />
880 PRINT ". . . . . . . . . . . . . . .EMPTY. . ."<br />
890 PRINT ". . . . . . . . . . . . . . . . . . . ."<br />
900 PRINT "INSERT COMMENT TO SHOW IN YOUR WINDOWS": INPUT B$<br />
930 IF F$ = "RESET" GOTO 30<br />
940 GOTO 467

__________________

"gate gate paragate parasangate bodhi svahdl"
"Stay hungry, Stay Foolish!"
"Think Different"

Toolkitman's picture
Offline
Joined: Nov 21 2010
Posts: 162
Re: Fun with MouseText characters

mmphosis dont take it bad i was happy to try to make your system in the Apple //e
This is the best i have made with ASCII [inline:attached_image_#]https://scontent-mxp1-1.xx.fbcdn.net/v/t1.0-9/23434764_1991548061133364_556676849215985104_n.jpg?oh=1db874b650d0566ac9b0a63a812d70c1&oe=5AAC64DB[inline:attached_image_#]

__________________

"gate gate paragate parasangate bodhi svahdl"
"Stay hungry, Stay Foolish!"
"Think Different"

Toolkitman's picture
Offline
Joined: Nov 21 2010
Posts: 162
Re: Fun with MouseText characters

Play my MINI OS under MAME emulation in internet archive click the link below.

CLICK HERE FOR MAME EMULATION

__________________

"gate gate paragate parasangate bodhi svahdl"
"Stay hungry, Stay Foolish!"
"Think Different"

Toolkitman's picture
Offline
Joined: Nov 21 2010
Posts: 162
Re: Fun with MouseText characters

This is the latest version of My Mini OS Operating System Prototype for Apple //e Computers and Emulators, in this version you can also choose at startup the Desktop Screen Patter made by me in AMIGA ASCII by hand.

CLICK HERE FOR MAME EMULATION

__________________

"gate gate paragate parasangate bodhi svahdl"
"Stay hungry, Stay Foolish!"
"Think Different"