Vai al contenuto

Ecomotori.net utilizza i cookie per migliorare l'esperienza di navigazione degli utenti. Continuando a navigare si autorizza l'utilizzo. Per avere più informazioni sui cookie clicca qui    Chiudi
Foto

COMMODORE 64


  • Per cortesia connettiti per rispondere
33 risposte a questa discussione

#1
capitanoghianda

capitanoghianda

    Ambientalista

  • Members Plus
  • StellettaStellettaStelletta
  • 684 messaggi
  • Gender:Male
  • Location:Firenze
Ecco a voi un listato per eseguire una sequenza di note...... winner.gif

10 poke775,191:clr:print chr$(147):poke53280,3:poke53281,3:a1$="Programma by Pastore Carlo"
20 a2$="© 1990":a3$="Premi un tasto":aa=len(a1$):bb=len(a2$):cc=len(a3$)
30 print"qqq]]] in reverse": for i=1 to aa:for j=1 to 50:next j:print mid$(a1$,i,1);:next
40 print"q in reverse":for i = 1 to bb : for j = 1 to 50 : next j : print mid$ (a,i,1):next
45 fori=1to600:next
50 print"q in reverse":fori=1tocc:forj=1to50:nextj:print mid$(a3$,i,1);:next
60 poke198,0:wait198,1:print chr$(147):poke646,1:poke53280,0:poke53281,0:poke198,0
70 print"5 q in reverse 5 ]Menù :":print"3 q in reverse 8 ]1- Music editor"
80 print"2 q in reverse 8 ]2- Piano elettronico"
90 get d$="": if d$="" then 90
100 if d$="1" then 1000
110 if d$="2" then 10000
120 if d$<>"1" or d$<>"2" then 90
1000 print chr$(147):poke 646,1
1010 input"3 q in reverse Quante note vuoi inserire (1-1000)";z
1020 if z<1 or z>1000 then 1000
1030 dim x(z),y(z):n=0
1040 if n=z then 1150
1041 n=n+1
1050 input"cuore in reverse Qual'è la nota";x$
1060 if x$="do" then x(n)=33:y(n)=135:goto 1040
1070 if x$="re" then x(n)=37:y(n)=162:goto 1040
1080 if x$="mi" then x(n)=42:y(n)=62:goto 1040
1090 if x$="fa" then x(n)=44:y(n)=193:goto 1040
1100 if x$="sol" then x(n)=50:y(n)=60:goto 1040
1110 if x$="la" then x(n)=56:y(n)=99:goto 1040
1120 if x$="si" then x(n)=63:y(n)=75:goto 1040
1121 if x$="hd" then x(n)=67:y(n)=15:goto 1040
1130 if x$<>"do" or x$<>"re" or x$<>"mi" or x$<>"fa" or x$<>"sol" then 1040
1140 if x$<>"la" or x$<>"si" or x$<>"hd" then 1040
1150 poke646,7:print chr$(147):print"suono il motivo (s/n) ?"
1160 get r$:if r$="" then 1160
1170 if r$="s" then 1190
1180 clr:print chr$(147):goto 70
1190 sid=54272:fori=0to24:pokesid+i,0:next
1191 print chr$(147):input"Volume (0-15)";v
1192 if v<0 or v>15 then v=15
1193 input "2 q in reverse Forma d'onda (17-33-65-129)";q
1200 print chr$(147):pokesid+24,v:pokesid+5,31:pokesid+6,31:pokesid+4,q
1210 fori=1ton:pokesid+1,x(i):pokesid,y(i):pokesid+4,q:forh=1to180:nexth
1220 p okesid+4,q-1:forj=1to20:nextj:nexti:pokesid+24,0:pokesid+4,q-1
1230 print chr$(147):input"Ancora";s$
1240 if s$="si" then 1200
1250 clr:print chr$(147):poke646,1:goto 70
10000 w1$="Piano elettronico":w2$="Programma by Pastore Carlo © 1990"
10001 xx=len(w1$):yy=len(w2$):print"2 q in reverse";chr$(147)
10002 fori=1toxx:forj=1to50:nextj:print mid$(w1$,i,1);:next
10003 print"q in reverse":for i=1toyy:forj=1to50:nextj:print mid$(w2$,i,1);:next
10010 print"s in reverse 6 q in reverse Q = do - W = re - E = mi - R = fa"
10020 print"q in reverse T = sol - Y = la - U = si - I = do (alto)"
10021 print"q in reverse A = do# - S = re# - D = fa# - F = sol#"
10022 print"q in reverse G = la#":poke198,0
10030 sid=54272:fori=0to24:pokesid+i,0:next:pokesid+24,15:pokesid+4,17
10031 pokesid+5,10:pokesid+6,10
10040 get z$:if z$="" then 10040
10050 if z$="q" then pokesid+4,17:goto 12000
10060 if z$="w" then pokesid+4,17:goto 12010
10070 if z$="e" then pokesid+4,17:goto 12020
10080 if z$="r" then pokesid+4,17:goto 12030
10090 if z$="t" then pokesid+4,17:goto 12040
10100 if z$="y" then pokesid+4,17:goto 12050
10110 if z$="u" then pokesid+4,17:goto 12060
10120 if z$="i" then pokesid+4,17:goto 12070
10130 if z$="a" then pokesid+4,17:goto 12080
10140 if z$="s" then pokesid+4,17:goto 12090
10150 if z$="d" then pokesid+4,17:goto 12100
10160 if z$="f" then pokesid+4,17:goto 12110
10170 if z$="g" then pokesid+4,17:goto 12120
10171 if z$="1" then print chr$(147):clr:end
10180 if z$<>"q" or z$<>"w" or z$<>"e" or z$<>"r" or z$<>"t" then 10040
10190 if z$<>"y" or z$<>"u" or z$<>"i" or z$<>"a" or z$<>"s" then 10040
10200 if z$<>"d" or z$<>"f" or z$<>"g" or z$<>"1" then 10040
12000 pokesid+1,33:pokesid,135:fori=1to180:next:pokesid+4,16:goto 10040
12010 pokesid+1,37:pokesid,162:fori=1to180:next:pokesid+4,16:goto 10040
12020 pokesid+1,42:pokesid,62:fori=1to180:next:pokesid+4,16:goto 10040
12030 pokesid+1,44:pokesid,193:fori=1to180:next:pokesid+4,16:goto 10040
12040 pokesid+1,50:pokesid,60:fori=1to180:next:pokesid+4,16:goto 10040
12050 pokesid+1,56:pokesid,99:fori=1to180:next:pokesid+4,16:goto 10040
12060 pokesid+1,63:pokesid,75:fori=1to180:next:pokesid+4,16:goto 10040
12070 pokesid+1,67:pokesid,15:fori=1to180:next:pokesid+4,16:goto 10040
12080 pokesid+1,35:pokesid,134:fori=1to180:next:pokesid+4,16:goto 10040
12090 pokesid+1,39:pokesid,223:fori=1to180:next:pokesid+4,16:goto 10040
12100 pokesid+1,47:pokesid,107:fori=1to180:next:pokesid+4,16:goto 10040
12110 pokesid+1,53:pokesid,57:fori=1to180:next:pokesid+4,16:goto 10040
12120 pokesid+1,59:pokesid,190:fori=1to180:next:pokesid+4,16:goto 10040
run
ed il gioco e' fatto......

