SHARE
TWEET

AQUA MOBIL - (Privates Projekt)

Simlor_GER Jul 29th, 2017 (edited) 72 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. -- Copyright by Simlor (http://www.computercraft.info/forums2/index.php?/user/55655-simlor/)
  2.  
  3. --Functions
  4.  
  5. rednet.open("back")
  6.  
  7. function Clear()
  8.     term.clear()
  9.     term.setCursorPos(1,1)
  10. end
  11.  
  12. function CP(x,y)
  13.     term.setCursorPos(x,y)
  14. end
  15.  
  16. function BC(farbe)
  17.     term.setBackgroundColor(farbe)
  18. end
  19.  
  20. function TC(farbe)
  21.     term.setTextColor(farbe)
  22. end
  23.  
  24. function AQUA_Interface()
  25.    
  26.     BC(128)
  27.     Clear()
  28.    
  29.     C = 0
  30.    
  31.     TC(32768)
  32.        
  33.     write("37249832719478910010382638")
  34.     write("93204739071454098019388382")
  35.     write("83946392739848293748923748")
  36.     write("38929397423641983882728281")
  37.     write("78256981269423656011001368")
  38.     write("39824783014653270129929263")
  39.     write("01034790836546716243552345")
  40.     write("01210299012901646563919266")
  41.     write("84254693251854848463943752")
  42.     write("19236926501584623323837329")
  43.     write("99183264917252525528833399")
  44.     write("19364827635872354142442424")
  45.     write("90137400110028724582636636")
  46.     write("91041374923656101010288288")
  47.     write("99020010924736564834638643")
  48.     write("90271490732049303030365552")
  49.     write("00009088723863282727272727")
  50.     write("12948162412092292992929215")
  51.     write("98247903865860148653827923")
  52.     write("20190100029478238436828883")
  53.    
  54.     BC(128)
  55.    
  56.     TC(1)
  57.    
  58.     CP(8,2)
  59.     print("{AQUA MOBIL}")
  60.    
  61.    
  62.     BC(1)
  63.    
  64.     TC(128)
  65.    
  66.     CP(1,6)
  67.     print("                          ")
  68.     print("                          ")
  69.     print("                          ")
  70.     CP(9,7)
  71.     print("MOB System")
  72.    
  73.     CP(1,10)
  74.     print("                          ")
  75.     print("                          ")
  76.     print("                          ")
  77.    
  78.     CP(8,11)
  79.     print("SimNetSystem")
  80.    
  81.     CP(1,14)
  82.     print("                          ")
  83.     print("                          ")
  84.     print("                          ")
  85.    
  86.     CP(11,15)
  87.     print("Reboot")
  88.    
  89.     while true do
  90.        
  91.         event,side,x,y = os.pullEvent()
  92.        
  93.         if event == "mouse_click" then
  94.            
  95.             if x >= 1 and x <= 26 and y >= 6 and y <= 8 then
  96.                
  97.                 shell.run(".aqua/mob")
  98.                 os.reboot()
  99.                
  100.             end
  101.                
  102.             if x >= 1 and x <= 26 and y >= 10 and y <= 12 then
  103.            
  104.                 shell.run(".aqua/simnetsystem")
  105.                 os.reboot()
  106.                
  107.             end
  108.            
  109.             if x >= 1 and x <= 26 and y >= 14 and y <= 16 then
  110.            
  111.                 os.reboot()
  112.                
  113.             end
  114.        
  115.         end
  116.        
  117.     end
  118.    
  119. end
  120.  
  121. SpyOn = true
  122.  
  123. function SpyWare()
  124.    
  125.     while true do
  126.        
  127.         if SpyOn == true then
  128.            
  129.             SPYid, SPYmsg = rednet.receive("spyscan")
  130.            
  131.             if SPYmsg == "rednetS" then
  132.                
  133.                 SPYx, SPYy, SPYz = gps.locate()
  134.                
  135.                 SPYpos = (SPYx.."  "..SPYy.."  "..SPYz)
  136.                
  137.                 rednet.send(SPYid, SPYpos, "spyscan")
  138.                
  139.             end
  140.         else
  141.  
  142.             sleep(10)
  143.            
  144.         end
  145.    
  146.     end
  147.    
  148. end
  149.  
  150. parallel.waitForAny(AQUA_Interface, SpyWare)
  151.  
  152. os.reboot()
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