Das OFFIZIELLE PROFAN SUPPORT FORUM
Einsteigerfragen
PROFAN-Programmierung
Helfer & Tools
Anregungen & Vorschläge
PROFAN-NEWS
Die Regeln!
1 - Einsteigerfragen

 Neues Thema  |  Zur Übersicht  |  Suchen  |  Einloggen   Vorherige Nachricht  |  Nächste Nachricht 
 Re: Font im Textmodus
Autor: p. specht (---.aon.at)
Datum:   30.12.17 12:43

Stimmt, aber ich hätte mich besser ausdrücken sollen:

Ich nutze bei PRINT den font 2 als Fettdruck, font 0 als Normaldruck.
Weil ich den üblichen Programmfluss nicht stören will, aber eine Art "Lebenszeichen" programmieren wollte, das zeigt, daß der PC nicht abgestürzt ist, sondern eben länger rechnet, wäre es gut, die aktuelle Einstellung des auf die PRINT-Befehle wirkenden Font (also ob 0,1 oder 2) danach wieder restaurieren zu können.
 CLS
 Declare globalmerk&,ende&
 
 Repeat 'Main loop
 ...
 if rnd()<0.002:Lebenszeichen
 ...
 Until ende&
 END
 
 Proc Lebenszeichen
 declare xmerk&,ymerk&,fontmerk&
 xmerk&=%pos:ymerk&=%csrlin:fontmerk&= .... ????
 
 inc globalmerk&:case globalmerk&>4:globalmerk&=1
 locate 1,2:font 2
 print mid$("-\|/",globalmerk&,1);
 
 locate &ymerk,&xmerk
 font fontmerk&
 EndProc
 


Klappt aber nicht wegen Abfrage Fonttyp ...
Any ideas?

Gruss

____
Ein richtiges Problem hat keine Lösung, nur Näherungen!

 Beitrag beantworten  |  Foren-Liste  |  Alle Antworten   Neuerer Beitrag  |  Älteres Thema 

 Beiträge Autor  Datum
 Font im Textmodus  Neu
p. specht 28.12.17 17:03 
 Re: Font im Textmodus  Neu
Michael Wodrich 30.12.17 00:22 
 Re: Font im Textmodus  Neu
Heinz Brill 30.12.17 07:20 
 Re: Font im Textmodus  Neu
p. specht 30.12.17 12:43 
 Re: Font im Textmodus  Neu
Wilfried Heyse2 11.01.18 12:00 
 Re: Font im Textmodus  Neu
p. specht 12.01.18 16:42 
 Re: Font im Textmodus  Neu
Jörg Greve 31.12.17 00:18 
 Re: Font im Textmodus  Neu
p. specht 31.12.17 19:59 


 Foren-Liste  |  Zur Registrierung 
 Benutzerlogin
 Benutzername:
 Passwort:
 Login-Daten speichern:
   
 Passwort vergessen?
E-Mail-Adresse oder Username unten eingeben. Dann wird Dir per e-Mail ein neues Passwort zugeschickt.

phorum.org