natanael-b

#!/usr/bin/env bash

#
#  Uma singela homenagem os lendários Ícones Mágicos
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
#
#    Muito antes das lojas de apps dominarem o mundo o Brasil
#  tinha uma inciciativa chamada "Ícones Mágicos", basicamente
#  ao invés de ter uma aplicação para procurar apps todos os
#  apps populares e recomendados na época possuiam arquivos

natanael-b

 local upper2lower = {[65]=97,  [66]=98,  [67]=99,  [68]=100, [69]=101, [70]=102, [71]=103, [72]=104,
                      [74]=106, [75]=107, [76]=108, [77]=109, [78]=110, [79]=111, [80]=112, [81]=113,
                      [83]=115, [84]=116, [85]=117, [86]=118, [87]=119, [88]=120, [89]=121, [90]=122,
                      [193]=225,[194]=226,[195]=227,[196]=228,[197]=229,[198]=230,[199]=231,[200]=232,
                      [201]=233,[202]=234,[203]=235,[204]=236,[205]=237,[206]=238,[207]=239,[208]=240,
                      [209]=241,[210]=242,[211]=243,[212]=244,[213]=245,[214]=246,[216]=248,[217]=249,
                      [218]=250,[219]=251,[220]=252,[221]=253,[222]=254,[376]=255,[73]=105, [82]=114,
                      [192]=224};
                      
local lower2upper = {[97]=65,  [98]=66, [99]=67,   [100]=68, [101]=69, [102]=70, [103]=71, [104]=72,[105]=73,

natanael-b

class "StringBuilder" {
  constructor = function (self,largura,altura)
                  self.elements = {separator = ""}
                end;


  __shl = function (self,value)
            local elements = rawget(self,"elements")
            elements[#elements+1] = tostring(value)
            return #elements

natanael-b

Private Sub Workbook_Open()
  ActiveWindow.Caption = ""
  Application.Caption = "Título da janela"
  Application.ExecuteExcel4Macro "show.toolbar(""Ribbon"",False)"
  Application.DisplayFormulaBar = False
  Application.DisplayStatusBar = False
  ActiveWindow.DisplayWorkbookTabs = False  
  ActiveWindow.DisplayHeadings = False
  ' Dimensões da janela
  ActiveWindow.Height = 600