SHARE
TWEET

SimNetSystem BeispielServer - (Privat Project)

Simlor_GER Jul 14th, 2017 (edited) 73 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --SimNetSystem by Simlor (http://www.computercraft.info/forums2/index.php?/user/55655-simlor/)
  2.  
  3. rednet.open("back") --back,front,top,left,right
  4.  
  5. userList = {"Simlor", "Tim"}
  6.  
  7. passList = {"abc", "123"}
  8.  
  9. --Clear
  10.  
  11. function Clear()
  12.     term.clear()
  13.     term.setCursorPos(1,1)
  14. end
  15.  
  16.  
  17. --Set Cursorposition
  18.  
  19. function CP(x,y)
  20.     term.setCursorPos(x,y)
  21. end
  22.  
  23.  
  24. --Set Background Color
  25.  
  26. function BC(farbe)
  27.     term.setBackgroundColor(farbe)
  28. end
  29.  
  30.  
  31. --Set Text Color
  32.  
  33. function TC(farbe)
  34.     term.setTextColor(farbe)
  35. end
  36.  
  37. --Log System
  38.  
  39. function LogWriter(nachricht)
  40.  
  41.     local file = fs.open("SimNetSystem/log","a")
  42.     file.writeLine(nachricht)
  43.     file.close()
  44.  
  45. end
  46.  
  47. --LoginAbfrage
  48.  
  49. function LoginAbfrage()
  50.    
  51.     print("")
  52.     TC(16)
  53.     print("Login gestartet...")
  54.    
  55.     eingabeP = ""
  56.     eingabeU = ""
  57.     name = false
  58.     pass = false
  59.    
  60.     rednet.send(SucherID, "login", SaveID)
  61.    
  62.     oldSucherID = SucherID
  63.    
  64.     SucherID, eingabeU, SaveID = rednet.receive(SaveID, 0.2)
  65.     SucherID, eingabeP, SaveID = rednet.receive(SaveID, 0.2)
  66.    
  67.     if eingabeU == "" or eingabeU == nil or eingabeP == "" or eingabeP == nil then
  68.    
  69.         rednet.send(oldSucherID, "false", SaveID)
  70.        
  71.         TC(16384)
  72.         print("")
  73.         print("Fehler beim Login")
  74.        
  75.         LogWriter("--------------------------------")
  76.         LogWriter("")
  77.         LogWriter("Anfrage : Login")
  78.         LogWriter("SucherID: "..oldSucherID)
  79.         LogWriter("Ergebnis: Login aufgrund fehlender Login Daten fehlgeschlagen")
  80.         LogWriter("")
  81.        
  82.         Feedback = false
  83.        
  84.     else
  85.        
  86.         TC(16)
  87.        
  88.         print("")
  89.         print("Login Daten")
  90.         print("-----------")
  91.         print("")
  92.         print("SucherID: "..SucherID)
  93.         print("SaveID  : "..SaveID)
  94.         print("name    : "..eingabeU)
  95.         print("pass    : "..eingabeP)
  96.        
  97.         C = 0
  98.        
  99.         while true do
  100.            
  101.             C = (C+1)
  102.            
  103.             if userList[C] == eingabeU and not (name == true) then
  104.                
  105.                 name = true
  106.            
  107.                 if passList[C] == eingabeP and not (pass == true) then
  108.                
  109.                     pass = true
  110.                
  111.                 end
  112.                
  113.             end
  114.            
  115.             if name == true and pass == true then
  116.                
  117.                 Feedback = true
  118.                
  119.                 TC(32)
  120.                 print("")
  121.                 print("Login Daten waren korrekt")
  122.                
  123.                 LogWriter("--------------------------------")
  124.                 LogWriter("")
  125.                 LogWriter("Anfrage : Login")
  126.                 LogWriter("SucherID: "..SucherID)
  127.                 LogWriter("username: "..eingabeU)
  128.                 LogWriter("passwort: "..eingabeP)
  129.                 LogWriter("Ergebnis: Login war erfolgreich")
  130.                 LogWriter("")
  131.                
  132.                 break
  133.                
  134.             end
  135.            
  136.             if C == (table.getn(userList)) then
  137.                
  138.                 Feedback = false
  139.                
  140.                 rednet.send(SucherID, "false", SaveID)
  141.                
  142.                 TC(16384)
  143.                 print("")
  144.                 print("Login Daten waren nicht korrekt")
  145.                
  146.                 LogWriter("--------------------------------")
  147.                 LogWriter("")
  148.                 LogWriter("Anfrage : Login")
  149.                 LogWriter("SucherID: "..SucherID)
  150.                 LogWriter("username: "..eingabeU)
  151.                 LogWriter("passwort: "..eingabeP)
  152.                 LogWriter("Ergebnis: Login aufgrund falscher Login Daten fehlgeschlagen")
  153.                 LogWriter("")
  154.                
  155.                 break
  156.                
  157.             end
  158.         end
  159.     end
  160. end
  161.  
  162. --Text Funktion
  163.  
  164. function TextAbfrage(num)
  165.  
  166.     rednet.send(SucherID, "text", SaveID)
  167.    
  168.     if num == 1 then
  169.         Text = {
  170.         "TestLog",
  171.         "-------",
  172.         "",
  173.         "20:15: Hangover 3"
  174.         }
  175.     elseif num == 2 then
  176.         Text = {
  177.         "Fake"
  178.         }
  179.     end
  180.    
  181.     C = 0
  182.    
  183.     while true do
  184.        
  185.         C = (C+1)
  186.        
  187.         rednet.send(SucherID, Text[C], SaveID)
  188.        
  189.         if (table.getn(Text)) == C then
  190.            
  191.             rednet.send(SucherID, "end", SaveID)
  192.            
  193.             TC(32)
  194.             print("")
  195.             print("Text wurde uebertragen")
  196.            
  197.             LogWriter("--------------------------------")
  198.             LogWriter("")
  199.             LogWriter("Anfrage : Text")
  200.             LogWriter("SucherID: "..SucherID)
  201.             LogWriter("Ergebnis: Wurde erfolgreich uebertragen")
  202.             LogWriter("")
  203.            
  204.             break
  205.            
  206.         end
  207.     end
  208. end
  209.            
  210.            
  211.  
  212. --System
  213.  
  214. BC(32768)
  215. Clear()
  216. TC(16)
  217. print("SimTestServer")
  218.  
  219. while true do
  220.  
  221.     print("")
  222.     TC(16)
  223.     print("Warte auf eine Anfrage...")
  224.    
  225.     SaveID = nil
  226.     eingabe = nil
  227.     SucherID = nil
  228.    
  229.     SucherID, eingabe, SaveID = rednet.receive()
  230.    
  231.     if SucherID == nil or eingabe == nil or SaveID == nil then --Blockliste
  232.        
  233.         TC(16384)
  234.         print("")
  235.         print("Es wurde ein falsche Anfrage gestellt.")
  236.        
  237.         LogWriter("--------------------------------")
  238.         LogWriter("")
  239.         LogWriter("Anfrage : Allgemein")
  240.         LogWriter("SucherID: "..SucherID)
  241.         LogWriter("Ergebnis: Es fehlen bestimmte Anfrage-Daten")
  242.         LogWriter("")
  243.        
  244.     else
  245.        
  246.         TC(16)
  247.         print("")
  248.         print("Es wurde eine Anfrage gestellt.")
  249.         print("")
  250.         print("SucherID: "..SucherID)
  251.         print("Anfrage : "..eingabe)
  252.         print("SaveID  : "..SaveID)
  253.        
  254.         if eingabe == "connect" then
  255.            
  256.             rednet.send(SucherID, "connect", SaveID)
  257.            
  258.             --Alle Commands
  259.            
  260.             rednet.send(SucherID, "server_shutdown", SaveID)
  261.             rednet.send(SucherID, "log", SaveID)
  262.            
  263.             rednet.send(SucherID, "end", SaveID)
  264.            
  265.             --END Alle Commands
  266.            
  267.             TC(32)
  268.             print("")
  269.             print("Anfrage wurde erfolgreich bearbeitet")
  270.            
  271.             LogWriter("--------------------------------")
  272.             LogWriter("")
  273.             LogWriter("Anfrage : connect")
  274.             LogWriter("SucherID: "..SucherID)
  275.             LogWriter("Ergebnis: Anfrage wurde erfolgreich bearbeitet")
  276.             LogWriter("")
  277.        
  278.         --Ab hier folgen die Beispiel Commands:
  279.        
  280.         elseif eingabe == "server_shutdown" then
  281.            
  282.             LoginAbfrage()
  283.            
  284.            
  285.             if Feedback == true then
  286.                
  287.                 LogWriter("--------------------------------")
  288.                 LogWriter("")
  289.                 LogWriter("Anfrage : server_shutdown")
  290.                 LogWriter("SucherID: "..SucherID)
  291.                 LogWriter("Ergebnis: Server wird abgeschaltet")
  292.                 LogWriter("")
  293.                
  294.                 rednet.send(SucherID, "true", SaveID)
  295.            
  296.                 os.shutdown()
  297.            
  298.             end
  299.            
  300.         elseif eingabe == "log" then
  301.            
  302.             TextAbfrage(1)
  303.            
  304.             TC(32)
  305.             print("")
  306.             print("Anfrage erfolgreich bearbeitet")
  307.        
  308.        
  309.         --END der Beispiel Command Liste
  310.        
  311.         else
  312.            
  313.             TC(16384)
  314.             print("")
  315.             print("Es gab einen Fehler")
  316.            
  317.         end
  318.        
  319.     end
  320. end
RAW Paste Data
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
Top