LB Booster
General >> Announcements >> LB Booster version 1.80 released
http://lbb.conforums.com/index.cgi?board=announcements&action=display&num=1330103454
LB Booster version 1.80 released
Post by Richard Russell on Feb 24th, 2012, 4:10pm

I've updated LB Booster to version 1.80:

http://www.lbbooster.com/LBB.exe (IDE/compiler)
http://www.lbbooster.com/LBBRUN.exe (runtime engine)

Changes in this version are as follows:

  1. Partial support for Unicode has been added. Foreign-alphabet literal strings may be included in a program, and they will print correctly in the mainwin and when sent to the printer with LPRINT. In conjunction with a little API code, GUI controls (except TEXTBOX and TEXTEDITOR controls) can also display Unicode text.

  2. Sprite 'masks' are now linear, allowing sprites to be partially-transparent or to have anti-aliased edges; this makes Anatoly's 'slide rule' program work correctly. This is a very valuable feature which LB4 has too, but it's not documented!

  3. The SPRITECOLLIDES command works correctly even if one or both sprites has been scaled (SPRITESCALE), offset (SPRITEOFFSET) or centered (CENTERSPRITE). This does *not* work correctly in LB4.

  4. The nine most recently opened programs are included in the File menu, for the convenience of being re-loaded without having to navigate to them in a file selector.
Richard.
Re: LB Booster version 1.80 released
Post by Richard Russell on Feb 25th, 2012, 1:51pm

on Feb 24th, 2012, 4:10pm, Richard Russell wrote:
Partial support for Unicode has been added.

I should perhaps have emphasised that this feature needs to be enabled in the Options menu, otherwise ANSI operation is assumed. This is because you may have a choice of which to use; for example if you want to output French text with accented characters you can choose to use either ANSI encoding or Unicode encoding for those characters.

Here's a program which outputs some Cyrillic text to the mainwin:

Code:
print "Это демонстрация российского текста"

Here the text is sent to the printer:

Code:
printerdialog
if PrinterName$ = "" then end
PrinterFont$ = "Times_New_Roman 24"
lprint "Это демонстрация российского текста"
dump

In the case of a GUI control it is rather more complicated:

Code:
 global CP.UTF8
 CP.UTF8 = hexdec("FDE9")
 nomainwin
 
 statictext #w.s1, "", 10, 10, 300, 100
 open "Unicode test" for window as #w
 #w "trapclose  [quit]"
 #w "font Times_New_Roman 20"
 hws1 = hwnd(#w.s1)
 call SetTextUnicode hws1, "Это демонстрация российского текста" 
 wait
 
[quit]
 close #w
 end
 
sub SetTextUnicode hwin, utf8$
 slen = len(utf8$)
 calldll #kernel32, "MultiByteToWideChar", _
   CP.UTF8 as long, 0 as long, _
   utf8$ as ptr, slen as long, _
   0 as long, 0 as long, ret as long
 wide$ = space$(2*ret)
 calldll #kernel32, "MultiByteToWideChar", _
   CP.UTF8 as long, 0 as long, _
   utf8$ as ptr, slen as long, _
   wide$ as ptr, ret as long, ret as long
 wide$ = wide$ + chr$(0) + chr$(0)
 calldll #user32, "SendMessageW", _
   hwin as long, _WM_SETTEXT as long, _
   0 as long, wide$ as ptr, ret as long
end sub

Richard.