Gia' sto godendo come gli anni 80......

P.s. chi ha giochi e programmi da scambiare??? si faccia sotto. che la zona vintage si fa calda! altro che linux..... winner.gif ciapet.gif unsure.gif

saluti.

«in un'indagine, eliminato l'impossibile, quello che rimane — per quanto sembri improbabile — deve essere la verità»

 


#2
gsani

gsani

    Ambientalista

  • Members Plus
  • StellettaStellettaStelletta
  • 774 messaggi
  • Gender:Male
  • Location:Verona
Tu sei matto da legare ....
"Metà del mio denaro l'ho speso in donne, champagne, automobili, moto e aerei...il resto l'ho solo sprecato!!!" (gsani)
“Una volta che hai conosciuto il volo, camminerai sulla terra con gli occhi rivolti sempre in alto, perché là sei stato, e là sogni tornare”. (Leonardo Da Vinci, mica bau bau micio micio)

#3
capitanoghianda

capitanoghianda

    Ambientalista

  • Members Plus
  • StellettaStellettaStelletta
  • 684 messaggi
  • Gender:Male
  • Location:Firenze

Programma scritto da Pastore Carlo – Battaglia navale – basic V2 per Commodore 64





10 clr:print chr$(147):poke 646,1:poke53280,0:poke53281,0:poke53272,21

20 print"14 q in reverse 14 ] in reverse ATTENDERE...."

30 print "1 q in reverse 2 ] in reverse CARICAMENTO NUOVO SET DI CARATTERI"

40 poke56334,peek(56334)and254:poke1,peek(1)and251:for i=1 to 33: for j=0 to 7

50 poke12288+i*8+j,peek(12288+i*8+j):nextj:nexti

60 poke1,peek(1)or4:poke56334,peek(56334)or1

70 q1=0:q2=27:q3=28:q4=29:q5=32

80 forb=0to7 :readn :poke12288+(8*q1)+b,n :nextb

90 forb=0to7 :readn :poke12288+(8*q2)+b,n :nextb

100 forb=0to7 :readn :poke12288+(8*q3)+b,n :nextb

110 forb=0to7 :readn :poke12288+(8*q4)+b,n :nextb

120 forb=0to7 :readn :poke12288+(8*q5)+b,0 :nextb

130 data 24,28,30,31,24,255,126,60

140 data 0,56,56,24,24,255,126,60

150 data 129,66,36,24,24,36,66,129

160 data 255,129,129,129,129,129,129,255

170 fori=0to62:readd:poke320+i,d:next

180 fori=0to62:readd:poke832+i,d:next

190 fori=0to62:readd:poke896+i,d:next

200 fori=0to62:readd:poke960+i,d:next

210 fori=0to62:readd:poke15744+i,d:next

220 w1=64*247:fori=0to62:readd:pokew1+i,d:next

230 w2=64*248:fori=0to62:readd:pokew2+i,d:next

240 w3=64*249:fori=0to62:readd:pokew3+i,d:next

250 data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,24,145,120,33,91,64

260 data 33,85,64,45,213,120,37,81,64,25,81,120,0,0,0,18,187,0,42,162,128,42

270 data 162,64,42,187,128,42,162,128,17,58,85,0,0,0,0,0,0

280 data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2,32,240,1,17,248,3,185,248,127

290 data 255,254,31,255,252,15,255,248,7,255,240,3,255,224,0,0,0,0,0,0,0,0,0

300 data 0,0,0,0,0,0,0,0,0,0,0,0

310 data 0,0,0,0,0,0,0,0,0,0,24,0,0,24,0,4,8,128,2,8,64,7,8,224

320 data 63,255,248,127,255,254,255,255,255,127,255,127,255,254,63,255,248

330 data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

340 data 24,0,0,24,0,0,8,0,0,216,0,0,252,0,0,14,0,0,7,0,0,3,128,0

350 data 1,192,0,0,224,0,0,112,0,0,48,0,0,0,0,0,0,0,0,0,0,0,0,0

360 data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

370 data 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

380 data 0,0,0,0,0,0,0,0,0,0,0,24,0,0,60,0,0,126,0,0,126,0,0,60,0,0,24,0

390 data 0,0,0,0,0,0,0,16,0,0,16,0,2,24,64,3,25,192,1,223,128,0,255,128,0,255,0

400 data 0,127,240,0,255,192,3,254,0,15,255,0,0,255,128,1,237,192,1,204,96,3,12

410 data 0,2,4,0,0,4,0,0,0,0,0,0,0

420 data 0,120,0,0,120,12,48,124,24,28,126,120,31,127,240,15,255,240,15,255

430 data 224,7,255,224,7,255,248,31,255,254,127,255,255,255,255,248,255,255

440 data 224,63,255,240,7,255,248,3,255,252,7,255,254,7,255,63,15,255,15

450 data 15,222,3,31,30,0

460 data 0,0,0,0,112,0,0,56,0,0,54,64,14,0,96,15,0,224,6,28,0,0,14,0,0,128,0

470 data 97,195,12,112,193,142,224,1,199,0,24,0,0,58,0,1,24,96,7,0,112,7,128,48

480 data 0,28,16,0,28,0,0,24,0,0,0,0

490 print chr$(147):poke646,1:poke53272,21

500 print"2 q in reverse 12 ] in reverse BATTAGLIA NAVALE"

510 print"2 q in reverse 2 ] in reverse PROGRAMMA BY PASTORE CARLO © 1990":print"2 q in reverse"

520 print"13 ] in reverse PREMI UN TASTO":poke198,0:wait198,1:poke198,0

530 print chr$(147):poke53280,1:poke53281,1:poke646,0

540 print"2 q in reverse QUESTO E' UN GIOCO PER 2 GIOCATORI:"

550 input"1 q in reverse MI DICI IL TUO NOME GIOCATORE 1";a1$

560 input"1 q in reverse MI DICI IL TUO NOME GIOCATORE 1";a2$

570 print chr$(147):poke646,1:poke53280,0:poke53281,0

580 aa=0:bb=0:pp=15:oo=15:e$="abcdefghi":b$="123456789"

590 fori=1to3:z(i)=int(rnd(1)*9)+1:d(i)=int(rnd(1)*9)+1

600 d$=mid$(e$,z(i),1):q$=mid$(b$,d(I),1):s$=d$+q$:nexti

610 fori=1to3:x(i)=int(rnd(1)*9)+1:f(i)=int(rnd(1)*9)+1

620 x$=mid$(e$,x(i),1):r$=mid$(b$,f(i),1):j$(i)=x$+r$:nexti

625 if pp<=0 and pp<=0 then 8000

626 if aa=3 or pp<=0 then 3000

630 print"2 q in reverse 2 ] in reverse 1 cuore in reverse GIOCATORE 1: ";a1$

640 print"1 q in reverse POSSIBILITA' ";pp

650 input"1 q in reverse COORDINATA NUMERICA (1-9)";l$

655 if len(l$)>1 then print chr$(147):goto 630

660 input"1 q in reverse COORDINATA ALFABETICA (a-i)";k$

665 if len(k$)>1 then print chr$(147):goto 630

670 c$=k$+l$

671 if cc=1 then goto 681

680 if c$=s$(1) then kk=0:aa=aa+1:cc=1:goto 2000

681 if cc=2 then goto 691

690 if c$=s$(2) then kk=0:aa=aa+1:cc=2:goto 2000

691 if cc=3 then goto 710

700 if c$=s$(3) then kk=27:aa=aa+1:cc=3:goto 2000

710 if c$<>s$(1) or c$<>s$(2) or c$<>s$(3) then kk=28:pp=pp-1:goto 2000

2000 print"s in reverse 11 q in reverse CONTROLLO.":fort=1to1500:next:poke646,1

2010 poke53272,(peek(53272)and 240)+12:print"cuore in reverse 10 q in reverse 17 ] in reverse ]]]]]"

2020 print"17 ] in reverse ] ]"

2030 print"17 ] in reverse ] ]"

2040 print"17 ] in reverse ] ]"

2050 print"17 ] in reverse ]]]]]":u=0

2060 u=u+1:poke1523,kk:poke55795,1

2070 fori=1to600:next:poke1523,32:fori=1to600:next:if u=5 then goto 2090

2080 goto 2060

2090 print chr$(147):poke53272,21

2091 if c$=s$(1) then i(1)=2:i(2)=3:h=1:goto 7000

2092 if c$=s$(2) then i(1)=2:i(2)=3:h=1:goto 7000

2093 if c$=s$(3) then i(1)=4:i(2)=5:h=1:goto 7000

2094 goto 3000

3000 if pp<=0 and oo<=0 then 8000

3005 if oo<=0 then 5000

3010 print chr$(147):print"2 q in reverse 2 ] in reverse GIOCATORE 2: ";a2$

3020 print "1 q in riverse POSSIBILITA': ";oo

3030 input "1 q in riverse COORDINATA NUMERICA (1-9)";aa$

3040 if len(aa$)>1 then print chr$(147):goto 3030

3050 input"1 q in reverse COORDINATA ALFABETICA (a-i)";ab$

3060 if len(ab$)>1 then print chr$(147):goto 3050

3070 i$=ab$+aa$

3071 if gg=1 then goto 3081

3080 if i$=j$(1) then kk=0:bb=bb+1:gg=1:goto 6000

3081 if gg=2 then goto 3091

3090 if i$=j$(2) then kk=0:bb=bb+1:gg=2:goto 6000

3091 if gg=3 then goto 3110

3100 if i$=j$(3) then kk=27:bb=bb+1:gg=3:goto 6000

3110 if i$<>j$(1) or i$<>j$(2) or i$<>j$(3) then kk=28:oo=oo-1:goto 6000

5000 if pp<=0 and oo<=0 then 8000

6000 print"s in reverse 11 q in reverse CONTROLLO.":fort=1to1500:next:poke646,1

6010 poke53272,(peek(53272)and 240)+12:print"cuore in reverse 10 q in reverse 17 ] in reverse ]]]]]"

6020 print"17 ] in reverse ] ]"

6030 print"17 ] in reverse ] ]"

6040 print"17 ] in reverse ] ]"

6050 print"17 ] in reverse ]]]]]":u=0

6060 u=u+1:poke1523,kk:poke55795,1

6070 fori=1to600:next:poke1523,32:fori=1to600:next:if u=5 then goto 6090

6080 goto 6060

6090 print chr$(147):poke53272,21

6091 if i$=j$(1) then i(1)=2:i(2)=3:h=1:goto 7000

6092 if i$=j$(2) then i(1)=2:i(2)=3:h=1:goto 7000

6093 if i$=j$(3) then i(1)=4:i(2)=5:h=1:goto 7000

6094 goto 625

7000 v=53248:pokev+21,255:pokev+23,255:pokev+29,255:pokev+27,255

7005 poke2041,13:poke2042,14:poke2043,15:poke2044,246:poke2045,247

7006 poke2046,248:poke2047,249

7010 pokev+40,7:pokev+41,2:pokev+42,7:pokev+43,1:pokev+44,1:pokev+45,1

7020 pokev+46,1

7030 fori=1904to2023:pokei,160:nexti

7040 fori=56176to56295:pokei,246:nexti

7050 pokev+i(1),197:pokev+i(2),197

7060 fori=50to190:pokev+6,i:pokev+7,i:nexti

7070 pokev+8,190:pokev+9,190:fori=247to249:poke2041,i:fork=1to100:nextk

7080 nexti:pokev+9,0

7090 pokev+8,195:pokev+9,195:fori=247to249:poke2041,i:fork=1to100:nextk

7100 nexti:pokev+9,0

7110 pokev+8,192:pokev+9,192:fori=247to249:poke2041,i:fork=1to100:nextk

7120 nexti:pokev+8,0:pokev+9,0:pokev+6,0:pokev+7,0:pokev+i(1),0:pokev+i(2),0

7130 if h=1 then 3000

7140 if h=2 then 625

8000 if aa>bb then w1$="3 ] in reverse GIOCATORE 1"

8010 if bb>aa then w1$="3 ] in reverse GIOCATORE 2"

8020 if aa=bb then goto 8100

