00000000: 01 1C 2C 1C 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..,.d.. ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 57 1C 6E |************.W.n|
00000030: 00 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 |.. * |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000050: 20 20 20 20 20 20 2A 00 82 1C 78 00 8F 20 2A 20 | *...x.. * |
00000060: 20 20 20 47 45 54 20 4D 49 54 20 42 4C 49 4E 4B | GET MIT BLINK|
00000070: 45 4E 44 45 4D 20 43 55 52 53 4F 52 20 20 20 20 |ENDEM CURSOR |
00000080: 20 2A 00 AD 1C 82 00 8F 20 2A 20 20 20 20 46 55 | *...... * FU|
00000090: 45 52 20 43 31 32 38 20 4D 49 54 20 20 34 30 20 |ER C128 MIT 40 |
000000A0: 4F 44 45 52 20 38 30 20 20 20 20 20 2A 00 D8 1C |ODER 80 *...|
000000B0: 8C 00 8F 20 2A 20 20 20 20 20 20 20 20 20 5A 45 |... * ZE|
000000C0: 49 43 48 45 4E 2D 53 43 48 49 52 4D 20 20 20 20 |ICHEN-SCHIRM |
000000D0: 20 20 20 20 20 20 20 2A 00 03 1D 96 00 8F 20 2A | *...... *|
000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000100: 20 20 2A 00 2E 1D A0 00 8F 20 2A 2A 2A 2A 2A 2A | *...... ******|
00000110: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 34 |**************.4|
00000130: 1D AA 00 3A 00 59 1D B4 00 8F 20 2A 2A 2A 2A 2A |...:.Y.... *****|
00000140: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 54 45 53 |************ TES|
00000150: 54 50 52 4F 47 52 41 4D 4D 00 5F 1D BE 00 3A 00 |TPROGRAMM._...:.|
00000160: 72 1D C8 00 99 22 45 49 4E 47 41 42 45 20 3F 20 |r...."EINGABE ? |
00000170: 22 3B 00 90 1D D2 00 8D 33 31 30 3A 8B 58 24 B3 |";......310:.X$.|
00000180: B1 22 4A 22 AF 58 24 B3 B1 22 4E 22 A7 32 31 30 |."J".X$.."N".210|
00000190: 00 98 1D DC 00 99 58 24 00 9E 1D E6 00 80 00 A4 |......X$........|
000001A0: 1D F0 00 3A 00 CB 1D FA 00 8F 20 2A 2A 2A 2A 2A |...:...... *****|
000001B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 53 55 42 |************ SUB|
000001C0: 52 4F 55 54 49 4E 45 20 47 45 54 00 F2 1D 04 01 |ROUTINE GET.....|
000001D0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
000001E0: 2A 2A 2A 20 4D 49 54 20 42 4C 49 4E 4B 45 4E 44 |*** MIT BLINKEND|
000001F0: 45 4D 00 11 1E 0E 01 8F 20 2A 2A 2A 2A 2A 2A 2A |EM...... *******|
00000200: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 43 55 52 53 4F |********** CURSO|
00000210: 52 00 17 1E 18 01 3A 00 41 1E 22 01 8F 20 50 52 |R.....:.A.".. PR|
00000220: 55 45 46 45 20 4F 42 20 34 30 20 4F 44 45 52 20 |UEFE OB 40 ODER |
00000230: 38 30 20 5A 45 49 43 48 45 4E 2D 53 43 48 49 52 |80 ZEICHEN-SCHIR|
00000240: 4D 00 47 1E 2C 01 3A 00 6D 1E 36 01 8B 20 C2 28 |M.G.,.:.m.6.. .(|
00000250: 32 31 35 29 B2 31 32 38 20 A7 20 FE 18 3A 20 20 |215).128 . ..: |
00000260: 20 8F 20 38 30 20 5A 45 49 43 48 45 4E 00 73 1E | . 80 ZEICHEN.s.|
00000270: 40 01 3A 00 B4 1E 4A 01 3A 20 20 20 20 20 20 20 |@.:...J.: |
00000280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000290: 20 20 20 20 20 20 20 8F 20 43 48 52 24 28 31 35 | . CHR$(15|
000002A0: 29 20 20 3D 20 5A 45 49 43 48 45 4E 42 4C 49 4E |) = ZEICHENBLIN|
000002B0: 4B 20 41 4E 00 EC 1E 54 01 3A 20 20 20 20 20 20 |K AN...T.: |
000002C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002D0: 20 20 20 20 20 20 20 20 8F 20 43 48 52 24 28 31 | . CHR$(1|
000002E0: 38 29 20 20 3D 20 52 56 53 20 4F 4E 00 25 1F 5E |8) = RVS ON.%.^|
000002F0: 01 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.: |
00000300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000310: 8F 20 43 48 52 24 28 31 34 36 29 20 3D 20 52 56 |. CHR$(146) = RV|
00000320: 53 20 4F 46 46 00 63 1F 68 01 3A 20 20 20 20 20 |S OFF.c.h.: |
00000330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000340: 20 20 20 20 20 20 20 20 20 8F 20 43 48 52 24 28 | . CHR$(|
00000350: 31 35 37 29 20 3D 20 43 55 52 53 4F 52 20 4C 49 |157) = CURSOR LI|
00000360: 4E 4B 53 00 A5 1F 72 01 3A 20 20 20 20 20 20 20 |NKS...r.: |
00000370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000380: 20 20 20 20 20 20 20 8F 20 43 48 52 24 28 31 34 | . CHR$(14|
00000390: 33 29 20 3D 20 5A 45 49 43 48 45 4E 42 4C 49 4E |3) = ZEICHENBLIN|
000003A0: 4B 20 41 55 53 00 AB 1F 7C 01 3A 00 D6 1F 86 01 |K AUS...|.:.....|
000003B0: 3A 20 20 99 C7 28 31 35 29 C7 28 31 38 29 3B 22 |: ..(15).(18);"|
000003C0: 20 22 3B C7 28 31 34 36 29 C7 28 31 35 37 29 C7 | ";.(146).(157).|
000003D0: 28 31 34 33 29 3B 00 DC 1F 90 01 3A 00 13 20 9A |(143);.....:.. .|
000003E0: 01 3A 20 20 A1 F9 20 58 24 3A 20 20 20 20 20 20 |.: .. X$: |
000003F0: 20 20 20 20 20 20 20 20 20 20 20 20 8F 20 57 41 | . WA|
00000400: 52 54 45 20 41 55 46 20 54 41 53 54 45 4E 44 52 |RTE AUF TASTENDR|
00000410: 55 43 4B 00 19 20 A4 01 3A 00 41 20 AE 01 FE 19 |UCK.. ..:.A ....|
00000420: 3A 20 D5 20 FE 18 3A 20 20 20 20 20 20 20 20 20 |: . ..: |
00000430: 20 20 20 20 20 8F 20 34 30 20 5A 45 49 43 48 45 | . 40 ZEICHE|
00000440: 4E 00 47 20 B8 01 3A 00 7D 20 C2 01 3A 20 20 97 |N.G ..:.} ..: .|
00000450: 32 35 39 39 2C 30 3A 20 20 20 20 20 20 20 20 20 |2599,0: |
00000460: 20 20 20 20 20 20 20 20 8F 20 53 43 48 41 4C 54 | . SCHALT|
00000470: 45 20 42 4C 49 4E 4B 45 4E 20 45 49 4E 00 83 20 |E BLINKEN EIN.. |
00000480: CC 01 3A 00 BA 20 D6 01 3A 20 20 A1 F9 20 58 24 |..:.. ..: .. X$|
00000490: 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |: |
000004A0: 20 20 20 8F 20 57 41 52 54 45 20 41 55 46 20 54 | . WARTE AUF T|
000004B0: 41 53 54 45 4E 44 52 55 43 4B 00 C0 20 E0 01 3A |ASTENDRUCK.. ..:|
000004C0: 00 F6 20 EA 01 3A 20 20 97 32 35 39 39 2C 31 3A |.. ..: .2599,1:|
000004D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004E0: 20 8F 20 53 43 48 41 4C 54 45 20 42 4C 49 4E 4B | . SCHALTE BLINK|
000004F0: 45 4E 20 41 55 53 00 FC 20 F4 01 3A 00 37 21 FE |EN AUS.. ..:.7!.|
00000500: 01 3A 20 20 97 32 36 30 30 2C 31 3A 20 20 20 20 |.: .2600,1: |
00000510: 20 20 20 20 20 20 20 20 20 20 20 20 20 8F 20 53 | . S|
00000520: 43 48 41 4C 54 45 20 42 4C 49 4E 4B 5A 41 45 48 |CHALTE BLINKZAEH|
00000530: 4C 45 52 20 41 55 53 00 3D 21 08 02 3A 00 44 21 |LER AUS.=!..:.D!|
00000540: 12 02 FE 19 00 4A 21 1C 02 3A 00 50 21 26 02 8E |.....J!..:.P!&..|
00000550: 00 56 21 30 02 3A 00 81 21 3A 02 8F 20 2A 2A 2A |.V!0.:..!:.. ***|
00000560: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000570: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000580: 2A 00 00 00 |*... |
..,.D.. ********************************
****.W.N.. *
*...X.. * GET MIT BLINKENDEM CU
RSOR *...... * FUER C128 MIT 40
ODER 80 *.X.... * ZEICHEN-SC
HIRM *...... *
*... .. **************
**********************.4...:.Y.... *****
************ TESTPROGRAMM._...:.R.H.."EI
NGABE ? ";...R..310:.X$.."J".X$.."N".210
......X$...........:.K.... *************
**** SUBROUTINE GET...... **************
*** MIT BLINKENDEM...... ***************
** CURSOR.....:.A.".. PRUEFE OB 40 ODER
80 ZEICHEN-SCHIRM.G.,.:.M.6.. B(215).128
. ..: . 80 ZEICHEN.S.@.:...J.:
. CHR$(15) = ZEI
CHENBLINK AN...T.:
. CHR$(18) = RVS ON.%.^.:
. CHR$(146) = RV
S OFF.C.H.:
. CHR$(157) = CURSOR LINKS...R.:
. CHR$(143) = ZEI
CHENBLINK AUS...|.:.V...: .G(15)G(18);"
";G(146)G(157)G(143);.....:.. ..: .. X
$: . WARTE AUF TASTENDR
UCK.. ..:.A ....: U ..: . 4
0 ZEICHEN.G ..:.} B.: .2599,0:
. SCHALTE BLINKEN EIN.. L.:.. V.
: .. X$: . WARTE AUF T
ASTENDRUCK.. ..:.. ..: .2599,1:
. SCHALTE BLINKEN AUS.. ..:.7!.
.: .2600,1: . SCHALTE B
LINKZAEHLER AUS.=!..:.D!.....J!..:.P!&..
.V!0.:..!:.. ***************************
*********...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL