117
310 NEXT I
320 LPRINT
330 LPRINT "GERMANY";CHR$(g);
340 FOR I=0 TO 412 STEP 50
350 LPRINT CHR$(60);
360 NEXT I
370 LPRINT
380 LPRINT CHR$(9);
390 FOR I=0 TO 488 STEP 50
400 LPRINT CHR$(61);
410 NEXT I
420 LPRINT
430 LPRINT "JAPAN";CHR$(g);
440 FOR I=0 TO 347 STEP 50
450 LPRINT CHR$(60);
460 NEXT I
470 LPRINT
480 LPRINT CHR$(9);
490 FOR I=0 TO 493 STEP 50
500 LPRINT CHR$(61);
510 NEXT I
520 LPRINT
530 LPRINT
540
550 FOR I=2 TO 8 STEP 2
560 LPRINT SCALES;
570 NEXT I
580 LPRINT
590 LPRINT CHR$(9);" ";
600 FOR I=2 TO 8 STEP 2
610 LPRINT ' ";I;
620 NEXT I
630 LPRINT CHR$(27);"%0"
640 LPRINT CHR$(27);11SO";
650LPRINT CHR$(9);"100 UNITS/1000 PERSONS"
660LPRINT CHR$(27);"T"
