8-Bit Software Online Conversion

Graphical Globe Screen - Listing

10 REM Globe Drawing Demo 20 REM by Carl Wheat 30 MODE 2:VDU 23;8202;0;0;0; 40 VDU 19,0,7;0;19,1,4;0;19,2,4;0;19, 3,4;0;19,5,4;0;19,6,4;0;19,7,4;0;19,8,1; 0;19,9,2;0;19,10,8;0;19,11,15;0;19,12,4; 0;19,13,7;0;19,14,0;0;19,15,4;0; 50 *LOAD SCREEN 3000 60 REPEAT:FOR C%=1TO7:VDU19,C%,7;0; 70 FOR T%=1TO300:NEXT T% 80 VDU19,C%,4;0;:NEXT C%:UNTIL FALSE