electro-music.com   Dedicated to experimental electro-acoustic
and electronic music
 
    Front Page  |  Articles  |  Radio
 |  Media  |  Forum  |  Wiki  |  Links  |  Store
Forum with support of Syndicator RSS
 FAQFAQ   CalendarCalendar   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   LinksLinks
 RegisterRegister   ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in  Chat RoomChat Room 
Live streaming at radio.electro-music.com

  host / artist show at your time
<on air> mosc Back on the air tonight - Twyndyllyngs
Please visit the chat
 Forum index » Artists » HrastProgrammer
Just a short introduction ...
Post new topic   Reply to topic Moderators: HrastProgrammer
Page 1 of 1 [5 Posts]
View unread posts
View new posts in the last week
Mark the topic unread :: View previous topic :: View next topic
Author Message
HrastProgrammer



Joined: Oct 16, 2008
Posts: 224
Location: CPU
Audio files: 51

PostPosted: Tue May 21, 2013 12:02 pm    Post subject: Just a short introduction ... Reply with quote  Mark this post and the followings unread

Welcome to the "HrastProgrammer" project! I started all this many years ago as a programming & software development project dealing with assembler programming, calculators & emulators programming, Pascal & Forth development, etc. Later I integrated electronic music (with ambient/industrial/techno elements), sound synthesis and sequencer/DSP programming into it. Although this EM-side is often referenced as "HrastWerk", it became integral part and (in many aspects) the driving force of the whole project. Also, many other areas of interest influenced my work during the years - nature & space, water & rain, rivers & oceans, environment & ecology, comics, science fiction books & movies, robotics & cybernetics, mathematics & algorithms, VFR & IFR, ...

I need a few days to prepare and upload all tracks/albums I planned.

In the meantime, you can listen to and download my music on Bandcamp:

http://hrastprogrammer.bandcamp.com/

_________________
http://www.hrastprogrammer.com/hrastwerk/
http://hrastprogrammer.bandcamp.com/
Back to top
View user's profile Send private message Visit poster's website
Blue Hell
Site Admin


Joined: Apr 03, 2004
Posts: 20623
Location: The Netherlands, Enschede
Audio files: 150
G2 patch files: 318

PostPosted: Tue May 21, 2013 12:11 pm    Post subject: Re: Just a short introduction ... Reply with quote  Mark this post and the followings unread

HrastProgrammer wrote:
& Forth


May the Forth be with you!

Code:
// //////////////////////////////////////////////////////////////////////////

: WorkProcess ( -- )

  ProcessTimer.Fired                  // Check if process timer fired
  if                                  //   it did: handle pot and rotary changes
    LoopTime ProcessTimer.Start       // Restart timer
    WorkProcessPot                    // Check for and process pot    changes
    WorkProcessRotary                 // Check for and process rotary changes
  endIf
  MidiProcess                         // Process the Midi module driver
;


// //////////////////////////////////////////////////////////////////////////

: InitWork ( -- )

  0 WorkSendVolume                    // Silence radio
  0 WorkSendSelection                 // Position radio on a station
  Looptime ProcessTimer.Start         // Start Process timer
;


// //////////////////////////////////////////////////////////////////////////


(from one of the noodle radio thingies I did in the past)

Looking forward to see tracks appear here!

_________________
Jan
Back to top
View user's profile Send private message Visit poster's website
HrastProgrammer



Joined: Oct 16, 2008
Posts: 224
Location: CPU
Audio files: 51

PostPosted: Tue May 21, 2013 12:28 pm    Post subject: Reply with quote  Mark this post and the followings unread

Hehe, glad to hear that you are familiar with Forth Very Happy

Just a small snippet from my HUMPS project - MIDI sequencer for DOS developed around '93 ...

Code:

: SAVE-SONG 532E5145 PREV GET OPEN >R TOP @ PAD - HERE !
  BOTTOM @ PAD - HERE 4+ ! HERE TOP @ HERE - 4+
  BEGIN 4000 R@ 3 PICK 8000 > IF 8000 ELSE 3 PICK
  THEN 5 PICK ADDR>FDOS DROP >R
  SWAP R@ + SWAP R> - DUP 0> 0= UNTIL DDROP
  R> CLOSE
;

: LOAD-SONG 532E5145 PREV GET OPEN >R HERE                                 
  BEGIN 3F00 R@ 8000 4 PICK ADDR>FDOS DROP
  SWAP OVER + SWAP 0> 0= UNTIL DROP
  HERE @ PAD + TOP ! HERE 4+ @ PAD + BOTTOM !
  R> CLOSE
;


Unfortunately, haven't programmed anything in Forth for years ...


HUMPS.png
 Description:
 Filesize:  40.95 KB
 Viewed:  64 Time(s)
This image has been reduced to fit the page. Click on it to enlarge.

HUMPS.png



_________________
http://www.hrastprogrammer.com/hrastwerk/
http://hrastprogrammer.bandcamp.com/
Back to top
View user's profile Send private message Visit poster's website
Antimon



Joined: Jan 18, 2005
Posts: 3730
Location: Sweden
Audio files: 275
G2 patch files: 96

PostPosted: Tue May 21, 2013 1:25 pm    Post subject: Reply with quote  Mark this post and the followings unread

Congratulations on the new forum! Smile
_________________
Antimon's Window
@soundcloud @Flattr home - you can't explain music
Back to top
View user's profile Send private message Visit poster's website
HrastProgrammer



Joined: Oct 16, 2008
Posts: 224
Location: CPU
Audio files: 51

PostPosted: Tue May 21, 2013 9:22 pm    Post subject: Reply with quote  Mark this post and the followings unread

Thanks Very Happy
_________________
http://www.hrastprogrammer.com/hrastwerk/
http://hrastprogrammer.bandcamp.com/
Back to top
View user's profile Send private message Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic Moderators: HrastProgrammer
Page 1 of 1 [5 Posts]
View unread posts
View new posts in the last week
Mark the topic unread :: View previous topic :: View next topic
 Forum index » Artists » HrastProgrammer
Jump to:  

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum
e-m mkii

Please support our site. If you click through and buy from
our affiliate partners, we earn a small commission.


Forum with support of Syndicator RSS
Powered by phpBB © 2001, 2005 phpBB Group
Copyright © 2003 through 2009 by electro-music.com - Conditions Of Use