8030 dd=len(w1$):poke2040,5:poke53248,200:poke53249,200:poke53248+21,255

8040 poke53248+23,255:poke53248+29,255:print"cuore in reverse 2 q in reverse 2 ] in reverse IL VINCITORE E' IL":y=0

8050 print"s in riverse 3 q in riverse";"18 spazi"

8060 y=y+1:for i=1 to dd:for j=1 to 50:nextj:print mid$(w1$,i,1);:next i

8070 if y=5 then 8080

8075 goto 8050

8080 goto 8200

8100 print" 3 q in reverse LA GARA E' PARI: ":poke53248+21,255:poke53248+23,255

8116 poke53248+29,255:poke2040,5:print"3 q in reverse 3 ] in reverse SIETE ENTRAMBI BRAVI!!":goto 8200

8200 poke53248,200:poke53249,200:print"GIOCHI ANCORA?":poke198,0

8210 get a$:if a$="" then 8210

8220 if a$="s" or a$="si" then run

8230 print chr$(147):poke53248,0:poke53249,0:clr





www.retrocommodore.com - l'ancora di salvezza.......

saluti. wacko.gif

«in un'indagine, eliminato l'impossibile, quello che rimane — per quanto sembri improbabile — deve essere la verità»

 


#4
max1970

max1970

    Ecocompatibile

  • Members
  • Stelletta
  • 41 messaggi
  • Gender:Male
  • Location:Saronno(VA)-Cassino(FR)
l'unica cosa che mi è rimasta a casa è l'adattatore per mettere due lettori di musicassette insieme..
..e poi molti ricordi
M@X1970
Fiat Qubo Dynamic Natural Power
Capacità77lt(84?) CaricoMax15,79Kg Auton.Min215Km.Media275~300Km.Max382,4Km

#5
sbirkey

sbirkey

    Praticante Ecologista

  • Members Plus
  • StellettaStelletta
  • 401 messaggi
  • Gender:Male
  • Location:Valmadrera
Era il sistema per duplicare le cassettine, quante quante quante ne ho doppiate con la combriccola di soci che avevo!

#6
sbirkey

sbirkey

    Praticante Ecologista

  • Members Plus
  • StellettaStelletta
  • 401 messaggi
  • Gender:Male
  • Location:Valmadrera
Capitano, spero che non usi ancora il datasette, era il lettore cassette più inaffidabile della terra, io e la combriccola dei miei soci li avevamo sempre smontati con cacciavitino sempre a portata di mano per la regolazione dell'azimut, per non parlare dei joystick, avevano una mortalità diecisamente precoce.
C'è da dire una cosa che riuscire a fare un gioco o un programma complesso in quel spazio esiguo non era da tutti, peccato che quella tecnologia non sia stata sviluppata altrimenti adesso sarebbe sufficente un HD da 1 Gb invece che uno da 1 Tb.
Comunque ce l'ho ancora il C64, ho la seconda serie, completo ed anche con i giochi, che però molti non funzionano più.

#7
capitanoghianda

capitanoghianda

    Ambientalista

  • Members Plus
  • StellettaStellettaStelletta
  • 684 messaggi
  • Gender:Male
  • Location:Firenze
Ecco a voi i mie gioiellini......
Tutti perfettamente funzionanti.....





Che pezzo di storia...........

«in un'indagine, eliminato l'impossibile, quello che rimane — per quanto sembri improbabile — deve essere la verità»

 


#8
capitanoghianda

capitanoghianda

    Ambientalista

  • Members Plus
  • StellettaStellettaStelletta
  • 684 messaggi
  • Gender:Male
  • Location:Firenze
Il mio commodore 64 sx portatile..............



Il mio commodore 64 classico.....



Il mio vic20



Il mio commodore 16.....



cool.gif

«in un'indagine, eliminato l'impossibile, quello che rimane — per quanto sembri improbabile — deve essere la verità»

 


#9
fabiobologna

