| /programs/cmm/kolibri font viewer/compile original font.bat |
|---|
| 0,0 → 1,10 |
| C-- "kolibri font viewer.c" |
| @del "kolibri font viewer" |
| @rename "kolibri font viewer.com" "kolibri font viewer" |
| kpack "kolibri font viewer" |
| @del warning.txt |
| @pause |
| @rem ====== Automatically add binnary to kolibri.img and then run QEMU ===== |
| @rem"C:\Program Files (x86)\WinImage\WINIMAGE.exe" D:\Kolibri\work\QEMU\kolibri.img /I /H/Q C:\Users\Leency\Dropbox\CMM\example\example |
| @rem @cd /d C:\Work\QEMU |
| @rem C:\Work\QEMU\kolibri_qumu.bat |
| /programs/cmm/kolibri font viewer/kolibri font viewer.c |
|---|
| 0,0 → 1,50 |
| #define MEMSIZE 0xEE80 |
| #include "../lib/font.h" |
| #include "../lib/gui.h" |
| void main() |
| { |
| word i, y, btn; |
| char line[256], title[4196]; |
| font.no_bg_copy = true; |
| font.color = 0; |
| font.bg_color = 0xFFFFFF; |
| if (!param) strcpy(#param, "/sys/fonts/Tahoma.kf"); |
| font.load(#param); |
| strcpy(#title, "Kolibri font preview: "); |
| strcat(#title, #param); |
| loop() |
| { |
| switch(WaitEvent()) |
| { |
| case evButton: |
| btn = GetButtonID(); |
| if (btn==1) ExitProcess(); |
| if (btn==2) font.weight ^=1; |
| if (btn==3) font.italic ^=1; |
| if (btn==4) font.no_bg_copy ^=1; |
| case evReDraw: |
| DefineAndDrawWindow(215,100,500,320,0x33,0xFFFFFF,#title); |
| DrawBar(0, 0, 500-9, 30, 0xCCCccc); |
| CheckBox2(10, 8, 2, "Bold", font.weight); |
| CheckBox2(70, 8, 3, "Italic", font.italic); |
| CheckBox2(140, 8, 4, "Smooth", font.no_bg_copy); |
| if (!font.data) |
| { |
| WriteText(10, 50, 0x82, 0xFF00FF, "Font is not loaded."); |
| } |
| else for (i=10, y=40; i<22; i++, y+=font.height;) |
| { |
| font.size.text = i; |
| sprintf(#line," §¬¥à èà¨äâ /size font %d ¯¨ªá¥«¥©.",i); |
| font.prepare(10,y,#line); |
| font.show(10, y); |
| } |
| } |
| } |
| } |
| void CheckBox2(dword x, y, id, text, byte value) { |
| CheckBox(x, y, 14, 14, id, text, system.color.work_graph, system.color.work_text, value); |
| } |
| /programs/cmm/kolibri font viewer/font/Verdana.kf |
|---|
| Cannot display: file marked as a binary type. |
| svn:mime-type = application/octet-stream |
| Property changes: |
| Added: svn:mime-type |
| +application/octet-stream |
| \ No newline at end of property |
| /programs/cmm/kolibri font viewer/font/Tahoma.kf |
|---|
| Cannot display: file marked as a binary type. |
| svn:mime-type = application/octet-stream |
| Property changes: |
| Added: svn:mime-type |
| +application/octet-stream |
| \ No newline at end of property |
| /programs/cmm/kolibri font viewer/font |
|---|
| Property changes: |
| Added: tsvn:logminsize |
| +5 |
| \ No newline at end of property |
| /programs/cmm/kolibri font viewer/. |
|---|
| Property changes: |
| Added: tsvn:logminsize |
| +5 |
| \ No newline at end of property |