Mostrando las entradas con la etiqueta ramones. Mostrar todas las entradas
Mostrando las entradas con la etiqueta ramones. Mostrar todas las entradas

viernes, 31 de mayo de 2024

Mission Zircon

Ramones + Blondie







A............PRESS FIRE TO BEGIN.......THE PRINCESS CIRZONA IS DUE TO BE MARRIED IN 30 ZIRCONIAN DAYS BUT THE GRAND CEREMONIAL ZIRCON CROWN HAS BEEN STOLEN BY THE EVIL ZAALS.AS THE SPECIAL ASSISTANT OF THE KING IT IS UP TO YOU TO PUT ON A JETSUIT AND GO IN SEARCH OF THE CROWN.FAILURE/ MEANS CERTAIN DEATH,BUT SUCCESS BRINGS UNTOLD WEALTH.....GOOD LUCK........CREDITS.....PROGRAMMING  NEIL OTTAWAY OF TIGER DEVELOPMENTS.....GRAPHICS AND SOUND  CRISTEIN DESIGNS......HELLO TO CHRIS,PHIL,JEREMY,MUM,DAD ANDCAROLINE PLUS RUPERT THE CAT......0......TECHNICAL DETAILS.....MISSION ZIRCON WAS PROGRAMMED IN ASSEMBLY LANGUAGE ON A 130XE AND A 1050 DISC DRIVE USING THE ASSEMBLER EDITOR CARTRIDGE....50 FRAMES PER SECOND.....SOURCE CODE 130K...GRAPHICS 19K...SCREEN 8K...MACHINE CODE 9K....MUSICAL INS1PIRATION FROM BLONDIE,RAMONES AND KING CRIMSON....AND FINALLY,COME ON YOU TIGERS...........


martes, 30 de abril de 2024

Woz + Ramones

Los Ramones tocaron en el primer US Festival en San Bernardino, California, el 3 de septiembre de 1982. El festival fue financiado y organizado por el cofundador de Apple, Steve Wozniak.




domingo, 9 de septiembre de 2018

Quest for the Ramones

Juego freeware de texto de aventuras en honor a The Ramones. El juego tiene partes entretenidas, pero sufre de bugs que lo hace imposible de terminar. Quizas haya una ruta especifica para pasar el bug encontrado (el cual trata de no tener dinero para pagar el taxi de regreso a la casa a pesar de haber ganado suficiente dinero en el casino).






lunes, 21 de marzo de 2016

K-Power Magazine: Joey Ramone - S.L.U.G.

In the 2nd issue of K-Power magazine (March 1984) was published basic listing of a known song of Joey Ramone called Slug.

I have fixed the OCR from archive.org, but still there are some bugs that I cannot find (besides there is some assembler that probably has to be reviewed as well).

Leaving here the code, if someone else wants to help-

I published this post in AA 

Misma revista tiene foto de Joey en la oficinas de la revista: https://manillismo.blogspot.com/2009/02/hey-ho-lets-go.html

En el hilo de Atari Rock 'n Roll de Atariware tambien estamos intentando replicar el programa de Joey Ramone.











5 rem ATARI/SLUG
6 rem 400 or 800  32K RAM  color TV or monitor optional
10 POKE 106,PEEK(106)-4:GRAPHICS 0:FLAG=1
20 DIM A$(42),F$(50),V(3),BORDER$(40),BR$(5),SLUG$(40),SLS(7),TIM(15),ISTS(10)
30 PRINT CHR$(125):POKE 752,1 : SETCOLOR 1,0,0:SETCOLOR 2,12,6:SETCOLOR 4,5,0
40 BR$="SLUG*":FOR X=0 TO 4:BR$(X+1,X+1)=CHR$(ASC(BR$(X+1,X+1))+128):NEXT X
50 FOR X=0 TO 35 STEP 5:BORDER$(X+1 ,X+5)=BR$:NEXT X
60 FOR X=2 TO 37:POSITION X,1:PRINT BORDER$(X-1 ,X-1 ); : POSITION 39-X,21:PRINT BORDER$(X-1 ,X-1 ); :NEXT X
70 FOR Y=2 TO 20:POSITION 2,Y:PRINT BORDER$(22-Y,22-Y) ;:POSITION 37,Y:PRINT BORDER$(Y,Y); :NEXT Y
80 POSITION 14,0:PRINT "TUNING UP..."
90 RESTORE 5000:FOR X=1 TO 15:READ A:TIM(X)=A:NEXT X:POKE 82,4
100 RESTORE 6000:FOR X=1 TO 10:READ A: IST$(X,X)=CHR$(A):NEXT X
110 SL$="%]aaaa:":SLUG$=" ":SLUG$(37)=SLUG$:SLUG$(2)=SLUG$
120 SLUG$(1,7)=SL$:SLUG$(14,21)=SL$:SLUG$(28,34)=SL$
130 RESTORE 3000:FOR X=1536 TO 1768:READ A:POKE X,A:NEXT X
140 V(0)=(PEEK(106)+1)*256:V(1)=V(0)+197:V(2)=V(1)+93:V(3)=V(2)+93
150 FOR X=0 TO 3:HI=INT(V(X)/256):LO=V(X)-(HI*256)
160 POKE 1753+X*2,LO:POKE 1761+X*2,LO
170 POKE 1754+X*2,HI:POKE 1762+X*2,HI :NEXT X
180 RESTORE 4000:FOR X=1 TO 42:READ A: A$(X,X)=CHR$ (A) :NEXT X
190 RESTORE 2000:C=0:FOR X=1 TO 17:READ F$:FOR Y=1 TO LEN(F$)
200 Z=ASC(F$(Y,Y))-48:POKE V(0)+C,ASC(A$(Z,Z)):C=C+1
210 NEXT Y:NEXT X
220 SOUND 0,0,10,10:SOUND 1,0,10,10:SOUND 2,0,10,10:SOUND 3,0,10,10
230 A=USR(ADR(IST$))
240 C=1:RESTORE 1000:TIME=50:POSITION 4,3
250 L=TIM(C):READ F$
260 POSITION 4,C+2:PRINT F$
270 SL$=SLUG$(1):SLUG$(1)=SLUG$(2):SLUG$(37)=SL$
280 POSITION 1,0:PRINT SLUG$(1,37);:POSITION 1,22:PRINT SLUG$(1,37);
290 L=L-1:IF L>0 THEN 270
300 C=C+1:IF C=16 THEN 320
310 GOTO 250
320 READ F$:PRINT CHRS(125):POSITION 13,10:PRINT F$:POKE 88,PEEK(88)+120:POSITION 0,23:STOP
1000 DATA Ly'in in bed one sum-mer ¦ s night
1010 DATA Ev ry thing, wa-as all right
1020 DATA Some thing star ted
1030 DATA craw lin on me S. L. U. G.
1040 DATA Why why I saw her walk ing,in the woods last ni ight
1050 DATA And I knew some thin', was n't ri i i
1060 DATA -ight S L U G Ah no no no no
1070 DATA Why'd she have to Go oh oh oh
1080 DATA And I knew that if I
1090 DATA Had her back to day ay -yes
1100 DATA I know (I know) I know (I know)
1110 DATA Why is it always this way?
1120  DATA S - L - U - G
2000 DATA 3=K7K7J;K;J;K7H;JEH;J;KAK7J7H;
2010 DATA JA25JMH;J;2NK;K707K7K7K707K;K;
2020 DATA J;K;1;K707K7K;07K;H;J;H7J7K;K7
2030 DATA 07K7K;07K;K;0;K;1;L7L7L=L7L;L;
2040 DATA K;J;2G1AL;L;H;J;K;L;K;K;L;J7K;
2050 DATA 0=17K;07K71I07K71PJ;J;H;F7J7H;
2060 DATA JA681;K707K7K71RZ4<H;H7H7K;K7K
2070 DATA 7F;F7F7J;J7J783D793H793K793F79
2080 DATA 3D793C793B72:1;?7?71I?7?71AD71
2090 DATA U49?ri?;a;8;D;FIB;DMZ4<K;K7K70;
2100 DATA 0707S;S7S7Q;Q7Q783L793K7930793
2110 DATA S793Q793H793K72:1;B7B71I87B71A
2120 DATA a71U49?MH;J;K;L;0IK;LMZ4>T7T7T
2130 DATA 7T7V7V7V7V7X7X7X7X7W7w7W7W783W
2140 DATA 793T793V793X793W793Y793V793X72
2150 DATA 4W71 U93T763X763W793T763X763W79
2160 DATA 3T763X763W793T763X763W7Z
3000 DATA 72,8,152,72,138,72,162,3,188
3010 DATA 197,6,185,217,6,133,203,185,213
3020 DATA 6,133,204,189,201,6,201,5,208
3030 DATA 8,169,0,153,0,210,76,166,6
3040 DATA 201,0,208,126,189,209,6,221,213
3050 DATA 6,208,18,222,205,6,189,205,6
3060 DATA 201,0,240,35,169,0,157,209,6
3070 DATA 76,40,6,188,209,6,177,203,72
3080 DATA 200,177,203,157,201,6,200,152,157
3090 DATA 209,6,188,197,6,104,153,0,210
3100 DATA 76,166,6,188,209,6,177,203,201
3110 DATA 255,240,30,157,205,6,200,177,203
3120 DATA 157,213,6,200,152,24,101,203,133
3130 DATA 203,169,0,101,204,133,204,169,0
3140 DATA 157,209,6,76,40,6,188,197,6
3150 DATA 185,225,6,153,217,6,185,226,6
3160 DATA 153,218,6,169,0,157,201,6,157
3170 DATA 209,6,157,213,6,169,1,157,205
3180 DATA 6,76,8,6,188,197,6,165,203
3190 DATA 153,217,6,165,204,153,218,6,222
3200 DATA 201,6,202,48,3,76,8,6,104
3210 DATA 170,104,168,40,104,76,98,228,0
3220 DATA 2,4,6,0,0,0,0,1,1
3230 DATA 1,1,0,0,0,0,0,0,0
3240 DATA 0,0,0,0,0,0,0,0,0
3250 DATA 0,0,0,0,0,0,0,0
4000 DATA 0,1,2,4,6,8,10,12,16,18,20,24
4010 DATA 30,32,35,37,40,42,45,47,50
4020 DATA 53,56,57,60,64,72,76,80,82
4030 DATA 85,90,96,100,108,144,150,173