Welcome, Guest. Please login or register.


Recent Posts

Pages: 1 ... 3 4 5 6 7 8 9 [10]
91
Játékverseny / Re: 12. hét / 12th week: Bruce Lee
« Last post by geco on 2021.April.04. 10:36:19 »
No, azt hittem valaki még megdönti a rekordom :)
Akkor legyen a következő hét játéka a Boulder Dash1 By István.
92
Történelem / Re: Mit szerettek a legjobban az Enterprise-ban?
« Last post by geco on 2021.April.04. 10:34:53 »
Nekem a Primo is gyanús, bár nem mondanám biztosra...
Ha az old-computers nem hazudik, az is Beeperrel rendelkezik
93
Történelem / Re: Mit szerettek a legjobban az Enterprise-ban?
« Last post by Dr.OG on 2021.April.04. 10:28:50 »
Nekem a Primo is gyanús, bár nem mondanám biztosra...
94
Történelem / Re: Mit szerettek a legjobban az Enterprise-ban?
« Last post by geco on 2021.April.04. 10:10:45 »
A zajcsatorna tetszik, más gépeken ez eléggé ritka, ha van egyáltalán pont ilyen.
Szinte az összes gépben van zajcsatorna, ha nem is kifejezetten csak zaj, de zaj keltésére is alkalmas, amiben van valamilyen hangkeltő csipcsirip.
EP-n ugye 4 csatornán is szólhat a zaj,
C64-en 3-on,
CPC-n Speccy 128-on (és minden más gépen, amiben AY van) 3-on,
C+4 -és C16-on 1-en,
Sega Master System-en 1-en.
Egy gépet ismerek, amiben nem csak beeper van hangkeltésre, és nincs zaj lehetősége, az a TVC.
95
Programming / Re: FORTH
« Last post by ExcaliburGER on 2021.April.04. 09:50:59 »
Before you start it, you have to switch the graphics mode. I have corrected that 2 minutes later in the post and did not thought, that someone is such incredible fast :)
Code: [Select]
4 HIRES
-- after that - only 4 lines at the bottom for input
0 0 6 700 TRIANGLE
Hope it helps
96
Programming / Re: FORTH
« Last post by Lacika on 2021.April.04. 09:35:04 »
What am I doing wrong?
*** Channel does not exist.
97
Programming / Re: FORTH
« Last post by ExcaliburGER on 2021.April.04. 08:53:43 »
Time to get this thread back to the active ones :) I've tried myself in finding an algorythm to draw the Sierpinski triangle. In a modern BASIC it's not really a problem, because the parameter variables are stored automatically and restored at procedures/functions end. Because it was a nice skill exercise, I ported it to IS-FORTH. Takes me hours of lifetime :ds_icon_cheesygrin:

But to the history, found this original tweet at Twitter on an ORIC. So, let the work begin. And here is my IS-Forth result - first time I ever used the word RECURSE. And to see how fast the ARM processor is... on an Acorn 3020.

Maybe the program can be more compact, my FORTH skills are really at beginners level. And it wasn't so easy for me to deal with four stack values at the same time. But I want to avoid variables, there is no "stackable" variant of them ;-)
I want to share it with you, so here is the listing for a first view:
Code: [Select]
( Drawing Sierpinsky triangle )

: TRIANGLE ( X Y L S -- )
  2SWAP 2DUP MOVE ( STARTPOINT )
  2SWAP SWAP DUP
  0 > IF
    SWAP 2SWAP 2DUP
    4 PICK + DRAW
    2DUP SWAP 4 PICK + SWAP DRAW
    2DUP DRAW 2SWAP
    2 / SWAP 1 - SWAP
    ( SHOULD BE X Y L-1 S/2 )
    3 PICK 3 PICK 3 PICK 3 PICK
    RECURSE
    3 PICK 1 PICK + 3 PICK 3 PICK 3 PICK
    RECURSE
    3 PICK 3 PICK 2 PICK + 3 PICK 3 PICK
    RECURSE
    2SWAP SWAP
  THEN
  2DROP 2DROP ;

As attachment it is added as a FORTH editor file, which you can put into file system in EP128emu (Set working directory). And then use
Code: [Select]
BUFFERS ON " triangle.4th" NAME
LOAD-BUFFERS 1 LOAD
-- Switch to HIRES graphic mode
4 HIRES
-- to run it after loading
0 0 6 700 TRIANGLE
98
Történelem / Re: Mit szerettek a legjobban az Enterprise-ban?
« Last post by ergoGnomik on 2021.April.04. 08:46:28 »
/OFF
A C64-ben is van zajcsatorna, igaz, csak 1db. WIKI szerint:
Ezt az egyet hogy sikerül kiszámolni?
/ON
99
Történelem / Re: Mit szerettek a legjobban az Enterprise-ban?
« Last post by Dr.OG on 2021.April.04. 05:47:41 »
Évekig nem jöttem rá, melyik gépnél olvastam, hogy van zajcsatornája, aztán meglett: nem az Atari, nem az Amiga az, hanem a Sam Coupé. Pont kétszer annyira csatorna van rajta, mint az EP-n, így két zajcsatorna is. Hogy ugyanúgy szól-e a zajcsatorna, mint EP-n, azt nem tudom. (EP-n 31.25 KHz a zajcsatorna frekvenciája, már nem tudom, ezt mivel éri el, de erről is volt szó a fórumon. A Sam Coupé biztos más módszert használhat.)
Hogy ne legyen annyira OFF: A zajcsatorna tetszik, más gépeken ez eléggé ritka, ha van egyáltalán pont ilyen.
A C64-ben is van zajcsatorna, igaz, csak 1db. WIKI szerint:
Quote
Hang hardver: MOS Technology 6581/8580 „SID” csip
-3 hangcsatorna, ADSR programozható;
-4 hullámforma: háromszög, fűrészfog, változtatható négyszögjel és zaj
-programozható alul/felül áteresztő és sávszűrő
-Oszcillátor szinkronizáció, gyűrűmoduláció
100
Történelem / Re: Mit szerettek a legjobban az Enterprise-ban?
« Last post by Dr.OG on 2021.April.04. 05:45:06 »
...
Akkor már tudod, hogyan kell a vezetéket megszakítani, most már van megszakításkezelő rutinod!
...
:smt043 :smt005
Pages: 1 ... 3 4 5 6 7 8 9 [10]