Revision as of 06:23, 18 November 2018 (view source) Wherrera (talk \| contribs) m (→‎{{header\|Julia}}) ← Older edit		Revision as of 06:29, 18 November 2018 (view source) Wherrera (talk \| contribs) m (→‎{{header\|Julia}}) Newer edit →
Line 117: $==>==@/==@/==<==#""" @enum Direction ~~dleft~~left ~~dup~~up ~~dright~~right ~~ddown~~down function snusp(datalength, progstring) Line 123: data = zeros(datalength) dp = ipx = ipy = 1 direction = ~~dright~~right # default to go to right at beginning lines = split(progstring, "\n") Line 148: inboundsy(plus) = (plus ? (ipy < length(lines)) : (ipy > 1)) ? true : exit(data[dp]) function ipnext() if direction == ~~dright~~right && inboundsx(true) ipx += 1 elseif direction == ~~dleft~~left && inboundsx(false) ipx -= 1 elseif direction == ~~ddown~~down && inboundsy(true) ipy += 1 elseif direction == ~~dup~~up && inboundsy(false) ipy -= 1 end end

Execute SNUSP (view source)