Re: Fruit basket program in Lua
- From: "Marlon Brandão de Sousa" <splyt.lists@xxxxxxxxx>
- To: programmingblind@xxxxxxxxxxxxx
- Date: Wed, 7 Nov 2007 12:11:14 -0200
only fix is that lua is a creation of puc university, in Rio de
Janeiro, Brazil ..
Marlon
2007/11/6, Jamal Mazrui <empower@xxxxxxxxx>:
> From the zip archive at
> http://www.EmpowermentZone.com/lua_fruit.zip
>
> This fruit basket program is written in Lua: an open source, dynamic
> language developed at a university in Portugal (Lua means moon in
> Portuguese). Designed to be lightweight and portable, Lua is written in
> ANSI C and may be used either stand-alone or as an embedded scripting
> language for applications. It is often deployed as a scripting engine for
> games or portable devices. Mobile Speak, the screen reader for smart
> phones, uses Lua for scripting.
>
> The Lua home page is at
> http://lua.org
>
> The fruit basket program uses wrappers for the WxWidgets GUI library,
> available at
> http://WxLua.SourceForge.net
>
> This package includes a utility for creating a stand-alone executable that
> runs an embedded Lua script. A batch file included with this archive,
> build.bat, shows how lua_fruit.exe is built. To run the executable,
> remember to include its .exe extension on the command line -- I found this
> not to be optional, as is usually the case.
>
> If one has a C compiler, WxLua may be selectively included in an
> executable. Otherwise, the resulting size is large: about 6 megabytes.
> The executable may be reduced to a quarter of that size, however, using an
> open source utility called Ultimate Packer for Executables, available at
> http://upx.sourceforge.net
>
> The batch file invokes this utility so that lua_fruit.exe is about 1.5
> megs. The archive includes all components needed to rebuild the
> executable. Its source code is below. I have also prepared a collection
> of Lua documentation in structured text format at
> http://www.EmpowermentZone.com/lua_doc.zip
>
> Jamal
>
> -- Content of the file lua_fruit.lua
> -- Fruit basket program in Lua
> -- Public domain by Jamal Mazrui
>
> dlg = wx.wxDialog(wx.NULL, wx.wxID_ANY, "Fruit Basket",
> wx.wxDefaultPosition, wx.wxSize(513, 176))
>
> lblFruit = wx.wxStaticText(dlg, wx.wxID_ANY, "&Fruit:", wx.wxPoint(14,
> 14), wx.wxDefaultSize)
> txtFruit = wx.wxTextCtrl(dlg, wx.wxID_ANY, "", wx.wxPoint(43, 14),
> wx.wxDefaultSize, wx.wxTE_LEFT)
>
> lblBasket = wx.wxStaticText(dlg, wx.wxID_ANY, "&Basket:", wx.wxPoint(251,
> 14), wx.wxDefaultSize)
> lstBasket = wx.wxListBox(dlg, wx.wxID_ANY, wx.wxPoint(293,14),
> wx.wxDefaultSize, {})
>
> btnAdd = wx.wxButton(dlg, wx.wxID_ANY, "&Add", wx.wxPoint(190, 121),
> wx.wxDefaultSize)
> btnAdd:SetDefault()
> dlg:Connect(btnAdd:GetId(), wx.wxEVT_COMMAND_BUTTON_CLICKED,
> function(event)
> sValue = txtFruit:GetValue()
> if sValue == "" then
> wx.wxMessageBox("No fruit to add!", "Alert", wx.wxICON_EXCLAMATION, dlg)
> return
> end
>
> lstBasket:Append(sValue)
> txtFruit:Clear()
> iCount = lstBasket:GetCount()
> iIndex = iCount - 1
> lstBasket:SetSelection(iIndex)
> end)
>
> btnDelete = wx.wxButton(dlg, wx.wxID_ANY, "&Delete", wx.wxPoint(217, 121),
> wx.wxDefaultSize)
> dlg:Connect(btnDelete:GetId(), wx.wxEVT_COMMAND_BUTTON_CLICKED,
> function(event)
> iIndex = lstBasket:GetSelection()
> if iIndex == -1 then
> wx.wxMessageBox("No fruit to delete!", "Alert", wx.wxICON_EXCLAMATION,
> dlg)
> return
> end
>
> lstBasket:Delete(iIndex)
> iCount = lstBasket:GetCount()
> if iIndex == iCount then
> iIndex = iCount - 1
> end
>
> lstBasket:SetSelection(iIndex)
> end)
>
> dlg:Connect(wx.wxEVT_CLOSE_WINDOW,
> function (event)
> if wx.wxMessageBox("Exit program?", "Confirm", wx.wxYES_NO, dlg) ==
> wx.wxYES then
> event:Skip()
> dlg:Destroy()
> end
> end)
>
> dlg:Centre()
> dlg:Show(true)
>
> -- End of lua_fruit.lua
>
> __________
> View the list's information and change your settings at
> //www.freelists.org/list/programmingblind
>
>
--
When you say "I wrote a program that crashed Windows," people just
stare at you blankly and say "Hey, I got those with the system, for
free."
Linus Torvalds
__________
View the list's information and change your settings at
//www.freelists.org/list/programmingblind
Other related posts:
