Necesito Crear *. bat para compilar version 2402

[CarlosFossati]

Hola Buenas, estoy totalmente parado en el uso de FW con xharbour y Bolrland, necesito crear en archivo Bat, pe me permita compilar multiples PRG, desde ya muchas Gracias, en la actualidad, utilizo la ver 176 de fw y xedit, barbaro todo, pero no puedo pasar a fw2402.

[karinha]

CX.BAT o a tu gusto.

Code: Select all  Expand view  RUN

REM @Echo Off
@Echo On
Cls
Echo ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
Echo ³ FiveWin For xHarbour                         xHarbour Development Power    ³Ü
Echo ³ (c) FiveTech, 1993-2024      For Microsoft Windows 95/98/NT/2000/ME And XP ³Û
Echo ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙÛ
Echo ÿ ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß

Echo ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
Echo ³ FiveWin For xHarbour                           Contato Sistemas Ltda.      ³Ü
Echo ³ Aguarde um Momento, Compilando Aplica‡Æo 32 Bits, Processamento Demorado   ³Û
Echo ³ CopyRight(c) JoÆo@2017 - Todos os Direitos Reservados.  WINORCAM 32 Bits.  ³Û
Echo ³ Agradecimentos Especiais - Gilmer Tavares - Virtual Objects Informatica    ³Û
Echo ³ vendas@fivewin.com.br - suporte@fivewin.com.br - gilmer@fivewin.com.br     ³Û
Echo ³ Contatos: kapiabafwh@gmail.com / kapiabafwh@bol.combr / joao@pleno.com.br  ³Û
Echo ³ Telefones: (11) 3106-2832 - 9 5150-7341 - 9 5882-8069(Recados) - TIM.      ³Û
Echo ³ Modificado em: 16/08/2021 - Por: Joao Santos   - Covid-19 Quarentine.      ³Û
Echo ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙÛ
Echo ÿ ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß

Echo  .
Echo  Aguarde... Compilando os Modulos do Programa... Processamento Demorado
Echo  Gerando o Arquivo ERRO.LOG, em Caso de Duvidas, Consulte-o. Borland C.

REM PARA QUE A TIPSSL.LIB FUNCIONE, POR A TIP.LIB DEPOIS DELA NO .LNK

set GT=gtgui
Set hdir=C:\XHBBCC76
REM https://forums.fivetechsupport.com/viewtopic.php?f=6&t=43685&sid=ddfff51faa6e33b759868c7eef0bf671
REM PARA SE GERAR ARQUIVOS.OBJ DIRETAMENTE DE UM ARQUIVO.C COM BCC76
Set bcdir=C:\BCC76\include\windows\crtl
Set bcdir=C:\BCC76\include\windows\sdk
Set bcdir=C:\BCC76\include\dinkumware
Set bcdir=C:\BCC76
Set fwhdir=C:\FwH2402  REM -> DONDE ESTA TU FWH...

@If Exist *.Obj      Del *.Obj
@If Exist *.Map      Del *.Map
@If Exist *.TDS      Del *.TDS
@If Exist *.Bc       Del *.bc
@If Exist *.C        Del *.C
@If Exist *.HC       Del *.HC

If Exist WINORCAM.Exe     Del WINORCAM.Exe
If Exist WINORCAM.Exe.bak Del WINORCAM.Exe.bak
If Exist WINORCAM.Exe.prg Del WINORCAM.Exe.prg

%hdir%\bin\harbour WINORCAM /m/n /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p      > Erro.log 2>  ERROS.LOG
%hdir%\bin\harbour FUNCOES  /m/n /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p     >> Erro.log 2>> ERROS.LOG
%hdir%\bin\harbour CHAMADO  /m/n /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p     >> Erro.log 2>> ERROS.LOG
%hdir%\bin\harbour PROPOSTA /m/n /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p     >> Erro.log 2>> ERROS.LOG
%hdir%\bin\harbour CRIARDBF /m/n /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p     >> Erro.log 2>> ERROS.LOG
%hdir%\bin\harbour REINDEXA /m/n /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p     >> Erro.log 2>> ERROS.LOG


%bcdir%\bin\bcc32 -M -c -v -O2 -eWINORCAM.Exe -I%hdir%\include -I%bcdir%\include WINORCAM.C   >> Erro.log 2>> ERROS.LOG
%bcdir%\bin\bcc32 -M -c -v -O2 -eFUNCOES.Exe  -I%hdir%\include -I%bcdir%\include FUNCOES.C    >> Erro.log 2>> ERROS.LOG
%bcdir%\bin\bcc32 -M -c -v -O2 -ePROPOSTA.Exe -I%hdir%\include -I%bcdir%\include PROPOSTA.C   >> Erro.log 2>> ERROS.LOG
%bcdir%\bin\bcc32 -M -c -v -O2 -eCRIARDBF.Exe -I%hdir%\include -I%bcdir%\include CRIARDBF.C   >> Erro.log 2>> ERROS.LOG
%bcdir%\bin\bcc32 -M -c -v -O2 -eREINDEXA.Exe -I%hdir%\include -I%bcdir%\include REINDEXA.C   >> Erro.log 2>> ERROS.LOG


