Este projeto é uma das minhas primeiras tentativas de programação de computadores em Visual Basic 6 quando eu tinha cerca de 16 anos. Ele simula com precisão a GUI principal de um telefone Nokia 5110 em ambiente Windows. Nunca terminei o projeto, mas teria sido interessante conseguir o minijogo Snake? em execução se alguém quiser continuar trabalhando nele.
Sei que o código é terrível em alguns lugares, pois foi minha primeira tentativa de codificação e é muito detalhado. Na época eu não tinha educação ou treinamento formal, pois não ensinavam programação na escola e eu ainda não entendia muitos dos conceitos fundamentais. Desculpe ?
Aqui estão algumas capturas de tela do aplicativo em execução no Windows 10:
As instruções a seguir explicam como configurar uma máquina virtual Windows 95 no VMware Workstation Player 17 e abrir o projeto Visual Basic 6. Se você quiser seguir o caminho menos nostálgico da memória, ainda é possível instalar com êxito o Visual Basic 6 nas versões modernas do Windows e abrir o projeto a partir daí.
Baixe e instale o VMWare17 aqui
Crie uma nova máquina virtual
Selecione: "Instalarei o sistema operacional mais tarde"
Nomeie a máquina virtual: Windows 95
Aloque o tamanho máximo do disco como 2 GB
Selecione: "Armazenar disco fdiskvirtual como um único arquivo"
Baixe Dos6.21.img em https://www.allbootdisks.com/download/dos.html
Selecione: "Personalizar Hardware..."
Clique no botão Adicionar... e selecione "Unidade de disquete"
Selecione "Usar arquivo de imagem de disquete:" e navegue até o arquivo Dos6.21.img
Jogue a máquina virtual
Digite o comando: fdisk no prompt e selecione 1, 1, Y
Digite o comando: formato c:
Baixe Win95 OSR2 ISO em https://winworldpc.com/product/windows-95/osr-2
No menu principal selecione Player -> Dispositivos Removíveis -> CD/DVD (IDE)
Na caixa de diálogo de configurações, selecione "Usar arquivo de imagem ISO:" e navegue até o arquivo windows95b.iso
Crie uma nova pasta na unidade c: usando o comando: mkdir c:win95
Copie os arquivos de configuração para a unidade c: usando o comando: xcopy r: c:win95 /s /e
Digite o comando: c:win95setup.exe /IS
Procure uma chave de CD OEM online. Google é seu amigo
Ignore as opções para instalar o adaptador de rede e a placa de som quando solicitado
No menu principal selecione Player -> Dispositivos removíveis -> Disquete -> Configurações e selecione "Usar unidade física:"
Quando o Windows terminar a instalação, clique no prompt na parte inferior da tela para instalar o VMware Tools
Instale a unidade SVGA manualmente clicando com o botão direito na área de trabalho -> Propriedades -> guia Configurações -> Propriedades avançadas -> Alterar... -> Com disco... e digite o caminho "C:Arquivos de programasVMwareVMware ToolsDriversvideo" e procure o arquivo vmx_svga .drv
Em Configurações de vídeo, defina a resolução desejada do monitor
Baixe o ISO do Visual Basic 6 em https://winworldpc.com/product/microsoft-visual-bas/60
No menu principal selecione Player -> Dispositivos Removíveis -> CD/DVD (IDE)
Na caixa de diálogo de configurações, selecione "Usar arquivo de imagem ISO:" e navegue até o arquivo Visual Basic 6.0 Enterprise Edition.iso
Abra Meu Computador e clique duas vezes na unidade de CD
Instale o aplicativo
Procure uma chave de CD OEM online. Google é seu amigo
Escolha instalar o Internet Explorer 4.01 SP1 sem o Windows Active Desktop Update
Desligue a máquina virtual com segurança no VMware Player
A versão atual do VMware tem problemas ao criar uma VM com o hardware necessário para suportar áudio. Existe uma solução:
gui.exitOnCLIHLT
hpet0.presente
vmci0.presente
vmci0.id
Abra o arquivo: C:Users
Altere a configuração da versão de hardware para virtualHW.version = "4"
Exclua qualquer linha começando com pciBridge ou terminando com pciSlotNumber
Exclua as seguintes linhas
Inicie a máquina virtual no VMware Player
No menu principal selecione Player -> Dispositivos Removíveis -> CD/DVD (IDE)
Na caixa de diálogo de configurações, selecione "Usar arquivo de imagem ISO:" e navegue até o arquivo win95_drivers.iso incluído no código-fonte deste projeto
Abra a unidade d: em Meu Computador e execute o arquivo SBPCI128Setupus_w9x.exe para instalar os drivers de áudio.
Clique em Não quando solicitado pela primeira vez para reiniciar o computador e aguardar a conclusão do instalador
Reinicie a máquina virtual e você deverá ouvir o som familiar de inicialização do Windows
No menu principal, selecione Player -> Dispositivos removíveis -> Adaptador de rede -> Configurações -> "Bridged" e "Replicar estado de conexão de rede física"
Clique em Iniciar -> Configurações -> Painel de controle
Rede aberta
Clique em Adicionar...
Clique em Protocolo e depois em Adicionar...
Na guia Fabricantes, escolha Microsoft
Em Protocolos de Rede, escolha TCP/IP
Clique em OK e saia da configuração
Reinicie a máquina virtual
Abra o Internet Explorer
Selecione "Desejo configurar uma nova conexão usando (LAN)", depois "Conectar usando (LAN") e "Não" para usar um servidor proxy
Tente navegar para www.google.com no Internet Explorer
Desligue a máquina virtual com segurança no VMware Player
Selecione a máquina virtual e no menu principal selecione Player -> Gerenciar -> Configurações da Máquina Virtual...
Clique no botão Adicionar... e selecione "Controlador USB"
Inicie a máquina virtual no VMware Player
Cancele o prompt do Assistente para atualização de driver de dispositivo na inicialização
Abra Configurações -> Painel de Controle -> Sistema -> Gerenciador de Dispositivos
Remova todos os "Outros dispositivos" desconhecidos da lista de hardware
No menu principal selecione Player -> Dispositivos Removíveis -> CD/DVD (IDE)
Na caixa de diálogo de configurações, selecione "Usar arquivo de imagem ISO:" e navegue até o arquivo win95_drivers.iso incluído no código-fonte deste projeto
Há um bug no Windows ao executar o arquivo de drivers XUSBSUPP.exe necessário, onde ele executará o ScanDisk primeiro, mas ficará preso em um loop infinito. Para superar isso:
Abra a pasta c:Windows no Explorer
No menu principal selecione Exibir -> Opções -> Exibir e desmarque Ocultar extensões de arquivo do MS-DOS
Renomeie Scandskw.exe para Scandskw.old
Abra o projeto d:ScandskwScandskw.vbp no Visual Basic 6. Selecione Arquivo -> Criar... Scandskw.exe e navegue até o diretório c:WindowsSystem e compile
Abra a unidade d: em Meu Computador e execute XUSBSUPP.exe, isso instalará todos os drivers de armazenamento em massa USB necessários
Reinicie a máquina virtual
Siga as instruções do Assistente de atualização de driver de dispositivo para instalar o PCI Bridge e outros drivers
Exclua o arquivo c:WindowsScandskw.exe criado anteriormente e renomeie Scandskw.old com a extensão exe
Insira a unidade flash USB novamente e escolha "Conectar a uma máquina virtual" no prompt Novo dispositivo USB detectado
Siga as instruções do Assistente de atualização de driver de dispositivo para instalar os drivers de dispositivo de classe de armazenamento em massa USB genérico
Se você seguiu as instruções corretamente, poderá ver um Disco Removível (E:) em Meu Computador
Crie uma imagem ISO da pasta do código-fonte:
Baixe ImgBurn em https://www.imgburn.com/index.php?act=download
Abra o ImgBurn e selecione: "Criar arquivo de imagem a partir de arquivos/pastas"
Baixe o ZIP do código-fonte deste projeto no GitHub e extraia para uma pasta
Navegue até a pasta do código-fonte no ImgBurn e selecione o nome do arquivo de saída e escreva o arquivo ISO
No menu principal do VMware player, selecione Player -> Dispositivos removíveis -> CD/DVD (IDE)
Na caixa de diálogo de configurações, selecione "Usar arquivo de imagem ISO:" e navegue até o arquivo ISO
Crie uma pasta chamada c:reposNokia5110 e copie o código-fonte para ela
Abra o arquivo de projeto Nokia5110.vpb no Visual Basic 6
Selecione Executar -> Iniciar para executar o programa
ou...
Copie o código-fonte para a máquina host usando uma unidade USB:
Baixe o ZIP do código-fonte deste projeto no GitHub e extraia para uma pasta
Insira uma unidade flash USB e copie o código para ela e remova a unidade
Inicie a máquina virtual do Windows 95 criada anteriormente
Insira a unidade flash USB novamente e escolha "Conectar à máquina virtual" no prompt Novo dispositivo USB detectado
Abra Meu Computador e você verá uma unidade de disco removível (E:)
Crie uma pasta chamada c:reposNokia5110 e copie o código-fonte para ela
Abra o arquivo de projeto Nokia5110.vpb no Visual Basic 6
Selecione Executar -> Iniciar para executar o programa
Infelizmente, os navegadores modernos sinalizam alguns executáveis do Visual Basic 6 como ameaças potenciais, então você pode precisar usar a linha de comando para baixar a versão.
gh release download -R https://github.com/lschmid83/Nokia-5110 -A zip -O "c:releaseNokia 5110.zip"