1010101010101010101portaltest7

SUBMITTED BY: Guest

DATE: Jan. 24, 2014, 1:36 a.m.

FORMAT: Text only

SIZE: 123.2 kB

Raw Download

HITS: 1277

Report
  3. local mon = peripheral.wrap("back")
  4. local modem = peripheral.wrap("top")
  5. local screen = 1
  7. local page1buttons = {
  8. p1_1 = " 1 " ,
  9. p2_1 = " 2 " ,
  10. p3_1 = " " ,
  11. p4_1 = " " ,
  12. p5_1 = " " ,
  13. p6_1 = " " ,
  14. p7_1 = " " ,
  15. p8_1 = " " ,
  16. p9_1 = " " ,
  17. p10_1 = " " ,
  18. p11_1 = " " ,
  19. p12_1 = " " }
  21. local page2buttons = {
  22. p1_2 = " 1 " ,
  23. p2_2 = " 2 " ,
  24. p3_2 = " " ,
  25. p4_2 = " " ,
  26. p5_2 = " 5 " ,
  27. p6_2 = " 6 " ,
  28. p7_2 = " " ,
  29. p8_2 = " " ,
  30. p9_2 = " " ,
  31. p10_2 = " " ,
  32. p11_2 = " " ,
  33. p12_2 = " " }
  35. local page3buttons = {
  36. p1_3 = " 1 " ,
  37. p2_3 = " 2 " ,
  38. p3_3 = " " ,
  39. p4_3 = " " ,
  40. p5_3 = " 5 " ,
  41. p6_3 = " 6 " ,
  42. p7_3 = " " ,
  43. p8_3 = " 8 " ,
  44. p9_3 = " 9 " ,
  45. p10_3 = " " ,
  46. p11_3 = " " ,
  47. p12_3 = " " }
  49. local page4buttons = {
  50. p1_4 = " 1 " ,
  51. p2_4 = " 2 " ,
  52. p3_4 = " " ,
  53. p4_4 = " " ,
  54. p5_4 = " 5 " ,
  55. p6_4 = " 6 " ,
  56. p7_4 = " " ,
  57. p8_4 = " 8 " ,
  58. p9_4 = " 9 " ,
  59. p10_4 = " " ,
  60. p11_4 = " 11 " ,
  61. p12_4 = " 12 " }
  63. function drawGUI()
  64. if (screen == 1) then
  65. --Heading
  66. mon.clear()
  67. mon.setBackgroundColor(colors.black)
  68. mon.setCursorPos(1,1)
  69. mon.setBackgroundColor(colors.gray)
  70. mon.setTextColor(colors.white)
  71. mon.write(" ")
  72. mon.setBackgroundColor(colors.black)
  73. mon.setCursorPos(1,2)
  74. mon.setBackgroundColor(colors.gray)
  75. mon.write(" Page: 1:4 ")
  76. mon.setBackgroundColor(colors.black)
  77. mon.setCursorPos(1,3)
  78. mon.setBackgroundColor(colors.gray)
  79. mon.write(" ")
  80. mon.setBackgroundColor(colors.black)
  82. --Page Advance button
  83. mon.setBackgroundColor(colors.black)
  84. mon.setCursorPos(24,1)
  85. mon.setBackgroundColor(colors.gray)
  86. mon.setTextColor(colors.lime)
  87. mon.write(" ")
  88. mon.setBackgroundColor(colors.black)
  89. mon.setCursorPos(24,2)
  90. mon.setBackgroundColor(colors.gray)
  91. mon.write(" Next ")
  92. mon.setBackgroundColor(colors.black)
  93. mon.setCursorPos(24,3)
  94. mon.setBackgroundColor(colors.gray)
  95. mon.write(" ")
  96. mon.setBackgroundColor(colors.black)
  98. -- Page decrease button
  99. mon.setBackgroundColor(colors.black)
  100. mon.setCursorPos(1,1)
  101. mon.setBackgroundColor(colors.gray)
  102. mon.setTextColor(colors.lime)
  103. mon.write(" ")
  104. mon.setBackgroundColor(colors.black)
  105. mon.setCursorPos(1,2)
  106. mon.setBackgroundColor(colors.gray)
  107. mon.write(" Back ")
  108. mon.setBackgroundColor(colors.black)
  109. mon.setCursorPos(1,3)
  110. mon.setBackgroundColor(colors.gray)
  111. mon.write(" ")
  112. mon.setBackgroundColor(colors.black)
  114. -- Button 1_1
  115. mon.setCursorPos(1,5)
  116. mon.setBackgroundColor(colors.lime)
  117. mon.setTextColor(colors.black)
  118. mon.write(" ")
  119. mon.setBackgroundColor(colors.black)
  120. mon.setCursorPos(1,6)
  121. mon.setBackgroundColor(colors.lime)
  122. mon.setTextColor(colors.black)
  123. mon.write(page1buttons.p1_1)
  124. mon.setBackgroundColor(colors.black)
  125. mon.setCursorPos(1,7)
  126. mon.setBackgroundColor(colors.lime)
  127. mon.setTextColor(colors.black)
  128. mon.write(" ")
  129. mon.setBackgroundColor(colors.black)
  132. -- Button 2_1
  133. mon.setCursorPos(11,5)
  134. mon.setBackgroundColor(colors.lime)
  135. mon.setTextColor(colors.black)
  136. mon.write(" ")
  137. mon.setBackgroundColor(colors.black)
  138. mon.setCursorPos(11,6)
  139. mon.setBackgroundColor(colors.lime)
  140. mon.setTextColor(colors.black)
  141. mon.write(page1buttons.p2_1)
  142. mon.setBackgroundColor(colors.black)
  143. mon.setCursorPos(11,7)
  144. mon.setBackgroundColor(colors.lime)
  145. mon.setTextColor(colors.black)
  146. mon.write(" ")
  147. mon.setBackgroundColor(colors.black)
  150. -- Button 3_1
  151. mon.setCursorPos(21,5)
  152. mon.setBackgroundColor(colors.lime)
  153. mon.setTextColor(colors.black)
  154. mon.write(" ")
  155. mon.setBackgroundColor(colors.black)
  156. mon.setCursorPos(21,6)
  157. mon.setBackgroundColor(colors.lime)
  158. mon.setTextColor(colors.black)
  159. mon.write(page1buttons.p3_1)
  160. mon.setBackgroundColor(colors.black)
  161. mon.setCursorPos(21,7)
  162. mon.setBackgroundColor(colors.lime)
  163. mon.setTextColor(colors.black)
  164. mon.write(" ")
  165. mon.setBackgroundColor(colors.black)
  168. -- Button 4_1
  169. mon.setCursorPos(1,9)
  170. mon.setBackgroundColor(colors.lime)
  171. mon.setTextColor(colors.black)
  172. mon.write(" ")
  173. mon.setBackgroundColor(colors.black)
  174. mon.setCursorPos(1,10)
  175. mon.setBackgroundColor(colors.lime)
  176. mon.setTextColor(colors.black)
  177. mon.write(page1buttons.p4_1)
  178. mon.setBackgroundColor(colors.black)
  179. mon.setCursorPos(1,11)
  180. mon.setBackgroundColor(colors.lime)
  181. mon.setTextColor(colors.black)
  182. mon.write(" ")
  183. mon.setBackgroundColor(colors.black)
  186. -- Button 5_1
  187. mon.setCursorPos(11,9)
  188. mon.setBackgroundColor(colors.lime)
  189. mon.setTextColor(colors.black)
  190. mon.write(" ")
  191. mon.setBackgroundColor(colors.black)
  192. mon.setCursorPos(11,10)
  193. mon.setBackgroundColor(colors.lime)
  194. mon.setTextColor(colors.black)
  195. mon.write(page1buttons.p5_1)
  196. mon.setBackgroundColor(colors.black)
  197. mon.setCursorPos(11,11)
  198. mon.setBackgroundColor(colors.lime)
  199. mon.setTextColor(colors.black)
  200. mon.write(" ")
  201. mon.setBackgroundColor(colors.black)
  204. -- Button 6_1
  205. mon.setCursorPos(21,9)
  206. mon.setBackgroundColor(colors.lime)
  207. mon.setTextColor(colors.black)
  208. mon.write(" ")
  209. mon.setBackgroundColor(colors.black)
  210. mon.setCursorPos(21,10)
  211. mon.setBackgroundColor(colors.lime)
  212. mon.setTextColor(colors.black)
  213. mon.write(page1buttons.p6_1)
  214. mon.setBackgroundColor(colors.black)
  215. mon.setCursorPos(21,11)
  216. mon.setBackgroundColor(colors.lime)
  217. mon.setTextColor(colors.black)
  218. mon.write(" ")
  219. mon.setBackgroundColor(colors.black)
  222. -- Button 7_1
  223. mon.setCursorPos(1,13)
  224. mon.setBackgroundColor(colors.lime)
  225. mon.setTextColor(colors.black)
  226. mon.write(" ")
  227. mon.setBackgroundColor(colors.black)
  228. mon.setCursorPos(1,14)
  229. mon.setBackgroundColor(colors.lime)
  230. mon.setTextColor(colors.black)
  231. mon.write(page1buttons.p7_1)
  232. mon.setBackgroundColor(colors.black)
  233. mon.setCursorPos(1,15)
  234. mon.setBackgroundColor(colors.lime)
  235. mon.setTextColor(colors.black)
  236. mon.write(" ")
  237. mon.setBackgroundColor(colors.black)
  240. -- Button 8_1
  241. mon.setCursorPos(11,13)
  242. mon.setBackgroundColor(colors.lime)
  243. mon.setTextColor(colors.black)
  244. mon.write(" ")
  245. mon.setBackgroundColor(colors.black)
  246. mon.setCursorPos(11,14)
  247. mon.setBackgroundColor(colors.lime)
  248. mon.setTextColor(colors.black)
  249. mon.write(page1buttons.p8_1)
  250. mon.setBackgroundColor(colors.black)
  251. mon.setCursorPos(11,15)
  252. mon.setBackgroundColor(colors.lime)
  253. mon.setTextColor(colors.black)
  254. mon.write(" ")
  255. mon.setBackgroundColor(colors.black)
  258. -- Button 9_1
  259. mon.setCursorPos(21,13)
  260. mon.setBackgroundColor(colors.lime)
  261. mon.setTextColor(colors.black)
  262. mon.write(" ")
  263. mon.setBackgroundColor(colors.black)
  264. mon.setCursorPos(21,14)
  265. mon.setBackgroundColor(colors.lime)
  266. mon.setTextColor(colors.black)
  267. mon.write(page1buttons.p9_1)
  268. mon.setBackgroundColor(colors.black)
  269. mon.setCursorPos(21,15)
  270. mon.setBackgroundColor(colors.lime)
  271. mon.setTextColor(colors.black)
  272. mon.write(" ")
  273. mon.setBackgroundColor(colors.black)
  276. -- Button 10_1
  277. mon.setCursorPos(1,17)
  278. mon.setBackgroundColor(colors.lime)
  279. mon.setTextColor(colors.black)
  280. mon.write(" ")
  281. mon.setBackgroundColor(colors.black)
  282. mon.setCursorPos(1,18)
  283. mon.setBackgroundColor(colors.lime)
  284. mon.setTextColor(colors.black)
  285. mon.write(page1buttons.p10_1)
  286. mon.setBackgroundColor(colors.black)
  287. mon.setCursorPos(1,19)
  288. mon.setBackgroundColor(colors.lime)
  289. mon.setTextColor(colors.black)
  290. mon.write(" ")
  291. mon.setBackgroundColor(colors.black)
  294. -- Button 11_1
  295. mon.setCursorPos(11,17)
  296. mon.setBackgroundColor(colors.lime)
  297. mon.setTextColor(colors.black)
  298. mon.write(" ")
  299. mon.setBackgroundColor(colors.black)
  300. mon.setCursorPos(11,18)
  301. mon.setBackgroundColor(colors.lime)
  302. mon.setTextColor(colors.black)
  303. mon.write(page1buttons.p11_1)
  304. mon.setBackgroundColor(colors.black)
  305. mon.setCursorPos(11,19)
  306. mon.setBackgroundColor(colors.lime)
  307. mon.setTextColor(colors.black)
  308. mon.write(" ")
  309. mon.setBackgroundColor(colors.black)
  312. -- Button 12_1
  313. mon.setCursorPos(21,17)
  314. mon.setBackgroundColor(colors.lime)
  315. mon.setTextColor(colors.black)
  316. mon.write(" ")
  317. mon.setBackgroundColor(colors.black)
  318. mon.setCursorPos(21,18)
  319. mon.setBackgroundColor(colors.lime)
  320. mon.setTextColor(colors.black)
  321. mon.write(page1buttons.p12_1)
  322. mon.setBackgroundColor(colors.black)
  323. mon.setCursorPos(21,19)
  324. mon.setBackgroundColor(colors.lime)
  325. mon.setTextColor(colors.black)
  326. mon.write(" ")
  327. mon.setBackgroundColor(colors.black)
  330. elseif (screen == 2) then
  331. mon.clear()
  332. mon.setBackgroundColor(colors.black)
  333. mon.setCursorPos(1,1)
  334. mon.setBackgroundColor(colors.gray)
  335. mon.setTextColor(colors.white)
  336. mon.write(" ")
  337. mon.setBackgroundColor(colors.black)
  338. mon.setCursorPos(1,2)
  339. mon.setBackgroundColor(colors.gray)
  340. mon.write(" Page: 2:4 ")
  341. mon.setBackgroundColor(colors.black)
  342. mon.setCursorPos(1,3)
  343. mon.setBackgroundColor(colors.gray)
  344. mon.write(" ")
  345. mon.setBackgroundColor(colors.black)
  347. --Page Advance button
  348. mon.setBackgroundColor(colors.black)
  349. mon.setCursorPos(24,1)
  350. mon.setBackgroundColor(colors.gray)
  351. mon.setTextColor(colors.lime)
  352. mon.write(" ")
  353. mon.setBackgroundColor(colors.black)
  354. mon.setCursorPos(24,2)
  355. mon.setBackgroundColor(colors.gray)
  356. mon.write(" Next ")
  357. mon.setBackgroundColor(colors.black)
  358. mon.setCursorPos(24,3)
  359. mon.setBackgroundColor(colors.gray)
  360. mon.write(" ")
  361. mon.setBackgroundColor(colors.black)
  363. -- Page decrease button
  364. mon.setBackgroundColor(colors.black)
  365. mon.setCursorPos(1,1)
  366. mon.setBackgroundColor(colors.gray)
  367. mon.setTextColor(colors.lime)
  368. mon.write(" ")
  369. mon.setBackgroundColor(colors.black)
  370. mon.setCursorPos(1,2)
  371. mon.setBackgroundColor(colors.gray)
  372. mon.write(" Back ")
  373. mon.setBackgroundColor(colors.black)
  374. mon.setCursorPos(1,3)
  375. mon.setBackgroundColor(colors.gray)
  376. mon.write(" ")
  377. mon.setBackgroundColor(colors.black)
  380. -- Button 1_2
  381. mon.setCursorPos(1,5)
  382. mon.setBackgroundColor(colors.lime)
  383. mon.setTextColor(colors.black)
  384. mon.write(" ")
  385. mon.setBackgroundColor(colors.black)
  386. mon.setCursorPos(1,6)
  387. mon.setBackgroundColor(colors.lime)
  388. mon.setTextColor(colors.black)
  389. mon.write(page1buttons.p1_2)
  390. mon.setBackgroundColor(colors.black)
  391. mon.setCursorPos(1,7)
  392. mon.setBackgroundColor(colors.lime)
  393. mon.setTextColor(colors.black)
  394. mon.write(" ")
  395. mon.setBackgroundColor(colors.black)
  398. -- Button 2_2
  399. mon.setCursorPos(11,5)
  400. mon.setBackgroundColor(colors.lime)
  401. mon.setTextColor(colors.black)
  402. mon.write(" ")
  403. mon.setBackgroundColor(colors.black)
  404. mon.setCursorPos(11,6)
  405. mon.setBackgroundColor(colors.lime)
  406. mon.setTextColor(colors.black)
  407. mon.write(page1buttons.p2_2)
  408. mon.setBackgroundColor(colors.black)
  409. mon.setCursorPos(11,7)
  410. mon.setBackgroundColor(colors.lime)
  411. mon.setTextColor(colors.black)
  412. mon.write(" ")
  413. mon.setBackgroundColor(colors.black)
  416. -- Button 3_2
  417. mon.setCursorPos(21,5)
  418. mon.setBackgroundColor(colors.lime)
  419. mon.setTextColor(colors.black)
  420. mon.write(" ")
  421. mon.setBackgroundColor(colors.black)
  422. mon.setCursorPos(21,6)
  423. mon.setBackgroundColor(colors.lime)
  424. mon.setTextColor(colors.black)
  425. mon.write(page1buttons.p3_2)
  426. mon.setBackgroundColor(colors.black)
  427. mon.setCursorPos(21,7)
  428. mon.setBackgroundColor(colors.lime)
  429. mon.setTextColor(colors.black)
  430. mon.write(" ")
  431. mon.setBackgroundColor(colors.black)
  434. -- Button 4_2
  435. mon.setCursorPos(1,9)
  436. mon.setBackgroundColor(colors.lime)
  437. mon.setTextColor(colors.black)
  438. mon.write(" ")
  439. mon.setBackgroundColor(colors.black)
  440. mon.setCursorPos(1,10)
  441. mon.setBackgroundColor(colors.lime)
  442. mon.setTextColor(colors.black)
  443. mon.write(page1buttons.p4_2)
  444. mon.setBackgroundColor(colors.black)
  445. mon.setCursorPos(1,11)
  446. mon.setBackgroundColor(colors.lime)
  447. mon.setTextColor(colors.black)
  448. mon.write(" ")
  449. mon.setBackgroundColor(colors.black)
  452. -- Button 5_2
  453. mon.setCursorPos(11,9)
  454. mon.setBackgroundColor(colors.lime)
  455. mon.setTextColor(colors.black)
  456. mon.write(" ")
  457. mon.setBackgroundColor(colors.black)
  458. mon.setCursorPos(11,10)
  459. mon.setBackgroundColor(colors.lime)
  460. mon.setTextColor(colors.black)
  461. mon.write(page1buttons.p5_2)
  462. mon.setBackgroundColor(colors.black)
  463. mon.setCursorPos(11,11)
  464. mon.setBackgroundColor(colors.lime)
  465. mon.setTextColor(colors.black)
  466. mon.write(" ")
  467. mon.setBackgroundColor(colors.black)
  470. -- Button 6_2
  471. mon.setCursorPos(21,9)
  472. mon.setBackgroundColor(colors.lime)
  473. mon.setTextColor(colors.black)
  474. mon.write(" ")
  475. mon.setBackgroundColor(colors.black)
  476. mon.setCursorPos(21,10)
  477. mon.setBackgroundColor(colors.lime)
  478. mon.setTextColor(colors.black)
  479. mon.write(page1buttons.p6_2)
  480. mon.setBackgroundColor(colors.black)
  481. mon.setCursorPos(21,11)
  482. mon.setBackgroundColor(colors.lime)
  483. mon.setTextColor(colors.black)
  484. mon.write(" ")
  485. mon.setBackgroundColor(colors.black)
  488. -- Button 7_2
  489. mon.setCursorPos(1,13)
  490. mon.setBackgroundColor(colors.lime)
  491. mon.setTextColor(colors.black)
  492. mon.write(" ")
  493. mon.setBackgroundColor(colors.black)
  494. mon.setCursorPos(1,14)
  495. mon.setBackgroundColor(colors.lime)
  496. mon.setTextColor(colors.black)
  497. mon.write(page1buttons.p7_2)
  498. mon.setBackgroundColor(colors.black)
  499. mon.setCursorPos(1,15)
  500. mon.setBackgroundColor(colors.lime)
  501. mon.setTextColor(colors.black)
  502. mon.write(" ")
  503. mon.setBackgroundColor(colors.black)
  506. -- Button 8_2
  507. mon.setCursorPos(11,13)
  508. mon.setBackgroundColor(colors.lime)
  509. mon.setTextColor(colors.black)
  510. mon.write(" ")
  511. mon.setBackgroundColor(colors.black)
  512. mon.setCursorPos(11,14)
  513. mon.setBackgroundColor(colors.lime)
  514. mon.setTextColor(colors.black)
  515. mon.write(page1buttons.p8_2)
  516. mon.setBackgroundColor(colors.black)
  517. mon.setCursorPos(11,15)
  518. mon.setBackgroundColor(colors.lime)
  519. mon.setTextColor(colors.black)
  520. mon.write(" ")
  521. mon.setBackgroundColor(colors.black)
  524. -- Button 9_2
  525. mon.setCursorPos(21,13)
  526. mon.setBackgroundColor(colors.lime)
  527. mon.setTextColor(colors.black)
  528. mon.write(" ")
  529. mon.setBackgroundColor(colors.black)
  530. mon.setCursorPos(21,14)
  531. mon.setBackgroundColor(colors.lime)
  532. mon.setTextColor(colors.black)
  533. mon.write(page1buttons.p9_2)
  534. mon.setBackgroundColor(colors.black)
  535. mon.setCursorPos(21,15)
  536. mon.setBackgroundColor(colors.lime)
  537. mon.setTextColor(colors.black)
  538. mon.write(" ")
  539. mon.setBackgroundColor(colors.black)
  542. -- Button 10_2
  543. mon.setCursorPos(1,17)
  544. mon.setBackgroundColor(colors.lime)
  545. mon.setTextColor(colors.black)
  546. mon.write(" ")
  547. mon.setBackgroundColor(colors.black)
  548. mon.setCursorPos(1,18)
  549. mon.setBackgroundColor(colors.lime)
  550. mon.setTextColor(colors.black)
  551. mon.write(page1buttons.p10_2)
  552. mon.setBackgroundColor(colors.black)
  553. mon.setCursorPos(1,19)
  554. mon.setBackgroundColor(colors.lime)
  555. mon.setTextColor(colors.black)
  556. mon.write(" ")
  557. mon.setBackgroundColor(colors.black)
  560. -- Button 11_2
  561. mon.setCursorPos(11,17)
  562. mon.setBackgroundColor(colors.lime)
  563. mon.setTextColor(colors.black)
  564. mon.write(" ")
  565. mon.setBackgroundColor(colors.black)
  566. mon.setCursorPos(11,18)
  567. mon.setBackgroundColor(colors.lime)
  568. mon.setTextColor(colors.black)
  569. mon.write(page1buttons.p11_2)
  570. mon.setBackgroundColor(colors.black)
  571. mon.setCursorPos(11,19)
  572. mon.setBackgroundColor(colors.lime)
  573. mon.setTextColor(colors.black)
  574. mon.write(" ")
  575. mon.setBackgroundColor(colors.black)
  578. -- Button 12_2
  579. mon.setCursorPos(21,17)
  580. mon.setBackgroundColor(colors.lime)
  581. mon.setTextColor(colors.black)
  582. mon.write(" ")
  583. mon.setBackgroundColor(colors.black)
  584. mon.setCursorPos(21,18)
  585. mon.setBackgroundColor(colors.lime)
  586. mon.setTextColor(colors.black)
  587. mon.write(page1buttons.p12_2)
  588. mon.setBackgroundColor(colors.black)
  589. mon.setCursorPos(21,19)
  590. mon.setBackgroundColor(colors.lime)
  591. mon.setTextColor(colors.black)
  592. mon.write(" ")
  593. mon.setBackgroundColor(colors.black)
  596. elseif (screen == 3) then
  597. mon.clear()
  598. mon.setBackgroundColor(colors.black)
  599. mon.setCursorPos(1,1)
  600. mon.setBackgroundColor(colors.gray)
  601. mon.setTextColor(colors.white)
  602. mon.write(" ")
  603. mon.setBackgroundColor(colors.black)
  604. mon.setCursorPos(1,2)
  605. mon.setBackgroundColor(colors.gray)
  606. mon.write(" Page: 3:4 ")
  607. mon.setBackgroundColor(colors.black)
  608. mon.setCursorPos(1,3)
  609. mon.setBackgroundColor(colors.gray)
  610. mon.write(" ")
  611. mon.setBackgroundColor(colors.black)
  613. --Page Advance button
  614. mon.setBackgroundColor(colors.black)
  615. mon.setCursorPos(24,1)
  616. mon.setBackgroundColor(colors.gray)
  617. mon.setTextColor(colors.lime)
  618. mon.write(" ")
  619. mon.setBackgroundColor(colors.black)
  620. mon.setCursorPos(24,2)
  621. mon.setBackgroundColor(colors.gray)
  622. mon.write(" Next ")
  623. mon.setBackgroundColor(colors.black)
  624. mon.setCursorPos(24,3)
  625. mon.setBackgroundColor(colors.gray)
  626. mon.write(" ")
  627. mon.setBackgroundColor(colors.black)
  629. -- Page decrease button
  630. mon.setBackgroundColor(colors.black)
  631. mon.setCursorPos(1,1)
  632. mon.setBackgroundColor(colors.gray)
  633. mon.setTextColor(colors.lime)
  634. mon.write(" ")
  635. mon.setBackgroundColor(colors.black)
  636. mon.setCursorPos(1,2)
  637. mon.setBackgroundColor(colors.gray)
  638. mon.write(" Back ")
  639. mon.setBackgroundColor(colors.black)
  640. mon.setCursorPos(1,3)
  641. mon.setBackgroundColor(colors.gray)
  642. mon.write(" ")
  643. mon.setBackgroundColor(colors.black)
  646. -- Button 1_3
  647. mon.setCursorPos(1,5)
  648. mon.setBackgroundColor(colors.lime)
  649. mon.setTextColor(colors.black)
  650. mon.write(" ")
  651. mon.setBackgroundColor(colors.black)
  652. mon.setCursorPos(1,6)
  653. mon.setBackgroundColor(colors.lime)
  654. mon.setTextColor(colors.black)
  655. mon.write(page1buttons.p1_3)
  656. mon.setBackgroundColor(colors.black)
  657. mon.setCursorPos(1,7)
  658. mon.setBackgroundColor(colors.lime)
  659. mon.setTextColor(colors.black)
  660. mon.write(" ")
  661. mon.setBackgroundColor(colors.black)
  664. -- Button 2_3
  665. mon.setCursorPos(11,5)
  666. mon.setBackgroundColor(colors.lime)
  667. mon.setTextColor(colors.black)
  668. mon.write(" ")
  669. mon.setBackgroundColor(colors.black)
  670. mon.setCursorPos(11,6)
  671. mon.setBackgroundColor(colors.lime)
  672. mon.setTextColor(colors.black)
  673. mon.write(page1buttons.p2_3)
  674. mon.setBackgroundColor(colors.black)
  675. mon.setCursorPos(11,7)
  676. mon.setBackgroundColor(colors.lime)
  677. mon.setTextColor(colors.black)
  678. mon.write(" ")
  679. mon.setBackgroundColor(colors.black)
  682. -- Button 3_3
  683. mon.setCursorPos(21,5)
  684. mon.setBackgroundColor(colors.lime)
  685. mon.setTextColor(colors.black)
  686. mon.write(" ")
  687. mon.setBackgroundColor(colors.black)
  688. mon.setCursorPos(21,6)
  689. mon.setBackgroundColor(colors.lime)
  690. mon.setTextColor(colors.black)
  691. mon.write(page1buttons.p3_3)
  692. mon.setBackgroundColor(colors.black)
  693. mon.setCursorPos(21,7)
  694. mon.setBackgroundColor(colors.lime)
  695. mon.setTextColor(colors.black)
  696. mon.write(" ")
  697. mon.setBackgroundColor(colors.black)
  700. -- Button 4_3
  701. mon.setCursorPos(1,9)
  702. mon.setBackgroundColor(colors.lime)
  703. mon.setTextColor(colors.black)
  704. mon.write(" ")
  705. mon.setBackgroundColor(colors.black)
  706. mon.setCursorPos(1,10)
  707. mon.setBackgroundColor(colors.lime)
  708. mon.setTextColor(colors.black)
  709. mon.write(page1buttons.p4_3)
  710. mon.setBackgroundColor(colors.black)
  711. mon.setCursorPos(1,11)
  712. mon.setBackgroundColor(colors.lime)
  713. mon.setTextColor(colors.black)
  714. mon.write(" ")
  715. mon.setBackgroundColor(colors.black)
  718. -- Button 5_3
  719. mon.setCursorPos(11,9)
  720. mon.setBackgroundColor(colors.lime)
  721. mon.setTextColor(colors.black)
  722. mon.write(" ")
  723. mon.setBackgroundColor(colors.black)
  724. mon.setCursorPos(11,10)
  725. mon.setBackgroundColor(colors.lime)
  726. mon.setTextColor(colors.black)
  727. mon.write(page1buttons.p5_3)
  728. mon.setBackgroundColor(colors.black)
  729. mon.setCursorPos(11,11)
  730. mon.setBackgroundColor(colors.lime)
  731. mon.setTextColor(colors.black)
  732. mon.write(" ")
  733. mon.setBackgroundColor(colors.black)
  736. -- Button 6_3
  737. mon.setCursorPos(21,9)
  738. mon.setBackgroundColor(colors.lime)
  739. mon.setTextColor(colors.black)
  740. mon.write(" ")
  741. mon.setBackgroundColor(colors.black)
  742. mon.setCursorPos(21,10)
  743. mon.setBackgroundColor(colors.lime)
  744. mon.setTextColor(colors.black)
  745. mon.write(page1buttons.p6_3)
  746. mon.setBackgroundColor(colors.black)
  747. mon.setCursorPos(21,11)
  748. mon.setBackgroundColor(colors.lime)
  749. mon.setTextColor(colors.black)
  750. mon.write(" ")
  751. mon.setBackgroundColor(colors.black)
  754. -- Button 7_3
  755. mon.setCursorPos(1,13)
  756. mon.setBackgroundColor(colors.lime)
  757. mon.setTextColor(colors.black)
  758. mon.write(" ")
  759. mon.setBackgroundColor(colors.black)
  760. mon.setCursorPos(1,14)
  761. mon.setBackgroundColor(colors.lime)
  762. mon.setTextColor(colors.black)
  763. mon.write(page1buttons.p7_3)
  764. mon.setBackgroundColor(colors.black)
  765. mon.setCursorPos(1,15)
  766. mon.setBackgroundColor(colors.lime)
  767. mon.setTextColor(colors.black)
  768. mon.write(" ")
  769. mon.setBackgroundColor(colors.black)
  772. -- Button 8_3
  773. mon.setCursorPos(11,13)
  774. mon.setBackgroundColor(colors.lime)
  775. mon.setTextColor(colors.black)
  776. mon.write(" ")
  777. mon.setBackgroundColor(colors.black)
  778. mon.setCursorPos(11,14)
  779. mon.setBackgroundColor(colors.lime)
  780. mon.setTextColor(colors.black)
  781. mon.write(page1buttons.p8_3)
  782. mon.setBackgroundColor(colors.black)
  783. mon.setCursorPos(11,15)
  784. mon.setBackgroundColor(colors.lime)
  785. mon.setTextColor(colors.black)
  786. mon.write(" ")
  787. mon.setBackgroundColor(colors.black)
  790. -- Button 9_3
  791. mon.setCursorPos(21,13)
  792. mon.setBackgroundColor(colors.lime)
  793. mon.setTextColor(colors.black)
  794. mon.write(" ")
  795. mon.setBackgroundColor(colors.black)
  796. mon.setCursorPos(21,14)
  797. mon.setBackgroundColor(colors.lime)
  798. mon.setTextColor(colors.black)
  799. mon.write(page1buttons.p9_3)
  800. mon.setBackgroundColor(colors.black)
  801. mon.setCursorPos(21,15)
  802. mon.setBackgroundColor(colors.lime)
  803. mon.setTextColor(colors.black)
  804. mon.write(" ")
  805. mon.setBackgroundColor(colors.black)
  808. -- Button 10_3
  809. mon.setCursorPos(1,17)
  810. mon.setBackgroundColor(colors.lime)
  811. mon.setTextColor(colors.black)
  812. mon.write(" ")
  813. mon.setBackgroundColor(colors.black)
  814. mon.setCursorPos(1,18)
  815. mon.setBackgroundColor(colors.lime)
  816. mon.setTextColor(colors.black)
  817. mon.write(page1buttons.p10_3)
  818. mon.setBackgroundColor(colors.black)
  819. mon.setCursorPos(1,19)
  820. mon.setBackgroundColor(colors.lime)
  821. mon.setTextColor(colors.black)
  822. mon.write(" ")
  823. mon.setBackgroundColor(colors.black)
  826. -- Button 11_3
  827. mon.setCursorPos(11,17)
  828. mon.setBackgroundColor(colors.lime)
  829. mon.setTextColor(colors.black)
  830. mon.write(" ")
  831. mon.setBackgroundColor(colors.black)
  832. mon.setCursorPos(11,18)
  833. mon.setBackgroundColor(colors.lime)
  834. mon.setTextColor(colors.black)
  835. mon.write(page1buttons.p11_3)
  836. mon.setBackgroundColor(colors.black)
  837. mon.setCursorPos(11,19)
  838. mon.setBackgroundColor(colors.lime)
  839. mon.setTextColor(colors.black)
  840. mon.write(" ")
  841. mon.setBackgroundColor(colors.black)
  844. -- Button 12_3
  845. mon.setCursorPos(21,17)
  846. mon.setBackgroundColor(colors.lime)
  847. mon.setTextColor(colors.black)
  848. mon.write(" ")
  849. mon.setBackgroundColor(colors.black)
  850. mon.setCursorPos(21,18)
  851. mon.setBackgroundColor(colors.lime)
  852. mon.setTextColor(colors.black)
  853. mon.write(page1buttons.p12_3)
  854. mon.setBackgroundColor(colors.black)
  855. mon.setCursorPos(21,19)
  856. mon.setBackgroundColor(colors.lime)
  857. mon.setTextColor(colors.black)
  858. mon.write(" ")
  859. mon.setBackgroundColor(colors.black)
  862. elseif (screen == 4) then
  863. mon.clear()
  864. mon.setBackgroundColor(colors.black)
  865. mon.setCursorPos(1,1)
  866. mon.setBackgroundColor(colors.gray)
  867. mon.setTextColor(colors.white)
  868. mon.write(" ")
  869. mon.setBackgroundColor(colors.black)
  870. mon.setCursorPos(1,2)
  871. mon.setBackgroundColor(colors.gray)
  872. mon.write(" Page: 4:4 ")
  873. mon.setBackgroundColor(colors.black)
  874. mon.setCursorPos(1,3)
  875. mon.setBackgroundColor(colors.gray)
  876. mon.write(" ")
  877. mon.setBackgroundColor(colors.black)
  879. --Page Advance button
  880. mon.setBackgroundColor(colors.black)
  881. mon.setCursorPos(24,1)
  882. mon.setBackgroundColor(colors.gray)
  883. mon.setTextColor(colors.lime)
  884. mon.write(" ")
  885. mon.setBackgroundColor(colors.black)
  886. mon.setCursorPos(24,2)
  887. mon.setBackgroundColor(colors.gray)
  888. mon.write(" Next ")
  889. mon.setBackgroundColor(colors.black)
  890. mon.setCursorPos(24,3)
  891. mon.setBackgroundColor(colors.gray)
  892. mon.write(" ")
  893. mon.setBackgroundColor(colors.black)
  895. -- Page decrease button
  896. mon.setBackgroundColor(colors.black)
  897. mon.setCursorPos(1,1)
  898. mon.setBackgroundColor(colors.gray)
  899. mon.setTextColor(colors.lime)
  900. mon.write(" ")
  901. mon.setBackgroundColor(colors.black)
  902. mon.setCursorPos(1,2)
  903. mon.setBackgroundColor(colors.gray)
  904. mon.write(" Back ")
  905. mon.setBackgroundColor(colors.black)
  906. mon.setCursorPos(1,3)
  907. mon.setBackgroundColor(colors.gray)
  908. mon.write(" ")
  909. mon.setBackgroundColor(colors.black)
  912. -- Button 1_4
  913. mon.setCursorPos(1,5)
  914. mon.setBackgroundColor(colors.lime)
  915. mon.setTextColor(colors.black)
  916. mon.write(" ")
  917. mon.setBackgroundColor(colors.black)
  918. mon.setCursorPos(1,6)
  919. mon.setBackgroundColor(colors.lime)
  920. mon.setTextColor(colors.black)
  921. mon.write(page1buttons.p1_4)
  922. mon.setBackgroundColor(colors.black)
  923. mon.setCursorPos(1,7)
  924. mon.setBackgroundColor(colors.lime)
  925. mon.setTextColor(colors.black)
  926. mon.write(" ")
  927. mon.setBackgroundColor(colors.black)
  930. -- Button 2_4
  931. mon.setCursorPos(11,5)
  932. mon.setBackgroundColor(colors.lime)
  933. mon.setTextColor(colors.black)
  934. mon.write(" ")
  935. mon.setBackgroundColor(colors.black)
  936. mon.setCursorPos(11,6)
  937. mon.setBackgroundColor(colors.lime)
  938. mon.setTextColor(colors.black)
  939. mon.write(page1buttons.p2_4)
  940. mon.setBackgroundColor(colors.black)
  941. mon.setCursorPos(11,7)
  942. mon.setBackgroundColor(colors.lime)
  943. mon.setTextColor(colors.black)
  944. mon.write(" ")
  945. mon.setBackgroundColor(colors.black)
  948. -- Button 3_4
  949. mon.setCursorPos(21,5)
  950. mon.setBackgroundColor(colors.lime)
  951. mon.setTextColor(colors.black)
  952. mon.write(" ")
  953. mon.setBackgroundColor(colors.black)
  954. mon.setCursorPos(21,6)
  955. mon.setBackgroundColor(colors.lime)
  956. mon.setTextColor(colors.black)
  957. mon.write(page1buttons.p3_4)
  958. mon.setBackgroundColor(colors.black)
  959. mon.setCursorPos(21,7)
  960. mon.setBackgroundColor(colors.lime)
  961. mon.setTextColor(colors.black)
  962. mon.write(" ")
  963. mon.setBackgroundColor(colors.black)
  966. -- Button 4_4
  967. mon.setCursorPos(1,9)
  968. mon.setBackgroundColor(colors.lime)
  969. mon.setTextColor(colors.black)
  970. mon.write(" ")
  971. mon.setBackgroundColor(colors.black)
  972. mon.setCursorPos(1,10)
  973. mon.setBackgroundColor(colors.lime)
  974. mon.setTextColor(colors.black)
  975. mon.write(page1buttons.p4_4)
  976. mon.setBackgroundColor(colors.black)
  977. mon.setCursorPos(1,11)
  978. mon.setBackgroundColor(colors.lime)
  979. mon.setTextColor(colors.black)
  980. mon.write(" ")
  981. mon.setBackgroundColor(colors.black)
  984. -- Button 5_4
  985. mon.setCursorPos(11,9)
  986. mon.setBackgroundColor(colors.lime)
  987. mon.setTextColor(colors.black)
  988. mon.write(" ")
  989. mon.setBackgroundColor(colors.black)
  990. mon.setCursorPos(11,10)
  991. mon.setBackgroundColor(colors.lime)
  992. mon.setTextColor(colors.black)
  993. mon.write(page1buttons.p5_4)
  994. mon.setBackgroundColor(colors.black)
  995. mon.setCursorPos(11,11)
  996. mon.setBackgroundColor(colors.lime)
  997. mon.setTextColor(colors.black)
  998. mon.write(" ")
  999. mon.setBackgroundColor(colors.black)
  1002. -- Button 6_4
  1003. mon.setCursorPos(21,9)
  1004. mon.setBackgroundColor(colors.lime)
  1005. mon.setTextColor(colors.black)
  1006. mon.write(" ")
  1007. mon.setBackgroundColor(colors.black)
  1008. mon.setCursorPos(21,10)
  1009. mon.setBackgroundColor(colors.lime)
  1010. mon.setTextColor(colors.black)
  1011. mon.write(page1buttons.p6_4)
  1012. mon.setBackgroundColor(colors.black)
  1013. mon.setCursorPos(21,11)
  1014. mon.setBackgroundColor(colors.lime)
  1015. mon.setTextColor(colors.black)
  1016. mon.write(" ")
  1017. mon.setBackgroundColor(colors.black)
  1020. -- Button 7_4
  1021. mon.setCursorPos(1,13)
  1022. mon.setBackgroundColor(colors.lime)
  1023. mon.setTextColor(colors.black)
  1024. mon.write(" ")
  1025. mon.setBackgroundColor(colors.black)
  1026. mon.setCursorPos(1,14)
  1027. mon.setBackgroundColor(colors.lime)
  1028. mon.setTextColor(colors.black)
  1029. mon.write(page1buttons.p7_4)
  1030. mon.setBackgroundColor(colors.black)
  1031. mon.setCursorPos(1,15)
  1032. mon.setBackgroundColor(colors.lime)
  1033. mon.setTextColor(colors.black)
  1034. mon.write(" ")
  1035. mon.setBackgroundColor(colors.black)
  1038. -- Button 8_4
  1039. mon.setCursorPos(11,13)
  1040. mon.setBackgroundColor(colors.lime)
  1041. mon.setTextColor(colors.black)
  1042. mon.write(" ")
  1043. mon.setBackgroundColor(colors.black)
  1044. mon.setCursorPos(11,14)
  1045. mon.setBackgroundColor(colors.lime)
  1046. mon.setTextColor(colors.black)
  1047. mon.write(page1buttons.p8_4)
  1048. mon.setBackgroundColor(colors.black)
  1049. mon.setCursorPos(11,15)
  1050. mon.setBackgroundColor(colors.lime)
  1051. mon.setTextColor(colors.black)
  1052. mon.write(" ")
  1053. mon.setBackgroundColor(colors.black)
  1056. -- Button 9_4
  1057. mon.setCursorPos(21,13)
  1058. mon.setBackgroundColor(colors.lime)
  1059. mon.setTextColor(colors.black)
  1060. mon.write(" ")
  1061. mon.setBackgroundColor(colors.black)
  1062. mon.setCursorPos(21,14)
  1063. mon.setBackgroundColor(colors.lime)
  1064. mon.setTextColor(colors.black)
  1065. mon.write(page1buttons.p9_4)
  1066. mon.setBackgroundColor(colors.black)
  1067. mon.setCursorPos(21,15)
  1068. mon.setBackgroundColor(colors.lime)
  1069. mon.setTextColor(colors.black)
  1070. mon.write(" ")
  1071. mon.setBackgroundColor(colors.black)
  1074. -- Button 10_4
  1075. mon.setCursorPos(1,17)
  1076. mon.setBackgroundColor(colors.lime)
  1077. mon.setTextColor(colors.black)
  1078. mon.write(" ")
  1079. mon.setBackgroundColor(colors.black)
  1080. mon.setCursorPos(1,18)
  1081. mon.setBackgroundColor(colors.lime)
  1082. mon.setTextColor(colors.black)
  1083. mon.write(page1buttons.p10_4)
  1084. mon.setBackgroundColor(colors.black)
  1085. mon.setCursorPos(1,19)
  1086. mon.setBackgroundColor(colors.lime)
  1087. mon.setTextColor(colors.black)
  1088. mon.write(" ")
  1089. mon.setBackgroundColor(colors.black)
  1092. -- Button 11_4
  1093. mon.setCursorPos(11,17)
  1094. mon.setBackgroundColor(colors.lime)
  1095. mon.setTextColor(colors.black)
  1096. mon.write(" ")
  1097. mon.setBackgroundColor(colors.black)
  1098. mon.setCursorPos(11,18)
  1099. mon.setBackgroundColor(colors.lime)
  1100. mon.setTextColor(colors.black)
  1101. mon.write(page1buttons.p11_4)
  1102. mon.setBackgroundColor(colors.black)
  1103. mon.setCursorPos(11,19)
  1104. mon.setBackgroundColor(colors.lime)
  1105. mon.setTextColor(colors.black)
  1106. mon.write(" ")
  1107. mon.setBackgroundColor(colors.black)
  1110. -- Button 12_4
  1111. mon.setCursorPos(21,17)
  1112. mon.setBackgroundColor(colors.lime)
  1113. mon.setTextColor(colors.black)
  1114. mon.write(" ")
  1115. mon.setBackgroundColor(colors.black)
  1116. mon.setCursorPos(21,18)
  1117. mon.setBackgroundColor(colors.lime)
  1118. mon.setTextColor(colors.black)
  1119. mon.write(page1buttons.p12_4)
  1120. mon.setBackgroundColor(colors.black)
  1121. mon.setCursorPos(21,19)
  1122. mon.setBackgroundColor(colors.lime)
  1123. mon.setTextColor(colors.black)
  1124. mon.write(" ")
  1125. mon.setBackgroundColor(colors.black)
  1127. end
  1128. end
  1130. function portalMessage()
  1131. mon.setCursorPos(4,9)
  1132. mon.setBackgroundColor(colors.gray)
  1133. mon.write(" ")
  1134. mon.setCursorPos(4,10)
  1135. mon.write(" ")
  1136. mon.setCursorPos(4,11)
  1137. mon.write(" ")
  1138. mon.setCursorPos(4,12)
  1139. mon.write(" Pleas wait! ")
  1140. mon.setCursorPos(4,13)
  1141. mon.write(" ")
  1142. mon.setCursorPos(4,11)
  1143. mon.setTextColor(colors.red)
  1144. mon.write(" Opening portal... . ")
  1145. mon.setBackgroundColor(colors.black)
  1146. end
  1149. drawGUI()
  1151. while true do
  1152. event, side, x, y = os.pullEvent("monitor_touch")
  1153. channel = 11
  1154. if (screen == 1) then
  1155. -- Button 1_1 pressed
  1156. if (y >= 5 and y <= 7) and (x >= 1 and x <= 10) then
  1157. mon.setCursorPos(1,5)
  1158. mon.setBackgroundColor(colors.gray)
  1159. mon.setTextColor(colors.black)
  1160. mon.write(" ")
  1161. mon.setBackgroundColor(colors.black)
  1162. mon.setCursorPos(1,6)
  1163. mon.setBackgroundColor(colors.gray)
  1164. mon.setTextColor(colors.black)
  1165. mon.write(page1buttons.p1_1)
  1166. mon.setBackgroundColor(colors.gray)
  1167. mon.setCursorPos(1,7)
  1168. mon.setBackgroundColor(colors.gray)
  1169. mon.setTextColor(colors.black)
  1170. mon.write(" ")
  1171. mon.setBackgroundColor(colors.black)
  1172. sleep(1)
  1173. portalMessage()
  1174. modem.transmit(11,99,"button1")
  1175. sleep(1)
  1176. drawGUI()
  1177. sleep(3)
  1180. -- Button 2_1 pressed
  1181. elseif (y >= 5 and y <= 7) and (x >= 11 and x <= 20) then
  1182. mon.setCursorPos(11,5)
  1183. mon.setBackgroundColor(colors.gray)
  1184. mon.setTextColor(colors.black)
  1185. mon.write(" ")
  1186. mon.setBackgroundColor(colors.black)
  1187. mon.setCursorPos(11,6)
  1188. mon.setBackgroundColor(colors.gray)
  1189. mon.setTextColor(colors.black)
  1190. mon.write(page1buttons.p2_1)
  1191. mon.setBackgroundColor(colors.black)
  1192. mon.setCursorPos(11,7)
  1193. mon.setBackgroundColor(colors.gray)
  1194. mon.setTextColor(colors.black)
  1195. mon.write(" ")
  1196. mon.setBackgroundColor(colors.black)
  1197. sleep(1)
  1198. portalMessage()
  1199. modem.transmit(11,99,"button2")
  1200. sleep(1)
  1201. drawGUI()
  1202. sleep(3)
  1205. -- Button 3_1 pressed
  1206. elseif (y >= 5 and y <= 7) and (x >= 21 and x <= 30) then
  1207. mon.setCursorPos(21,5)
  1208. mon.setBackgroundColor(colors.gray)
  1209. mon.setTextColor(colors.black)
  1210. mon.write(" ")
  1211. mon.setBackgroundColor(colors.black)
  1212. mon.setCursorPos(21,6)
  1213. mon.setBackgroundColor(colors.gray)
  1214. mon.setTextColor(colors.black)
  1215. mon.write(page1buttons.p3_1)
  1216. mon.setBackgroundColor(colors.black)
  1217. mon.setCursorPos(21,7)
  1218. mon.setBackgroundColor(colors.gray)
  1219. mon.setTextColor(colors.black)
  1220. mon.write(" ")
  1221. mon.setBackgroundColor(colors.black)
  1222. sleep(1)
  1223. portalMessage()
  1224. modem.transmit(11,99,"button3")
  1225. sleep(1)
  1226. drawGUI()
  1227. sleep(3)
  1230. -- Button 4_1 pressed
  1231. elseif (y >= 9 and y <= 11) and (x >= 1 and x <= 10) then
  1232. mon.setCursorPos(1,9)
  1233. mon.setBackgroundColor(colors.gray)
  1234. mon.setTextColor(colors.black)
  1235. mon.write(" ")
  1236. mon.setBackgroundColor(colors.black)
  1237. mon.setCursorPos(1,10)
  1238. mon.setBackgroundColor(colors.gray)
  1239. mon.setTextColor(colors.black)
  1240. mon.write(page1buttons.p4_1)
  1241. mon.setBackgroundColor(colors.black)
  1242. mon.setCursorPos(1,11)
  1243. mon.setBackgroundColor(colors.gray)
  1244. mon.setTextColor(colors.black)
  1245. mon.write(" ")
  1246. mon.setBackgroundColor(colors.black)
  1247. sleep(1)
  1248. portalMessage()
  1249. modem.transmit(11,99,"button4")
  1250. sleep(1)
  1251. drawGUI()
  1252. sleep(3)
  1255. -- Button 5_1 pressed
  1256. elseif (y >= 9 and y <= 11) and (x >= 11 and x <= 20) then
  1257. mon.setCursorPos(11,9)
  1258. mon.setBackgroundColor(colors.gray)
  1259. mon.setTextColor(colors.black)
  1260. mon.write(" ")
  1261. mon.setBackgroundColor(colors.black)
  1262. mon.setCursorPos(11,10)
  1263. mon.setBackgroundColor(colors.gray)
  1264. mon.setTextColor(colors.black)
  1265. mon.write(page1buttons.p5_1)
  1266. mon.setBackgroundColor(colors.black)
  1267. mon.setCursorPos(11,11)
  1268. mon.setBackgroundColor(colors.gray)
  1269. mon.setTextColor(colors.black)
  1270. mon.write(" ")
  1271. mon.setBackgroundColor(colors.black)
  1272. sleep(1)
  1273. portalMessage()
  1274. modem.transmit(11,99,"button5")
  1275. sleep(1)
  1276. drawGUI()
  1277. sleep(3)
  1280. -- Button 6_1 pressed
  1281. elseif (y >= 9 and y <= 11) and (x >= 21 and x <= 30) then
  1282. mon.setCursorPos(21,9)
  1283. mon.setBackgroundColor(colors.gray)
  1284. mon.setTextColor(colors.black)
  1285. mon.write(" ")
  1286. mon.setBackgroundColor(colors.black)
  1287. mon.setCursorPos(21,10)
  1288. mon.setBackgroundColor(colors.gray)
  1289. mon.setTextColor(colors.black)
  1290. mon.write(page1buttons.p6_1)
  1291. mon.setBackgroundColor(colors.black)
  1292. mon.setCursorPos(21,11)
  1293. mon.setBackgroundColor(colors.gray)
  1294. mon.setTextColor(colors.black)
  1295. mon.write(" ")
  1296. mon.setBackgroundColor(colors.black)
  1297. sleep(1)
  1298. portalMessage()
  1299. modem.transmit(11,99,"button6")
  1300. sleep(1)
  1301. drawGUI()
  1302. sleep(3)
  1305. -- Button 7_1 pressed
  1306. elseif (y >= 13 and y <= 15) and (x >= 1 and x <= 10) then
  1307. mon.setCursorPos(1,13)
  1308. mon.setBackgroundColor(colors.gray)
  1309. mon.setTextColor(colors.black)
  1310. mon.write(" ")
  1311. mon.setBackgroundColor(colors.black)
  1312. mon.setCursorPos(1,14)
  1313. mon.setBackgroundColor(colors.gray)
  1314. mon.setTextColor(colors.black)
  1315. mon.write(page1buttons.p7_1)
  1316. mon.setBackgroundColor(colors.black)
  1317. mon.setCursorPos(1,15)
  1318. mon.setBackgroundColor(colors.gray)
  1319. mon.setTextColor(colors.black)
  1320. mon.write(" ")
  1321. mon.setBackgroundColor(colors.black)
  1322. sleep(1)
  1323. portalMessage()
  1324. modem.transmit(11,99,"button7")
  1325. sleep(1)
  1326. drawGUI()
  1327. sleep(3)
  1330. -- Button 8_1 pressed
  1331. elseif (y >= 13 and y <= 15) and (x >= 11 and x <= 20) then
  1332. mon.setCursorPos(11,13)
  1333. mon.setBackgroundColor(colors.gray)
  1334. mon.setTextColor(colors.black)
  1335. mon.write(" ")
  1336. mon.setBackgroundColor(colors.black)
  1337. mon.setCursorPos(11,14)
  1338. mon.setBackgroundColor(colors.gray)
  1339. mon.setTextColor(colors.black)
  1340. mon.write(page1buttons.p8_1)
  1341. mon.setBackgroundColor(colors.black)
  1342. mon.setCursorPos(11,15)
  1343. mon.setBackgroundColor(colors.gray)
  1344. mon.setTextColor(colors.black)
  1345. mon.write(" ")
  1346. mon.setBackgroundColor(colors.black)
  1347. sleep(1)
  1348. portalMessage()
  1349. modem.transmit(11,99,"button8")
  1350. sleep(1)
  1351. drawGUI()
  1352. sleep(3)
  1355. -- Button 9_1 pressed
  1356. elseif (y >= 13 and y <= 15) and (x >= 21 and x <= 30) then
  1357. mon.setCursorPos(21,13)
  1358. mon.setBackgroundColor(colors.gray)
  1359. mon.setTextColor(colors.black)
  1360. mon.write(" ")
  1361. mon.setBackgroundColor(colors.black)
  1362. mon.setCursorPos(21,14)
  1363. mon.setBackgroundColor(colors.gray)
  1364. mon.setTextColor(colors.black)
  1365. mon.write(page1buttons.p9_1)
  1366. mon.setBackgroundColor(colors.black)
  1367. mon.setCursorPos(21,15)
  1368. mon.setBackgroundColor(colors.gray)
  1369. mon.setTextColor(colors.black)
  1370. mon.write(" ")
  1371. mon.setBackgroundColor(colors.black)
  1372. sleep(1)
  1373. portalMessage()
  1374. modem.transmit(11,99,"button9")
  1375. sleep(1)
  1376. drawGUI()
  1377. sleep(3)
  1380. -- Button 10_1 pressed
  1381. elseif (y >= 17 and y <= 19) and (x >= 1 and x <= 10) then
  1382. mon.setCursorPos(1,17)
  1383. mon.setBackgroundColor(colors.gray)
  1384. mon.setTextColor(colors.black)
  1385. mon.write(" ")
  1386. mon.setBackgroundColor(colors.black)
  1387. mon.setCursorPos(1,18)
  1388. mon.setBackgroundColor(colors.gray)
  1389. mon.setTextColor(colors.black)
  1390. mon.write(page1buttons.p10_1)
  1391. mon.setBackgroundColor(colors.black)
  1392. mon.setCursorPos(1,19)
  1393. mon.setBackgroundColor(colors.gray)
  1394. mon.setTextColor(colors.black)
  1395. mon.write(" ")
  1396. mon.setBackgroundColor(colors.black)
  1397. sleep(1)
  1398. portalMessage()
  1399. modem.transmit(11,99,"button10")
  1400. sleep(1)
  1401. drawGUI()
  1402. sleep(3)
  1405. -- Button 11_1 pressed
  1406. elseif (y >= 17 and y <= 19) and (x >= 11 and x <= 20) then
  1407. mon.setCursorPos(11,17)
  1408. mon.setBackgroundColor(colors.gray)
  1409. mon.setTextColor(colors.black)
  1410. mon.write(" ")
  1411. mon.setBackgroundColor(colors.black)
  1412. mon.setCursorPos(11,18)
  1413. mon.setBackgroundColor(colors.gray)
  1414. mon.setTextColor(colors.black)
  1415. mon.write(page1buttons.p11_1)
  1416. mon.setBackgroundColor(colors.black)
  1417. mon.setCursorPos(11,19)
  1418. mon.setBackgroundColor(colors.gray)
  1419. mon.setTextColor(colors.black)
  1420. mon.write(" ")
  1421. mon.setBackgroundColor(colors.black)
  1422. sleep(1)
  1423. portalMessage()
  1424. modem.transmit(11,99,"button11")
  1425. sleep(1)
  1426. drawGUI()
  1427. sleep(3)
  1430. -- Button 12_1 pressed
  1431. elseif (y >= 17 and y <= 19) and (x >= 21 and x <= 30) then
  1432. mon.setCursorPos(21,17)
  1433. mon.setBackgroundColor(colors.gray)
  1434. mon.setTextColor(colors.black)
  1435. mon.write(" ")
  1436. mon.setBackgroundColor(colors.black)
  1437. mon.setCursorPos(21,18)
  1438. mon.setBackgroundColor(colors.gray)
  1439. mon.setTextColor(colors.black)
  1440. mon.write(page1buttons.p12_1)
  1441. mon.setBackgroundColor(colors.black)
  1442. mon.setCursorPos(21,19)
  1443. mon.setBackgroundColor(colors.gray)
  1444. mon.setTextColor(colors.black)
  1445. mon.write(" ")
  1446. mon.setBackgroundColor(colors.black)
  1447. sleep(1)
  1448. portalMessage()
  1449. modem.transmit(11,99,"button12")
  1450. sleep(1)
  1451. drawGUI()
  1452. sleep(3)
  1455. -- Page Advance button pressed
  1456. elseif (y >= 1 and y <= 3) and (x >= 26 and x <= 30) then
  1457. screen = 2
  1458. drawGUI()
  1460. -- Page decrease button pressed
  1461. elseif (y >= 1 and y <= 3) and (x >= 1 and x <= 4) then
  1462. screen = 4
  1463. drawGUI()
  1464. end
  1467. event, side, x, y = os.pullEvent("monitor_touch")
  1468. elseif (screen == 2) then
  1469. -- Button 1_2 pressed
  1470. if (y >= 5 and y <= 7) and (x >= 1 and x <= 10) then
  1471. mon.setCursorPos(1,5)
  1472. mon.setBackgroundColor(colors.gray)
  1473. mon.setTextColor(colors.black)
  1474. mon.write(" ")
  1475. mon.setBackgroundColor(colors.black)
  1476. mon.setCursorPos(1,6)
  1477. mon.setBackgroundColor(colors.gray)
  1478. mon.setTextColor(colors.black)
  1479. mon.write(page1buttons.p1_2)
  1480. mon.setBackgroundColor(colors.gray)
  1481. mon.setCursorPos(1,7)
  1482. mon.setBackgroundColor(colors.gray)
  1483. mon.setTextColor(colors.black)
  1484. mon.write(" ")
  1485. mon.setBackgroundColor(colors.black)
  1486. sleep(1)
  1487. portalMessage()
  1488. modem.transmit(12,99,"button1")
  1489. sleep(1)
  1490. drawGUI()
  1491. sleep(3)
  1494. -- Button 2_2 pressed
  1495. elseif (y >= 5 and y <= 7) and (x >= 11 and x <= 20) then
  1496. mon.setCursorPos(11,5)
  1497. mon.setBackgroundColor(colors.gray)
  1498. mon.setTextColor(colors.black)
  1499. mon.write(" ")
  1500. mon.setBackgroundColor(colors.black)
  1501. mon.setCursorPos(11,6)
  1502. mon.setBackgroundColor(colors.gray)
  1503. mon.setTextColor(colors.black)
  1504. mon.write(page1buttons.p2_2)
  1505. mon.setBackgroundColor(colors.black)
  1506. mon.setCursorPos(11,7)
  1507. mon.setBackgroundColor(colors.gray)
  1508. mon.setTextColor(colors.black)
  1509. mon.write(" ")
  1510. mon.setBackgroundColor(colors.black)
  1511. sleep(1)
  1512. portalMessage()
  1513. modem.transmit(12,99,"button2")
  1514. sleep(1)
  1515. drawGUI()
  1516. sleep(3)
  1519. -- Button 3_2 pressed
  1520. elseif (y >= 5 and y <= 7) and (x >= 21 and x <= 30) then
  1521. mon.setCursorPos(21,5)
  1522. mon.setBackgroundColor(colors.gray)
  1523. mon.setTextColor(colors.black)
  1524. mon.write(" ")
  1525. mon.setBackgroundColor(colors.black)
  1526. mon.setCursorPos(21,6)
  1527. mon.setBackgroundColor(colors.gray)
  1528. mon.setTextColor(colors.black)
  1529. mon.write(page1buttons.p3_2)
  1530. mon.setBackgroundColor(colors.black)
  1531. mon.setCursorPos(21,7)
  1532. mon.setBackgroundColor(colors.gray)
  1533. mon.setTextColor(colors.black)
  1534. mon.write(" ")
  1535. mon.setBackgroundColor(colors.black)
  1536. sleep(1)
  1537. portalMessage()
  1538. modem.transmit(12,99,"button3")
  1539. sleep(1)
  1540. drawGUI()
  1541. sleep(3)
  1544. -- Button 4_2 pressed
  1545. elseif (y >= 9 and y <= 11) and (x >= 1 and x <= 10) then
  1546. mon.setCursorPos(1,9)
  1547. mon.setBackgroundColor(colors.gray)
  1548. mon.setTextColor(colors.black)
  1549. mon.write(" ")
  1550. mon.setBackgroundColor(colors.black)
  1551. mon.setCursorPos(1,10)
  1552. mon.setBackgroundColor(colors.gray)
  1553. mon.setTextColor(colors.black)
  1554. mon.write(page1buttons.p4_2)
  1555. mon.setBackgroundColor(colors.black)
  1556. mon.setCursorPos(1,11)
  1557. mon.setBackgroundColor(colors.gray)
  1558. mon.setTextColor(colors.black)
  1559. mon.write(" ")
  1560. mon.setBackgroundColor(colors.black)
  1561. sleep(1)
  1562. portalMessage()
  1563. modem.transmit(12,99,"button4")
  1564. sleep(1)
  1565. drawGUI()
  1566. sleep(3)
  1569. -- Button 5_2 pressed
  1570. elseif (y >= 9 and y <= 11) and (x >= 11 and x <= 20) then
  1571. mon.setCursorPos(11,9)
  1572. mon.setBackgroundColor(colors.gray)
  1573. mon.setTextColor(colors.black)
  1574. mon.write(" ")
  1575. mon.setBackgroundColor(colors.black)
  1576. mon.setCursorPos(11,10)
  1577. mon.setBackgroundColor(colors.gray)
  1578. mon.setTextColor(colors.black)
  1579. mon.write(page1buttons.p5_2)
  1580. mon.setBackgroundColor(colors.black)
  1581. mon.setCursorPos(11,11)
  1582. mon.setBackgroundColor(colors.gray)
  1583. mon.setTextColor(colors.black)
  1584. mon.write(" ")
  1585. mon.setBackgroundColor(colors.black)
  1586. sleep(1)
  1587. portalMessage()
  1588. modem.transmit(12,99,"button5")
  1589. sleep(1)
  1590. drawGUI()
  1591. sleep(3)
  1594. -- Button 6_2 pressed
  1595. elseif (y >= 9 and y <= 11) and (x >= 21 and x <= 30) then
  1596. mon.setCursorPos(21,9)
  1597. mon.setBackgroundColor(colors.gray)
  1598. mon.setTextColor(colors.black)
  1599. mon.write(" ")
  1600. mon.setBackgroundColor(colors.black)
  1601. mon.setCursorPos(21,10)
  1602. mon.setBackgroundColor(colors.gray)
  1603. mon.setTextColor(colors.black)
  1604. mon.write(page1buttons.p6_2)
  1605. mon.setBackgroundColor(colors.black)
  1606. mon.setCursorPos(21,11)
  1607. mon.setBackgroundColor(colors.gray)
  1608. mon.setTextColor(colors.black)
  1609. mon.write(" ")
  1610. mon.setBackgroundColor(colors.black)
  1611. sleep(1)
  1612. portalMessage()
  1613. modem.transmit(12,99,"button6")
  1614. sleep(1)
  1615. drawGUI()
  1616. sleep(3)
  1619. -- Button 7_2 pressed
  1620. elseif (y >= 13 and y <= 15) and (x >= 1 and x <= 10) then
  1621. mon.setCursorPos(1,13)
  1622. mon.setBackgroundColor(colors.gray)
  1623. mon.setTextColor(colors.black)
  1624. mon.write(" ")
  1625. mon.setBackgroundColor(colors.black)
  1626. mon.setCursorPos(1,14)
  1627. mon.setBackgroundColor(colors.gray)
  1628. mon.setTextColor(colors.black)
  1629. mon.write(page1buttons.p7_2)
  1630. mon.setBackgroundColor(colors.black)
  1631. mon.setCursorPos(1,15)
  1632. mon.setBackgroundColor(colors.gray)
  1633. mon.setTextColor(colors.black)
  1634. mon.write(" ")
  1635. mon.setBackgroundColor(colors.black)
  1636. sleep(1)
  1637. portalMessage()
  1638. modem.transmit(12,99,"button7")
  1639. sleep(1)
  1640. drawGUI()
  1641. sleep(3)
  1644. -- Button 8_2 pressed
  1645. elseif (y >= 13 and y <= 15) and (x >= 11 and x <= 20) then
  1646. mon.setCursorPos(11,13)
  1647. mon.setBackgroundColor(colors.gray)
  1648. mon.setTextColor(colors.black)
  1649. mon.write(" ")
  1650. mon.setBackgroundColor(colors.black)
  1651. mon.setCursorPos(11,14)
  1652. mon.setBackgroundColor(colors.gray)
  1653. mon.setTextColor(colors.black)
  1654. mon.write(page1buttons.p8_2)
  1655. mon.setBackgroundColor(colors.black)
  1656. mon.setCursorPos(11,15)
  1657. mon.setBackgroundColor(colors.gray)
  1658. mon.setTextColor(colors.black)
  1659. mon.write(" ")
  1660. mon.setBackgroundColor(colors.black)
  1661. sleep(1)
  1662. portalMessage()
  1663. modem.transmit(12,99,"button8")
  1664. sleep(1)
  1665. drawGUI()
  1666. sleep(3)
  1669. -- Button 9_2 pressed
  1670. elseif (y >= 13 and y <= 15) and (x >= 21 and x <= 30) then
  1671. mon.setCursorPos(21,13)
  1672. mon.setBackgroundColor(colors.gray)
  1673. mon.setTextColor(colors.black)
  1674. mon.write(" ")
  1675. mon.setBackgroundColor(colors.black)
  1676. mon.setCursorPos(21,14)
  1677. mon.setBackgroundColor(colors.gray)
  1678. mon.setTextColor(colors.black)
  1679. mon.write(page1buttons.p9_2)
  1680. mon.setBackgroundColor(colors.black)
  1681. mon.setCursorPos(21,15)
  1682. mon.setBackgroundColor(colors.gray)
  1683. mon.setTextColor(colors.black)
  1684. mon.write(" ")
  1685. mon.setBackgroundColor(colors.black)
  1686. sleep(1)
  1687. portalMessage()
  1688. modem.transmit(12,99,"button9")
  1689. sleep(1)
  1690. drawGUI()
  1691. sleep(3)
  1694. -- Button 10_2 pressed
  1695. elseif (y >= 17 and y <= 19) and (x >= 1 and x <= 10) then
  1696. mon.setCursorPos(1,17)
  1697. mon.setBackgroundColor(colors.gray)
  1698. mon.setTextColor(colors.black)
  1699. mon.write(" ")
  1700. mon.setBackgroundColor(colors.black)
  1701. mon.setCursorPos(1,18)
  1702. mon.setBackgroundColor(colors.gray)
  1703. mon.setTextColor(colors.black)
  1704. mon.write(page1buttons.p10_2)
  1705. mon.setBackgroundColor(colors.black)
  1706. mon.setCursorPos(1,19)
  1707. mon.setBackgroundColor(colors.gray)
  1708. mon.setTextColor(colors.black)
  1709. mon.write(" ")
  1710. mon.setBackgroundColor(colors.black)
  1711. sleep(1)
  1712. portalMessage()
  1713. modem.transmit(12,99,"button10")
  1714. sleep(1)
  1715. drawGUI()
  1716. sleep(3)
  1719. -- Button 11_2 pressed
  1720. elseif (y >= 17 and y <= 19) and (x >= 11 and x <= 20) then
  1721. mon.setCursorPos(11,17)
  1722. mon.setBackgroundColor(colors.gray)
  1723. mon.setTextColor(colors.black)
  1724. mon.write(" ")
  1725. mon.setBackgroundColor(colors.black)
  1726. mon.setCursorPos(11,18)
  1727. mon.setBackgroundColor(colors.gray)
  1728. mon.setTextColor(colors.black)
  1729. mon.write(page1buttons.p11_2)
  1730. mon.setBackgroundColor(colors.black)
  1731. mon.setCursorPos(11,19)
  1732. mon.setBackgroundColor(colors.gray)
  1733. mon.setTextColor(colors.black)
  1734. mon.write(" ")
  1735. mon.setBackgroundColor(colors.black)
  1736. sleep(1)
  1737. portalMessage()
  1738. modem.transmit(12,99,"button11")
  1739. sleep(1)
  1740. drawGUI()
  1741. sleep(3)
  1744. -- Button 12_2 pressed
  1745. elseif (y >= 17 and y <= 19) and (x >= 21 and x <= 30) then
  1746. mon.setCursorPos(21,17)
  1747. mon.setBackgroundColor(colors.gray)
  1748. mon.setTextColor(colors.black)
  1749. mon.write(" ")
  1750. mon.setBackgroundColor(colors.black)
  1751. mon.setCursorPos(21,18)
  1752. mon.setBackgroundColor(colors.gray)
  1753. mon.setTextColor(colors.black)
  1754. mon.write(page1buttons.p12_2)
  1755. mon.setBackgroundColor(colors.black)
  1756. mon.setCursorPos(21,19)
  1757. mon.setBackgroundColor(colors.gray)
  1758. mon.setTextColor(colors.black)
  1759. mon.write(" ")
  1760. mon.setBackgroundColor(colors.black)
  1761. sleep(1)
  1762. portalMessage()
  1763. modem.transmit(12,99,"button12")
  1764. sleep(1)
  1765. drawGUI()
  1766. sleep(3)
  1769. -- Page Advance button pressed
  1770. elseif (y >= 1 and y <= 3) and (x >= 26 and x <= 30) then
  1771. screen = 3
  1772. drawGUI()
  1774. -- Page decrease button pressed
  1775. elseif (y >= 1 and y <= 3) and (x >= 1 and x <= 4) then
  1776. screen = 1
  1777. drawGUI()
  1778. end
  1781. event, side, x, y = os.pullEvent("monitor_touch")
  1782. elseif (screen == 3) then
  1783. -- Button 1_3 pressed
  1784. if (y >= 5 and y <= 7) and (x >= 1 and x <= 10) then
  1785. mon.setCursorPos(1,5)
  1786. mon.setBackgroundColor(colors.gray)
  1787. mon.setTextColor(colors.black)
  1788. mon.write(" ")
  1789. mon.setBackgroundColor(colors.black)
  1790. mon.setCursorPos(1,6)
  1791. mon.setBackgroundColor(colors.gray)
  1792. mon.setTextColor(colors.black)
  1793. mon.write(page1buttons.p1_3)
  1794. mon.setBackgroundColor(colors.gray)
  1795. mon.setCursorPos(1,7)
  1796. mon.setBackgroundColor(colors.gray)
  1797. mon.setTextColor(colors.black)
  1798. mon.write(" ")
  1799. mon.setBackgroundColor(colors.black)
  1800. sleep(1)
  1801. portalMessage()
  1802. modem.transmit(13,99,"button1")
  1803. sleep(1)
  1804. drawGUI()
  1805. sleep(3)
  1808. -- Button 2_3 pressed
  1809. elseif (y >= 5 and y <= 7) and (x >= 11 and x <= 20) then
  1810. mon.setCursorPos(11,5)
  1811. mon.setBackgroundColor(colors.gray)
  1812. mon.setTextColor(colors.black)
  1813. mon.write(" ")
  1814. mon.setBackgroundColor(colors.black)
  1815. mon.setCursorPos(11,6)
  1816. mon.setBackgroundColor(colors.gray)
  1817. mon.setTextColor(colors.black)
  1818. mon.write(page1buttons.p2_3)
  1819. mon.setBackgroundColor(colors.black)
  1820. mon.setCursorPos(11,7)
  1821. mon.setBackgroundColor(colors.gray)
  1822. mon.setTextColor(colors.black)
  1823. mon.write(" ")
  1824. mon.setBackgroundColor(colors.black)
  1825. sleep(1)
  1826. portalMessage()
  1827. modem.transmit(13,99,"button2")
  1828. sleep(1)
  1829. drawGUI()
  1830. sleep(3)
  1833. -- Button 3_3 pressed
  1834. elseif (y >= 5 and y <= 7) and (x >= 21 and x <= 30) then
  1835. mon.setCursorPos(21,5)
  1836. mon.setBackgroundColor(colors.gray)
  1837. mon.setTextColor(colors.black)
  1838. mon.write(" ")
  1839. mon.setBackgroundColor(colors.black)
  1840. mon.setCursorPos(21,6)
  1841. mon.setBackgroundColor(colors.gray)
  1842. mon.setTextColor(colors.black)
  1843. mon.write(page1buttons.p3_3)
  1844. mon.setBackgroundColor(colors.black)
  1845. mon.setCursorPos(21,7)
  1846. mon.setBackgroundColor(colors.gray)
  1847. mon.setTextColor(colors.black)
  1848. mon.write(" ")
  1849. mon.setBackgroundColor(colors.black)
  1850. sleep(1)
  1851. portalMessage()
  1852. modem.transmit(13,99,"button3")
  1853. sleep(1)
  1854. drawGUI()
  1855. sleep(3)
  1858. -- Button 4_3 pressed
  1859. elseif (y >= 9 and y <= 11) and (x >= 1 and x <= 10) then
  1860. mon.setCursorPos(1,9)
  1861. mon.setBackgroundColor(colors.gray)
  1862. mon.setTextColor(colors.black)
  1863. mon.write(" ")
  1864. mon.setBackgroundColor(colors.black)
  1865. mon.setCursorPos(1,10)
  1866. mon.setBackgroundColor(colors.gray)
  1867. mon.setTextColor(colors.black)
  1868. mon.write(page1buttons.p4_3)
  1869. mon.setBackgroundColor(colors.black)
  1870. mon.setCursorPos(1,11)
  1871. mon.setBackgroundColor(colors.gray)
  1872. mon.setTextColor(colors.black)
  1873. mon.write(" ")
  1874. mon.setBackgroundColor(colors.black)
  1875. sleep(1)
  1876. portalMessage()
  1877. modem.transmit(13,99,"button4")
  1878. sleep(1)
  1879. drawGUI()
  1880. sleep(3)
  1883. -- Button 5_3 pressed
  1884. elseif (y >= 9 and y <= 11) and (x >= 11 and x <= 20) then
  1885. mon.setCursorPos(11,9)
  1886. mon.setBackgroundColor(colors.gray)
  1887. mon.setTextColor(colors.black)
  1888. mon.write(" ")
  1889. mon.setBackgroundColor(colors.black)
  1890. mon.setCursorPos(11,10)
  1891. mon.setBackgroundColor(colors.gray)
  1892. mon.setTextColor(colors.black)
  1893. mon.write(page1buttons.p5_3)
  1894. mon.setBackgroundColor(colors.black)
  1895. mon.setCursorPos(11,11)
  1896. mon.setBackgroundColor(colors.gray)
  1897. mon.setTextColor(colors.black)
  1898. mon.write(" ")
  1899. mon.setBackgroundColor(colors.black)
  1900. sleep(1)
  1901. portalMessage()
  1902. modem.transmit(13,99,"button5")
  1903. sleep(1)
  1904. drawGUI()
  1905. sleep(3)
  1908. -- Button 6_3 pressed
  1909. elseif (y >= 9 and y <= 11) and (x >= 21 and x <= 30) then
  1910. mon.setCursorPos(21,9)
  1911. mon.setBackgroundColor(colors.gray)
  1912. mon.setTextColor(colors.black)
  1913. mon.write(" ")
  1914. mon.setBackgroundColor(colors.black)
  1915. mon.setCursorPos(21,10)
  1916. mon.setBackgroundColor(colors.gray)
  1917. mon.setTextColor(colors.black)
  1918. mon.write(page1buttons.p6_3)
  1919. mon.setBackgroundColor(colors.black)
  1920. mon.setCursorPos(21,11)
  1921. mon.setBackgroundColor(colors.gray)
  1922. mon.setTextColor(colors.black)
  1923. mon.write(" ")
  1924. mon.setBackgroundColor(colors.black)
  1925. sleep(1)
  1926. portalMessage()
  1927. modem.transmit(13,99,"button6")
  1928. sleep(1)
  1929. drawGUI()
  1930. sleep(3)
  1933. -- Button 7_3 pressed
  1934. elseif (y >= 13 and y <= 15) and (x >= 1 and x <= 10) then
  1935. mon.setCursorPos(1,13)
  1936. mon.setBackgroundColor(colors.gray)
  1937. mon.setTextColor(colors.black)
  1938. mon.write(" ")
  1939. mon.setBackgroundColor(colors.black)
  1940. mon.setCursorPos(1,14)
  1941. mon.setBackgroundColor(colors.gray)
  1942. mon.setTextColor(colors.black)
  1943. mon.write(page1buttons.p7_3)
  1944. mon.setBackgroundColor(colors.black)
  1945. mon.setCursorPos(1,15)
  1946. mon.setBackgroundColor(colors.gray)
  1947. mon.setTextColor(colors.black)
  1948. mon.write(" ")
  1949. mon.setBackgroundColor(colors.black)
  1950. sleep(1)
  1951. portalMessage()
  1952. modem.transmit(13,99,"button7")
  1953. sleep(1)
  1954. drawGUI()
  1955. sleep(3)
  1958. -- Button 8_3 pressed
  1959. elseif (y >= 13 and y <= 15) and (x >= 11 and x <= 20) then
  1960. mon.setCursorPos(11,13)
  1961. mon.setBackgroundColor(colors.gray)
  1962. mon.setTextColor(colors.black)
  1963. mon.write(" ")
  1964. mon.setBackgroundColor(colors.black)
  1965. mon.setCursorPos(11,14)
  1966. mon.setBackgroundColor(colors.gray)
  1967. mon.setTextColor(colors.black)
  1968. mon.write(page1buttons.p8_3)
  1969. mon.setBackgroundColor(colors.black)
  1970. mon.setCursorPos(11,15)
  1971. mon.setBackgroundColor(colors.gray)
  1972. mon.setTextColor(colors.black)
  1973. mon.write(" ")
  1974. mon.setBackgroundColor(colors.black)
  1975. sleep(1)
  1976. portalMessage()
  1977. modem.transmit(13,99,"button8")
  1978. sleep(1)
  1979. drawGUI()
  1980. sleep(3)
  1983. -- Button 9_3 pressed
  1984. elseif (y >= 13 and y <= 15) and (x >= 21 and x <= 30) then
  1985. mon.setCursorPos(21,13)
  1986. mon.setBackgroundColor(colors.gray)
  1987. mon.setTextColor(colors.black)
  1988. mon.write(" ")
  1989. mon.setBackgroundColor(colors.black)
  1990. mon.setCursorPos(21,14)
  1991. mon.setBackgroundColor(colors.gray)
  1992. mon.setTextColor(colors.black)
  1993. mon.write(page1buttons.p9_3)
  1994. mon.setBackgroundColor(colors.black)
  1995. mon.setCursorPos(21,15)
  1996. mon.setBackgroundColor(colors.gray)
  1997. mon.setTextColor(colors.black)
  1998. mon.write(" ")
  1999. mon.setBackgroundColor(colors.black)
  2000. sleep(1)
  2001. portalMessage()
  2002. modem.transmit(13,99,"button9")
  2003. sleep(1)
  2004. drawGUI()
  2005. sleep(3)
  2008. -- Button 10_3 pressed
  2009. elseif (y >= 17 and y <= 19) and (x >= 1 and x <= 10) then
  2010. mon.setCursorPos(1,17)
  2011. mon.setBackgroundColor(colors.gray)
  2012. mon.setTextColor(colors.black)
  2013. mon.write(" ")
  2014. mon.setBackgroundColor(colors.black)
  2015. mon.setCursorPos(1,18)
  2016. mon.setBackgroundColor(colors.gray)
  2017. mon.setTextColor(colors.black)
  2018. mon.write(page1buttons.p10_3)
  2019. mon.setBackgroundColor(colors.black)
  2020. mon.setCursorPos(1,19)
  2021. mon.setBackgroundColor(colors.gray)
  2022. mon.setTextColor(colors.black)
  2023. mon.write(" ")
  2024. mon.setBackgroundColor(colors.black)
  2025. sleep(1)
  2026. portalMessage()
  2027. modem.transmit(13,99,"button10")
  2028. sleep(1)
  2029. drawGUI()
  2030. sleep(3)
  2033. -- Button 11_3 pressed
  2034. elseif (y >= 17 and y <= 19) and (x >= 11 and x <= 20) then
  2035. mon.setCursorPos(11,17)
  2036. mon.setBackgroundColor(colors.gray)
  2037. mon.setTextColor(colors.black)
  2038. mon.write(" ")
  2039. mon.setBackgroundColor(colors.black)
  2040. mon.setCursorPos(11,18)
  2041. mon.setBackgroundColor(colors.gray)
  2042. mon.setTextColor(colors.black)
  2043. mon.write(page1buttons.p11_3)
  2044. mon.setBackgroundColor(colors.black)
  2045. mon.setCursorPos(11,19)
  2046. mon.setBackgroundColor(colors.gray)
  2047. mon.setTextColor(colors.black)
  2048. mon.write(" ")
  2049. mon.setBackgroundColor(colors.black)
  2050. sleep(1)
  2051. portalMessage()
  2052. modem.transmit(13,99,"button11")
  2053. sleep(1)
  2054. drawGUI()
  2055. sleep(3)
  2058. -- Button 12_3 pressed
  2059. elseif (y >= 17 and y <= 19) and (x >= 21 and x <= 30) then
  2060. mon.setCursorPos(21,17)
  2061. mon.setBackgroundColor(colors.gray)
  2062. mon.setTextColor(colors.black)
  2063. mon.write(" ")
  2064. mon.setBackgroundColor(colors.black)
  2065. mon.setCursorPos(21,18)
  2066. mon.setBackgroundColor(colors.gray)
  2067. mon.setTextColor(colors.black)
  2068. mon.write(page1buttons.p12_3)
  2069. mon.setBackgroundColor(colors.black)
  2070. mon.setCursorPos(21,19)
  2071. mon.setBackgroundColor(colors.gray)
  2072. mon.setTextColor(colors.black)
  2073. mon.write(" ")
  2074. mon.setBackgroundColor(colors.black)
  2075. sleep(1)
  2076. portalMessage()
  2077. modem.transmit(13,99,"button12")
  2078. sleep(1)
  2079. drawGUI()
  2080. sleep(3)
  2083. -- Page Advance button pressed
  2084. elseif (y >= 1 and y <= 3) and (x >= 26 and x <= 30) then
  2085. screen = 4
  2086. drawGUI()
  2088. -- Page decrease button pressed
  2089. elseif (y >= 1 and y <= 3) and (x >= 1 and x <= 4) then
  2090. screen = 2
  2091. drawGUI()
  2092. end
  2095. event, side, x, y = os.pullEvent("monitor_touch")
  2096. elseif (screen == 4) then
  2097. -- Button 1_4 pressed
  2098. if (y >= 5 and y <= 7) and (x >= 1 and x <= 10) then
  2099. mon.setCursorPos(1,5)
  2100. mon.setBackgroundColor(colors.gray)
  2101. mon.setTextColor(colors.black)
  2102. mon.write(" ")
  2103. mon.setBackgroundColor(colors.black)
  2104. mon.setCursorPos(1,6)
  2105. mon.setBackgroundColor(colors.gray)
  2106. mon.setTextColor(colors.black)
  2107. mon.write(page1buttons.p1_4)
  2108. mon.setBackgroundColor(colors.gray)
  2109. mon.setCursorPos(1,7)
  2110. mon.setBackgroundColor(colors.gray)
  2111. mon.setTextColor(colors.black)
  2112. mon.write(" ")
  2113. mon.setBackgroundColor(colors.black)
  2114. sleep(1)
  2115. portalMessage()
  2116. modem.transmit(14,99,"button1")
  2117. sleep(1)
  2118. drawGUI()
  2119. sleep(3)
  2122. -- Button 2_4 pressed
  2123. elseif (y >= 5 and y <= 7) and (x >= 11 and x <= 20) then
  2124. mon.setCursorPos(11,5)
  2125. mon.setBackgroundColor(colors.gray)
  2126. mon.setTextColor(colors.black)
  2127. mon.write(" ")
  2128. mon.setBackgroundColor(colors.black)
  2129. mon.setCursorPos(11,6)
  2130. mon.setBackgroundColor(colors.gray)
  2131. mon.setTextColor(colors.black)
  2132. mon.write(page1buttons.p2_4)
  2133. mon.setBackgroundColor(colors.black)
  2134. mon.setCursorPos(11,7)
  2135. mon.setBackgroundColor(colors.gray)
  2136. mon.setTextColor(colors.black)
  2137. mon.write(" ")
  2138. mon.setBackgroundColor(colors.black)
  2139. sleep(1)
  2140. portalMessage()
  2141. modem.transmit(14,99,"button2")
  2142. sleep(1)
  2143. drawGUI()
  2144. sleep(3)
  2147. -- Button 3_4 pressed
  2148. elseif (y >= 5 and y <= 7) and (x >= 21 and x <= 30) then
  2149. mon.setCursorPos(21,5)
  2150. mon.setBackgroundColor(colors.gray)
  2151. mon.setTextColor(colors.black)
  2152. mon.write(" ")
  2153. mon.setBackgroundColor(colors.black)
  2154. mon.setCursorPos(21,6)
  2155. mon.setBackgroundColor(colors.gray)
  2156. mon.setTextColor(colors.black)
  2157. mon.write(page1buttons.p3_4)
  2158. mon.setBackgroundColor(colors.black)
  2159. mon.setCursorPos(21,7)
  2160. mon.setBackgroundColor(colors.gray)
  2161. mon.setTextColor(colors.black)
  2162. mon.write(" ")
  2163. mon.setBackgroundColor(colors.black)
  2164. sleep(1)
  2165. portalMessage()
  2166. modem.transmit(14,99,"button3")
  2167. sleep(1)
  2168. drawGUI()
  2169. sleep(3)
  2172. -- Button 4_4 pressed
  2173. elseif (y >= 9 and y <= 11) and (x >= 1 and x <= 10) then
  2174. mon.setCursorPos(1,9)
  2175. mon.setBackgroundColor(colors.gray)
  2176. mon.setTextColor(colors.black)
  2177. mon.write(" ")
  2178. mon.setBackgroundColor(colors.black)
  2179. mon.setCursorPos(1,10)
  2180. mon.setBackgroundColor(colors.gray)
  2181. mon.setTextColor(colors.black)
  2182. mon.write(page1buttons.p4_4)
  2183. mon.setBackgroundColor(colors.black)
  2184. mon.setCursorPos(1,11)
  2185. mon.setBackgroundColor(colors.gray)
  2186. mon.setTextColor(colors.black)
  2187. mon.write(" ")
  2188. mon.setBackgroundColor(colors.black)
  2189. sleep(1)
  2190. portalMessage()
  2191. modem.transmit(14,99,"button4")
  2192. sleep(1)
  2193. drawGUI()
  2194. sleep(3)
  2197. -- Button 5_4 pressed
  2198. elseif (y >= 9 and y <= 11) and (x >= 11 and x <= 20) then
  2199. mon.setCursorPos(11,9)
  2200. mon.setBackgroundColor(colors.gray)
  2201. mon.setTextColor(colors.black)
  2202. mon.write(" ")
  2203. mon.setBackgroundColor(colors.black)
  2204. mon.setCursorPos(11,10)
  2205. mon.setBackgroundColor(colors.gray)
  2206. mon.setTextColor(colors.black)
  2207. mon.write(page1buttons.p5_4)
  2208. mon.setBackgroundColor(colors.black)
  2209. mon.setCursorPos(11,11)
  2210. mon.setBackgroundColor(colors.gray)
  2211. mon.setTextColor(colors.black)
  2212. mon.write(" ")
  2213. mon.setBackgroundColor(colors.black)
  2214. sleep(1)
  2215. portalMessage()
  2216. modem.transmit(14,99,"button5")
  2217. sleep(1)
  2218. drawGUI()
  2219. sleep(3)
  2222. -- Button 6_4 pressed
  2223. elseif (y >= 9 and y <= 11) and (x >= 21 and x <= 30) then
  2224. mon.setCursorPos(21,9)
  2225. mon.setBackgroundColor(colors.gray)
  2226. mon.setTextColor(colors.black)
  2227. mon.write(" ")
  2228. mon.setBackgroundColor(colors.black)
  2229. mon.setCursorPos(21,10)
  2230. mon.setBackgroundColor(colors.gray)
  2231. mon.setTextColor(colors.black)
  2232. mon.write(page1buttons.p6_4)
  2233. mon.setBackgroundColor(colors.black)
  2234. mon.setCursorPos(21,11)
  2235. mon.setBackgroundColor(colors.gray)
  2236. mon.setTextColor(colors.black)
  2237. mon.write(" ")
  2238. mon.setBackgroundColor(colors.black)
  2239. sleep(1)
  2240. portalMessage()
  2241. modem.transmit(14,99,"button6")
  2242. sleep(1)
  2243. drawGUI()
  2244. sleep(3)
  2247. -- Button 7_4 pressed
  2248. elseif (y >= 13 and y <= 15) and (x >= 1 and x <= 10) then
  2249. mon.setCursorPos(1,13)
  2250. mon.setBackgroundColor(colors.gray)
  2251. mon.setTextColor(colors.black)
  2252. mon.write(" ")
  2253. mon.setBackgroundColor(colors.black)
  2254. mon.setCursorPos(1,14)
  2255. mon.setBackgroundColor(colors.gray)
  2256. mon.setTextColor(colors.black)
  2257. mon.write(page1buttons.p7_4)
  2258. mon.setBackgroundColor(colors.black)
  2259. mon.setCursorPos(1,15)
  2260. mon.setBackgroundColor(colors.gray)
  2261. mon.setTextColor(colors.black)
  2262. mon.write(" ")
  2263. mon.setBackgroundColor(colors.black)
  2264. sleep(1)
  2265. portalMessage()
  2266. modem.transmit(14,99,"button7")
  2267. sleep(1)
  2268. drawGUI()
  2269. sleep(3)
  2272. -- Button 8_4 pressed
  2273. elseif (y >= 13 and y <= 15) and (x >= 11 and x <= 20) then
  2274. mon.setCursorPos(11,13)
  2275. mon.setBackgroundColor(colors.gray)
  2276. mon.setTextColor(colors.black)
  2277. mon.write(" ")
  2278. mon.setBackgroundColor(colors.black)
  2279. mon.setCursorPos(11,14)
  2280. mon.setBackgroundColor(colors.gray)
  2281. mon.setTextColor(colors.black)
  2282. mon.write(page1buttons.p8_4)
  2283. mon.setBackgroundColor(colors.black)
  2284. mon.setCursorPos(11,15)
  2285. mon.setBackgroundColor(colors.gray)
  2286. mon.setTextColor(colors.black)
  2287. mon.write(" ")
  2288. mon.setBackgroundColor(colors.black)
  2289. sleep(1)
  2290. portalMessage()
  2291. modem.transmit(14,99,"button8")
  2292. sleep(1)
  2293. drawGUI()
  2294. sleep(3)
  2297. -- Button 9_4 pressed
  2298. elseif (y >= 13 and y <= 15) and (x >= 21 and x <= 30) then
  2299. mon.setCursorPos(21,13)
  2300. mon.setBackgroundColor(colors.gray)
  2301. mon.setTextColor(colors.black)
  2302. mon.write(" ")
  2303. mon.setBackgroundColor(colors.black)
  2304. mon.setCursorPos(21,14)
  2305. mon.setBackgroundColor(colors.gray)
  2306. mon.setTextColor(colors.black)
  2307. mon.write(page1buttons.p9_4)
  2308. mon.setBackgroundColor(colors.black)
  2309. mon.setCursorPos(21,15)
  2310. mon.setBackgroundColor(colors.gray)
  2311. mon.setTextColor(colors.black)
  2312. mon.write(" ")
  2313. mon.setBackgroundColor(colors.black)
  2314. sleep(1)
  2315. portalMessage()
  2316. modem.transmit(14,99,"button9")
  2317. sleep(1)
  2318. drawGUI()
  2319. sleep(3)
  2322. -- Button 10_4 pressed
  2323. elseif (y >= 17 and y <= 19) and (x >= 1 and x <= 10) then
  2324. mon.setCursorPos(1,17)
  2325. mon.setBackgroundColor(colors.gray)
  2326. mon.setTextColor(colors.black)
  2327. mon.write(" ")
  2328. mon.setBackgroundColor(colors.black)
  2329. mon.setCursorPos(1,18)
  2330. mon.setBackgroundColor(colors.gray)
  2331. mon.setTextColor(colors.black)
  2332. mon.write(page1buttons.p10_4)
  2333. mon.setBackgroundColor(colors.black)
  2334. mon.setCursorPos(1,19)
  2335. mon.setBackgroundColor(colors.gray)
  2336. mon.setTextColor(colors.black)
  2337. mon.write(" ")
  2338. mon.setBackgroundColor(colors.black)
  2339. sleep(1)
  2340. portalMessage()
  2341. modem.transmit(14,99,"button10")
  2342. sleep(1)
  2343. drawGUI()
  2344. sleep(3)
  2347. -- Button 11_4 pressed
  2348. elseif (y >= 17 and y <= 19) and (x >= 11 and x <= 20) then
  2349. mon.setCursorPos(11,17)
  2350. mon.setBackgroundColor(colors.gray)
  2351. mon.setTextColor(colors.black)
  2352. mon.write(" ")
  2353. mon.setBackgroundColor(colors.black)
  2354. mon.setCursorPos(11,18)
  2355. mon.setBackgroundColor(colors.gray)
  2356. mon.setTextColor(colors.black)
  2357. mon.write(page1buttons.p11_4)
  2358. mon.setBackgroundColor(colors.black)
  2359. mon.setCursorPos(11,19)
  2360. mon.setBackgroundColor(colors.gray)
  2361. mon.setTextColor(colors.black)
  2362. mon.write(" ")
  2363. mon.setBackgroundColor(colors.black)
  2364. sleep(1)
  2365. portalMessage()
  2366. modem.transmit(14,99,"button11")
  2367. sleep(1)
  2368. drawGUI()
  2369. sleep(3)
  2372. -- Button 12_4 pressed
  2373. elseif (y >= 17 and y <= 19) and (x >= 21 and x <= 30) then
  2374. mon.setCursorPos(21,17)
  2375. mon.setBackgroundColor(colors.gray)
  2376. mon.setTextColor(colors.black)
  2377. mon.write(" ")
  2378. mon.setBackgroundColor(colors.black)
  2379. mon.setCursorPos(21,18)
  2380. mon.setBackgroundColor(colors.gray)
  2381. mon.setTextColor(colors.black)
  2382. mon.write(page1buttons.p12_4)
  2383. mon.setBackgroundColor(colors.black)
  2384. mon.setCursorPos(21,19)
  2385. mon.setBackgroundColor(colors.gray)
  2386. mon.setTextColor(colors.black)
  2387. mon.write(" ")
  2388. mon.setBackgroundColor(colors.black)
  2389. sleep(1)
  2390. portalMessage()
  2391. modem.transmit(14,99,"button12")
  2392. sleep(1)
  2393. drawGUI()
  2394. sleep(3)
  2397. -- Page Advance button pressed
  2398. elseif (y >= 1 and y <= 3) and (x >= 26 and x <= 30) then
  2399. screen = 1
  2400. drawGUI()
  2402. -- Page decrease button pressed
  2403. elseif (y >= 1 and y <= 3) and (x >= 1 and x <= 4) then
  2404. screen = 3
  2405. drawGUI()
  2406. end
  2407. end
  2408. end
comments powered by Disqus