Download (7333kb, 52 pages) - The Sharp MZ-Series

Weitere Magazine

Empfehlungen

Info

16:IF A)=22 AND A(24.59 THEN LET D=4 17:IF"A)=1 AHD A
lIlfi ?ilcl', · ~'cJ ~ r J.'l~~ -.. I .-:. ! Cl) ~ ~:\ ~~ ~ ~ ~ ~ ~~\~ tJ 'l:. , ~ ~~t \. ~ ~ ~. ~ t> ca4 m ~ ~ ~ ~~ ~ '> ~ ~ 275:L1NE (W,0)-(W, 440:LPRINT " oer- 0 Progranun "Grafische Darstellung" -15) ur-chschnittswe (Diagranun) 280:L1NE (W,-15)-( r-t betr-ae9t" 0,-15) 445:GLCURSOR (60, Wie hinlKnglich bekannt 1st, sagen Grafiken sehr viel mehr Uber ~h 285:L1NE (0,-15)-( 200) len aus als Zahlen selbst. Dieses Programm fUr den PC-1500 kann fUr 0,0) 450:LPRINT (N/J);" jede Darstellung von Zahlen genutzt werden; es berUcksichtigt ebenso 29ra:lINE (0,0)-(8, die Darstellung von negativen Zahlen. Die Zahlen werden in Form von -8) 455:GLCURSOR (0,-4 dreidimensionalen Balken zu Papier gebracht. 295:L1NE (0,-15)-( 80):SORGN Das Programm stellt quasi eine Erweiterung zu den beiden im SHARP · 8, -23) 46ra:CLS :WAIT 1.3: Anwender-Handbuch befindlichen Programmen GRAF1SCHE DARSTELLUNG I 300:GLCURSOR (0,-2 PRINT "Kopie ( und II dar. 6):SORGN J/N) " Und hier no oh einige Hinweise zur Bedienung des Programmesl Nach dem 305:NEXT I 465:IF 1NKEY$ =I'J" Start mi t RUN wird bei "Posten x I" die Postenbezeichnung und bei 310: WAIT 0: PRINT " GRAPH :ROTATE "Wert x I" der Postenwert eingegeben. Es kennen maximal bia zu acht Schr- i ft I .oar-st I:CSIZE l:GOTO zehn Posten e1ngegeben werden. Wenn man allerdinge schon vorher die e I I un9 (J/N)" 125 Eingabe beenden will, muG man bei "Posten x 315:IF INKEY$ ="J" 470:IF 1NKEYS ="N" I" einen Klammeraffen (0) eingeben. GOTO 330 END Nach Beenden des Eingabeteiles kann man dann die Farben fUr die Bal 320:IF 1NKEYS ="N" 475:GOTO 455 ken aU9wB.hlen. Es folgt der AllSdruck des Diag:re.mmes. Danach kann man GOTD 460 325:GOTD 315 STATUS 1 sich noch eine schriftliche Darstellungsform &usdrucken lassen und zu guter Letzt besteht die 330:BEEP 1,99,200 2000 M~glichkeit, sich alle grafischen und schriftlichen Darstellungen beliebig oft kopieren 335:1NPUT "Uebersc zu lassen. 1ch hoffe, daG Sie das Programm verwenden kennen und verbleibe hr-ift: ";US PROGRAMMAUFBAU s 340:CLS :GRAPH : COlOR 1:CSIZE Zeilen Erkli:i.rung 85:IF 12>=0GOTO 1 155:RLINE -(0,4): 2:ROTATE 1: DIAGRAMM 00 GLCURSOR (208, GLCURSOR C0,-1 5 - 15 Dimensionierung, Titel 90:INPUT "Far-be d 13*5+9):LPRINT 00):SORGN 20 - 45 Eingabeteil .Balken (ne9) 11 345:GLCURSOR (204, 50 - 70 Errechnung der Y-Achse 5: CLEAR : WAIT 0: :l> : ";CN 170:GLCURSOR (F+8, 0):LPRINT US 75 - 95 Eingabe: Farbe f. Balken ........ GRAPH :ROTATE 95:1F CN3 0):SORGN 350:CS1ZE 1:FO=196 100 - 120 Errechnung des Nullpunktes ........ 1:CS1ZE 1 OR CNINT CN 175:L=J*25+15 /J:G=190 125 - 170 Zeichnen der Y-Achse CD 10:oIM A$(18),A(1 BEEP 2:GOTO 90 180:L1NE (0,0)-(0, 355:FOR 1=ITO J 175 - 195 Zeichnen der X-Achse rJJ 8) 100:ol=Il-12:1F 12 -l) 350:GLCURSOR (G,0) 15 : PAUSE ,. 200 - 305 Zeichnen der Balken 0 )=0LET F=0:ol= 185:LINE (0,-L)-(8 :IF J>9ANO 1 370:GLCURSOR CG,-3 460 - 475 Kopie J/N r.n 110:IF F
Seite 1 und 2: § of tLU or f llhlperu.rare Nr.11
Seite 3 und 4: Nie mehr Thea.ter durch Jetzt ist
Seite 5 und 6: ~----------'i * MZ 700 * univers.32
Seite 7 und 8: :I;> ~ ~ SHARP PC 1500(A) Betrifft
Seite 9 und 10: ==:HAF-:P PC 15121121·:: A:) :-; H
Seite 11 und 12: ~......,.......,......, ST 1. ,2. 3
Seite 13 und 14: Programme fuer Sharp Pc 15~~ A Die
Seite 15 und 16: ::r>. Cl :::x:: --i c Z G) ,-... V
Seite 17 und 18: 1Il+.rt"H III a.< 0.. DO rt"::l+'(/
Seite 19 und 20: Numerische Losung_gewohnlicher Difr
Seite 21 und 22: 20:"TRI"B(0)=B(I):C=8 22:IF B(1)+1(
Seite 23: " J a.!! I ch bin a.bgel"utscht." 5
Seite 27 und 28: F[ 1 ............. (........ :1699)
Seite 29 und 30: Friedrich Koellen Geschw.Scholl-Str
Seite 31 und 32: 'S~ .,;:\~ ~.~ ~ ~ ~ ~~ \.1.+- ~ ~p
Seite 33 und 34: PC-1401 ...........................
Seite 35 und 36: Betr.: Listing HA WAR I" -- Ein LCD
Seite 37 und 38: ~ ~ . ~ ~. ~ ~ ~ ~ Q w~ t1 Q Q
Seite 39 und 40: w.,1D'I 11 EJgJ!it 292 ~ 189 III,ID
Seite 41 und 42: Hi~r ~ind ~i~=Di~ pr~~~~~i~n~11~n P
Seite 43 und 44: Pascal-System AlIgemeines: Das K &
Seite 45 und 46: DFD 700 Doppel Floppy Station 560 K
Seite 47 und 48: € ........~........ ~~~~ ~ ......
Seite 49 und 50: MATHEMATIK UTILITY Ml Liste.Zahlen,
Seite 51 und 52: ABO N N E MEN T Wenn cs Ihnen SpaB

Download (7333kb, 52 pages) - The Sharp MZ-Series

Erfolgreiche ePaper selbst erstellen

Template löschen?

Als Template speichern?