MINI OS OPERATING SYSTEM PROTOTYPE FOR APPLE //e

No replies
Toolkitman's picture
Offline
Joined: Nov 21 2010
Posts: 162

This is the code and the Software emulated in MAME of My MINI OS Operating System Prototype for Apple //e made by me, i was inspired by the MINOS Apple iigs OS interface made by mmophosis here in Applefritter.
In this version you can choose at startup between two different desktop pattern made by hand by me in AMIGA ASCII, tes system is completly programmed by hand and the Desktop is totally made in AMIGA ASCII, like old style graphics art.

Following the code:

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 />
222 PRINT "CHOOSE DESKTOP PATTERN, 1 OR 2":INPUT A<br />
223 IF A = 1 THEN GOTO 240<br />
224 IF A = 2 THEN GOTO 950<br />
225 IF A < > 1 THEN GOTO 30<br />
226 IF A < > 2 THEN GOTO 30<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 "                         12:05 15/06/77"<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 "                         12:05 15/06/77"<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 "                         12:05 15/06/77"<br />
900 PRINT "INSERT COMMENT TO SHOW IN YOUR WINDOWS": INPUT B$<br />
930 IF F$ = "RESET" GOTO 30<br />
940 GOTO 467<br />
950 PRINT "APPLE //E      D FOLDER", A$<br />
960 PRINT "---------------------------------------"<br />
970 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
980 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
1000 PRINT "^ ^ --------------------- ^ ^ ^ ^ ^ ^ ^"<br />
1010 PRINT "^ ^ ! FOLDER            ! ^ ^ ^ ^ ^ ^ ^"<br />
1020 PRINT "^ ^ --------------------- ^ ^ ^ ^ ^ ^ ^"<br />
1030 PRINT "^ ^ -                 - ^ ^ ^ ^ ^ ^ ^ ^"<br />
1040 PRINT "^ ^ -                 - ^ ^ ^ ^ ^ ^ ^ ^"<br />
1050 PRINT "^ ^ -                 - ^ ^ ^ ^ ^ ^ ^ ^"<br />
1060 PRINT "^ ^ -                 - ^ ^ ^ ^ ^ ^ ^ ^"<br />
1070 PRINT "^ ^ ------------------  ^ ^ ^ ^ ^ ^ ^ ^"<br />
1080 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
1090 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
2000 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
2010 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
2020 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ --- ^ ^ ^"<br />
2030 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ --- ^ ^ ^"<br />
2040 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ --- ^ ^ ^"<br />
2050 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^TRASH^ ^ ^"<br />
2060 PRINT "---------------------------------------"<br />
2070 PRINT "                         12:05 15/06/77"<br />
2080 PRINT "INSERT COMMENT TO SHOW IN YOUR WINDOWS ": INPUT B$ : INPUT D$ : INPUT F$<br />
2090 IF F$ = "EMPTY TRASH" THEN GOTO 2360<br />
2100 IF F$ = "RESET" GOTO 30<br />
2110 HOME<br />
2120 PRINT "APPLE //E      D FOLDER", A$<br />
2130 PRINT "---------------------------------------"<br />
2140 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
2150 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
2160 PRINT "^ ^ --------------------- ^ ^ ^ ^ ^ ^ ^"<br />
2170 PRINT "^ ^ ! FOLDER            ! ^ ^ ^ ^ ^ ^ ^"<br />
2180 PRINT "^ ^ --------------------- ^ ^ ^ ^ ^ ^ ^"<br />
2190 PRINT "^ ^ -                 - ^ ^ ^ ^ ^ ^ ^ ^"<br />
2200 HTAB 5 :PRINT B$<br />
2210 HTAB 5 :PRINT D$<br />
2220 HTAB 5 :PRINT F$<br />
2230 PRINT "^ ^ ------------------- ^ ^ ^ ^ ^ ^ ^ ^"<br />
2240 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
2250 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
2260 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
2270 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
2280 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ --- ^ ^ ^"<br />
2290 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ --- ^ ^ ^"<br />
2300 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ --- ^ ^ ^"<br />
2310 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^TRASH^ ^ ^"<br />
2320 PRINT "---------------------------------------"<br />
2330 PRINT "                         12:05 15/06/77"<br />
2340 GOTO 2080<br />
2350 END<br />
2360 HOME<br />
2370 PRINT "APPLE //E      D FOLDER", A$<br />
2380 PRINT "---------------------------------------"<br />
2390 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
2400 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
2410 PRINT "^ ^ --------------------- ^ ^ ^ ^ ^ ^ ^"<br />
2420 PRINT "^ ^ ! FOLDER            ! ^ ^ ^ ^ ^ ^ ^"<br />
2430 PRINT "^ ^ --------------------- ^ ^ ^ ^ ^ ^ ^"<br />
2450 PRINT "^ ^ -                 - ^ ^ ^ ^ ^ ^ ^ ^"<br />
2460 HTAB 5 :PRINT B$<br />
2470 HTAB 5 :PRINT D$<br />
2480 HTAB 5 :PRINT F$<br />
2490 PRINT "^ ^ ------------------- ^ ^ ^ ^ ^ ^ ^ ^"<br />
3000 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
3010 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
3020 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^"<br />
3030 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ / ^ ^ ^ ^"<br />
3040 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ --- ^ ^ ^"<br />
3050 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ --- ^ ^ ^"<br />
3060 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ --- ^ ^ ^"<br />
3070 PRINT "^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^TRASH^ ^ ^"<br />
3080 PRINT "-----------------------------EMPTY-----"<br />
3090 PRINT "                         12:05 15/06/77"<br />
3100 PRINT "INSERT COMMENT TO SHOW IN YOUR WINDOWS": INPUT B$<br />
3110 IF F$ = "RESET" GOTO 30<br />
3120 GOTO 2110

MINI OS EMULATED IN MAME TO REDIRECT CLICK HERE!

__________________

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