Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local function s(...) return sleep(...) end
- local function aw(...) return write(...) end
- local function p(...) return print(...) end
- local function tw(...) return term.write(...) end
- local function scp(...) return term.setCursorPos(...) end
- local function sbc(...) return term.setBackgroundColor(...) end
- local function stc(...) return term.setTextColor(...) end
- local function tc(...) return term.clear(...) end
- local function tcl(...) return term.clearLine(...) end
- local function r(...) return shell.run(...) end
- local function sp(...) return textutils.slowPrint(...) end
- local function sw(...) return textutils.slowWrite(...) end
- local function fse(...) return fs.exists(...) end
- local function pul(...) return paintutils.loadImage(...) end
- local function pud(...) return paintutils.drawImage(...) end
- local function pfb(...) return paintutils.drawFilledBox(...) end
- local function su(...) return os.shutdown(...) end
- local function re(...) return os.reboot(...) end
- local function pdp(...) return paintutils.drawPixel(...) end
- function boot()
- tc()
- pfb(1,1,51,19,colors.blue)
- scp(1,1)
- sbc(colors.gray)
- stc(colors.white)
- p("Poland Visa System")
- scp(1,2)
- sbc(colors.blue)
- p("Reading disk...")
- s(2)
- dysk()
- end
- function dysk()
- local d1 = fs.open("/disk/visa1", "r")
- dy1 = d1.readLine(1)
- d1.close()
- local d2 = fs.open("/disk/visa2", "r")
- dy2 = d2.readLine(1)
- d2.close()
- local d3 = fs.open("/disk/visa3", "r")
- dy3 = d3.readLine(1)
- d3.close()
- p("Name: ", dy1)
- p("Nationality: ", dy2)
- if dy3 == "true" or dy3 == "tak" then sbc(colors.green) elseif dy3 == "false" or dy3 == "nie" then sbc(colors.red) end
- p("Allowed to enter: ", dy3)
- s(2)
- re()
- end
- boot()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement