{NeoBook Function}
Version=5,60
Language=NeoBook
Param=[%Ruta_file_BAT2EXE]|FileName|Param1
{End}
SetVar "[CompilarEXE_RUTA]" "[%Ruta_file_BAT2EXE]"
ExtractFilePath "[CompilarEXE_RUTA]" "[CompilarEXE_RUTA_SOLA]"
ExtractFileName "[CompilarEXE_RUTA]" "[CompilarEXE_RUTA_NOMBRE]"
ExtractFileName "[CompilarEXE_RUTA]" "[NombreEXE]"
ExtractFilePath "[CompilarEXE_RUTA]" "[RutaGuardar]"
ExtractFileExt "[NombreEXE]" "[Extension_A_borrar]"
StrReplace "[NombreEXE]" "[Extension_A_borrar]" "" "[NombreSinEXT]" ""
StrReplace "[CompilarEXE_RUTA_NOMBRE]" " " "" "[TMP_name_si_es]" ""
ExtractFile "[Embedded]BAT2EXE.sed" "[TempDir]BAT2EXE.sed"
FileWrite "[TempDir]BAT2EXE.sed" "Append" "TargetName=[#34][CompilarEXE_RUTA_SOLA][NombreSinEXT].exe[#34]"
FileWrite "[TempDir]BAT2EXE.sed" "Append" "FriendlyName=a"
FileWrite "[TempDir]BAT2EXE.sed" "Append" "AppLaunched=cmd.exe /c [CompilarEXE_RUTA_NOMBRE]"
FileWrite "[TempDir]BAT2EXE.sed" "Append" "PostInstallCmd=<None>"
FileWrite "[TempDir]BAT2EXE.sed" "Append" "AdminQuietInstCmd="
FileWrite "[TempDir]BAT2EXE.sed" "Append" "UserQuietInstCmd="
FileWrite "[TempDir]BAT2EXE.sed" "Append" "FILE0=[#34][CompilarEXE_RUTA_NOMBRE][#34]"
FileWrite "[TempDir]BAT2EXE.sed" "Append" "[#91]SourceFiles[#93]"
FileWrite "[TempDir]BAT2EXE.sed" "Append" "SourceFiles0=[TMP_name_si_es]"
FileWrite "[TempDir]BAT2EXE.sed" "Append" "[#91]SourceFiles0[#93]"
FileWrite "[TempDir]BAT2EXE.sed" "Append" "%FILE0%="
.Compilando
Run "iexpress.exe" "/N /Q /O: [TempDir]BAT2EXE.sed" "Wait" "" ""
