Knuckle Cracker Wiki

User Tools

Site Tools

Trace:
4rpl:commands:signalgenerator

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revisionPrevious revision
Next revision		Previous revision
4rpl:commands:signalgenerator [2025/09/02 19:58] – [Sine wave in any direction without gaps] kalli4rpl:commands:signalgenerator [2025/09/03 16:43] (current) – [Sine wave in any direction without gaps] kalli
Line 156: Line 156:
  <-cell1 <-cell0 sub ->dir  <-cell1 <-cell0 sub ->dir
  <-dir.0 abs <-dir.1 abs max ->length  <-dir.0 abs <-dir.1 abs max ->length
- <-dir <-length asfloat div ->dirL+ <-length eq0 if 0 0 v2 else <-dir <-length asfloat div endif ->dirL
  <-cell0  <-cell0
- <-length 1 do+ <-length 0 do
  dup <-dirL add  dup <-dirL add
  loop  loop
- <-length listN+ <-length 1 add listN
   
 :getSinusoidCells # INPUTS: <-startCell <-endCell <-amplitude <-intervals <-phaseShift01. OUTPUT: a list of cells. :getSinusoidCells # INPUTS: <-startCell <-endCell <-amplitude <-intervals <-phaseShift01. OUTPUT: a list of cells.
Line 168: Line 168:
 ->ampl ->ampl
 ->cell1 ->cell1
-dup ->cell0 ->prevCell+->cell0
  
 clearstack clearstack
Line 177: Line 177:
 <-dir.1 <-dir.0 neg v2 <-ampl mul ->dirP <-dir.1 <-dir.0 neg v2 <-ampl mul ->dirP
  
-<-axisLength 0 do +<-cell0 
- <-axisCells[i] i <-freq <-shift 0 1 signalgenerator <-dirP mul add <-prevCell swap dup2 sub magnitude if +<-axisLength 1 do 
- ->prevCell @getSingleLineCells ListToStack + i <-freq <-shift 0 1 signalgenerator <-dirP mul <-axisCells[i] add @getSingleLineCells ListToStack
- else +
- ->prevCell pop +
- endif+
 loop loop
-list dup 0 removelistelement+list
  
 </code> </code>
  
 <=[[4rpl:start| Index]] <=[[4rpl:start| Index]]
4rpl/commands/signalgenerator.1756843082.txt.gz · Last modified: 2025/09/02 19:58 by kalli

Page Tools

Except where otherwise noted, content on this wiki is licensed under the following license: CC Attribution-Share Alike 4.0 International
CC Attribution-Share Alike 4.0 International Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki