Page 55 - Revista_60.pub
P. 55

RetroComputing







        IMPERIAL MARCH


                 SOUND 0, 1                                         SOUND 0, 1
                 SOUND 185, 1                                       SOUND 311, 6
                 SOUND 0, 3                                         SOUND 0, 1
             Next i                                                 SOUND 233, 2
             SOUND 0, 2                                             SOUND 0, 1
             SOUND 196, 8                                           SOUND 185, 8
             SOUND 0, 1                                             SOUND 0, 1
             SOUND 196, 8                                           SOUND 156, 6
             SOUND 0, 1                                             SOUND 0, 1
             SOUND 196, 8                                           SOUND 233, 2
             SOUND 0, 1                                             SOUND 0, 1
             SOUND 156, 6                                           SOUND 196, 16
             SOUND 0, 1                                             SOUND 0, 1
             SOUND 233, 2                                       End Sub
             SOUND 0, 1
             SOUND 196, 8                                             Esta pagina é apenas dedicada a excertos de código
             SOUND 0, 1
             SOUND 156, 6                                       retro,  escrito  “noutros  tempos”  ou  que  seja  executável  em
             SOUND 0, 1                                         “maquinas  retro”!  O  objectivo  é  simplesmente  satisfazer  a
             SOUND 233, 2                                       nostalgia e apresentar projectos, sejam hardware ou softwa-
             SOUND 0, 1
             SOUND 196, 16                                      re, ligado ao retro-computing!
             SOUND 0, 1
             SOUND 294, 8                                             Como  não  poderia  deixar  de  ser  e  inaugurando  a
             SOUND 0, 1                                         “coluna”, o código escolhido, é velhinho, escrito em 1991, em
             SOUND 294, 8                                       Qbasic, para tocar parte da marcha imperial na PC Speaker,
             SOUND 0, 1                                         no tempo dos Intel 80386SX!  Pode ser ouvido a executar no
             SOUND 294, 8
                                                                seguinte url:  https://goo.gl/pz4sDZ
                                                                      Queres  ver  o  teu  código  “retro”  na  PROGRAMAR  ?
                                                                Envia-nos  o  link  de  github  ou  a  listagem  para  o  email  arti-
                                                                gos@revista-programar.info


































         AUTOR


                      Escrito por  António C. Santos
                      Programar  é  criar  um  novo  mundo  escrevendo  código,  cumprindo  os  mais  elementares  desígnios  da
                      vida, “aprender, ensinar, criar, partilhar, melhorar e seguir”. Formou-se no Instituto Politécnico de Viana
                      do Castelo. Membro da Comunidade Portugal-a-Programar desde Agosto de 2007, é também membro da
                      Sahana Software Foundation, onde é Programador Voluntário desde 2012,  actualmente exerce funções
                      de mentor voluntário na plataforma MOOC Coursera .  Twitter:@apocsantos


                                                            55
   50   51   52   53   54   55   56   57   58   59   60