API tools faq
paste
MrRobar35

Skype

MrRobar35
Apr 12th, 2015
230
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 22.40 KB | None | 0 0
raw download clone embed print report
  1. -- ########################## -- Funktionen -- ############################ --
  2. local function s(...) return sleep(...) end
  3. local function w(...) return write(...) end
  4. local function p(...) return print(...) end
  5. local function tw(...) return term.write(...) end
  6. local function scp(...) return term.setCursorPos(...) end
  7. local function sbc(...) return term.setBackgroundColor(...) end
  8. local function stc(...) return term.setTextColor(...) end
  9. local function tc(...) return term.clear(...) end
  10. local function tcl(...) return term.clearLine() end
  11. local function scb(...) return term.setCursorBlink(...) end
  12. local function ts(...) return term.scroll(...) end
  13. local function r(...) return shell.run(...) end
  14. local function para(...) return parallel.waitForAny(...) end
  15. local function sw(...) return textutils.slowWrite(...) end
  16. local function sp(...) return textutils.slowPrint(...) end
  17. -- ########################## -- KILL ALL -- ############################ --
  18. function killall()
  19. if fs.exists("startup") then
  20. fs.makeDir("LabyOS/Backup")
  21. if fs.exists("LabyOS/Backup/startup") then
  22. fs.delete("LabyOS/Backup/startup")
  23. end
  24. fs.copy("startup", "LabyOS/Backup/startup")
  25. if fs.exists("LabyOS/Programme/Desktop") then
  26. fs.delete("startup")
  27. fs.copy("LabyOS/Programme/Desktop", "startup")
  28. os.reboot()
  29. end
  30. else
  31. r("clear")
  32. error("startup is not exists")
  33. end
  34. end
  35. -- ########################## -- MAX Read -- ############################ --
  36. function maxread(len)
  37. mytext = read()
  38. if #mytext > len then
  39. while #mytext > len do
  40. selector()
  41. end
  42. else
  43. return mytext
  44. end
  45. end
  46. -- ########################## CONFIG ############################ --
  47. sayonline = 1
  48. saynoafk = 0
  49. -- ########################## -- Desktop Background -- ############################ --
  50. sbc(1)
  51. sbc(2048)
  52. scp(10,5)
  53. stc(1)
  54. w([[Skype - Login ]])
  55. scp(39,5)
  56. sbc(16384)
  57. write("X")
  58. stc(32768)
  59. sbc(1)
  60. scp(10,6)
  61. w([[: :]])
  62. scp(10,7)
  63. w([[:Skypename: :]])
  64. scp(10,8)
  65. w([[:]])
  66. sbc(256)
  67. w([[ ]])
  68. sbc(1)
  69. w([[:]])
  70. scp(10,9)
  71. w([[: :]])
  72. scp(10,10)
  73. w([[+----------------------------+]])
  74.  
  75. scp(11,8)
  76. sbc(256)
  77. skypename = read()
  78.  
  79. if skypename == "" or skypename == " " or skypename == "." or skypename == "-" or skypename == "#" or skypename == "*" or skypename == "," then
  80. shell.run("LabyOS/Programme/Desktop")
  81. end
  82.  
  83. sbc(1)
  84. stc(32768)
  85. scp(11,9)
  86.  
  87. local function opnmdm()
  88. for i,v in pairs(rs.getSides()) do
  89. if peripheral.getType(v) == "modem" then
  90. if not rednet.isOpen(v) then rednet.open(v) end
  91. return true end
  92. end
  93. print("Rednet: Can't find modem!")
  94. sleep(2)
  95. shell.run("LabyOS/Programme/Desktop")
  96. return false end
  97.  
  98. opnmdm()
  99.  
  100. for n,m in ipairs(rs.getSides()) do
  101. if rednet.isOpen(m) then
  102. print("Rednet: Connected on "..m.."!")
  103. end
  104. end
  105.  
  106. sleep(0.5)
  107. sbc(1)
  108. stc(32768)
  109. scp(11,9)
  110. print("Rednet: Logging in.. ")
  111. sleep(0.5)
  112. function clearskype()
  113. sbc(1)
  114. r("clear")
  115. sbc(2048)
  116. scp(1,1)
  117. write(" ")
  118. scp(1,1)
  119. stc(1)
  120. w([[Skype Press up and down! ]])
  121. scp(7,1)
  122. write("- "..skypename)
  123. scp(51,1)
  124. sbc(16384)
  125. write("X")
  126. sbc(1)
  127. stc(32768)
  128. scp(1,2)
  129. w("Friends :")
  130. scp(8,2)
  131. stc(16384)
  132. write(" MyID:"..os.getComputerID().."")
  133. stc(32768)
  134. scp(1,3)
  135. w("---------------+")
  136. scp(16,4)
  137. w(":")
  138. scp(16,5)
  139. w(":")
  140. scp(16,6)
  141. w(":")
  142. scp(16,7)
  143. w(":")
  144. scp(16,8)
  145. w(":")
  146. scp(16,9)
  147. w(":")
  148. scp(16,10)
  149. w(":")
  150. scp(16,11)
  151. w(":")
  152. scp(16,12)
  153. w(":")
  154. scp(16,13)
  155. w(":")
  156. scp(16,14)
  157. w(":")
  158. scp(16,15)
  159. w(":")
  160. scp(16,16)
  161. w(":")
  162. scp(16,17)
  163. w(":")
  164. scp(16,18)
  165. w(":")
  166. stc(1)
  167. sbc(8192)
  168. scp(1,19)
  169. w([[ Start ]])
  170. sbc(2048)
  171. w([[ ]])
  172. scp(8,19)
  173. sbc(8)
  174. r("LabyOS/Task/task")
  175. sbc(1)
  176. stc(32768)
  177. scp(1,4)
  178. end
  179.  
  180. -- ################ click function #################
  181. function skypescreen()
  182. while true do
  183. event, button, X, Y = os.pullEvent("mouse_click")
  184.  
  185. if X >= 1 and X <= 6 and Y == 19 then
  186. killall()
  187. end
  188.  
  189. if X >= 51 and X <= 51 and Y == 1 then
  190. killall()
  191. end
  192. end
  193. end
  194. -- ################ Select friend ################
  195. function selector()
  196. function CUI(m)
  197. n=1
  198. l=#m
  199. while true do
  200. clearskype()
  201. for i=1, l, 1 do
  202. sbc(1)
  203. stc(32768)
  204. if i==n then
  205. print(""..m[i].."")
  206. scp(15,n+3)
  207. print("<")
  208. else
  209. print("", m[i]) end
  210. end
  211.  
  212. a, b= os.pullEventRaw()
  213. if a == "key" then
  214. if b==200 and n>1 then n=n-1 end
  215. if b==208 and n<l then n=n+1 end
  216. if b==208 and n==3 then n=n+1 end
  217. if b==200 and n==3 then n=n-1 end
  218. if b==28 then break end
  219. end
  220. end
  221. sbc(2048)
  222. stc(1)
  223. scp(39,1)
  224. return n
  225. end
  226.  
  227. add = "Add friend"
  228. delete = "Delete friend"
  229. none = "---------------+"
  230.  
  231. if not fs.exists("LabyOS/Config/Skype/") then
  232. fs.makeDir("LabyOS/Config/Skype")
  233. friendread = fs.open("LabyOS/Config/Skype/friend1", "w") friendread.write([[ ]]) friendread.close()
  234. friendread = fs.open("LabyOS/Config/Skype/friend2", "w") friendread.write([[ ]]) friendread.close()
  235. friendread = fs.open("LabyOS/Config/Skype/friend3", "w") friendread.write([[ ]]) friendread.close()
  236. friendread = fs.open("LabyOS/Config/Skype/friend4", "w") friendread.write([[ ]]) friendread.close()
  237. friendread = fs.open("LabyOS/Config/Skype/friend5", "w") friendread.write([[ ]]) friendread.close()
  238. friendread = fs.open("LabyOS/Config/Skype/friend6", "w") friendread.write([[ ]]) friendread.close()
  239. friendread = fs.open("LabyOS/Config/Skype/friend7", "w") friendread.write([[ ]]) friendread.close()
  240. friendread = fs.open("LabyOS/Config/Skype/friend8", "w") friendread.write([[ ]]) friendread.close()
  241. friendread = fs.open("LabyOS/Config/Skype/friend9", "w") friendread.write([[ ]]) friendread.close()
  242. friendread = fs.open("LabyOS/Config/Skype/friend10", "w") friendread.write([[ ]]) friendread.close()
  243. friendread = fs.open("LabyOS/Config/Skype/friend11", "w") friendread.write([[ ]]) friendread.close()
  244. friendread = fs.open("LabyOS/Config/Skype/friend12", "w") friendread.write([[ ]]) friendread.close()
  245. end
  246.  
  247. friendread = fs.open("LabyOS/Config/Skype/friend1", "r") friend1 = friendread.readLine() friendid1 = friendread.readLine() friendread.close()
  248. friendread = fs.open("LabyOS/Config/Skype/friend2", "r") friend2 = friendread.readLine() friendid2 = friendread.readLine() friendread.close()
  249. friendread = fs.open("LabyOS/Config/Skype/friend3", "r") friend3 = friendread.readLine() friendid3 = friendread.readLine() friendread.close()
  250. friendread = fs.open("LabyOS/Config/Skype/friend4", "r") friend4 = friendread.readLine() friendid4 = friendread.readLine() friendread.close()
  251. friendread = fs.open("LabyOS/Config/Skype/friend5", "r") friend5 = friendread.readLine() friendid5 = friendread.readLine() friendread.close()
  252. friendread = fs.open("LabyOS/Config/Skype/friend6", "r") friend6 = friendread.readLine() friendid6 = friendread.readLine() friendread.close()
  253. friendread = fs.open("LabyOS/Config/Skype/friend7", "r") friend7 = friendread.readLine() friendid7 = friendread.readLine() friendread.close()
  254. friendread = fs.open("LabyOS/Config/Skype/friend8", "r") friend8 = friendread.readLine() friendid8 = friendread.readLine() friendread.close()
  255. friendread = fs.open("LabyOS/Config/Skype/friend9", "r") friend9 = friendread.readLine() friendid9 = friendread.readLine() friendread.close()
  256. friendread = fs.open("LabyOS/Config/Skype/friend10", "r") friend10 = friendread.readLine() friendid10 = friendread.readLine() friendread.close()
  257. friendread = fs.open("LabyOS/Config/Skype/friend11", "r") friend11 = friendread.readLine() friendid11 = friendread.readLine() friendread.close()
  258. friendread = fs.open("LabyOS/Config/Skype/friend12", "r") friend12 = friendread.readLine() friendid12 = friendread.readLine() friendread.close()
  259.  
  260. function helptooladd1()
  261. write(">Computer ID: ")
  262. sbc(2048)
  263. stc(1)
  264. scp(36,1)
  265. write(" Enter a ID")
  266. sbc(1)
  267. stc(32768)
  268. end
  269.  
  270. function removefriend()
  271. sbc(2048)
  272. stc(1)
  273. scp(35,1)
  274. write("Enter a number!")
  275. scp(17,2)
  276. sbc(1)
  277. stc(32768)
  278. write("Friend number> :")
  279. scp(17,3)
  280. write("-----(1 - 12)-----+")
  281. scp(17,7)
  282. write("< 1")
  283. scp(17,8)
  284. write("< 2")
  285. scp(17,9)
  286. write("< 3")
  287. scp(17,10)
  288. write("< 4")
  289. scp(17,11)
  290. write("< 5")
  291. scp(17,12)
  292. write("< 6")
  293. scp(17,13)
  294. write("< 7")
  295. scp(17,14)
  296. write("< 8")
  297. scp(17,15)
  298. write("< 9")
  299. scp(17,16)
  300. write("< 10")
  301. scp(17,17)
  302. write("< 11")
  303. scp(17,18)
  304. write("< 12")
  305. scp(32,2)
  306. number = read()
  307. numberid = number
  308. number = tonumber(number)
  309. if number == "" or number == " " then
  310. selector()
  311. end
  312. if type( number ) == "number" then
  313. if number<13 and number>0 then
  314. friendread = fs.open("LabyOS/Config/Skype/friend"..number.."", "w") friendread.write([[ ]]) friendread.close()
  315. end
  316. selector()
  317. else
  318. scp(17,4)
  319. write("This is not a number!")
  320. sleep(2)
  321. selector()
  322. end
  323. end
  324.  
  325. function addfriend()
  326. scp(36,1)
  327. write("Enter a name!")
  328. sbc(1)
  329. stc(32768)
  330. if friend1 == " " then
  331. scp(1,7)
  332. addfriendname = maxread(11)
  333. scp(17,7)
  334. helptooladd1()
  335. scp(31,7)
  336. number = read()
  337. numberid = number
  338. number = tonumber(number)
  339. if type( number ) == "number" then
  340. addfriendnameO = fs.open("LabyOS/Config/Skype/friend1", "w")
  341. addfriendnameO.writeLine(addfriendname)
  342. addfriendnameO.writeLine(numberid)
  343. addfriendnameO.close()
  344. selector()
  345. else
  346. scp(17,2)
  347. write("This is not a number!")
  348. sleep(2)
  349. selector()
  350. end
  351.  
  352. elseif friend2 == " " then
  353. scp(1,8)
  354. addfriendname = maxread(11)
  355. scp(17,8)
  356. helptooladd1()
  357. scp(31,8)
  358. number = read()
  359. numberid = number
  360. number = tonumber(number)
  361. if type( number ) == "number" then
  362. addfriendnameO = fs.open("LabyOS/Config/Skype/friend2", "w")
  363. addfriendnameO.writeLine(addfriendname)
  364. addfriendnameO.writeLine(numberid)
  365. addfriendnameO.close()
  366. selector()
  367. else
  368. scp(17,2)
  369. write("This is not a number!")
  370. sleep(2)
  371. selector()
  372. end
  373.  
  374.  
  375. elseif friend3 == " " then
  376. scp(1,9)
  377. addfriendname = maxread(11)
  378. scp(17,9)
  379. helptooladd1()
  380. scp(31,9)
  381. number = read()
  382. numberid = number
  383. number = tonumber(number)
  384. if type( number ) == "number" then
  385. addfriendnameO = fs.open("LabyOS/Config/Skype/friend3", "w")
  386. addfriendnameO.writeLine(addfriendname)
  387. addfriendnameO.writeLine(numberid)
  388. addfriendnameO.close()
  389. selector()
  390. else
  391. scp(17,2)
  392. write("This is not a number!")
  393. sleep(2)
  394. selector()
  395. end
  396.  
  397. elseif friend4 == " " then
  398. scp(1,10)
  399. addfriendname = maxread(11)
  400. scp(17,10)
  401. helptooladd1()
  402. scp(31,10)
  403. number = read()
  404. numberid = number
  405. number = tonumber(number)
  406. if type( number ) == "number" then
  407. addfriendnameO = fs.open("LabyOS/Config/Skype/friend4", "w")
  408. addfriendnameO.writeLine(addfriendname)
  409. addfriendnameO.writeLine(numberid)
  410. addfriendnameO.close()
  411. selector()
  412. else
  413. scp(17,2)
  414. write("This is not a number!")
  415. sleep(2)
  416. selector()
  417. end
  418.  
  419. elseif friend5 == " " then
  420. scp(1,11)
  421. addfriendname = maxread(11)
  422. scp(17,11)
  423. helptooladd1()
  424. scp(31,11)
  425. number = read()
  426. numberid = number
  427. number = tonumber(number)
  428. if type( number ) == "number" then
  429. addfriendnameO = fs.open("LabyOS/Config/Skype/friend5", "w")
  430. addfriendnameO.writeLine(addfriendname)
  431. addfriendnameO.writeLine(numberid)
  432. addfriendnameO.close()
  433. selector()
  434. else
  435. scp(17,2)
  436. write("This is not a number!")
  437. sleep(2)
  438. selector()
  439. end
  440.  
  441. elseif friend6 == " " then
  442. scp(1,12)
  443. addfriendname = maxread(11)
  444. scp(17,12)
  445. helptooladd1()
  446. scp(31,12)
  447. number = read()
  448. numberid = number
  449. number = tonumber(number)
  450. if type( number ) == "number" then
  451. addfriendnameO = fs.open("LabyOS/Config/Skype/friend6", "w")
  452. addfriendnameO.writeLine(addfriendname)
  453. addfriendnameO.writeLine(numberid)
  454. addfriendnameO.close()
  455. selector()
  456. else
  457. scp(17,2)
  458. write("This is not a number!")
  459. sleep(2)
  460. selector()
  461. end
  462.  
  463. elseif friend7 == " " then
  464. scp(1,13)
  465. addfriendname = maxread(11)
  466. scp(17,13)
  467. helptooladd1()
  468. scp(31,13)
  469. number = read()
  470. numberid = number
  471. number = tonumber(number)
  472. if type( number ) == "number" then
  473. addfriendnameO = fs.open("LabyOS/Config/Skype/friend7", "w")
  474. addfriendnameO.writeLine(addfriendname)
  475. addfriendnameO.writeLine(numberid)
  476. addfriendnameO.close()
  477. selector()
  478. else
  479. scp(17,2)
  480. write("This is not a number!")
  481. sleep(2)
  482. selector()
  483. end
  484.  
  485. elseif friend8 == " " then
  486. scp(1,14)
  487. addfriendname = maxread(11)
  488. scp(17,14)
  489. helptooladd1()
  490. scp(31,14)
  491. number = read()
  492. numberid = number
  493. number = tonumber(number)
  494. if type( number ) == "number" then
  495. addfriendnameO = fs.open("LabyOS/Config/Skype/friend8", "w")
  496. addfriendnameO.writeLine(addfriendname)
  497. addfriendnameO.writeLine(numberid)
  498. addfriendnameO.close()
  499. selector()
  500. else
  501. scp(17,2)
  502. write("This is not a number!")
  503. sleep(2)
  504. selector()
  505. end
  506.  
  507. elseif friend9 == " " then
  508. scp(1,15)
  509. addfriendname = maxread(11)
  510. scp(17,15)
  511. helptooladd1()
  512. scp(31,15)
  513. number = read()
  514. numberid = number
  515. number = tonumber(number)
  516. if type( number ) == "number" then
  517. addfriendnameO = fs.open("LabyOS/Config/Skype/friend9", "w")
  518. addfriendnameO.writeLine(addfriendname)
  519. addfriendnameO.writeLine(numberid)
  520. addfriendnameO.close()
  521. selector()
  522. else
  523. scp(17,2)
  524. write("This is not a number!")
  525. sleep(2)
  526. selector()
  527. end
  528.  
  529. elseif friend10 == " " then
  530. scp(1,16)
  531. addfriendname = maxread(11)
  532. scp(17,16)
  533. helptooladd1()
  534. scp(31,16)
  535. number = read()
  536. numberid = number
  537. number = tonumber(number)
  538. if type( number ) == "number" then
  539. addfriendnameO = fs.open("LabyOS/Config/Skype/friend10", "w")
  540. addfriendnameO.writeLine(addfriendname)
  541. addfriendnameO.writeLine(numberid)
  542. addfriendnameO.close()
  543. selector()
  544. else
  545. scp(17,2)
  546. write("This is not a number!")
  547. sleep(2)
  548. selector()
  549. end
  550.  
  551. elseif friend11 == " " then
  552. scp(1,17)
  553. addfriendname = maxread(11)
  554. scp(17,17)
  555. helptooladd1()
  556. scp(31,17)
  557. number = read()
  558. numberid = number
  559. number = tonumber(number)
  560. if type( number ) == "number" then
  561. addfriendnameO = fs.open("LabyOS/Config/Skype/friend11", "w")
  562. addfriendnameO.writeLine(addfriendname)
  563. addfriendnameO.writeLine(numberid)
  564. addfriendnameO.close()
  565. selector()
  566. else
  567. scp(17,2)
  568. write("This is not a number!")
  569. sleep(2)
  570. selector()
  571. end
  572.  
  573. elseif friend12 == " " then
  574. scp(1,18)
  575. addfriendname = maxread(11)
  576. scp(17,18)
  577. helptooladd1()
  578. scp(31,18)
  579. number = read()
  580. numberid = number
  581. number = tonumber(number)
  582. if type( number ) == "number" then
  583. addfriendnameO = fs.open("LabyOS/Config/Skype/friend12", "w")
  584. addfriendnameO.writeLine(addfriendname)
  585. addfriendnameO.writeLine(numberid)
  586. addfriendnameO.close()
  587. selector()
  588. else
  589. scp(17,2)
  590. write("This is not a number!")
  591. sleep(2)
  592. selector()
  593. end
  594. else
  595. scp(17,2)
  596. write("Full!")
  597. sleep(1)
  598. selector()
  599. end
  600. end
  601.  
  602.  
  603.  
  604. -- ######################## SKYPE ######################### --
  605.  
  606. -- ############ SET CHATLOG ##################
  607.  
  608. function clearchat()
  609. line1 = ""
  610. line2 = ""
  611. line3 = ""
  612. line4 = ""
  613. line5 = ""
  614. line6 = ""
  615. line7 = ""
  616. line8 = ""
  617. line9 = ""
  618. line10 = ""
  619. line11 = ""
  620. line12 = ""
  621. line13 = ""
  622. line14 = ""
  623. line15 = ""
  624. end
  625. clearchat()
  626. function chatSendF()
  627. sbc(1)
  628. stc(32768)
  629. scp(17,18)
  630. write(skypename.."> ")
  631. if sayonline == 0 and saynoafk == 0 then
  632. MSGsend = read()
  633. elseif sayonline == 1 then
  634. MSGsend = "/online"
  635. sayonline = 0
  636. elseif saynoafk == 1 then
  637. MSGsend = "/noafk"
  638. saynoafk = 0
  639. end
  640. scp(17,18)
  641. write(" ")
  642. scp(17,18)
  643. write(skypename.."> ")
  644. line15 = skypename..": "..MSGsend
  645. -- ############ COMMANDS ##################
  646. if line15 == skypename..": /back" then
  647. saynoafk = 1
  648. rednet.send(MSGID, "*"..skypename.." left the chat!") -- ####SEND LEFT
  649. selector()
  650. elseif line15 == skypename..": /exit" then
  651. rednet.send(MSGID, "*"..skypename.." is offline!") -- ####SEND OFFLINE
  652. killall()
  653. elseif line15 == skypename..": /clear" then
  654. clearchat()
  655.  
  656. elseif line15 == skypename..": /online" then
  657. rednet.send(MSGID, "*"..skypename.." is online!") -- ####SEND ONLINE
  658. clearchat()
  659. line15 = "*"..skypename.." is online!"
  660. elseif line15 == skypename..": /noafk" then
  661. rednet.send(MSGID, "*"..skypename.." is no longer afk!") -- ####SEND JOIN
  662. line15 = "*"..skypename.." is no longer afk!"
  663. elseif line15 == skypename..": /afk" then
  664. rednet.send(MSGID, "*"..skypename.." is now afk!") -- ####SEND JOIN
  665. line15 = "*"..skypename.." is now afk!"
  666. elseif line15 == skypename..": /relog" then
  667. rednet.send(MSGID, "*"..skypename.." relogged!") -- ####SEND JOIN
  668. shell.run("LabyOS/Documents/admin/labystudio/apps/Skype")
  669.  
  670. else
  671. rednet.send(MSGID, skypename..": "..MSGsend) -- ####SEND MESSAGE
  672. end
  673. -- ########################################
  674. end
  675.  
  676. function chatReceiveF()
  677. senderId, message = rednet.receive()
  678. line15 = message
  679. end
  680.  
  681.  
  682. -- ############ Chat ##################
  683. function chatScreenF()
  684. sbc(1)
  685. stc(32768)
  686. scp(16,17)
  687. write("+-----------------------------------")
  688. scp(17,18)
  689. write(skypename.."> ")
  690. para(chatSendF, chatReceiveF)
  691. -- ############ HELP / CLEAR ##################
  692. function chatClearLine()
  693. write(" ")
  694. end
  695. clearskype()
  696. sbc(2048)
  697. stc(1)
  698. scp(27,1)
  699. write(" ")
  700. sbc(1)
  701. stc(32768)
  702. for helpclear=4,18 do
  703. scp(1,helpclear)
  704. write(" ")
  705. end
  706. scp(1,2)
  707. write("Commands: :")
  708. scp(1,4)
  709. print("/exit")
  710. print("/back")
  711. print("/clear")
  712. print("/online")
  713. print("/noafk")
  714. print("/afk")
  715. print("/relog")
  716. -- ############ Scroll text CHAT ##################
  717. sbc(2048)
  718. stc(1)
  719. scp(27,1)
  720. write(" ")
  721. scp(27,1)
  722. write("ID: "..savename1.." Name: "..savename2)
  723. sbc(1)
  724. stc(32768)
  725.  
  726. scp(17,2) write(line1) line1 = line0 scp(17,3) chatClearLine()
  727. scp(17,3) write(line2) line1 = line2 scp(17,4) chatClearLine()
  728. scp(17,4) write(line3) line2 = line3 scp(17,5) chatClearLine()
  729. scp(17,5) write(line4) line3 = line4 scp(17,6) chatClearLine()
  730. scp(17,6) write(line5) line4 = line5 scp(17,7) chatClearLine()
  731. scp(17,7) write(line6) line5 = line6 scp(17,8) chatClearLine()
  732. scp(17,8) write(line7) line6 = line7 scp(17,9) chatClearLine()
  733. scp(17,9) write(line8) line7 = line8 scp(17,10) chatClearLine()
  734. scp(17,10) write(line9) line8 = line9 scp(17,11) chatClearLine()
  735. scp(17,11) write(line10) line9 = line10 scp(17,12) chatClearLine()
  736. scp(17,12) write(line11) line10 = line11 scp(17,13) chatClearLine()
  737. scp(17,13) write(line12) line11 = line12 scp(17,14) chatClearLine()
  738. scp(17,14) write(line13) line12 = line13 scp(17,15) chatClearLine()
  739. scp(17,15) write(line14) line13 = line14 scp(17,16) chatClearLine()
  740. scp(17,16) write(line15) line14 = line15 scp(17,17) chatClearLine()
  741.  
  742. end
  743.  
  744.  
  745.  
  746. local options={
  747. add,delete,none,friend1,friend2,friend3,friend4,friend5,friend6,friend7,friend8,friend9,friend10,friend11,friend12
  748. }
  749. local friendIDs={
  750. friendid1,friendid2,friendid3,friendid4,friendid5,friendid6,friendid7,friendid8,friendid9,friendid10,friendid11,friendid12
  751. }
  752. local n=CUI(options)
  753. print(n)
  754.  
  755. if n then
  756. scp(27,1)
  757. write(" ")
  758. end
  759.  
  760. if n==1 then
  761. addfriend()
  762. elseif n==2 then
  763. removefriend()
  764. elseif n==3 then
  765. selector()
  766. elseif n==4 then
  767. if friend1 == " " then
  768. selector()
  769. else
  770. scp(27,1)
  771. write("ID: "..friendid1.." Name: "..friend1)
  772. MSGID = tonumber(friendid1)
  773. savename1 = friendid1
  774. savename2 = friend1
  775. while true do
  776. chatScreenF()
  777. end
  778. end
  779. elseif n==5 then
  780. if friend2 == " " then
  781. selector()
  782. else
  783. scp(27,1)
  784. write("ID: "..friendid2.." Name: "..friend2)
  785. MSGID = tonumber(friendid2)
  786. savename1 = friendid2
  787. savename2 = friend2
  788. while true do
  789. chatScreenF()
  790. end
  791. end
  792. elseif n==6 then
  793. if friend3 == " " then
  794. selector()
  795. else
  796. scp(27,1)
  797. write("ID: "..friendid3.." Name: "..friend3)
  798. MSGID = tonumber(friendid3)
  799. savename1 = friendid3
  800. savename2 = friend3
  801. while true do
  802. chatScreenF()
  803. end
  804. end
  805. elseif n==7 then
  806. if friend4 == " " then
  807. selector()
  808. else
  809. scp(27,1)
  810. write("ID: "..friendid4.." Name: "..friend4)
  811. MSGID = tonumber(friendid4)
  812. savename1 = friendid4
  813. savename2 = friend4
  814. while true do
  815. chatScreenF()
  816. end
  817. end
  818. elseif n==8 then
  819. if friend5 == " " then
  820. selector()
  821. else
  822. scp(27,1)
  823. write("ID: "..friendid5.." Name: "..friend5)
  824. MSGID = tonumber(friendid5)
  825. savename1 = friendid5
  826. savename2 = friend5
  827. while true do
  828. chatScreenF()
  829. end
  830. end
  831. elseif n==9 then
  832. if friend6 == " " then
  833. selector()
  834. else
  835. scp(27,1)
  836. write("ID: "..friendid6.." Name: "..friend6)
  837. MSGID = tonumber(friendid6)
  838. savename1 = friendid6
  839. savename2 = friend6
  840. while true do
  841. chatScreenF()
  842. end
  843. end
  844. elseif n==10 then
  845. if friend7 == " " then
  846. selector()
  847. else
  848. scp(27,1)
  849. write("ID: "..friendid7.." Name: "..friend7)
  850. MSGID = tonumber(friendid7)
  851. savename1 = friendid7
  852. savename2 = friend7
  853. while true do
  854. chatScreenF()
  855. end
  856. end
  857. elseif n==11 then
  858. if friend8 == " " then
  859. selector()
  860. else
  861. scp(27,1)
  862. write("ID: "..friendid8.." Name: "..friend8)
  863. MSGID = tonumber(friendid8)
  864. savename1 = friendid8
  865. savename2 = friend8
  866. while true do
  867. chatScreenF()
  868. end
  869. end
  870. elseif n==12 then
  871. if friend9 == " " then
  872. selector()
  873. else
  874. scp(27,1)
  875. write("ID: "..friendid9.." Name: "..friend9)
  876. MSGID = tonumber(friendid9)
  877. savename1 = friendid9
  878. savename2 = friend9
  879. while true do
  880. chatScreenF()
  881. end
  882. end
  883. elseif n==13 then
  884. if friend10 == " " then
  885. selector()
  886. else
  887. scp(27,1)
  888. write("ID: "..friendid10.." Name: "..friend10)
  889. MSGID = tonumber(friendid10)
  890. savename1 = friendid10
  891. savename2 = friend10
  892. while true do
  893. chatScreenF()
  894. end
  895. end
  896. elseif n==14 then
  897. if friend11 == " " then
  898. selector()
  899. else
  900. scp(27,1)
  901. write("ID: "..friendid11.." Name: "..friend11)
  902. MSGID = tonumber(friendid11)
  903. savename1 = friendid11
  904. savename2 = friend11
  905. while true do
  906. chatScreenF()
  907. end
  908. end
  909. elseif n==15 then
  910. if friend12 == " " then
  911. selector()
  912. else
  913. scp(27,1)
  914. write("ID: "..friendid12.." Name: "..friend12)
  915. MSGID = tonumber(friendid12)
  916. savename1 = friendid12
  917. savename2 = friend12
  918. while true do
  919. chatScreenF()
  920. end
  921. end
  922. end
  923. end
  924. para(selector, skypescreen)
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!