Advertisement
Guest User

Defcon 20 Badge POV Updated

a guest
Aug 6th, 2012
521
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. '' -------------------------------------------
  2. '' Defcon 20 Badge POV
  3. ''
  4. '' Written by YakPiMP 2012
  5. ''
  6. '' yakhack.wordpress.com
  7. '' -------------------------------------------
  8. VAR
  9.  
  10. byte count
  11. byte A[10]
  12. byte B[10]
  13. byte C[10]
  14. byte D[10]
  15. byte E[10]
  16. byte F[10]
  17. byte G[10]
  18. byte H[10]
  19. byte I[10]
  20. byte J[10]
  21. byte K[10]
  22. byte L[10]
  23. byte M[10]
  24. byte N[10]
  25. byte O[10]
  26. byte P[10]
  27. byte Q[10]
  28. byte R[10]
  29. byte S[10]
  30. byte T[10]
  31. byte U[10]
  32. byte V[10]
  33. byte W[10]
  34. byte X[10]
  35. byte Y[10]
  36. byte Z[10]
  37. byte SPACE[8]
  38. byte APOSTROPHE[8]
  39. byte SMILE[10]
  40. byte PERIOD[10]
  41. byte SIN[15]
  42. byte ZIGZAG[15]
  43. byte DICK[25]
  44.  
  45. CON
  46. LED1 = 16
  47. LED2 = 17
  48. LED3 = 18
  49. LED4 = 19
  50. LED5 = 20
  51. LED6 = 21
  52. LED7 = 22
  53. LED8 = 23
  54.  
  55. DELAY = 800
  56.  
  57. PUB main
  58. InitLetters
  59.  
  60. repeat 600
  61. 'DrawFUCKYOU
  62. DrawDEFCONXX
  63. 'DrawYAKHACK
  64. 'DrawSIN
  65. 'DrawZIGZAG
  66. 'DrawDONTFUCKITUP
  67. 'DrawDICK
  68. PUB DrawLetter(letter)
  69. count := 1
  70. outa[LED1..LED8] := %00000000
  71.  
  72. repeat byte[letter]
  73. outa[LED1..LED8] := byte[letter + count]
  74. waitcnt(clkfreq/DELAY + cnt)
  75. count += 1
  76.  
  77. PUB DrawLetterBackward(letter)
  78. count := 0
  79. outa[LED1..LED8] := %00000000
  80.  
  81. repeat byte[letter]
  82. outa[LED1..LED8] := byte[letter + (byte[letter] - count)]
  83. waitcnt(clkfreq/DELAY + cnt)
  84. count += 1
  85.  
  86. PUB Wait(waitDelay)
  87. waitcnt(clkfreq/DELAY * waitDelay + cnt)
  88.  
  89. PUB InitLetters
  90. dira[LED1..LED8] := %11111111
  91.  
  92. A[0] := 6
  93. A[1] := %11111111
  94. A[2] := %11111111
  95. A[3] := %11101100
  96. A[4] := %11111111
  97. A[5] := %11111111
  98. A[6] := %0000000
  99.  
  100. B[0] := 5
  101. B[1] := %11111111
  102. B[2] := %11011011
  103. B[3] := %11011011
  104. B[4] := %01100110
  105. B[5] := %00000000
  106.  
  107. C[0] := 6
  108. C[1] := %11111111
  109. C[2] := %11111111
  110. C[3] := %11000011
  111. C[4] := %11000011
  112. C[5] := %11000011
  113. C[6] := %00000000
  114.  
  115. D[0] := 6
  116. D[1] := %11111111
  117. D[2] := %11111111
  118. D[3] := %11000011
  119. D[4] := %01100110
  120. D[5] := %00111100
  121. D[6] := %00000000
  122.  
  123. E[0] := 6
  124. E[1] := %11111111
  125. E[2] := %11111111
  126. E[3] := %11011011
  127. E[4] := %11011011
  128. E[5] := %11000011
  129. E[6] := %00000000
  130.  
  131. F[0] := 6
  132. F[1] := %11111111
  133. F[2] := %11111111
  134. F[3] := %11011000
  135. F[4] := %11011000
  136. F[5] := %11000000
  137. F[6] := %00000000
  138.  
  139. G[0] := 7
  140. G[1] := %11111111
  141. G[2] := %11111111
  142. G[3] := %11000011
  143. G[4] := %11011011
  144. G[5] := %11011011
  145. G[6] := %11011111
  146. G[7] := %00000000
  147.  
  148. H[0] := 7
  149. H[1] := %11111111
  150. H[2] := %11111111
  151. H[3] := %00011000
  152. H[4] := %00011000
  153. H[5] := %11111111
  154. H[6] := %11111111
  155. H[7] := %00000000
  156.  
  157. I[0] := 7
  158. I[1] := %11000011
  159. I[2] := %11000011
  160. I[3] := %11111111
  161. I[4] := %11111111
  162. I[5] := %11000011
  163. I[6] := %11000011
  164. I[7] := %00000000
  165.  
  166. J[0] := 7
  167. J[1] := %11000000
  168. J[2] := %11000000
  169. J[3] := %11111110
  170. J[4] := %11111111
  171. J[5] := %11000011
  172. J[6] := %11000111
  173. J[7] := %00000000
  174.  
  175. K[0] := 6
  176. K[1] := %11111111
  177. K[2] := %11111111
  178. K[3] := %00111100
  179. K[4] := %01100110
  180. K[5] := %11000011
  181. K[6] := %00000000
  182.  
  183. L[0] := 6
  184. L[1] := %11111111
  185. L[2] := %11111111
  186. L[3] := %00000011
  187. L[4] := %00000011
  188. L[5] := %00000011
  189. L[6] := %00000000
  190.  
  191. M[0] := 8
  192. M[1] := %11111111
  193. M[2] := %11111111
  194. M[3] := %01100000
  195. M[4] := %00111000
  196. M[5] := %01100000
  197. M[6] := %11111111
  198. M[7] := %11111111
  199. M[8] := %00000000
  200.  
  201. N[0] := 8
  202. N[1] := %11111111
  203. N[2] := %11111111
  204. N[3] := %01110000
  205. N[4] := %00011000
  206. N[5] := %00011100
  207. N[6] := %11111111
  208. N[7] := %11111111
  209. N[8] := %00000000
  210.  
  211. O[0] := 7
  212. O[1] := %11111111
  213. O[2] := %11111111
  214. O[3] := %11000011
  215. O[4] := %11000011
  216. O[5] := %11111111
  217. O[6] := %11111111
  218. O[7] := %00000000
  219.  
  220. P[0] := 6
  221. P[1] := %11111111
  222. P[2] := %11111111
  223. P[3] := %11001100
  224. P[4] := %11001100
  225. P[5] := %01111000
  226. P[6] := %00000000
  227.  
  228. Q[0] := 8
  229. Q[1] := %00000110
  230. Q[2] := %11111111
  231. Q[3] := %11111111
  232. Q[4] := %11001011
  233. Q[5] := %11000011
  234. Q[6] := %11111111
  235. Q[7] := %11111111
  236. Q[8] := %00000000
  237.  
  238. R[0] := 6
  239. R[1] := %11111111
  240. R[2] := %11111111
  241. R[3] := %11001100
  242. R[4] := %11001111
  243. R[5] := %01111001
  244. R[6] := %00000000
  245.  
  246. S[0] := 5
  247. S[1] := %01100011
  248. S[2] := %11110011
  249. S[3] := %11010011
  250. S[4] := %11001110
  251. S[5] := %00000000
  252.  
  253. T[0] := 7
  254. T[1] := %11000000
  255. T[2] := %11000000
  256. T[3] := %11111111
  257. T[4] := %11111111
  258. T[5] := %11000000
  259. T[6] := %11000000
  260. T[7] := %00000000
  261.  
  262. U[0] := 7
  263. U[1] := %11111111
  264. U[2] := %11111111
  265. U[3] := %00000011
  266. U[4] := %00000011
  267. U[5] := %11111111
  268. U[6] := %11111111
  269. U[7] := %00000000
  270.  
  271. V[0] := 7
  272. V[1] := %11111000
  273. V[2] := %11111110
  274. V[3] := %00000011
  275. V[4] := %00000011
  276. V[5] := %11111110
  277. V[6] := %11111000
  278. V[7] := %00000000
  279.  
  280. W[0] := 8
  281. W[1] := %11111111
  282. W[2] := %11111111
  283. W[3] := %00000110
  284. W[4] := %00011100
  285. W[5] := %00000110
  286. W[6] := %11111111
  287. W[7] := %11111111
  288. W[8] := %00000000
  289.  
  290. X[0] := 6
  291. X[1] := %11100111
  292. X[2] := %01111110
  293. X[3] := %00011000
  294. X[4] := %01111110
  295. X[5] := %11100111
  296. X[6] := %00000000
  297.  
  298. Y[0] := 7
  299. Y[1] := %11100000
  300. Y[2] := %01111000
  301. Y[3] := %00011111
  302. Y[4] := %00011111
  303. Y[5] := %01111000
  304. Y[6] := %11100000
  305. Y[7] := %00000000
  306.  
  307. Z[0] := 6
  308. Z[1] := %11000011
  309. Z[2] := %11001111
  310. Z[3] := %11011011
  311. Z[4] := %11110011
  312. Z[5] := %11000011
  313. Z[6] := %00000000
  314.  
  315. SPACE[0] := 5
  316. SPACE[1] := %00000000
  317. SPACE[2] := %00000000
  318. SPACE[3] := %00000000
  319. SPACE[4] := %00000000
  320. SPACE[5] := %00000000
  321.  
  322. APOSTROPHE[0] := 3
  323. APOSTROPHE[1] := %11100000
  324. APOSTROPHE[2] := %11100000
  325. APOSTROPHE[3] := %00000000
  326.  
  327. SMILE[0] := 8
  328. SMILE[1] := %01111110
  329. SMILE[2] := %10000001
  330. SMILE[3] := %10110101
  331. SMILE[4] := %10000101
  332. SMILE[5] := %10110101
  333. SMILE[6] := %10000001
  334. SMILE[7] := %01111110
  335. SMILE[8] := %00000000
  336.  
  337. Period[0] := 3
  338. Period[1] := %00000111
  339. Period[2] := %00000111
  340. Period[3] := %00000000
  341.  
  342. ZIGZAG[0] := 12
  343. ZIGZAG[1] := %11000000
  344. ZIGZAG[2] := %01100000
  345. ZIGZAG[3] := %00110000
  346. ZIGZAG[4] := %00011000
  347. ZIGZAG[5] := %00001100
  348. ZIGZAG[6] := %00000110
  349. ZIGZAG[7] := %00000011
  350. ZIGZAG[8] := %00000110
  351. ZIGZAG[9] := %00001100
  352. ZIGZAG[10] := %00011000
  353. ZIGZAG[11] := %00110000
  354. ZIGZAG[12] := %01100000
  355.  
  356. SIN[0] := 8
  357. SIN[1] := %11100000
  358. SIN[2] := %11100000
  359. SIN[3] := %00111000
  360. SIN[4] := %00011100
  361. SIN[5] := %00000111
  362. SIN[6] := %00000111
  363. SIN[7] := %00011100
  364. SIN[8] := %00111000
  365.  
  366. DICK[0] := 23
  367. DICK[1] := %11100111
  368. DICK[2] := %11100111
  369. DICK[3] := %10011001
  370. DICK[4] := %10011001
  371. DICK[5] := %11100111
  372. DICK[6] := %11100111
  373. DICK[7] := %01100110
  374. DICK[8] := %01100110
  375. DICK[9] := %01100110
  376. DICK[10] := %01100110
  377. DICK[11] := %01100110
  378. DICK[12] := %01100110
  379. DICK[13] := %01100110
  380. DICK[14] := %01100110
  381. DICK[15] := %11111111
  382. DICK[16] := %11000011
  383. DICK[17] := %01100110
  384. DICK[18] := %00111100
  385. DICK[19] := %00000000
  386. DICK[20] := %00010000
  387. DICK[21] := %00001000
  388. DICK[22] := %00010000
  389. DICK[23] := %00000000
  390.  
  391. PUB DrawFUCKYOU
  392. DrawLetter(@F)
  393. DrawLetter(@U)
  394. DrawLetter(@C)
  395. DrawLetter(@K)
  396. DrawLetter(@SPACE)
  397. DrawLetter(@Y)
  398. DrawLetter(@O)
  399. DrawLetter(@U)
  400. DrawLetter(@SPACE)
  401. DrawLetter(@SPACE)
  402. Wait(40)
  403. DrawLetterBackward(@U)
  404. DrawLetterBackward(@O)
  405. DrawLetterBackward(@Y)
  406. DrawLetter(@SPACE)
  407. DrawLetterBackward(@K)
  408. DrawLetterBackward(@C)
  409. DrawLetterBackward(@U)
  410. DrawLetterBackward(@F)
  411. DrawLetter(@SPACE)
  412. DrawLetter(@SPACE)
  413. Wait(40)
  414.  
  415. PUB DrawDEFCONXX
  416. DrawLetter(@D)
  417. DrawLetter(@E)
  418. DrawLetter(@F)
  419. DrawLetter(@C)
  420. DrawLetter(@O)
  421. DrawLetter(@N)
  422. DrawLetter(@SPACE)
  423. DrawLetter(@X)
  424. DrawLetter(@X)
  425. DrawLetter(@SPACE)
  426. DrawLetter(@SPACE)
  427. Wait(40)
  428. DrawLetterBackward(@X)
  429. DrawLetterBackward(@X)
  430. DrawLetter(@SPACE)
  431. DrawLetterBackward(@N)
  432. DrawLetterBackward(@O)
  433. DrawLetterBackward(@C)
  434. DrawLetterBackward(@F)
  435. DrawLetterBackward(@E)
  436. DrawLetterBackward(@D)
  437. DrawLetter(@SPACE)
  438. DrawLetter(@SPACE)
  439. Wait(40)
  440.  
  441. PUB DrawYAKHACK
  442. DrawLetter(@Y)
  443. DrawLetter(@A)
  444. DrawLetter(@K)
  445. DrawLetter(@H)
  446. DrawLetter(@A)
  447. DrawLetter(@C)
  448. DrawLetter(@K)
  449. DrawLetter(@SPACE)
  450. DrawLetter(@SPACE)
  451. Wait(40)
  452. DrawLetter(@K)
  453. DrawLetter(@C)
  454. DrawLetter(@A)
  455. DrawLetter(@Y)
  456. DrawLetter(@K)
  457. DrawLetter(@A)
  458. DrawLetter(@Y)
  459. DrawLetter(@SPACE)
  460. DrawLetter(@SPACE)
  461. Wait(40)
  462.  
  463. PUB DrawZIGZAG
  464. repeat 10
  465. DrawLetter(@ZIGZAG)
  466.  
  467. PUB DrawSIN
  468. repeat 10
  469. DrawLetter(@SIN)
  470.  
  471. PUB DrawDONTFUCKITUP
  472. repeat 10
  473. DrawLetter(@D)
  474. DrawLetter(@O)
  475. DrawLetter(@N)
  476. DrawLetter(@APOSTROPHE)
  477. DrawLetter(@T)
  478. Wait(40)
  479. DrawLetter(@T)
  480. DrawLetter(@APOSTROPHE)
  481. DrawLetter(@N)
  482. DrawLetter(@O)
  483. DrawLetter(@D)
  484. Wait(40)
  485.  
  486. repeat 10
  487. DrawLetter(@F)
  488. DrawLetter(@U)
  489. DrawLetter(@C)
  490. DrawLetter(@K)
  491. DrawLetter(@SPACE)
  492. Wait(40)
  493. DrawLetter(@K)
  494. DrawLetter(@C)
  495. DrawLetter(@U)
  496. DrawLetter(@F)
  497. DrawLetter(@SPACE)
  498. Wait(40)
  499.  
  500. repeat 10
  501. DrawLetter(@I)
  502. DrawLetter(@T)
  503. DrawLetter(@SPACE)
  504. DrawLetter(@SPACE)
  505. DrawLetter(@SPACE)
  506. Wait(40)
  507. DrawLetter(@T)
  508. DrawLetter(@I)
  509. DrawLetter(@SPACE)
  510. DrawLetter(@SPACE)
  511. DrawLetter(@SPACE)
  512. Wait(40)
  513.  
  514. repeat 10
  515. DrawLetter(@U)
  516. DrawLetter(@P)
  517. DrawLetter(@SPACE)
  518. DrawLetter(@SPACE)
  519. DrawLetter(@SPACE)
  520. Wait(40)
  521. DrawLetter(@P)
  522. DrawLetter(@U)
  523. DrawLetter(@SPACE)
  524. DrawLetter(@SPACE)
  525. DrawLetter(@SPACE)
  526. Wait(40)
  527.  
  528. PUB DrawDICK
  529. DrawLetter(@DICK)
  530. DrawLetter(@SPACE)
  531. DrawLetter(@SPACE)
  532. Wait(40)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement