View difference between Paste ID: Jci2bkAQ and DMMbTXji
SHOW: | | - or go back to the newest paste.
1
-- modul GPS
2
3
-- ladowanie wspolrzednych do plikow
4
5
function pliki()
6
  fs.makeDir("lokalizacja")
7
8
  file=io.open("lokalizacja/xwk", "w")
9
  wartosc=1
10
  file:write(wartosc)
11
  file:close()
12
13
  file=io.open("lokalizacja/xwn", "w")
14
  wartosc=0
15
  file:write(wartosc)
16
  file:close()
17
18
file=io.open("lokalizacja/xww", "w")
19
  wartosc=0
20
  file:write(wartosc)
21
  file:close()
22
23
file=io.open("lokalizacja/xwp", "w")
24
  wartosc=0
25
  file:write(wartosc)
26
  file:close()
27-
    xwk=xwk-1
27+
28-
    if xwk==0 then
28+
  print("zapisano")
29-
      xwk=4
29+
30
end
31
32
function podajwspolrzedne()
33
34
file=io.open("lokalizacja/xwk", "r")
35
  odczyt1=file:read()
36
  file:close()
37
write("kierunek to: ")
38
print(odczyt1)
39
40
file=io.open("lokalizacja/xwn", "r")
41
  odczyt2=file:read()
42
  file:close()
43
write("wspolrzednia N-S to: ")
44
print(odczyt2)
45
46
file=io.open("lokalizacja/xww", "r")
47
  odczyt3=file:read()
48
  file:close()
49
write("wspolrzednia W-E to: ")
50
print(odczyt3)
51
52
file=io.open("lokalizacja/xwp", "r")
53
  odczyt4=file:read()
54
  file:close()
55
write("wspolrzednia pionowa to: ")
56
print(odczyt4)
57
58
end
59
60
xwk = 1 -- wspolrzedna kierunek (1-polnoc, 2-wschod, 3-poludnie 4-zachod)
61
xwn = 0 -- wspolrzedna pozioma (polnoc-poludnie)
62
xww = 0 -- wspolrzedna pozioma (zachod-wschod)
63
xwp = 0 -- wspolrzedna pionowa (gora-dol) 
64
65
function drukujpolozenie()
66
  write("wspolrzedna kierunek: ")
67
  write(xwk)
68
  print()
69
70
  write("wspolrzedna pozioma1: ")
71
  write(xwn)
72
  print()
73
74
  write("wspolrzedna pozioma2: ")
75
  write(xww)
76
  print()
77
78
  write("wspolrzedna pionowa:  ")
79
  write(xwp)
80
  print()
81
82
end
83
84
function obrotwlewo()
85
  if turtle.turnLeft() then 
86
    
87-
print(krokdoprzodu())
87+
   file=io.open("lokalizacja/xwk", "r")
88-
drukujpolozenie()
88+
   xwk=file:read()
89
   file:close()
90
   xwk=xwk-1
91
      if xwk==0 then
92
        xwk=4
93
      end
94
   file=io.open("lokalizacja/xwk", "w")
95
   file:write(xwk)
96
   file:close()
97
   return true
98
  else
99
   return false
100
  end
101
end
102
103
function obrotwprawo()
104
  if turtle.turnRight() then
105
   file=io.open("lokalizacja/xwk", "r")
106
   xwk=file:read()
107
   file:close()
108
    xwk=xwk+1
109
    if xwk==5 then
110
      xwk=1
111
    end
112
   file=io.open("lokalizacja/xwk", "w")
113
   file:write(xwk)
114
   file:close()
115
    return true
116
    else
117
    return false
118
    end
119
end
120
121
function krokdoprzodu()
122
  if turtle.forward() then
123
  file=io.open("lokalizacja/xwk", "r")
124
  xwk=file:read()
125
  file:close()
126
  xwk=xwk+1-1
127
    if xwk==1 then
128
      file=io.open("lokalizacja/xwn", "r")
129
      xwn=file:read()
130
      file:close()
131
      xwn=xwn-1
132
      file=io.open("lokalizacja/xwn", "w")
133
      file:write(xwn)
134
      file:close()
135
    end
136
    if xwk==2 then
137
      file=io.open("lokalizacja/xww", "r")
138
      xww=file:read()
139
      file:close()
140
      xww=xww+1
141
      file=io.open("lokalizacja/xww", "w")
142
      file:write(xww)
143
      file:close()
144
    end
145
    if xwk==3 then
146
      file=io.open("lokalizacja/xwn", "r")
147
      xwn=file:read()
148
      file:close()
149
      xwn=xwn+1
150
      file=io.open("lokalizacja/xwn", "w")
151
      file:write(xwn)
152
      file:close()
153
    end
154
    if xwk==4 then
155
      file=io.open("lokalizacja/xww", "r")
156
      xww=file:read()
157
      file:close()
158
      xww=xww-1
159
      file=io.open("lokalizacja/xww", "w")
160
      file:write(xww)
161
      file:close()
162
    end
163
  return true
164
  else return false
165
  end
166
end
167
168
function krokdotylu()
169
  if turtle.back() then
170
    file=io.open("lokalizacja/xwk", "r")
171
    xwk=file:read()
172
    file:close()
173
    xwk=xwk+1-1
174
    if xwk==1 then
175
      file=io.open("lokalizacja/xwn", "r")
176
      xwn=file:read()
177
      file:close()
178
      xwn=xwn+1
179
      file=io.open("lokalizacja/xwn", "w")
180
      file:write(xwn)
181
      file:close()
182
    end
183
    if xwk==2 then
184
      file=io.open("lokalizacja/xww", "r")
185
      xww=file:read()
186
      file:close()
187
      xww=xww-1
188
      file=io.open("lokalizacja/xww", "w")
189
      file:write(xww)
190
      file:close()
191
    end
192
    if xwk==3 then
193
      file=io.open("lokalizacja/xwn", "r")
194
      xwn=file:read()
195
      file:close()
196
      xwn=xwn-1
197
      file=io.open("lokalizacja/xwn", "w")
198
      file:write(xwn)
199
      file:close()
200
    end
201
    if xwk==4 then
202
      file=io.open("lokalizacja/xww", "r")
203
      xww=file:read()
204
      file:close()
205
      xww=xww+1
206
      file=io.open("lokalizacja/xww", "w")
207
      file:write(xww)
208
      file:close()
209
    end
210
  return true
211
  else return false
212
  end
213
end
214
215
function krokdogory()
216
217
if turtle.up() then
218
 file=io.open("lokalizacja/xwp", "r")
219
   xwp=file:read()
220
   file:close()
221
   xwp=xwp+1
222
   file=io.open("lokalizacja/xwp", "w")
223
   file:write(xwp)
224
   file:close()
225
    return true
226
  else
227
    return false
228
  end
229
230
end
231
232
function krokwdol()
233
  if turtle.down() then
234
file=io.open("lokalizacja/xwp", "r")
235
   xwp=file:read()
236
   file:close()
237
   xwp=xwp-1
238
   file=io.open("lokalizacja/xwp", "w")
239
   file:write(xwp)
240
   file:close()
241
    return true
242
  else
243
    return false
244
  end
245
   
246
end