API tools faq
paste
MagmaLP

Important Commands

MagmaLP
May 29th, 2024 (edited)
743
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 6.07 KB | None | 0 0
raw download clone embed print report
  1. mon = peripheral.wrap("top")
  2. mon.setTextScale(1)
  3. mon.setBackgroundColor(32768)
  4. mon.setCursorPos(1,1)
  5. mon.clear()
  6.  
  7. function calc_color(color)
  8.     return math.pow(2, color - 1)
  9. end
  10.  
  11. function msg(gap, line, color, groundb, text)
  12.     mon.setBackgroundColor(calc_color(groundb))
  13.     mon.setCursorPos(gap,line)
  14.     mon.setTextColor(calc_color(color))
  15.     text = mon.write(text)
  16. end
  17.  
  18. function Clear()
  19.     mon.setBackgroundColor(32768)
  20.     for i = 1,16 do
  21.         msg(01,i,16,16,"                                                             ")
  22.     end
  23. end
  24.  
  25. function LangSelect()
  26.     msg(01,17,16,04,"                   ") msg(48,17,16,04,"       ") msg(56,17,16,04,"       ")
  27.     msg(01,18,16,04,"  change language  ") msg(48,18,16,04,"  <--  ") msg(56,18,16,04,"  -->  ")
  28.     msg(01,19,16,04,"                   ") msg(48,19,16,04,"       ") msg(56,19,16,04,"       ")
  29. end
  30.  
  31. function Main1DE()
  32.     Clear()
  33.     msg(24,02,04,16," Wichtige Befehle")    msg(53,01,09,16,"Seite 1/2")
  34.     msg(02,04,04,16," /regeln")             msg(15,04,09,16," - Server-Regeln bitte lesen!")
  35.     msg(02,05,04,16," /banneditems")        msg(15,05,09,16," - Liste aller gebannten Items")
  36.     msg(02,06,04,16," /recipes")            msg(15,06,09,16," - Server eigene Crafting-Rezepte")
  37.     msg(02,08,04,16," /counter")            msg(15,08,09,16," - Liste begrenzt setzbarer Blöcke ")
  38.     msg(02,09,04,16," /shop")               msg(15,09,09,16," - Adminshop für Rechte/Ränge/Spawner")
  39.     msg(02,10,04,16," /perks")              msg(15,10,09,16," - Spezielle Zusatzrechte freischalten")
  40.     msg(02,12,04,16," /team")               msg(15,12,09,16," - Welche Team-Mitglieder sind online")
  41.     msg(02,13,04,16," /kits")               msg(15,13,09,16," - Liste kostenloser Kits")
  42.     msg(02,14,04,16," /warps")              msg(15,14,09,16," - Warppunkte und Weltenliste")
  43. end
  44.  
  45. function Main2DE()
  46.     Clear()
  47.     msg(24,02,04,16," Wichtige Befehle")    msg(53,01,09,16,"Seite 2/2")
  48.     msg(02,04,04,16," /claims")             msg(15,04,09,16," - Liste deiner Grundstücke (Teleport möglich)")
  49.     msg(02,05,04,16," /tpa [name]")         msg(15,05,09,16," - Teleportier-Anfrage")
  50.     msg(02,06,04,16," /back")               msg(15,06,09,16," - Zum letzten Punkt zurück Teleportieren")
  51.     msg(02,08,04,16," /weekly")             msg(15,08,09,16," - Wöchentliche Aufgaben mit Belohnungen")
  52.     msg(02,09,04,16," /lvt start")          msg(15,09,09,16," - Starte einen Tag-Vote")
  53.     msg(02,10,04,16," /performance")        msg(15,10,09,16," - Wer verursacht die meiste Serverlast")
  54.     msg(02,12,04,16," /stammi")             msg(15,12,09,16," - Erklärung des Stammi(+) Rangs")
  55.     msg(02,13,04,16," /ontime top")         msg(15,13,09,16," - Spielzeit Topliste")
  56.     msg(02,14,04,16," /baltop")             msg(15,14,09,16," - Geld Topliste")
  57.     msg(02,15,04,16," /pay [name] $")       msg(15,15,09,16," - Überweise einem Spieler Geld")
  58. end
  59.  
  60. function Main1EN()
  61.     Clear()
  62.     msg(24,02,04,16," Important commands")  msg(53,01,09,16," Page 1/2")
  63.     msg(02,04,04,16," /rules")              msg(15,04,09,16," - Server-Rules please read!")
  64.     msg(02,05,04,16," /banneditems")        msg(15,05,09,16," - List of all banned items")
  65.     msg(02,06,04,16," /recipes")            msg(15,06,09,16," - Server own crafting recipes")
  66.     msg(02,08,04,16," /counter")            msg(15,08,09,16," - List of limited placeable blocks")
  67.     msg(02,09,04,16," /shop")               msg(15,09,09,16," - Adminshop for Perms/Ranks/Spawners")
  68.     msg(02,10,04,16," /perks")              msg(15,10,09,16," - Unlock special additional permissions")
  69.     msg(02,12,04,16," /team")               msg(15,12,09,16," - Which team members are online")
  70.     msg(02,13,04,16," /kits")               msg(15,13,09,16," - List of free kits")
  71.     msg(02,14,04,16," /warps")              msg(15,14,09,16," - Warp points and world list")
  72. end
  73.  
  74. function Main2EN()
  75.     Clear()
  76.     msg(24,02,04,16," Important commands")  msg(53,01,09,16," Page 2/2")
  77.     msg(02,04,04,16," /claims")             msg(15,04,09,16," - List of your properties (teleport possible)")
  78.     msg(02,05,04,16," /tpa [name]")         msg(15,05,09,16," - Teleport request")
  79.     msg(02,06,04,16," /back")               msg(15,06,09,16," - Teleport back to last point")
  80.     msg(02,08,04,16," /weekly")             msg(15,08,09,16," - Weekly tasks with rewards")
  81.     msg(02,09,04,16," /lvt start")          msg(15,09,09,16," - Start a Day-Vote")
  82.     msg(02,10,04,16," /performance")        msg(15,10,09,16," - Who causes the most server load")
  83.     msg(02,12,04,16," /stammi")             msg(15,12,09,16," - Explanation of Stammi(+) Rank")
  84.     msg(02,13,04,16," /ontime top")         msg(15,13,09,16," - Ontime Toplist")
  85.     msg(02,14,04,16," /baltop")             msg(15,14,09,16," - Money Toplist")
  86.     msg(02,15,04,16," /pay [name] $")       msg(15,15,09,16," - Transfer money to a player")
  87. end
  88.  
  89. Language = 1    --Deutsch
  90. Language = 2    --English
  91. Page = 1
  92.  
  93. while true do
  94.     if Language == 2 then  
  95.         if Page == 1 then
  96.             Main1EN()
  97.             LangSelect()
  98.         elseif Page == 2 then
  99.             Main2EN()
  100.             LangSelect()
  101.         end
  102.     elseif Language == 1 then
  103.         if Page == 1 then
  104.             Main1DE()
  105.             LangSelect()
  106.         elseif Page == 2 then
  107.             Main2DE()
  108.             LangSelect()
  109.         end
  110.     end
  111.  
  112.     event, side, x, y = os.pullEvent("monitor_touch")
  113.     if x >= 1 and x <= 19 and y >= 17 and y <= 19 then
  114.         if Language == 2 then
  115.             Language = 1
  116.             if Page == 1 then
  117.                 Main1DE()
  118.             elseif Page == 2 then
  119.                 Main2DE()
  120.             end
  121.         elseif Language == 1 then
  122.             Language = 2
  123.             if Page == 1 then
  124.                 Main1EN()
  125.             elseif Page == 2 then
  126.                 Main2EN()
  127.             end
  128.         end
  129.     elseif x >= 48 and x <= 53 and y >= 17 and y <= 19 and Page == 2 then
  130.         Page = 1
  131.         if Language == 2 then
  132.             Main1EN()
  133.         elseif Language == 1 then
  134.             Main1DE()
  135.         end
  136.     elseif x >= 56 and x <= 61 and y >= 17 and y <= 19 and Page == 1 then
  137.         Page = 2
  138.         if Language == 2 then
  139.             Main2EN()
  140.         elseif Language == 1 then
  141.             Main2DE()
  142.         end
  143.     end
  144.     sleep(0.5)
  145. end
  146.  
  147.                
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!