00000000: 0D 0A 47 4C 4F 42 45 2E 36 34 20 61 6E 64 20 47 |..GLOBE.64 and G|
00000010: 4C 4F 42 45 2E 31 32 38 0D 0A 0D 0A 62 79 20 47 |LOBE.128....by G|
00000020: 65 6F 72 67 20 53 63 68 77 61 72 7A 0D 0A 20 20 |eorg Schwarz.. |
00000030: 20 55 68 6C 61 6E 64 73 74 72 2E 20 31 39 35 0D | Uhlandstr. 195.|
00000040: 0A 20 20 20 44 2D 31 30 30 30 20 42 65 72 6C 69 |. D-1000 Berli|
00000050: 6E 20 31 32 0D 0A 20 20 20 47 65 72 6D 61 6E 79 |n 12.. Germany|
00000060: 0D 0A 0D 0A 49 20 77 72 6F 74 65 20 74 68 65 73 |....I wrote thes|
00000070: 65 20 74 77 6F 20 70 72 6F 67 72 61 6D 73 20 61 |e two programs a|
00000080: 62 6F 75 74 20 66 69 76 65 20 79 65 61 72 73 20 |bout five years |
00000090: 61 67 6F 2C 20 62 75 74 20 73 69 6E 63 65 20 49 |ago, but since I|
000000A0: 20 68 61 76 65 20 6E 6F 74 20 73 65 65 6E 0D 0A | have not seen..|
000000B0: 61 6E 79 74 68 69 6E 67 20 73 69 6D 69 6C 61 72 |anything similar|
000000C0: 20 79 65 74 20 6F 6E 20 74 68 65 20 43 36 34 20 | yet on the C64 |
000000D0: 6F 72 20 74 68 65 20 43 31 32 38 20 49 20 74 68 |or the C128 I th|
000000E0: 6F 75 67 68 74 20 74 68 61 74 20 70 65 72 68 61 |ought that perha|
000000F0: 70 73 20 6F 74 68 65 72 0D 0A 70 65 6F 70 6C 65 |ps other..people|
00000100: 20 77 6F 75 6C 64 20 62 65 20 69 6E 74 65 72 65 | would be intere|
00000110: 73 74 65 64 20 69 6E 20 68 61 76 69 6E 67 20 61 |sted in having a|
00000120: 20 6C 6F 6F 6B 20 61 74 20 74 68 65 6D 2E 0D 0A | look at them...|
00000130: 41 73 20 74 68 65 20 6E 61 6D 65 20 61 6C 72 65 |As the name alre|
00000140: 61 64 79 20 68 69 6E 74 73 20 74 6F 20 47 4C 4F |ady hints to GLO|
00000150: 42 45 2E 36 34 20 61 6E 64 20 47 4C 4F 42 45 2E |BE.64 and GLOBE.|
00000160: 31 32 38 20 64 69 73 70 6C 61 79 20 61 20 72 6F |128 display a ro|
00000170: 74 61 74 69 6E 67 20 67 6C 6F 62 65 0D 0A 6F 6E |tating globe..on|
00000180: 20 74 68 65 20 6D 6F 6E 69 74 6F 72 2E 20 55 73 | the monitor. Us|
00000190: 65 20 52 45 53 54 4F 52 45 20 74 6F 20 70 61 75 |e RESTORE to pau|
000001A0: 73 65 20 61 6E 64 20 74 68 65 6E 20 46 31 20 74 |se and then F1 t|
000001B0: 6F 20 71 75 69 74 20 6F 72 20 61 6E 79 20 6F 74 |o quit or any ot|
000001C0: 68 65 72 20 6B 65 79 20 74 6F 0D 0A 63 6F 6E 74 |her key to..cont|
000001D0: 69 6E 75 65 20 28 74 68 6F 73 65 20 36 34 20 75 |inue (those 64 u|
000001E0: 73 65 72 73 20 77 68 6F 20 64 6F 20 6E 6F 74 20 |sers who do not |
000001F0: 68 61 76 65 20 61 20 72 65 73 65 74 20 73 77 69 |have a reset swi|
00000200: 74 63 68 20 77 69 6C 6C 20 61 70 70 72 65 63 69 |tch will appreci|
00000210: 61 74 65 20 74 68 69 73 0D 0A 66 65 61 74 75 72 |ate this..featur|
00000220: 65 2C 20 49 20 67 75 65 73 73 29 2E 0D 0A 49 6E |e, I guess)...In|
00000230: 20 74 68 65 20 31 32 38 20 76 65 72 73 69 6F 6E | the 128 version|
00000240: 20 75 73 65 20 45 53 43 20 69 6E 73 74 65 61 64 | use ESC instead|
00000250: 20 6F 66 20 46 31 20 74 6F 20 65 78 69 74 2E 20 | of F1 to exit. |
00000260: 44 6F 6E 27 74 20 62 65 20 61 73 74 6F 6E 69 73 |Don't be astonis|
00000270: 68 65 64 20 74 6F 20 65 78 69 74 0D 0A 74 6F 20 |hed to exit..to |
00000280: 36 34 20 6D 6F 64 65 3B 20 47 4C 4F 42 45 2E 31 |64 mode; GLOBE.1|
00000290: 32 38 20 61 63 74 75 61 6C 6C 79 20 72 75 6E 73 |28 actually runs|
000002A0: 20 69 6E 20 74 68 69 73 20 6D 6F 64 65 20 28 64 | in this mode (d|
000002B0: 75 65 20 74 6F 20 6C 65 73 73 20 63 6F 6D 70 6C |ue to less compl|
000002C0: 69 63 61 74 65 64 0D 0A 6D 65 6D 6F 72 79 20 61 |icated..memory a|
000002D0: 63 63 65 73 73 29 2C 20 69 74 20 6A 75 73 74 20 |ccess), it just |
000002E0: 6D 61 6B 65 73 20 75 73 65 20 6F 66 20 74 68 65 |makes use of the|
000002F0: 20 43 31 32 38 27 73 20 32 4D 48 7A 20 63 61 70 | C128's 2MHz cap|
00000300: 61 62 69 6C 69 74 79 20 74 6F 20 69 6E 63 72 65 |ability to incre|
00000310: 61 73 65 0D 0A 74 68 65 20 70 69 63 74 75 72 65 |ase..the picture|
00000320: 73 2F 73 65 63 6F 6E 64 20 72 61 74 65 20 28 6F |s/second rate (o|
00000330: 72 20 73 68 6F 75 6C 64 20 49 20 72 61 74 68 65 |r should I rathe|
00000340: 72 20 73 61 79 2C 20 64 65 63 72 65 61 73 65 20 |r say, decrease |
00000350: 74 68 65 20 73 65 63 6F 6E 64 73 2F 70 69 63 74 |the seconds/pict|
00000360: 75 72 65 0D 0A 72 61 74 65 20 3F 3F 20 57 65 6C |ure..rate ?? Wel|
00000370: 6C 2C 20 69 74 27 73 20 6E 6F 20 41 6D 69 67 61 |l, it's no Amiga|
00000380: 20 6F 72 20 65 6C 73 65 2C 20 64 6F 6E 27 74 20 | or else, don't |
00000390: 66 6F 72 67 65 74 20 74 68 61 74 2C 20 70 6C 65 |forget that, ple|
000003A0: 61 73 65 21 29 20 77 68 69 6C 65 20 74 68 65 0D |ase!) while the.|
000003B0: 0A 63 61 74 68 6F 64 65 20 72 61 79 20 69 73 20 |.cathode ray is |
000003C0: 6F 66 66 20 74 68 65 20 76 69 73 69 62 6C 65 20 |off the visible |
000003D0: 73 63 72 65 65 6E 2E 0D 0A 0D 0A 50 6C 65 61 73 |screen.....Pleas|
000003E0: 65 20 73 65 6E 64 20 61 6E 79 20 63 6F 6D 6D 65 |e send any comme|
000003F0: 6E 74 73 20 74 6F 3A 0D 0A 67 65 6F 72 67 40 6D |nts to:..georg@m|
00000400: 61 72 69 65 2E 70 68 79 73 69 6B 2E 74 75 2D 62 |arie.physik.tu-b|
00000410: 65 72 6C 69 6E 2E 64 65 0D 0A 0D 0A 28 72 65 6C |erlin.de....(rel|
00000420: 65 61 73 65 64 20 30 36 2F 31 33 2F 39 32 29 0D |eased 06/13/92).|
00000430: 0A 0D 0A 0D 0A 63 72 63 33 32 20 3D 20 20 35 33 |.....crc32 = 53|
00000440: 31 38 39 37 38 30 34 20 66 6F 72 20 22 67 6C 6F |1897804 for "glo|
00000450: 62 65 2E 31 32 38 22 2E 0D 0A 63 72 63 33 32 20 |be.128"...crc32 |
00000460: 3D 20 32 37 33 39 39 35 36 38 38 39 20 66 6F 72 |= 2739956889 for|
00000470: 20 22 67 6C 6F 62 65 2E 36 34 22 2E 0D 0A | "globe.64"... |
..GLOBE.64 AND GLOBE.128....BY GEORG SCH
WARZ.. UHLANDSTR. 195.. D-1000 BERLI
N 12.. GERMANY....I WROTE THESE TWO PR
OGRAMS ABOUT FIVE YEARS AGO, BUT SINCE I
HAVE NOT SEEN..ANYTHING SIMILAR YET ON
THE C64 OR THE C128 I THOUGHT THAT PERHA
PS OTHER..PEOPLE WOULD BE INTERESTED IN
HAVING A LOOK AT THEM...AS THE NAME ALRE
ADY HINTS TO GLOBE.64 AND GLOBE.128 DISP
LAY A ROTATING GLOBE..ON THE MONITOR. US
E RESTORE TO PAUSE AND THEN F1 TO QUIT O
R ANY OTHER KEY TO..CONTINUE (THOSE 64 U
SERS WHO DO NOT HAVE A RESET SWITCH WILL
APPRECIATE THIS..FEATURE, I GUESS)...IN
THE 128 VERSION USE ESC INSTEAD OF F1 T
O EXIT. DON'T BE ASTONISHED TO EXIT..TO
64 MODE; GLOBE.128 ACTUALLY RUNS IN THIS
MODE (DUE TO LESS COMPLICATED..MEMORY A
CCESS), IT JUST MAKES USE OF THE C128'S
2MHZ CAPABILITY TO INCREASE..THE PICTURE
S/SECOND RATE (OR SHOULD I RATHER SAY, D
ECREASE THE SECONDS/PICTURE..RATE ?? WEL
L, IT'S NO AMIGA OR ELSE, DON'T FORGET T
HAT, PLEASE!) WHILE THE..CATHODE RAY IS
OFF THE VISIBLE SCREEN.....PLEASE SEND A
NY COMMENTS TO:..GEORG@MARIE.PHYSIK.TU-B
ERLIN.DE....(RELEASED 06/13/92)......CRC
32 = 531897804 FOR "GLOBE.128"...CRC32
= 2739956889 FOR "GLOBE.64"...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL