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