fabiobologna

    Ambientalista

  • Super Moderatore
  • StellettaStellettaStelletta
  • 3213 messaggi
  • Gender:Male
  • Location:Colli bolognesi
  • Interests:Dicono di lui: per una volta anche il superfabio ha sbagliato: E' UMANO!!
Te l'ho detto capitano, ti devi fare il commodore con i floppy-disk!



VW Caddy Maxi EcoFuel ComfortLine (70mila km dal 28/09/12) (ex Zafira A EcoM: solo 275mila km)

#10
Cicciodonny

Cicciodonny

    Ambientalista

  • Super Moderatore
  • StellettaStellettaStelletta
  • 2099 messaggi
  • Gender:Male
  • Location:Cento (FE)
  • Interests:Viaggi, Computer, Metano, Canto, figlia, moglie etc.etc.
    Il lavoro (quello vecchio) non rientra nella lista, prima del milionesimo posto....
QUELLI da 5,25"....
Che nostalgia....

MAi usati nel Commodore, SEMPRE usati su IBM 36.....

Nolstalgiescion

Chi vol fer i comed so' al vaga a Zent (Cardinal Prospero Lambertini poi Benedetto XIV)
Ei Fù Multipla Bipower
- 370.000 km
New Multipla NP Year 2008 -  50.000 km
NUOVI ISCRITTI: Mi leggi per la 1^ volta?? Allora è gradito un messaggio di presentazione IN QUESTO FORUM


#11
max1970

max1970

    Ecocompatibile

  • Members
  • Stelletta
  • 41 messaggi
  • Gender:Male
  • Location:Saronno(VA)-Cassino(FR)
CITAZIONE(capitanoghianda @ Mar 13 2010, 03:09 PM) <{POST_SNAPBACK}>
Ecco a voi i mie gioiellini......
Tutti perfettamente funzionanti.....

Che pezzo di storia...........

Mi pare di intravedere pure un'Amiga 500 smile.gif
Ce l'ho ancora.. e pure una Plus mavieni.gif
M@X1970
Fiat Qubo Dynamic Natural Power
Capacità77lt(84?) CaricoMax15,79Kg Auton.Min215Km.Media275~300Km.Max382,4Km

#12
capitanoghianda

capitanoghianda

    Ambientalista

  • Members Plus
  • StellettaStellettaStelletta
  • 684 messaggi
  • Gender:Male
  • Location:Firenze
E' un'amiga 1200 e devo ancora montare la 4000, che ho in una scatola insieme ad un altro commodore 128
cool.gif

«in un'indagine, eliminato l'impossibile, quello che rimane — per quanto sembri improbabile — deve essere la verità»

 


#13
capitanoghianda

capitanoghianda

    Ambientalista

  • Members Plus
  • StellettaStellettaStelletta
  • 684 messaggi
  • Gender:Male
  • Location:Firenze
CITAZIONE(fabiobologna @ Mar 13 2010, 03:44 PM) <{POST_SNAPBACK}>
Te l'ho detto capitano, ti devi fare il commodore con i floppy-disk!



EHMM..... EHMMM.....
Fabio ma nella prima foto che ho postato, si vede molto bene che' e' presente pure i floppy... rolleyes.gif
E poi ne ho altri 3 bianchi....
Ne vuoi uno? 44.gif

saluti
scariacati i filmino nel' MP c'e' i link.

«in un'indagine, eliminato l'impossibile, quello che rimane — per quanto sembri improbabile — deve essere la verità»

 


#14
max1970

max1970

    Ecocompatibile

  • Members
  • Stelletta
  • 41 messaggi
  • Gender:Male
  • Location:Saronno(VA)-Cassino(FR)
Non ci crederete ma in un macchinario (made in USA) usato per formare le lamiere d'aeroplani in Aermacchi ho trovato un Commodore128 per la gestione CN
M@X1970
Fiat Qubo Dynamic Natural Power
Capacità77lt(84?) CaricoMax15,79Kg Auton.Min215Km.Media275~300Km.Max382,4Km

#15
capitanoghianda

