CARGADOR PARA LAS 8 CONQUISTAS DE ARMORIK CLS:KEY OFF READ C:S=S+C:IF C=-1 THEN 70 C$=C$+CHR$(C) GOTO 40 IF S14187 THEN PRINT "ERROR EN LOS DATAS!":END PRINT " INTRODUCE EL DISCO DONDE QUIERAS GRABAR EL CARGADOR Y PULSA UNA TECLA" IF INKEY$="" THEN 90 OPEN "carmorik.com" FOR OUTPUT AS #1 PRINT #1,C$ CLOSE 1 PRINT:PRINT "CREADO EL FICHERO CARMORIK.COM, CARGALO ANTES DEL ARMORIK Y CONSEGUIRAS JUGAR CON VIDAS INFINITAS." END
* 150 DATA 233, 137, 0, 130, 252, 0, 117, 67, 46, 163, 80, 1 * 160 DATA 46, 137, 30, 82, 1, 88, 91, 83, 80, 30, 142, 219 * 170 DATA 129, 62, 28, 5, 254, 14, 117, 33, 199, 6, 28, 5 * 180 DATA 144, 144, 199, 6, 30, 5, 144, 144, 250, 184, 0, 0 * 190 DATA 142, 216, 46, 161, 76, 1, 163, 64, 0, 46, 161, 78 * 200 DATA 1, 163, 66, 0, 251, 31, 46, 161, 80, 1, 46, 139 * 210 DATA 30, 82, 1, 234, 0, 0, 0, 0, 0, 0, 0, 0 * 220 DATA 67, 97, 114, 103, 97, 32, 97, 104, 111, 114, 97, 32 * 230 DATA 39, 76, 97, 115, 32, 56, 32, 99, 111, 110, 113, 117 * 240 DATA 105, 115, 116, 97, 115, 32, 100, 101, 32, 65,114, 109 * 250 DATA 111, 114, 105, 107, 39, 46, 10, 13, 40, 67, 41, 32 * 260 DATA 74, 46, 83, 46, 70, 46, 36, 0, 14, 31, 184, 16 * 270 DATA 53, 205, 33, 137, 30, 76, 1, 140, 6, 78, 1, 184 * 280 DATA 16, 37, 186, 3, 1, 14, 31, 205, 33, 180, 9, 14 * 290 DATA 31, 186, 84, 1, 205, 33, 186, 139, 1, 205, 39, -1
|