home *** CD-ROM | disk | FTP | other *** search
/ Floppy Magazine 1987 #4 / Floppy_Magazine_87-4_1987_Megasystems_Oy_fi_Side_A.d64 / graf2.art < prev    next >
Text File  |  2023-02-26  |  6KB  |  56 lines
  1.        {CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}     {CBM-@} {CBM-@}{CBM-@}                         {CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}   {CBM-P}{CBM-P} {CBM-P}{CBM-P}                         {CBM-O}{CBM-O}   {CBM-O}{CBM-O}  {CBM-O}{CBM-O}  {CBM-O}{CBM-O}                         {CBM-I}{CBM-I}      {CBM-I}{CBM-I}   {CBM-I}{CBM-I} {CBM-I}  {CBM-I}{CBM-I} {CBM-I}{CBM-I}{CBM-I}               {CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}  {CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I} {CBM-I}  {CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}              {CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}  {CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}    {CBM-I}{CBM-I}{CBM-I}  {CBM-I}{CBM-I}              {CBM-O}{CBM-O}   {CBM-O}{CBM-O}      {CBM-O}{CBM-O} {CBM-I}  {CBM-I}{CBM-I}   {CBM-I}{CBM-I}              {CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}      {CBM-P}{CBM-P} {CBM-I}  {CBM-I}{CBM-I}   {CBM-I}{CBM-I}               {CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}       {CBM-@}{CBM-@}    {CBM-I}{CBM-I}   {CBM-I}{CBM-I}                                                                                          {CBM-+}{CBM-+}{CBM-+}{CBM--}                {CBM-POUND}{CBM-POUND}  {CBM-POUND}   {CBM-POUND}          {CBM-+}{CBM--}  {CBM-+}{CBM--}              {CBM-+}     {CBM--}   {CBM--}         {CBM-+}                   {CBM--}     {CBM--}   {CBM--}    {CBM-POUND}{CBM-POUND}   {CBM-+}       {CBM-+} {CBM-+}{CBM-+}{CBM--}  {CBM-+}{CBM-+}{CBM-+}{CBM--} {CBM--} {CBM--} {CBM--} {CBM--}   {CBM--}   {CBM-+}  {CBM-+}  {CBM-+}       {CBM-+}{CBM-+}{CBM--} {CBM-+} {CBM-+}{CBM--}  {CBM-+} {CBM--}     {CBM--}  {CBM--}{CBM--}  {CBM--}{CBM--}  {CBM-+}  {CBM-+}  {CBM-POUND}{CBM-+}{CBM-+}{CBM-+} {CBM-+}         {CBM-+} {CBM--} {CBM--} {CBM--} {CBM--} {CBM-+} {CBM--} {CBM-+} {CBM--}  {CBM-+}  {CBM-+}  {CBM-+} {CBM-+}  {CBM-+}      {CBM-+}{CBM-+}{CBM-+}{CBM-+} {CBM-+}{CBM--}{CBM--} {CBM--} {CBM-+}{CBM-+}{CBM--} {CBM-+}{CBM-+}{CBM--} {CBM-+}{CBM-+}{CBM-+}{CBM-+}  {CBM-+}{CBM-+} {CBM-+} {CBM-+}  {CBM-+}     {CBM-+}{CBM--}  {CBM-+}{CBM--}{CBM--} {CBM--} {CBM--} {CBM--} {CBM-+} {CBM--} {CBM-+} {CBM--}  {CBM-+}   {CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM--}  {CBM-+}      {CBM-+}{CBM-+}{CBM-+}{CBM--}{CBM--}{CBM--}  {CBM--} {CBM--}{CBM--}  {CBM--}{CBM--}  {CBM--}{CBM--}  {CBM-+}  {SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-+}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM--}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM--}{SHIFT-*}{SHIFT-*}{SHIFT-*}     {CBM-+}KIRJOITTELI TONI{CBM--}LUODE.JATKOA{CBM-+}{CBM--}        {CBM-+}                {CBM--}           {CBM-+}{CBM--}       {CBM-+} {CBM-+}              {CBM-+} {CBM--} {CBM-+}        {CBM-+}{CBM--}         {CBM-+}{CBM--}               {CBM-+}   {CBM-+}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-+}                                                
  2. {CBM-POUND}{CBM-POUND}{CBM-POUND}    {CBM--} {CBM--}          {CBM-POUND}{CBM-POUND}{CBM-POUND}     {CBM-POUND}{CBM-POUND}{CBM--}{CBM--}{CBM--} {CBM--}      {CBM--}{CBM-POUND}{CBM-POUND} {CBM-POUND} {CBM--} {CBM--}       {CBM-POUND}{CBM-POUND} {CBM-+}  {CBM-POUND} {CBM-POUND}{CBM-POUND} {CBM--}   {CBM--} {CBM--} {CBM-POUND}{CBM-POUND}   {CBM--}{CBM-POUND}{CBM-POUND}{CBM--}{CBM--}{CBM--}{CBM-+}{CBM--}{CBM-+}{CBM--}{CBM--} {CBM--}{CBM--} {CBM--}{CBM-+}{CBM-POUND} {CBM-+} {CBM--}{CBM--}{CBM--}{CBM-POUND}{CBM-POUND}{CBM--}{CBM-+} {CBM--}{CBM--}{CBM-+}{CBM--}{CBM-+}{CBM--}{CBM-POUND}{CBM-POUND}{CBM--}  {CBM--}{CBM-+}{CBM-POUND}{CBM--}{CBM--} {CBM--}{CBM-POUND}{CBM--}{CBM-POUND}{CBM-+}{CBM-POUND}{CBM--}{CBM-+}{CBM-POUND}{CBM--}{CBM-POUND}{CBM-+} {CBM-+}{CBM-POUND}{CBM--}{CBM--} {CBM-+}{CBM-POUND}{CBM--}{CBM--} {CBM--}{CBM--}{CBM--}{CBM-POUND}{CBM--}{CBM-POUND}{CBM-+}{CBM-POUND}{CBM--}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM--}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM--}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}{CBM-POUND}                    {CBM-POUND}{CBM-POUND}{CBM--}   {CBM-POUND}{CBM-POUND}{CBM--}         
  3.  
  4.  Jos kerrattaisiin: 8000 muistipaikkaa   (320*200/8) jakautuu 1000:een merkin    kokoiseen alueeseen (8*8), joka taas    jakautuu uudelleen 8:ksi osa-alueeksi.
  5.  
  6.                                          {CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S}         {CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S}           {SHIFT--}       {CBM-C} -merkki  {SHIFT--}12345678{SHIFT--}           {SHIFT--}ruutu.  {SHIFT--}         {SHIFT--}2       {SHIFT--}           {SHIFT--}320*200 {SHIFT--}         {SHIFT--}3 merkki{SHIFT--}           {SHIFT--}pixeli[ {SHIFT--}         {SHIFT--}4  8*8  {SHIFT--}           {CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-X}^        {SHIFT--}5  pix. {SHIFT--}                     {CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*} {SHIFT--}6       {SHIFT--}                              {SHIFT--}7       {SHIFT--}                   kahdeksan{SHIFT-*}{SHIFT-*} {CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{SHIFT--}                   pixelin    {CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-X}                   alue.                ^                             {CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S}{SHIFT--}                  Bittej[    {SHIFT--}01100110{SHIFT--}{CBM-X}                  tietyss[   {CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-X}                   j[rjestyksess[.                         Muodostavat 8 bitin sarjan              = TAVUN (=muistipaikan).
  7.  
  8.  Jos haluamme 'riville' 1 toiseen        sarakkeeseen kolmanteen vaakariviin     nelj[nnen bitin p[[lle, teemme:
  9.  
  10.  POKE 8192+(320*1)+(8*2)+3,2^4
  11.        ^    ^       ^    ^ ^             alkumuis- rivi sarake   {SHIFT--} {CBM-Z}{SHIFT-*}{SHIFT-*}bitti      tipaikka    merkin osa-alue
  12.  
  13.  ...SUURENNETTU RUUDUN YL{SHIFT-+}REUNA:
  14.                                               sarake 0        1         2            {CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}    r{SHIFT--}12345678                              i{SHIFT--}2                                     v{SHIFT--}3                                     i{SHIFT--}4                                      {SHIFT--}5                                      {SHIFT--}6                                      {SHIFT--}7       2.MERKKI                      0{SHIFT--}8                                      {SHIFT--}        {CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}                       {SHIFT--}        {SHIFT--}                              {SHIFT--}        {SHIFT--}                              {SHIFT--}        {SHIFT--}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}                       {SHIFT--}        {SHIFT--} ^                            {SHIFT--}        {SHIFT--} {SHIFT--}                            {SHIFT--}        {SHIFT--}3.osa-alue,m-paikka 339.      {SHIFT--}        {SHIFT--} {SHIFT--}                           1{SHIFT--}          {SHIFT--}                            .          {SHIFT--}                            .       SUURENNETTU ALUE:               .          {SHIFT--}                                     {CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S}                              {SHIFT--}00001000{SHIFT--}                              {CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-X}                         bitit:01234567
  15.  
  16.  V[rit saadaan n[kym[[n k[ytt[m[ll[      muistipaikkaa 53272. V[rith[n tarvitse- vat muistia 1000 paikkaa my\s, koska    1 v[riruutu on yhden 8*8 pixelin alueen kokoinen kohta. T[ss[ asiassa muuten    EI K{SHIFT-+}YTET{SHIFT-+} 64:n omaa v[rialuetta, vaan  oma v[rialueemme muodostuu jostain      alueesta muistia.
  17.    Esim. piirustusohjelma nimelt[ DOODLE k[ytt[[ muistialuetta 23552-32576       hyv[kseen. Alueella 24576-32576 on      grafiikkadata ja alueella 23552-24551   on v[rit.
  18.    Voimme k[ytt[[ VAIN KAHTA V{SHIFT-+}RI{SHIFT-+},      koska yhden muistipaikan sis[lt\\n      mahtuu vain kahden v[rin tiedot.
  19.  Toinen v[ri on piirustusv[ri ja toinen  on taustan v[ri. Kahden v[rin arvon
  20.  saamme laskemalla vaikka n[in:
  21.  
  22.  Taustav[ri on harmaa, v[ri 11.
  23.  Piirustusv[ri on vaaleansininen,        v[riarvo 14. N[m[ luvut saamme yhdis-   tetty[...: X= 14*16 + 11
  24.  
  25.  Sitten laskemme MIHIN v[ri tulee.       Esim. otetaan v[ririvi nro 15 ja sarake 30. Muistipaikka = v[riruudun alku-     muistipaikka + 15*40 + 30.
  26.  Ja sitten pokeillaan: POKE MPAIKKA,X.
  27.  
  28.  Esim. DOODLEN kuvan saa p[[lle pokeile- malla:
  29.  
  30. POKE 56576,2:POKE 53265,59:POKE53272,120
  31.  Ensimm[isen muistipaikan tunnetkin,     mutta MIT{SHIFT-+} NE KAKSI MUUTA...????!!!?!?
  32.    No, 53265 hoitaa koneen grafiikka-    tyyppien muuttamisen, ja 53272 taas     v[rien ja grafiikkadatan pienempien     alueiden, kuvaruutujen vaihtamiset.
  33.  
  34.  {CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-R}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S}  {SHIFT--}53272:n arvo:{SHIFT--} tapahtuma:           {SHIFT--}  {CBM-Q}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-E}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-W}  {SHIFT--}arvo 20,normaalitila                {SHIFT--}  {SHIFT--}arvo 28,n[ytt[[ aluetta: alkump+8192{SHIFT--}  {SHIFT--}arvo 120,sama kuin ed.paitsi v[ri-  {SHIFT--}  {SHIFT--}     alue on siirtynyt alkump+7168  {SHIFT--}  {CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-X}
  35.  ...Siin[ pari esimerkki[.
  36.  
  37.  {CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-R}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S}  {SHIFT--}53265:n arvo:{SHIFT--} tapahtuma:           {SHIFT--}  {CBM-Q}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-E}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-W}  {SHIFT--}arvo 27, normaaligrafiikka          {SHIFT--}  {SHIFT--}arvo 59, tarkkuusgrafiikkatila      {SHIFT--}  {SHIFT--}arvo 11, ruutu pois p[[lt[          {SHIFT--}  {CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-X}
  38.  
  39.  Yhdess[ n[m[ siis kytkev[t tarkkuus-    grafiikan ja v[rialueet p[[lle.
  40.  
  41.  Monimutkaista, eik\?? Sen takia siir-   rymmekin merkkigrafiikkaan, siin[ ei    p[[ mene niin py\r[lle. Seuraava juttu  seuraavassa numerossa. Paina F6.
  42.  
  43.  
  44. ----------------------------------------
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  Hypp\st[ lainaten: SE LOPPU JO!
  56.