capitanoghianda

    Ambientalista

  • Members Plus
  • StellettaStellettaStelletta
  • 684 messaggi
  • Gender:Male
  • Location:Firenze
Bene, devo dire chce la commodore, negli anni 80 e' stata una delle migliori marche di casa coostruttrice di home e microcomputer, avendo un grande riscontro di mercato sul home user.

Peccato che quando i computer sono entrati nell'ambito professionale, loro con la smania di far soldi hanno trascurato alcune strategie di mercato, facendo si, che la intel e gates, creassero un monopolio mondiale.
Un po' ha retto la Apple, ma non ha saputo contrastare il fenomeno winzozz...........

saluti

«in un'indagine, eliminato l'impossibile, quello che rimane — per quanto sembri improbabile — deve essere la verità»

 


#16
Pha79

Pha79

    Ambientalista

  • Moderatore
  • StellettaStellettaStelletta
  • 1978 messaggi
  • Gender:Male
  • Location:Provincia di Milano
Capitano t'interessano, un'Amiga 2000, con due o trecento disketti?!?
Fehler In Allen Teilen

www.ilRasoio.com

#17
capitanoghianda

capitanoghianda

    Ambientalista

  • Members Plus
  • StellettaStellettaStelletta
  • 684 messaggi
  • Gender:Male
  • Location:Firenze
CITAZIONE(Pha79 @ Mar 18 2010, 08:32 AM) <{POST_SNAPBACK}>
Capitano t'interessano, un'Amiga 2000, con due o trecento disketti?!?


noooooooooo................

UN MI DIRE.................

Lo sto cercando per mare e per monti..... e non lo trovo..... incazzed.gif

NON E' che tu..... vero......

saluti

«in un'indagine, eliminato l'impossibile, quello che rimane — per quanto sembri improbabile — deve essere la verità»

 


#18
Aura

Aura

    Praticante Ecologista

  • Moderatore
  • StellettaStelletta
  • 495 messaggi
  • Gender:Female
  • Location:Aesis/Piana Rotaliana
Il 18 e 19 aprile ci dovrebbe essere la mostra-mercato-scambio dell'elettronica a Silvi Marina, alla Fiera Adriatica .
So che vengono persone da tutto il centro Italia, perché ci sono davvero un sacco di chicche per gli appassionati(lo scorso anno ho visto addirittura dei pulmann tra cui uno targato PD là davanti...mah!), lì magari qualcosina sul Commodore si trova...
Però è in una data Off- Limits per tutti i nostri!
L'Ecoraduno vale più di un Commodore...eh !!
La logica vi porterà da A a B. L'immaginazione vi porterà dappertutto.(Albert Einstein)

#19
capitanoghianda

capitanoghianda

    Ambientalista

  • Members Plus
  • StellettaStellettaStelletta
  • 684 messaggi
  • Gender:Male
  • Location:Firenze
L'ecoraduno un si tocca! Cara aura, ormai e' diventato un' istituzione. cool.gif
Il commodore 64 puo' attendere, e poi ne ho gia' 5 cool.gif ......

Sara' per la prossima... e poi questi mercatini li conosco, e non me ne sfugge uno.... cool.gif

saluti.

«in un'indagine, eliminato l'impossibile, quello che rimane — per quanto sembri improbabile — deve essere la verità»

 


#20
Aura

Aura

    Praticante Ecologista

  • Moderatore
  • StellettaStelletta
  • 495 messaggi
  • Gender:Female
  • Location:Aesis/Piana Rotaliana
OT : il raduno di Calolzio è ormai più che un'istituzione, una certezza anche per Simone che si vedrà costretto negli anni ad ampliare ulteriormente il locale 44.gif .

Per il tuo Commmodore c'è sempre tempo, tanto non chiede il pane...!
La logica vi porterà da A a B. L'immaginazione vi porterà dappertutto.(Albert Einstein)




0 utente(i) stanno leggendo questa discussione

0 members, 0 guests, 0 anonymous users