home *** CD-ROM | disk | FTP | other *** search
/ Chip: Hang es video / CHIP_ZENESZERKESZTO_2005.ISO / audio_1 / softstep / softstep3.msi / Data1.cab / ufdemo.ufn < prev    next >
Text File  |  2000-12-29  |  3KB  |  139 lines

  1. 5
  2. 1
  3. 0
  4. 0
  5. C=#HFFFFFF
  6. DURATION=24
  7. MID=0
  8. PERCENTON=80
  9. RULE=#B0101101
  10. TEST_CRC() = INS(LMCRC ) , (GET(0) = GET(1) ) OR (GET(0) = GET(2) )
  11. 0.
  12. 1. Min In1 & In2 = OUT( MIN( A.( IN1 ) , B.( IN2 ) ) ) ;  Use with UF2
  13. 2. Max A & B = OUT( MAX( A , B ) ) , LED( A= B) ;  Use with UFO
  14. 3. 
  15. 4. Clock Setup = TSET( DURATION , PERCENTON ) , GOTO(ME+1) ; Basic Setup & GoTo Clock
  16. 5. Test Clk = OUT(A.(CLK)) , LED(A)
  17. 6. 
  18. 7. Clock Setup = TSET( DURATION , PERCENTON ) , GOTO(ME+1) ; Basic Setup & GoTo Clock
  19. 8. Clock Tick = TICK(ME+1, ME+2) 
  20. 9. Clock On Fn = OUT( 127 ) , LED( 1) ; for use with UFO-100
  21. 10. Clock Off Fn = OUT( 0) , LED( 0)
  22. 11. 
  23. 12. Life Setup = NLED(-32), NLED(32), TSET(DURATION, PERCENTON) , GOTO(ME+1) ; Initialize ULM-01 LEDs & Clock
  24. 13. Life Rand Seed = LED( LMRAN) , GOTO(ME+1) ; Fills UFO-00 LED matrix with randdom bits
  25. 14. Life on Clock Tick = TICK( ME+1, 0) ; Run 1 Life cycle every clock tick.
  26. 15. Life Cycle = LIFE(32, 32), LED( V0.(OUT(WRAP(V0+1)))) , SWITCH( TEST_CRC() , ME-2, 0)
  27. 16. Update Clock = TSET( DURATION , PERCENTON ) , GOTO( ME-2) 
  28. 17. 
  29. 18. CA LED Setup = NLED(32) , TSET( 6 , 50) , LED( V0.( LRAN)) , GOTO(ME+1) ;  Initialize ULR
  30. 19. Clock Tick = TICK( ME+1, ME+2)
  31. 20. Read CA Bits = OUT(RBIT( V0 , V1) ) , SWITCH( V1.(V1 +1) >= 32 , ME+2, 0) ; One Line CA
  32. 21. Clear Output = OUT( 0) 
  33. 22. Run CA Cycle = V1.(0 ) , V0.(CA( 32, RULE , V0) ), LED(V0)
  34. 23. 
  35. 24. CA Matrix Setup = NLED(-32), NLED(32), TSET(DURATION, PERCENTON) , LMCLR, LM.(0, V0.(LRAN) ) , GOTO(ME+1) ; Initialize ULM-02 LEDs & Clock
  36. 25. 1D CA on Clock Tick = TICK( ME+1, 0)
  37. 26. CA in Top Line = V0.(CA( 32 , RULE , V0 )), LMI( V0 ) , LED( V0) , OUT(WRAP(V0))
  38. 27. 
  39. 28. Set Num Inputs = NLED(3) , GOTO(ME+1) ; sets UFV-01 for 3 inputs, then goes to the next step
  40. 29. Sine Wave = X.(WRAP(X+1)), SWITCH( X , 0, ME+1) ,Y.((-SIN(X/((IN1/4) +0.1)) *IN2) - IN3 ) , WPIX( MID , X , Y, C ) , OUT( ABS(Y ))
  41. 30. Erase Image = CLSPIX(MID) 
  42. 31. 
  43. 32. 
  44. 33. 
  45. 34. 
  46. 35. 
  47. 36. 
  48. 37. 
  49. 38. 
  50. 39. 
  51. 40. 
  52. 41. 
  53. 42. 
  54. 43. 
  55. 44. 
  56. 45. 
  57. 46. 
  58. 47. 
  59. 48. 
  60. 49. 
  61. 50. 
  62. 51. 
  63. 52. 
  64. 53. 
  65. 54. 
  66. 55. 
  67. 56. 
  68. 57. 
  69. 58. 
  70. 59. 
  71. 60. 
  72. 61. 
  73. 62. 
  74. 63. 
  75. 64. 
  76. 65. 
  77. 66. 
  78. 67. 
  79. 68. 
  80. 69. 
  81. 70. 
  82. 71. 
  83. 72. 
  84. 73. 
  85. 74. 
  86. 75. 
  87. 76. 
  88. 77. 
  89. 78. 
  90. 79. 
  91. 80. 
  92. 81. 
  93. 82. 
  94. 83. 
  95. 84. 
  96. 85. 
  97. 86. 
  98. 87. 
  99. 88. 
  100. 89. 
  101. 90. 
  102. 91. 
  103. 92. 
  104. 93. 
  105. 94. 
  106. 95. 
  107. 96. 
  108. 97. 
  109. 98. 
  110. 99. 
  111. 100. 
  112. 101. 
  113. 102. 
  114. 103. 
  115. 104. 
  116. 105. 
  117. 106. 
  118. 107. 
  119. 108. 
  120. 109. 
  121. 110. 
  122. 111. 
  123. 112. 
  124. 113. 
  125. 114. 
  126. 115. 
  127. 116. 
  128. 117. 
  129. 118. 
  130. 119. 
  131. 120. 
  132. 121. 
  133. 122. 
  134. 123. 
  135. 124. 
  136. 125. 
  137. 126. 
  138. 127. 
  139.