aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJulien Dessaux2021-10-02 20:37:24 +0200
committerJulien Dessaux2021-10-02 20:37:24 +0200
commit52be0d0d1eaf4b6f8956e72f5c4a425e793a36cc (patch)
treea476529a43750ad70c60cc777324e5864dd8c0a3 /src
parentContinued implementing the funge space field (diff)
downloadnimfunge98-52be0d0d1eaf4b6f8956e72f5c4a425e793a36cc.tar.gz
nimfunge98-52be0d0d1eaf4b6f8956e72f5c4a425e793a36cc.tar.bz2
nimfunge98-52be0d0d1eaf4b6f8956e72f5c4a425e793a36cc.zip
Finished implementing the funge space field
Diffstat (limited to '')
-rw-r--r--src/field.nim71
-rw-r--r--src/nimfunge98.nim5
2 files changed, 67 insertions, 9 deletions
diff --git a/src/field.nim b/src/field.nim
index 224e21d..1cd1874 100644
--- a/src/field.nim
+++ b/src/field.nim
@@ -8,7 +8,7 @@ type
lx, ly: int
lines: seq[Line]
-proc blank*(f: var Field, x, y: int) =
+func blank*(f: var Field, x, y: int) =
if y < f.y or y >= f.y+f.ly: # outside the field
return
var l = addr f.lines[y-f.y]
@@ -59,17 +59,80 @@ proc blank*(f: var Field, x, y: int) =
x2 = f.lines[i].x + f.lines[i].l
f.lx = x2-f.x
-proc get*(f: Field, x, y: int): int =
+func get*(f: Field, x, y: int): int =
if y >= f.y and y < f.y+f.ly:
let l = f.lines[y-f.y]
if x >= l.x and x < l.x+l.l:
return l.columns[x-l.x]
return int(' ')
-proc isIn*(f: Field, x, y: int): bool =
+func isIn*(f: Field, x, y: int): bool =
return x >= f.x and y >= f.y and x < f.x+f.lx and y < f.y+f.ly
-proc set*(f: var Field, x, y, v: int) =
+proc load*(f: var Field, filename: string): bool =
+ var file: File
+ if not open(file, filename):
+ return false
+ defer: file.close()
+ f.lines.add(Line())
+ var l = addr f.lines[0]
+ var trailingSpaces = 0
+ var data: array[255,char]
+ while true:
+ let n = file.readChars(data, 0, 255)
+ if n <= 0:
+ if f.ly == 0:
+ if l.l == 0: # we got en empty file!
+ return false
+ f.x = l.x
+ if l.l > 0:
+ inc f.ly
+ if f.lx < l.l+l.x-f.x:
+ f.lx = l.l+l.x-f.x
+ break
+ var i = 0
+ while i < n:
+ if data[i] == char(12):
+ inc i
+ continue
+ if data[i] == '\n' or data[i] == '\r':
+ if f.ly == 0:
+ if l.l == 0:
+ return false
+ f.x = l.x
+ inc f.ly
+ if f.x > l.x:
+ f.x = l.x
+ if f.lx < l.l+l.x-f.x:
+ f.lx = l.l+l.x-f.x
+ f.lines.add(Line())
+ l = addr f.lines[^1]
+ trailingSpaces = 0
+ if i+1 < n and data[i] == '\r' and data[i+1] == '\n':
+ inc i
+ else:
+ if data[i] == ' ':
+ if l.l == 0: # trim leading spaces
+ inc l.x
+ else:
+ inc trailingSpaces
+ else:
+ if trailingSpaces > 0:
+ let newL = l.l + trailingSpaces + 1
+ l.columns.setlen(newL)
+ for j in l.l..<newL-1:
+ l.columns[j] = int(' ')
+ l.columns[newL-1] = int(data[i])
+ l.l = newL
+ trailingSpaces = 0
+ else:
+ l.columns.add(int(data[i]))
+ inc l.l
+ inc i
+ f.lines = f.lines[0..<f.ly]
+ return true
+
+func set*(f: var Field, x, y, v: int) =
if v == int(' '):
f.blank(x, y)
elif y >= f.y:
diff --git a/src/nimfunge98.nim b/src/nimfunge98.nim
deleted file mode 100644
index e8f1ce4..0000000
--- a/src/nimfunge98.nim
+++ /dev/null
@@ -1,5 +0,0 @@
-import nimfunge98/field/field
-
-let f:Field
-
-echo f.get(3,2) \ No newline at end of file