If ErrorLevel 1 Type Erro.log | More
If ErrorLevel 1 Goto Exit

REM %bcdir%\bin\bcc32 -M -c -O2 -eWINORCAM.Exe -I%hdir%\include WINORCAM.c

%bcdir%\bin\BRC32.Exe -R XPLOOK.RC

:ENDCOMPILE

REM ERA ASSIM: MUDEI EM: 09/10/2017 para nao aparecer a janela do DOS- Joao
REM %bcdir%\bin\ilink32 -Gn -aa -Tpe -s @Cx.Lnk

REM http://fivewin.com.br/index.php?/topic/27264-prompt-dos/
REM Mude para:

%bcdir%\bin\ilink32 -aa -Gn -Tpe -s -v @CX.LNK

Echo .
IF ERRORLEVEL 1 GOTO LINKERROR
Cls
Echo .
Echo * Aplicacao Foi Desenvolvida Com Sucesso
Echo .
Echo * Aguarde um Momento, Compactando Aplicacao, Usando o PEC2.Exe
Echo .
REM C:\PECOMPACT\PEC2 /NB /EMP:Y /TM:Y /CR:Y /MC WINORCAM.Exe
REM C:\UPX4\UPX.EXE --lzma WINORCAM.exe
Echo .
Echo * Aplicativo Foi Compactado Com Sucesso - Aguarde Execucao.
Echo .
Echo * Aguarde, Executando o Aplicativo, Gerado Com Sucesso Absoluto *
WINORCAM
GOTO EXIT

:LINKERROR
PAUSE * Applicacao Nao Foi Desenvolvida Com Sucesso. Veja ERRO.LOG *
GOTO EXIT
Echo .
cls

:EXIT
 

Regards, saludos.

[karinha]

CX.LNK

Code: Select all  Expand view  RUN

C:\BCC76\lib\c0w32.Obj               +
WINORCAM.OBJ                         +
FUNCOES.OBJ                          +
PROPOSTA.OBJ                         +
CHAMADO.OBJ                          +
CRIARDBF.OBJ                         +
REINDEXA.OBJ,                        +
WINORCAM.EXE,                        +
WINORCAM.MAP,                        +
C:\FWH2402\lib\FiveHX.lib            +
C:\FWH2402\lib\FiveHC.lib            +
C:\XHBBCC76\lib\vm.Lib               +
C:\XHBBCC76\lib\rdd.Lib              +
C:\XHBBCC76\lib\common.Lib           +
C:\XHBBCC76\lib\rtl.Lib              +
C:\XHBBCC76\lib\lang.Lib             +
C:\XHBBCC76\lib\macro.Lib            +
C:\XHBBCC76\lib\hbsix.Lib            +
C:\XHBBCC76\lib\dbfntx.Lib           +
C:\XHBBCC76\lib\PcRepos.Lib          +
C:\XHBBCC76\lib\dbffpt.Lib           +
C:\XHBBCC76\lib\dbfcdx.Lib           +
C:\XHBBCC76\lib\hbzip.Lib            +
C:\XHBBCC76\lib\hbmzip.Lib           +
C:\XHBBCC76\lib\zlib.Lib             +
C:\XHBBCC76\lib\ct.Lib               +
C:\XHBBCC76\lib\gtgui.Lib            +
C:\XHBBCC76\lib\hbzebra.Lib          +
C:\XHBBCC76\lib\codepage.Lib         +
C:\XHBBCC76\lib\png.Lib              +
C:\XHBBCC76\lib\pp.Lib               +
C:\XHBBCC76\lib\tipssl.lib           +
C:\XHBBCC76\lib\libssl.lib           +
C:\XHBBCC76\lib\libcrypto.lib        +
C:\XHBBCC76\lib\tip.Lib              +
C:\BCC76\lib\cw32.Lib                +
C:\BCC76\lib\uuid.lib                +
C:\BCC76\lib\ws2_32.lib              +
C:\BCC76\lib\import32.lib            +
C:\BCC76\lib\psdk\msimg32.Lib        +
C:\BCC76\lib\psdk\odbc32.Lib         +
C:\BCC76\lib\psdk\rasapi32.Lib       +
C:\BCC76\lib\psdk\nddeapi.Lib        +
C:\BCC76\lib\psdk\psapi.Lib          +
C:\BCC76\lib\psdk\gdiplus.lib        +
C:\BCC76\lib\psdk\iphlpapi.Lib       +
C:\BCC76\lib\psdk\shell32.lib        +
C:\BCC76\lib\psdk\wininet.Lib        +
C:\BCC76\lib\psdk\Uxtheme.lib,
AMBIENTY.RES
 

Regards, saludos.

[CarlosFossati]

Muchas Gracias Karinha!!!!!!!!, voy a probar