| |
Trucos para Teenage Mutant Ninja Turtles 2 - Trucos y Guias |
-Cargador:
10 ' CARGADOR PARA TORTUGAS NINJA 2
20 ' **** POR JAVIER SANCHEZ FRANSESCH ****
30 DIM D%(500): LINEAS = 5: CLS
40 FOR T = 1 TO LINEAS: READ A$
50 FOR Y = 1 TO 44 STEP 2: P = P + 1
60 D%(P) = VAL("&h" + MID$(A$, Y, 2)): SUM = SUM + D%(P): NEXT Y, T
70 IF SUM <> 7497 THEN PRINT "Error en DATAS": END
80 PRINT "PULSA UNA TECLA PARA GRABAR EL CARGADOR EN EL DISCO"
90 IF INKEY$ = "" THEN 90
100 OPEN "R", #1, "cturt.com", 1
110 FIELD #1, 1 AS A$
120 FOR T = 1 TO P: LSET A$ = CHR$(D%(T)): PUT #1, T: NEXT: CLOSE 1
130 PRINT "Creado el fichero CTURT.COM, c rgalo antes del TORTUGAS NINJA 2"
140 DATA "EB2B1E558BEC8E5E06813E312E48997505C606312E90"
150 DATA "5D1FEA00000000436172676120545552544C45530A0D"
160 DATA "24FAB800008ED88B1E84008B0E8600B80201A384008C"
170 DATA "0E86000E1F891E1901890E1B01FBB409BA1D01CD21BA"
180 DATA "1D01CD2700000000000000000000000000000000000"
Volver a Trucos PC
|