Create qpay.spk
This commit is contained in:
Ale32bit
GitHub
parent
5fd700bba3
commit
5a537e9b2e
1 changed files with 314 additions and 0 deletions
314
apps/QuantumTech/qpay.spk
Normal file
314
apps/QuantumTech/qpay.spk
Normal file
|
|
@ -0,0 +1,314 @@
|
|||
--
|
||||
-- sPhone Application Package
|
||||
-- Built with SPK builder 1.1
|
||||
--
|
||||
{
|
||||
files = "{\
|
||||
[ \"qpay.lua\" ] = \"local devMode = true\\r\\\
|
||||
\\r\\\
|
||||
rednet.open(\\\"back\\\")\\r\\\
|
||||
\\r\\\
|
||||
local versionUrl = \\\"https://raw.github.com/jakemroman/QuantumPay/master/version\\\"\\r\\\
|
||||
local kristUrl = \\\"https://raw.github.com/jakemroman/JakeHub/master/kstapi\\\"\\r\\\
|
||||
local walletUrl = \\\"https://raw.github.com/jakemroman/QuantumPay/master/wallet.lua\\\"\\r\\\
|
||||
local currentVersion = 1.2\\r\\\
|
||||
if not fs.exists(spk.getDataPath()..'/kristapi') then\\r\\\
|
||||
f = spk.open(\\\"/kristapi\\\",\\\"w\\\")\\r\\\
|
||||
f.writeLine(http.get(kristUrl).readAll())\\r\\\
|
||||
f.close()\\r\\\
|
||||
end\\r\\\
|
||||
\\r\\\
|
||||
local function qpay()\\r\\\
|
||||
\\r\\\
|
||||
os.loadAPI(spk.getDataPath()..\\\"/kristapi\\\")\\r\\\
|
||||
\\r\\\
|
||||
function drawKrist(x,y)\\r\\\
|
||||
term.setCursorPos(x,y)\\r\\\
|
||||
term.setBackgroundColor(colors.white)\\r\\\
|
||||
term.setTextColor(colors.lime)\\r\\\
|
||||
write(\\\"/\\\")\\r\\\
|
||||
term.setCursorPos(x+1,y)\\r\\\
|
||||
term.setBackgroundColor(colors.lime)\\r\\\
|
||||
term.setTextColor(colors.green)\\r\\\
|
||||
write(\\\"\\\\\\\\\\\")\\r\\\
|
||||
term.setCursorPos(x,y+1)\\r\\\
|
||||
write(\\\"\\\\\\\\\\\")\\r\\\
|
||||
term.setTextColor(colors.lime)\\r\\\
|
||||
term.setBackgroundColor(colors.green)\\r\\\
|
||||
write(\\\"/\\\")\\r\\\
|
||||
end\\r\\\
|
||||
\\r\\\
|
||||
term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
term.clear()\\r\\\
|
||||
drawKrist(2,2)\\r\\\
|
||||
drawKrist(5,2)\\r\\\
|
||||
drawKrist(8,2)\\r\\\
|
||||
drawKrist(11,2)\\r\\\
|
||||
drawKrist(14,2)\\r\\\
|
||||
drawKrist(17,2)\\r\\\
|
||||
drawKrist(20,2)\\r\\\
|
||||
drawKrist(23,2)\\r\\\
|
||||
term.setCursorPos(3,5)\\r\\\
|
||||
term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
term.setTextColor(colors.black)\\r\\\
|
||||
write(\\\"Sign into QuantumPay\\\")\\r\\\
|
||||
paintutils.drawLine(2,7,25,7,colors.white)\\r\\\
|
||||
term.setCursorPos(3,9)\\r\\\
|
||||
term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
term.setTextColor(colors.gray)\\r\\\
|
||||
write(\\\"QPay will never store\\\")\\r\\\
|
||||
term.setCursorPos(3,10)\\r\\\
|
||||
write(\\\"your password anywhere.\\\")\\r\\\
|
||||
term.setCursorPos(3,11)\\r\\\
|
||||
write(\\\"If you are new to Krist\\\")\\r\\\
|
||||
term.setCursorPos(3,12)\\r\\\
|
||||
write(\\\"type in any password\\\")\\r\\\
|
||||
term.setCursorPos(3,13)\\r\\\
|
||||
write(\\\"into the password box.\\\")\\r\\\
|
||||
local str = \\\"Version \\\"..tostring(currentVersion)\\r\\\
|
||||
term.setCursorPos(25-#str,19)\\r\\\
|
||||
write(str)\\r\\\
|
||||
term.setCursorPos(3,7)\\r\\\
|
||||
term.setBackgroundColor(colors.white)\\r\\\
|
||||
local password = read(\\\"*\\\")\\r\\\
|
||||
local address = kristapi.createaddress(password)\\r\\\
|
||||
rednet.broadcast({[\\\"command\\\"] = \\\"get\\\"})\\r\\\
|
||||
while true do\\r\\\
|
||||
id,dataTable = rednet.receive()\\r\\\
|
||||
if id == 3057 then\\r\\\
|
||||
break\\r\\\
|
||||
end\\r\\\
|
||||
end\\r\\\
|
||||
\\r\\\
|
||||
local function formatCoords(x,y,z)\\r\\\
|
||||
return \\\"[\\\"..tostring(x)..\\\"-\\\"..tostring(y)..\\\"-\\\"..tostring(z)..\\\"]\\\"\\r\\\
|
||||
end\\r\\\
|
||||
\\r\\\
|
||||
while true do\\r\\\
|
||||
term.setCursorPos(24,2)\\r\\\
|
||||
term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
term.setTextColor(colors.cyan)\\r\\\
|
||||
write(\\\"@\\\")\\r\\\
|
||||
local x,y,z = gps.locate()\\r\\\
|
||||
term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
term.clear()\\r\\\
|
||||
if x then\\r\\\
|
||||
term.setCursorPos(24,2)\\r\\\
|
||||
term.setTextColor(colors.lime)\\r\\\
|
||||
write(\\\"@\\\")\\r\\\
|
||||
if not devMode then\\r\\\
|
||||
term.current().setVisible(false)\\r\\\
|
||||
end\\r\\\
|
||||
x = math.floor(x)\\r\\\
|
||||
y = math.floor(y)\\r\\\
|
||||
z = math.floor(z)\\r\\\
|
||||
else\\r\\\
|
||||
term.setCursorPos(24,2)\\r\\\
|
||||
term.setTextColor(colors.red)\\r\\\
|
||||
write(\\\"@\\\")\\r\\\
|
||||
end\\r\\\
|
||||
--term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
--term.clear()\\r\\\
|
||||
drawKrist(2,2)\\r\\\
|
||||
term.setCursorPos(5,2)\\r\\\
|
||||
term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
term.setTextColor(colors.black)\\r\\\
|
||||
write(\\\"Quantum\\\")\\r\\\
|
||||
term.setTextColor(colors.lime)\\r\\\
|
||||
write(\\\"Pay\\\")\\r\\\
|
||||
term.setCursorPos(5,3)\\r\\\
|
||||
term.setTextColor(colors.gray)\\r\\\
|
||||
write(\\\"Geo Krist Wallet\\\")\\r\\\
|
||||
local formatted = formatCoords(x,y,z)\\r\\\
|
||||
if formatted and dataTable then\\r\\\
|
||||
if dataTable[formatted] then\\r\\\
|
||||
term.setCursorPos(2,5)\\r\\\
|
||||
term.setTextColor(colors.black)\\r\\\
|
||||
write(\\\"Krist shop nearby!\\\")\\r\\\
|
||||
term.setCursorPos(2,7)\\r\\\
|
||||
term.setBackgroundColor(colors.white)\\r\\\
|
||||
term.setTextColor(colors.gray)\\r\\\
|
||||
write(\\\" Show \\\")\\r\\\
|
||||
else\\r\\\
|
||||
term.setCursorPos(2,5)\\r\\\
|
||||
term.setTextColor(colors.black)\\r\\\
|
||||
write(\\\"Stand in front of a\\\")\\r\\\
|
||||
term.setCursorPos(2,6)\\r\\\
|
||||
write(\\\"Krist shop machine.\\\")\\r\\\
|
||||
end\\r\\\
|
||||
else\\r\\\
|
||||
term.setCursorPos(2,5)\\r\\\
|
||||
term.setTextColor(colors.red)\\r\\\
|
||||
if not dataTable then\\r\\\
|
||||
print(\\\"Database invalid\\\")\\r\\\
|
||||
elseif not formatted then\\r\\\
|
||||
print(\\\"GPS signal lost\\\")\\r\\\
|
||||
end\\r\\\
|
||||
end\\r\\\
|
||||
term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
term.setCursorPos(24,2)\\r\\\
|
||||
term.setTextColor(colors.lime)\\r\\\
|
||||
--write(\\\"@\\\")\\r\\\
|
||||
term.setCursorPos(2,19)\\r\\\
|
||||
term.setBackgroundColor(colors.red)\\r\\\
|
||||
term.setTextColor(colors.white)\\r\\\
|
||||
write(\\\" Exit \\\")\\r\\\
|
||||
term.setBackgroundColor(colors.white)\\r\\\
|
||||
if not devMode then\\r\\\
|
||||
term.current().setVisible(true)\\r\\\
|
||||
end\\r\\\
|
||||
local tmr = os.startTimer(5)\\r\\\
|
||||
while true do\\r\\\
|
||||
e,c,x,y = os.pullEvent()\\r\\\
|
||||
if e == \\\"timer\\\" then\\r\\\
|
||||
break\\r\\\
|
||||
end\\r\\\
|
||||
if e == \\\"mouse_click\\\" then\\r\\\
|
||||
os.cancelTimer(tmr)\\r\\\
|
||||
break\\r\\\
|
||||
end\\r\\\
|
||||
end\\r\\\
|
||||
if e == \\\"mouse_click\\\" then\\r\\\
|
||||
if x >= 2 and x <= 8 and y == 19 then\\r\\\
|
||||
term.setBackgroundColor(colors.black)\\r\\\
|
||||
term.clear()\\r\\\
|
||||
term.setCursorPos(1,1)\\r\\\
|
||||
return\\r\\\
|
||||
end\\r\\\
|
||||
if y == 7 then\\r\\\
|
||||
term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
term.clear()\\r\\\
|
||||
local info = dataTable[formatted]\\r\\\
|
||||
term.setCursorPos(2,2)\\r\\\
|
||||
term.setTextColor(colors.black)\\r\\\
|
||||
write(info[\\\"sells\\\"]..\\\" Shop\\\")\\r\\\
|
||||
term.setCursorPos(2,3)\\r\\\
|
||||
write(info[\\\"price\\\"]..\\\" KST each\\\")\\r\\\
|
||||
term.setCursorPos(2,5)\\r\\\
|
||||
term.setTextColor(colors.gray)\\r\\\
|
||||
write(\\\"Select amount to buy\\\")\\r\\\
|
||||
local amount = 0\\r\\\
|
||||
while true do\\r\\\
|
||||
paintutils.drawFilledBox(1,7,25,20,colors.lightGray)\\r\\\
|
||||
term.setCursorPos(3,7)\\r\\\
|
||||
term.setBackgroundColor(colors.white)\\r\\\
|
||||
term.setTextColor(colors.black)\\r\\\
|
||||
write(\\\" Increase \\\")\\r\\\
|
||||
term.setCursorPos(3,11)\\r\\\
|
||||
write(\\\" Decrease \\\")\\r\\\
|
||||
term.setCursorPos(3,9)\\r\\\
|
||||
term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
term.setTextColor(colors.gray)\\r\\\
|
||||
local str = (tostring(amount)..\\\" \\\"..info[\\\"sells\\\"])\\r\\\
|
||||
local x,y = term.getSize()\\r\\\
|
||||
local x = x / 2\\r\\\
|
||||
local x = x - (#str / 2)\\r\\\
|
||||
term.setCursorPos(x,9)\\r\\\
|
||||
write(str)\\r\\\
|
||||
term.setCursorPos(2,19)\\r\\\
|
||||
term.setBackgroundColor(colors.lime)\\r\\\
|
||||
term.setTextColor(colors.white)\\r\\\
|
||||
write(\\\" Purchase \\\")\\r\\\
|
||||
term.setCursorPos(2,17)\\r\\\
|
||||
term.setBackgroundColor(colors.white)\\r\\\
|
||||
term.setTextColor(colors.black)\\r\\\
|
||||
write(\\\" Return \\\")\\r\\\
|
||||
term.setCursorPos(2,15)\\r\\\
|
||||
term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
term.setTextColor(colors.black)\\r\\\
|
||||
write(\\\"Total: \\\"..tostring(amount*info[\\\"price\\\"])..\\\" KST\\\")\\r\\\
|
||||
term.setCursorPos(2,13)\\r\\\
|
||||
write(\\\"Address: \\\"..info[\\\"address\\\"])\\r\\\
|
||||
e,c,x,y = os.pullEvent(\\\"mouse_click\\\")\\r\\\
|
||||
if y == 7 then\\r\\\
|
||||
amount = amount + 1\\r\\\
|
||||
end\\r\\\
|
||||
if y == 11 and amount > 0 then\\r\\\
|
||||
amount = amount - 1\\r\\\
|
||||
end\\r\\\
|
||||
if y == 17 then\\r\\\
|
||||
break\\r\\\
|
||||
end\\r\\\
|
||||
if y == 19 then\\r\\\
|
||||
local price = info[\\\"price\\\"] * amount\\r\\\
|
||||
if tonumber(kristapi.balance(address)) >= price then\\r\\\
|
||||
term.setCursorPos(2,15)\\r\\\
|
||||
term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
term.setTextColor(colors.black)\\r\\\
|
||||
write(\\\"Funds Transfered. \\\")\\r\\\
|
||||
kristapi.give(info[\\\"address\\\"],price,password)\\r\\\
|
||||
sleep(1.5)\\r\\\
|
||||
break\\r\\\
|
||||
else\\r\\\
|
||||
term.setCursorPos(2,15)\\r\\\
|
||||
term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
term.setTextColor(colors.red)\\r\\\
|
||||
write(\\\"Insufficent Funds \\\")\\r\\\
|
||||
sleep(1.5)\\r\\\
|
||||
break\\r\\\
|
||||
end\\r\\\
|
||||
end\\r\\\
|
||||
end\\r\\\
|
||||
end\\r\\\
|
||||
if x == 26 and y == 1 then\\r\\\
|
||||
term.setBackgroundColor(colors.lightGray)\\r\\\
|
||||
term.clear()\\r\\\
|
||||
term.setCursorPos(2,2)\\r\\\
|
||||
term.setTextColor(colors.black)\\r\\\
|
||||
write(\\\"Add shop to database\\\")\\r\\\
|
||||
term.setCursorPos(2,4)\\r\\\
|
||||
write(\\\"Do you want to add?\\\")\\r\\\
|
||||
write(\\\" Y/N\\\")\\r\\\
|
||||
e,k = os.pullEvent(\\\"key\\\")\\r\\\
|
||||
sleep(0)\\r\\\
|
||||
if k == keys.y then\\r\\\
|
||||
local dataTbl = {}\\r\\\
|
||||
term.setCursorPos(2,6)\\r\\\
|
||||
write(\\\"Sells: \\\")\\r\\\
|
||||
dataTbl[\\\"sells\\\"] = read()\\r\\\
|
||||
term.setCursorPos(2,7)\\r\\\
|
||||
write(\\\"Price: \\\")\\r\\\
|
||||
dataTbl[\\\"price\\\"] = tonumber(read())\\r\\\
|
||||
term.setCursorPos(2,8)\\r\\\
|
||||
write(\\\"Address: \\\")\\r\\\
|
||||
dataTbl[\\\"address\\\"] = read()\\r\\\
|
||||
term.setCursorPos(2,9)\\r\\\
|
||||
write(\\\"Stand at the exact spot\\\")\\r\\\
|
||||
term.setCursorPos(2,10)\\r\\\
|
||||
write(\\\"then press any key\\\")\\r\\\
|
||||
sleep(0)\\r\\\
|
||||
os.pullEvent(\\\"key\\\")\\r\\\
|
||||
x,y,z = gps.locate()\\r\\\
|
||||
x = math.floor(x)\\r\\\
|
||||
y = math.floor(y)\\r\\\
|
||||
z = math.floor(z)\\r\\\
|
||||
rednet.broadcast({\\r\\\
|
||||
[\\\"command\\\"] = \\\"add\\\",\\r\\\
|
||||
[\\\"data\\\"] = dataTbl,\\r\\\
|
||||
[\\\"coords\\\"] = formatCoords(x,y,z),\\r\\\
|
||||
})\\r\\\
|
||||
dataTable[formatCoords(x,y,z)] = dataTbl\\r\\\
|
||||
end\\r\\\
|
||||
end\\r\\\
|
||||
end\\r\\\
|
||||
end\\r\\\
|
||||
\\r\\\
|
||||
end\\r\\\
|
||||
\\r\\\
|
||||
local ok,err = pcall(qpay)\\r\\\
|
||||
term.setBackgroundColor(colors.black)\\r\\\
|
||||
term.clear()\\r\\\
|
||||
term.setCursorPos(1,1)\\r\\\
|
||||
if not ok then\\r\\\
|
||||
print(\\\"Please report to Jake:\\\")\\r\\\
|
||||
printError(err)\\r\\\
|
||||
end\",\
|
||||
}",
|
||||
config = "{\
|
||||
main = \"qpay.lua\",\
|
||||
name = \"QPay\",\
|
||||
id = \"quantumtech.qpay\",\
|
||||
author = \"jakejakey1208\",\
|
||||
version = 1.2,\
|
||||
}",
|
||||
}
|
||||
Loading…
Reference in a new issue