| BitmapText von ??? |
| DivineDominion bat mich den BitmapText-Source nochmal rauszukramen. Nun, hier ist er: [code:1:2c1296d4a5] Function BitmapText(x,y,txt$,center_x,center_y,animimage) If animimage lang=Len(txt$) w=ImageWidth(animimage) h=ImageHeight(animimage) width=w*lang If center_x Then x=x-(width/2) If center_y Then y=y-(h/2) For i=1 To lang DrawImage animimage,x,y,(Asc(Mid(txt$,i,1)))-32 x=x+w Next EndIf End Function Graphics 640,480,16,2 SetBuffer BackBuffer() fnt13x13=LoadAnimImage("fnt13x13.bmp",13,13,0,256) ClsColor 0,0,120 Repeat Cls BitmapText(320,240,"Hallo Welt",1,1,fnt13x13) Flip Until KeyHit(1) End [/code:1:2c1296d4a5] Die BMP-Datei mit dem Font könnt Ihr Euch von http://www.makegame.de/downloads/bitmaptext/fnt13x13.zip saugen (ca. 2kb) ... |
| von ??? |
| Hmm... Ja, das ist ja nicht so ganz problematisch. Trotzdem danke :) Ich meinte eigentlich diese Bitmap-Fonts, bei denen man die Reihenfolge der Zeichen im Bild selber festlegen konnte. Hattest du mal gepostet, ist aber schon ewig her. Sowas wäre nämlich interessant, wenn man viele Zeichen nicht brauch. |
| von ??? |
| http://www.blitzforum.de/viewtopic.php?t=1625 :roll: |