home *** CD-ROM | disk | FTP | other *** search
/ Publication 2 / Publication_02_1996_High-Tech_de_Side_A.d64 / hard-_software < prev    next >
Text File  |  2023-02-26  |  2KB  |  110 lines
  1. emulator
  2.  1 
  3. coding
  4.  2 
  5. drucker
  6.  3 
  7. c128
  8.  4 
  9.  
  10.  1 
  11.  
  12.  1 
  13.  
  14.  1 
  15.  
  16.  1 
  17.  
  18.  1 
  19.  
  20.  1 
  21.  
  22.  1 
  23.  
  24.  1 
  25.  
  26.  1 
  27.  
  28.  1 
  29.  
  30.  1 
  31.  
  32.  1 
  33.  
  34.  1 
  35.  
  36.  1 
  37.  5 
  38. hadr-/software
  39. news & tips
  40.   WINDOWS {CBM-@} EMULATOR@ALS@BETAVERSION
  41.   windows {CBM-T} emulator@als@betaversion
  42.  
  43. dass man eine DOSe als {CBM-Y}{CBM-U}{CBM-O} benutzen
  44. kann{CBM--}ist nicht neues.aber wie schon
  45. in der letzten issue beschrieben gibt
  46. es seit geraumer zeit ein {CBM-Y}{CBM-U}{CBM-O}-emulator
  47. sogar f]r windows95 als betaversion.
  48. doch nun gibt es endlich das ORIGINAL
  49. des emulators !
  50. also {SHIFT-+} intersessiert sollten sich auf
  51. die socken machen{CBM--}win{CBM-U}{CBM-O} ist klasse !
  52.  
  53.                      ROBIN HOOD
  54. {SHIFT-@}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{SHIFT-@}
  55. {CBM-C}      TIPS@FUER@PROGRAMMIERER       {CBM-C}
  56. {CBM-C}     tips@fuer@programmierer       {CBM-C}
  57. {SHIFT-@}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{CBM-F}{SHIFT-@}
  58.  
  59. auf grund des neuen magsys v2.0 liegt
  60. dieses chapter ab jetzt mit hard- und
  61. software-corner zusammen.
  62.  
  63. CENTRONICS PARALLEL IN BASIC
  64. {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}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}
  65. mit folgendem listing l@sst sich via
  66. basic ein parallel angeschlossener
  67. centronics-drucker betreiben...
  68. 10 c=56576{SHIFT-+}pokec+1{CBM--}0
  69. 11 pokec+2{CBM--}peek(c+2)or4{SHIFT-+}pokec+3{CBM--}255
  70. 12 end
  71.  
  72. 100 fori=1tolen(x$)
  73. 101 x=asc(mid$(x${CBM--}i{CBM--}1))
  74. 102 waitc+13{CBM--}16{SHIFT-+}pokec+1{CBM--}x
  75. 103 x=peek(c)and251
  76. 104 pokec{CBM--}x+4:pokec{CBM--}x
  77. 105 next{SHIFT-+}return
  78.  
  79. mit gosub100 wird text x$ gedruckt !
  80.  
  81.                   ROBIN HOOD
  82. PULL-DOWN-GRAFIX ({CBM-Y}128)
  83. {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}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}
  84. 10 fort=0to24{SHIFT-+}graphic2{CBM--}0{CBM--}t
  85. 11 fory=0to5o{SHIFT-+}graphic1{CBM--}0
  86. 12 getkey a$
  87. 13 fort=24to0step-1{SHIFT-+}graphic2{CBM--}0{CBM--}t
  88. 14 fory=1to50:nexty{CBM--}t
  89. 15 graphic 0
  90.  
  91. lade eine hiresgrafik ein und starte
  92. das proggi.
  93.  
  94.  
  95.                       ROBIN HOOD
  96. so !
  97. das war's jetzt einfach mal so...
  98. es gab zwar einen ass-tip von ROBIN
  99. HOOD{CBM--}aber soviel ich weiss{CBM--}hatte der
  100. ein {CBM-Y}opyright{CBM--}weshalb er erstmal
  101. nicht abge...ja was denn eigentlich ?
  102. abgeDRUCKT kann man hier ja schlecht
  103. sagen ?!
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.