Códigos Fuente de Basic

Volver

Agregar Código Fuente

Mostrando del 1 al 10 de 16 registros

<<>>

Pos: 2

Val: 30

ElNumero reduce cualquier número a un valor de 1 a 9

Basic

Publicado el 28 de Mayo del 2018 por Miguel

659 visualizaciones desde el 28 de Mayo del 2018. Una media de 21 por semana

ElNumero reduce a un solo dígito cualquier número por la suma sucesiva de sus caracteres.
Por ejemplo 9978 = 9 + 9 + 7 + 8 = 33 = 3 + 3 = 6
Es usado en numerología esotérica, por ejemplo, para obtener el número del día de nacimiento se obtiene del conjunto del día + mes + año
Así, el 23 de mayo de 1923 = 23051923 = 7

Pos: 2

Val: 30

SuperSuma

Basic

Publicado el 27 de Mayo del 2018 por Miguel

620 visualizaciones desde el 27 de Mayo del 2018. Una media de 21 por semana

SuperSuma almacena en un string el resultado de la suma de dos números de cualquier longitud.
Además se incluyen en él funciones y subrutinas muy útiles para usar en otros programas, tales como:

- Uso intuitivo del color del fondo y del texto.
- Inicializar la pantalla a modo texto con 80 columnas.
- Centrar un texto en la pantalla.
- Evaluar que los caracteres sean numéricos.
- Pausar la ejecución del programa con un texto centrado en espera de pulsar una tecla.
- Repetir uno o varios caracteres el número de veces indicado.

Pos: 2

Val: 30

Genera código Basic para mostrar arrays con caracteres especiales

Basic

Publicado el 22 de Mayo del 2018 por Miguel

495 visualizaciones desde el 22 de Mayo del 2018. Una media de 21 por semana

Este programa asegura la visualizan por pantalla de los códigos ASCII superiores a 127 incluidas en String de programas Basic (letras no latinas y acentuadas: á, Ñ , ç, etc.).

Para ello transforma toda la cadena en el valor ASCII de todos los caracteres sumados y también solo los especiales. Un ejemplo:

String original: "¡Nuño y Argüelles!"

Se copia con CTRL-C y pega en el programa con CTRL-V

Salida del programa:
------------------------
Dim cadena as String

cadena = chr(173) & chr(78) & chr(117) & chr(164) & chr(111) & chr(32) & chr(121) & chr(32) & chr(65) & chr(114) & chr(103) & chr(129) & chr(101) & chr(108) & chr(108) & chr(101) & chr(115) & chr(33)

cadena = chr(173) & "Nu" & chr(164) & "o y Arg" & chr(129) & "elles!"
------------------------
Se incluye el código fuente y el ejecutable.

Pos: 5

Val: 22

nibbles

Basic

Publicado el 03 de Febrero del 2018 por Fer.Mx

575 visualizaciones desde el 03 de Febrero del 2018. Una media de 14 por semana

aqui este programita que le modifique, es el nibbles, el ejecutable lo hice con qb64 x32

Pos: 4

Val: 24

QWKATXT (Convertidor de QWK a TXT)

Basic

Actualizado el 14 de Diciembre del 2017 por A. David (Publicado el 13 de Diciembre del 2017)

481 visualizaciones desde el 13 de Diciembre del 2017. Una media de 14 por semana

Convierte archivos QWK en TXT.

Este programa (incluye código fuente en QuickBASIC 4.5 o VB-DOS 1.0) abre los archivos QWK de los BBS y los convierte a formato de texto estándar. Recupera tus QWK históricos, los que te dejaron huella y transfórmalos a textos estándar, listos para ser leídos en el Bloc de Notas o en Word.

Pos: 4

Val: 24

Analizador de Expresiones Matemáticas (ANALIZEM) para DOS

Basic

Publicado el 13 de Diciembre del 2017 por A. David

522 visualizaciones desde el 13 de Diciembre del 2017. Una media de 14 por semana

Analizador de expresiones matemáticas para DOS. Se trata de un módulo que se puede agregar a cualquier programa de QuickBASIC o VB-DOS para evaluar expresiones matemáticas. También se puede ejecutar directamente el programa y escribir una expresión matemática para que sea evaluada. Permite el uso de variables.

Se incluye el código fuente, así como las bibliotecas QLB y LIB para su compilación. También se integra el archivo INC para ser incluido en un programa de QuickBASIC o VB-DOS con ' $INCLUDE para declarar todas las llamadas. Se agregan instrucciones de uso en un archivo LEASEYA.TXT (en español) y en README.TXE (en inglés).

Pos: 1

Val: 349

Simulador de ajedrez

Basic

(6)

Actualizado el 19 de Noviembre del 2017 por Adelino (Publicado el 21 de Octubre del 2016)

13.925 visualizaciones desde el 21 de Octubre del 2016. Una media de 119 por semana

Juego del Ajedrez para dos jugadores.
Se maneja con el teclado, flechas de dirección, Intro, y Escape para anular selección o finalizar después del mate o ahogado.
Se pueden editar posiciones con el teclado numérico (0-9), y cambiar el nivel con +/-.
Pulsando Alt+Intro cambia a pantalla completa.
El fichero .zip contiene versiones .bas .txt y .exe.
La versión .exe es para x64, la versión .bas puede ejecutarse en Qbasic64 y en Qbasic original x86.
En emuladores las teclas de dirección son K, M, H y P.
Niels Hoeg, 1905-mate en 3

Mate3

Pos: 7

Val: 16

Escala de Temperatura

Basic

Publicado el 22 de Octubre del 2017 por armando

683 visualizaciones desde el 22 de Octubre del 2017. Una media de 14 por semana

Este programa convierte grados celcius a kelvin y farenheit

Pos: 9

Val: 8

Batch: Basico

Basic

Publicado el 18 de Octubre del 2017 por Demian

403 visualizaciones desde el 18 de Octubre del 2017. Una media de 7 por semana

Batch: Basico

Este Es El Primer Capitulo Del Curso BATCH

ahora te voy a mostar unos codigos y su explicacion:

echo (
el echo tiene dos comandos
el @echo off y el echo

el @echo off es para que no haya eco de los codigos
el echo es para poner un texto en la pantalla )

pause / pause >nul(
el pause sirve para pausar el programa (osea que no se salga
el pause >nul sirve para pausar el programa solo que sin el texto (PRESIONE UNA TECLA PARA CONTINUAR)

ahora un ejemplo:
echo Hola
pause

visualisacion
echo Hola
Hola
Presione Una Tecla Para Continuar

ahora con el @echo off y el pause >nul

@echo off
echo Hola
pause >nul

visualicacion

Hola

Pos: 7

Val: 16

Volumen de cuerpos Geomtricos

Basic

Publicado el 27 de Septiembre del 2017 por armando

563 visualizaciones desde el 27 de Septiembre del 2017. Una media de 14 por semana

Anterior12 Siguiente