-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathHarvie.ic10
72 lines (63 loc) · 1.38 KB
/
Harvie.ic10
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
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
define HarvieHash HASH("StructureHarvie")
define HarvieHash2 HASH("StructureHarvieReversed")
define HydroPonicHash HASH("StructureHydroponicsTrayData")
alias vHarvieCount r15
alias vHarvieCount2 r14
Main:
yield
#check planting
# check if this works when device is not there (min still 0?)
jal CountHarvies
#move r0 1 # happy default
#move r1 1 # happy default
#breqz vHarvieCount 2
#lb r0 HarvieHash Mode Minimum
#breqz vHarvieCount2 2
#lb r1 HarvieHash2 Mode Minimum
#min r0 r1 r0
#beqz r0 DoPlant
#check harvesting
#check seeding stage
lbs r0 HydroPonicHash 0 Growth Minimum
beq r0 5 DoHarvest
#check removed seeds
sge r0 r0 4 # 4 == mature
lbs r1 HydroPonicHash 0 Seeding Minimum
sge r1 r1 0 # might need correcting 0 == seeding stage but no seed
and r0 r0 r1
bnez r0 DoHarvest
sb HarvieHash On 0
sb HarvieHash2 On 0
j Main
DoPlant:
sb HarvieHash On 1
sb HarvieHash2 On 1
yield
sb HarvieHash Plant 1
sb HarvieHash2 Plant 1
j Working
DoHarvest:
sb HarvieHash On 1
sb HarvieHash2 On 1
yield
sb HarvieHash Harvest 1
sb HarvieHash2 Harvest 1
j Working
Working:
yield
jal CountHarvies
move r0 -1
move r1 -1
breqz vHarvieCount 2
lb r0 HarvieHash Activate Maximum
breqz vHarvieCount2 2
lb r1 HarvieHash2 Activate Maximum
max r0 r0 r1
bge r0 1 Working
j Main
CountHarvies:
lb r0 HarvieHash PrefabHash Sum
div vHarvieCount r0 HarvieHash
lb r0 HarvieHash2 PrefabHash Sum
div vHarvieCount2 r0 HarvieHash2
j ra