home *** CD-ROM | disk | FTP | other *** search
/ Floppy Magazine 1987 #3 / Floppy_Magazine_87-3_1987_Megasystems_Oy_fi_Side_A.d64 / niksit < prev    next >
Text File  |  2023-02-26  |  3KB  |  91 lines
  1.  
  2.  
  3. Niksej[
  4.  
  5.  
  6. Merkist\n vaihto
  7. {CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}
  8. Muutoksen isojen ja pienten kirjaimien  kesken voi tehd[ ohjelmassa seuraavin   tavoin:
  9.  
  10. print chr$(14)      isot ==> pienet
  11. print chr$(142)     pienet ==> isot
  12. print "<ctrl>+n"    isot ==> pienet
  13. print "<vastakkaisessa kent[ss[ oleva   iso n>"             pienet ==> isot
  14. poke53272,(peek(53272)and240)or4                            isot ==> pienet
  15. poke53272,(peek(53272)and240)or6                            pienet ==> isot
  16.  
  17. Yks, kaks
  18. {CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}
  19. Jos tarvitset muuttujaa, jonka arvo     vaihtelee ykk\sest[ kakkoseksi ja p[in- vastoin onnistuu muutos seuraavasti:
  20.  
  21. a=1
  22. a=(nota)+4
  23.  
  24. Alempi rivi muuttaa ykk\sen kakkoseksi  ja kakkosen ykk\seksi.
  25.  
  26. V[ri]
  27. {CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}
  28. Peek(646) paljastaa kirjoitusv[rin.
  29.  
  30. Alasp[in
  31. {CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}
  32. Sys 59749 siirt[[ n[yt\n rivej[ yhden   alasp[in, kun muistipaikassa 214 on sen rivin numero, jotka on ylin alasp[in    menevist[ riveist[.
  33.  
  34. Ilpo 6/86
  35. {CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}
  36. Ilpon seikkailuissa 6/86 oli se kiva    scrollinki seill[ ylh[[ll[. Juttua tuli jatkuvasti. Jos et jaksanut istua katse-lemassa tekstin valumista mutta haluat  tiet[[ mit[ seill[ luki kirjoita sis[[n seuraava ohjelma.  
  37.  
  38. 10 a=a+1:ifa=1thenload"ilpo8.c",8,1
  39. 20 a=32100
  40. 30 fori=1024to2023:pokei,peek(i):a=a+1:next:wait203,64,64
  41. 40 printchr$(147):goto30
  42.  
  43. Super laiskuutta
  44. {CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}
  45. Load"nimi",8,1 k[skyn voi kirjoittaa    my\s muotoon load"nimi",8,8.
  46.  
  47. Hyppiv[ rivi
  48. {CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}
  49. Sys 59848 kopioi n[yt\n rivin toiseen   paikkaan. Muistipaikoissa 209 ja 210    tulee olla kohderivin koordinaatit ja   muistipaikoissa 780 ja 172 tulee olla   siirrett[v[n rivin koordinaatit. Alla   olevassa taulukossa on kunkin rivin     koordinaatit.
  50.  
  51.     Rivi       MP 209/172  MP 210/780
  52.      0             00            4
  53.      1             40            4
  54.      2             80            4
  55.      3             120           4
  56.      4             160           4
  57.      5             200           4
  58.      6             240           4
  59.      7             24            5
  60.      8             64            5
  61.      9             104           5
  62.      10            144           5
  63.      11            184           5
  64.      12            224           5
  65.      13            8             6
  66.      14            48            6
  67.      15            88            6
  68.      16            128           6
  69.      17            168           6
  70.      18            204           6
  71.      19            248           6
  72.      20            32            7
  73.      21            72            7
  74.      22            112           7
  75.      23            152           7
  76.      24            192           7
  77.                                         Jos k[ytt[[ muita arvoja tapahtuu kopio-inti keskelt[ rivi[.
  78.  
  79. Mini if
  80. {CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}
  81. If a<>0 then -lauseen voi kirjoittaa    my\s muotoon if a then.
  82.  
  83. Ryhm] poisto
  84. {CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}
  85. Kun laiska kirjoittelija haluaa poistaa levylt[ useita tiedostoja, selvi[[ h[n  helpoimmalla n[in:
  86.  
  87. open15,8,15,"s:tiedosto1,tiedosto2,tiedoston"
  88.  
  89. Loputonta m[[r[[ tiedostoja ei voi yh-  teen k[skyyn kirjoittaa, sill[ levari eiymm[rr[ k[skyjonoja, joissa on yli 58   merkki[.
  90.  
  91.