X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=programs%2Fplotter%2Fsrc%2Fplotapfel.f;h=64e401c29521f18615c7c4c0a78f1cde62dbbf34;hb=dece501660c059d108e0b4586de6806bfb5b8cf4;hp=ab4365d88500094cbb7cce0c87d2be63bbf3f00f;hpb=fcb7b340c0c50feddfd0b1a4b2df25e41c374a12;p=h316.git diff --git a/programs/plotter/src/plotapfel.f b/programs/plotter/src/plotapfel.f index ab4365d..64e401c 100644 --- a/programs/plotter/src/plotapfel.f +++ b/programs/plotter/src/plotapfel.f @@ -143,7 +143,7 @@ C PENX=PENX-1 GO TO 8000 8100 CONTINUE - CALL PL$DN + CALL PL$D RETURN END C @@ -159,11 +159,11 @@ C C CR = 13 LF = 10 - WIDTH = 500 - MAXI = 50 + WIDTH = 120 + MAXI = 60 MAXVAL = 2.0 LOWX =-1.48 - HIGHX = 0.5 + HIGHX = 1.2 LOWY =-1.2 HIGHY = 1.2 INIT = 1