Paso 1: El código.
####################################
# El oráculo
#
#===============================
# Funciones
#--------------------------------
# pc = cursor de posición
función pc () {}
tput taza $1 $2
}
la función header () {}
claro
PC 2 10; echo "El oráculo"
}
función footer() {}
PC 24 0
}
funciones de final #
#=================================
# Las asignaciones
# --------------------------------
archivo de datos = "odata"
pagar = 5
a = 1
m = "no hecho"
d=" "
asignaciones de final #
#=================================
#
# Entrada de
#---------------------------------
mientras que la línea de lectura
hacer fdata [$a] = $linea
que a = a + 1
hecho < $datafile
#===================================
variables locales #
#--------------------------------
que nodf = $un
declarar -i X = $nodf
# NUM = $[($RANDOM %$X) + 1]
#====================================
# Cabecera
#-----------------------------------
cabecera
#=====================================
# Comenzar lógica
#--------------------------------------
Aunque la verdad; hacer
que vueltas vueltas = 1
claro
PC 1 de 4
echo "T H E O R A C L E!"
PC 25 2
echo "Computothought:(c) 1980-2011"
PC 1 de 7
echo "Escriba su pregunta"
PC 1 de 8
echo "["
PC 8 2
Lea q
PC 1 de 10
echo "Oracle le mostrará es pensamientos, luego convocar a su respuesta."
PC 1 de 12
echo "así que por favor sea paciente!"
PC 1 de 15
echo "***********************************************************************"
PC 1 de 16
# tenga que agregar espacios
echo "* *"
PC 1 de 17
echo "***********************************************************************"
para ((y = 1; y < = 100; y += 1)); lo
PC 1 de 16
# tenga que agregar espacios
echo "* *"
PC 16 3
NUM = $[($RANDOM %$X) + 1]
echo ${fdata [$NUM]}
hecho
PC 1 de 18
echo "Juego de nuevo (s/n)"
leer -s-n1 d
Eco
caso $d en
[nN]) Break;
ESAC
hecho
Deje que debía = $pay * $turns
echo "Por favor, pagar al cajero $owed dólares!"
leer
# ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
fin de # de trabajo:
Eco
claro
PC 1 de 4
echo "T H E O R A C L E!"
PC 1 de 23
echo "Computothought: (c) 1980-2011"
PC 1 de 6
Eco
echo "Si utiliza este programa más de varias veces y quisiera"
echo "para ver más programas como el oráculo y el Cartomancer, por favor"
echo "que el autor sabe!"
Eco
# FIN
lógica de final #
#-----------------------------------
pie de página #
pie de página
#===================================
# Fin.
####################################
