Das deutsche QBasic- und FreeBASIC-Forum

LordAdel · Anmeldungsdatum: 31.10.2005 Beiträge: 3 Wohnort: Weilheim i.Ob.

Schreibe ein Programm, in dem ich die Schrift ohne große Funktionen kleiner als 10 Punkt darstellen möchte. Verwendet man PRINT, so bekommt man ja immer exakt 10 Punkt. Arbeiten tue ich in SCREEN 12. Wollte auch in diesem Modus bleiben. Bitte keine Megaprogramme, sondern möglicht eine Lösung in ein paar QB Zeilen.

Michael712 · Verfasst am: 31.10.2005, 15:04 Titel:

Hallo.

Erstmal, da gibts schon genug Threads zu.
Und zweitens, dass klingt wie ne aufforderung, was wir machen müssen. Man kann darum bitten und ich denke auch mal, dass keiner von uns dir ein 100% fertiges programm liefert. Man kann ja auch mal selber ein wenig nachdenken.

Michael

LordAdel · Verfasst am: 31.10.2005, 15:34 Titel: BITTE um Hilfe

Es sollte kein BEFEHL sein ein vollständiges Programm zu liefern. Mich würde nur ein Ansatz oder eine Hilfe dazu interessieren. Natürlich bitte ich die Teilnehmer dieses Forums darum. Da ich schon über ein halbes Jahr über dieses Problem nachdenke möchte ich um Entschuldigung bitten, wenn die Person, die auf meine Frage geantwortet hat, mich für dumm hält. Trotz umfangreichen Nachdenken bin ich zu keiner Lösung gekommen und habe auf ein bißchen Hilfe gehofft. Leider sind mir keine Threads zu diesem Thema bekannt und ich habe auch keine gefunden. Bin kein Profi und hoffe jemand kann mir mit hilfreichen Antworten helfen.

Michael712 · Verfasst am: 31.10.2005, 15:58 Titel:

Hallo.

Dann ist das naklar was anderes. Sry.

Mit Freebasic gibt es da einfachere möglichkeiten. Da gibt es Librarys zu und auch andere HIlfreiche Programme. Du kannst am besten unter Qbasic jedes einzelne Zeichen mit get in einem Array sppeichern und nacher auf dem bildschirm zeichnen. Danach machst du folgendes:

LordAdel · Verfasst am: 31.10.2005, 16:31 Titel: Danke

Super, vielen Dank! Werde es mal versuchen. Allerdings habe ich im Moment nicht genug Zeit dafür. Denke es wird aber klappen.

Robert

Dusky_Joe · Verfasst am: 31.10.2005, 18:01 Titel:

Soweit ich weiß, hast du unter QB die möglichkeit zwischen Fonts der Größe 16x8 und 8x8 Pixel zu wählen; standard ist 16x8.
(Die 10 pix komme bei dir wohl daher, dass du die Bodenzeile vergessen hast)

Zum unschalten zwischen den Modi verwendest du Width

Witdh 80, 30 => 80 Spalten, 30 Zeilen => Font 16x8
Width 80, 60 => 80 Spalten, 60 Zeilen => Font 8x8

Unter Scr12 sollten das die einzigen Schriftgrößen sein, die funzen... sieh dir einfach den Eintrag in der QB-Hilfe an. (Screen=> Link: Screen-Modi Übersicht) oder so was.
Damit kannst du dann bei Print bleiben.

Eine alternative wäre eine fertige Font-Routine, die es (auch für QB) wie sand am meer gibt. Die meisten sind auch recht einfach einzubinden.

However, such dir selbst die beste Methode aus zwinkern

Have a nice day
Ciao
_________________
fully biological degradable

Once, the big wave arrives, you've got two ways, you can go:
Either, you ride it, or you don't do.
But, if you don't ride, you'll never know wether you'd have gone wet.

Thomas Antoni · Anmeldungsdatum: 12.10.2004 Beiträge: 220 Wohnort: Erlangen

Dazu habe ich mir Folgendes für die MonsterFAQ vorgemerkt...

-------------------------------------------------------------------------------------

Frage:
--------
Wie kann ich in SCREEN 12 und 13 kleinere Schift anzeigen?

Antwort 1:
~~~~~~~~~~
[ von Thomas Antoni, 1.10.2005 ]

In der Voreinstellung hat der Screen 12 eine recht grobpixelige und große
Schrift mit 80 Spalten und 30 Zeilen. Mit WIDTH(80, 50) oder WIDTH (80,60) lässt
sich eine kleine Schrift mit 50 oder gar 60 Zeilen je Bildschirm voreinstellen.

Probiere doch mal folgende Befehlspassage, um die 60-Zeilendarstellung zu
bewundern: