nomainwin 'problem is, it looks like JB/LB uses "courier_new" even if explicitely said "courier" 'Other language does that told, so "courier_new" and "courier" - two different fonts open "test" for graphics_nsb_nf as #gr #gr "down" #gr "trapclose [quit]" #gr "home; posxy xc yc" data 192,224,193,225,194,226,212,244,0 a$="" a$="AaBbCcDd" read a while a>0 a$=a$+chr$(a) read a wend a$=a$+"012345" #gr "place 10 20" #gr "font courier 15" #gr "\font courier 15" #gr "\"; a$ #gr "\1" #gr "\2" #gr "\3" #gr "\4" #gr "place 100 60" for i = 10 to 15 #gr "font courier ";i #gr "\font courier ";i next #gr "place 10 180" #gr "font courier_new 15" #gr "\font courier_new 15" #gr "\"; a$ #gr "\1" #gr "\2" #gr "\3" #gr "\4" #gr "place 100 220" for i = 10 to 15 #gr "font courier_new ";i #gr "\font courier_new ";i next for i = 0 to 2*yc step 20 #gr "line ";0;" ";i;" ";2*xc;" ";i next #gr "flush" wait [quit] close #gr end
|