Fun with MouseText characters

14 posts / 0 new
Last post
mmphosis's picture
Offline
Last seen: 1 week 6 days ago
Joined: Aug 18 2005 - 16:26
Posts: 442
Fun with MouseText characters

Inspired by Toolkitman and others ...

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

Enjoy! Wink

Toolkitman's picture
Offline
Last seen: 9 months 2 weeks ago
Joined: Nov 21 2010 - 15:30
Posts: 249
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

macnoyd's picture
Offline
Last seen: 7 hours 9 min ago
Joined: Oct 15 2012 - 08:59
Posts: 855
Re: Fun with MouseText characters

Very cool! Thanks for sharing!

Toolkitman's picture
Offline
Last seen: 9 months 2 weeks ago
Joined: Nov 21 2010 - 15:30
Posts: 249
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 ". . . . . . . . . . . . . . . . . . . ."

Toolkitman's picture
Offline
Last seen: 9 months 2 weeks ago
Joined: Nov 21 2010 - 15:30
Posts: 249
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 ". . . . . . . . . . . . . . . . . . . ."

Toolkitman's picture
Offline
Last seen: 9 months 2 weeks ago
Joined: Nov 21 2010 - 15:30
Posts: 249
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 ". . . . . . . . . . . . . . . . . . . ."

Toolkitman's picture
Offline
Last seen: 9 months 2 weeks ago
Joined: Nov 21 2010 - 15:30
Posts: 249
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

Toolkitman's picture
Offline
Last seen: 9 months 2 weeks ago
Joined: Nov 21 2010 - 15:30
Posts: 249
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

Toolkitman's picture
Offline
Last seen: 9 months 2 weeks ago
Joined: Nov 21 2010 - 15:30
Posts: 249
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

Toolkitman's picture
Offline
Last seen: 9 months 2 weeks ago
Joined: Nov 21 2010 - 15:30
Posts: 249
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

Toolkitman's picture
Offline
Last seen: 9 months 2 weeks ago
Joined: Nov 21 2010 - 15:30
Posts: 249
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

Toolkitman's picture
Offline
Last seen: 9 months 2 weeks ago
Joined: Nov 21 2010 - 15:30
Posts: 249
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_#]

Toolkitman's picture
Offline
Last seen: 9 months 2 weeks ago
Joined: Nov 21 2010 - 15:30
Posts: 249
Re: Fun with MouseText characters

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

CLICK HERE FOR MAME EMULATION

Toolkitman's picture
Offline
Last seen: 9 months 2 weeks ago
Joined: Nov 21 2010 - 15:30
Posts: 249
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

Log in or register to post comments