   	>                                                                ð<                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 """""""""     """""""   """"""""""" """"""""""" """""""""                 """"""               333333333   333333333   23333333#     233333#   2333333333# 2333333333# 23333333#                 333333               CDDDDDDD4   CDDDDDDD4   23333333#     233333#   2333333333# 2333333333# 23333333#                 333333               CDDDDDDD4   CDDDDDDD4   23333333#     233333#   2333333333# 2333333333# 23333333#                 333333               CDDDDDDD4   CDDDDDDD4   23333333#"" ""233333#"" 2333333333# 2333333333# 23333333#               ""333333""             CDDDDDDD4   CDDDDDDD433 2333#"""23# 2333#"""23# 2333#"""""" 2333#"""""" ""2333#""               3333""""33             33CDDD433   CDDD4333CD4 2333#   23# 2333#   23# 2333#       2333#         2333#                 3333   33               CDDD4     CDDD4   CD4 2333#   23# 2333#   23# 2333#       2333#         2333#                 3333   33               CDDD4     CDDD4   CD4 2333#   23# 2333#   23# 2333#""""   2333#""""     2333#                 3333   33               CDDD4     CDDD4   CD4 2333#   23# 2333#   23# 23333333#   23333333#     2333#                 3333   ""               CDDD4     CDDD4   CD4 2333#   23# 2333#   23# 23333333#   23333333#     2333#                 3333                     CDDD4     CDDD4   CD4 2333#   23# 2333#   23# 23333333#   23333333#     2333#                 3333                     CDDD4     CDDD4   CD4 2333#"""23# 2333#"""23# 23333333#   23333333#     2333#                 3333   ""               CDDD4     CDDD4333CD4 23333333#"" 2333333333# 2333#""""   2333#""""     2333#                 3333   33               CDDD4     CDDDDDDD433 23333333#   2333333333# 2333#       2333#         2333#                 3333   33               CDDD4     CDDDDDDD4   23333333#   2333333333# 2333#       2333#         2333#                 3333   33               CDDD4     CDDDDDDD4   23333333#"" 2333333333# 2333#       2333#       ""2333#""               3333""""33               CDDD4     CDDDDDDD433 2333#"""23# 2333#"""23# 2333#       2333#       23333333#               ""333333""               CDDD4     CDDD4333CD4 2333#   23# 2333#   23# 2333#       2333#       23333333#                 333333                 CDDD4     CDDD4   CD4 2333#   23# 2333#   23# 2333#       2333#       23333333#                 333333                 CDDD4     CDDD4   CD4 2333#   23# 2333#   23# 2333#       2333#       23333333#                 333333                 CDDD4     CDDD4   CD4 """""   """ """""   """ """""       """""       """""""""                 """"""                 33333     33333   333                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                   3333333   33333333333           03333333333  333333333     3333333               ªªªªªªªªª   ªªªªªªªªª     ªªªªªªª     CDDDDD4   CDDDDDDDDD4           0DDDDDDDDDD  CDDDDDDD4     CDDDDD4               º»»»»»»»«   º»»»»»»»«     º»»»»»«     CDDDDD4   CDDDDDDDDD4           0DDDDDDDDDD  CDDDDDDD4     CDDDDD4               º»»»»»»»«   º»»»»»»»«     º»»»»»«     CDDDDD4   CDDDDDDDDD4           0DDDDDDDDDD  CDDDDDDD4     CDDDDD4               º»»»»»»»«   º»»»»»»»«     º»»»»»«   33CDDDDD433 CDDDDDDDDD4           0DDDDDDDDDD  CDDDDDDD4   33CDDDDD433             º»»»»»»»«   º»»»»»»»«ªª ªªº»»»»»«ªª CDDD4333CD4 CDDD4333333           0DDDD333333  33CDDD433   CDDD4333CD4             ªªº»»»«ªª   º»»»«ªªªº»« º»»»«ªªªº»« CDDD4   CD4 CDDD4                 0DDDD          CDDD4     CDDD4   CD4               º»»»«     º»»»«   º»« º»»»«   º»« CDDD4   CD4 CDDD4                 0DDDD          CDDD4     CDDD4   CD4               º»»»«     º»»»«   º»« º»»»«   º»« CDDD4   CD4 CDDD43333             0DDDD3333      CDDD4     CDDD4   CD4               º»»»«     º»»»«   º»« º»»»«   º»« CDDD4   CD4 CDDDDDDD4             0DDDDDDDD      CDDD4     CDDD4   333               º»»»«     º»»»«   º»« º»»»«   º»« CDDD4   CD4 CDDDDDDD4             0DDDDDDDD      CDDD4     CDDD4                     º»»»«     º»»»«   º»« º»»»«   º»« CDDD4   CD4 CDDDDDDD4             0DDDDDDDD      CDDD4     CDDD4                     º»»»«     º»»»«   º»« º»»»«   º»« CDDD4333CD4 CDDDDDDD4             0DDDDDDDD      CDDD4     CDDD4   333               º»»»«     º»»»«ªªªº»« º»»»«ªªªº»« CDDDDDDDDD4 CDDD43333             0DDDD3333      CDDD4     CDDD4   CD4               º»»»«     º»»»»»»»«ªª º»»»»»»»»»« CDDDDDDDDD4 CDDD4                 0DDDD          CDDD4     CDDD4   CD4               º»»»«     º»»»»»»»«   º»»»»»»»»»« CDDDDDDDDD4 CDDD4                 0DDDD          CDDD4     CDDD4   CD4               º»»»«     º»»»»»»»«   º»»»»»»»»»« CDDDDDDDDD4 CDDD4                 0DDDD        33CDDD433   CDDD4333CD4               º»»»«     º»»»»»»»«ªª º»»»»»»»»»« CDDD4333CD4 CDDD4                 0DDDD        CDDDDDDD4   33CDDDDD433               º»»»«     º»»»«ªªªº»« º»»»«ªªªº»« CDDD4   CD4 CDDD4                 0DDDD        CDDDDDDD4     CDDDDD4                 º»»»«     º»»»«   º»« º»»»«   º»« CDDD4   CD4 CDDD4                 0DDDD        CDDDDDDD4     CDDDDD4                 º»»»«     º»»»«   º»« º»»»«   º»« CDDD4   CD4 CDDD4                 0DDDD        CDDDDDDD4     CDDDDD4                 º»»»«     º»»»«   º»« º»»»«   º»« 33333   333 33333                 03333        333333333     3333333                 ªªªªª     ªªªªª   ªªª ªªªªª   ªªª                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                            ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ       ÀÌÌÌÌÌÌÌ                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  `ffffffff      fffffffff     fffffff   fffffffffff !""""""""" !""""""""" !"""""""     !"""""                       `UUUUUUUU      VUUUUUUUe     VUUUUUe   VUUUUUUUUUe !""""""""" !""""""""" !"""""""     !"""""                       `UUUUUUUU      VUUUUUUUe     VUUUUUe   VUUUUUUUUUe !""""""""" !""""""""" !"""""""     !"""""                       `UUUUUUUU      VUUUUUUUe     VUUUUUe   VUUUUUUUUUe !""""""""" !""""""""" !"""""""   !"""""                     `UUUUUUUU      VUUUUUUUeff ffVUUUUUeff VUUUUUUUUUe !""" !""" !"""   !"""!"                     `ffUUUUff      VUUUefffVUe VUUUefffVUe VUUUeffffff !"""       !"""         !"""     !"""   !"                       `UUUU        VUUUe   VUe VUUUe   VUe VUUUe       !"""       !"""         !"""     !"""   !"                       `UUUU        VUUUe   VUe VUUUe   VUe VUUUe       !"""   !"""     !"""     !"""   !"                       `UUUU        VUUUe   VUe VUUUe   VUe VUUUeffff   !"""""""   !"""""""     !"""     !"""                          `UUUU        VUUUe   VUe VUUUe   VUe VUUUUUUUe   !"""""""   !"""""""     !"""     !"""                             `UUUU        VUUUe   VUe VUUUe   VUe VUUUUUUUe   !"""""""   !"""""""     !"""     !"""                             `UUUU        VUUUe   VUe VUUUe   VUe VUUUUUUUe   !"""""""   !"""""""     !"""     !"""                          `UUUU        VUUUefffVUe VUUUefffVUe VUUUUUUUe   !"""   !"""     !"""     !"""   !"                       `UUUU        VUUUUUUUeff VUUUUUUUUUe VUUUeffff   !"""       !"""         !"""     !"""   !"                       `UUUU        VUUUUUUUe   VUUUUUUUUUe VUUUe       !"""       !"""         !"""     !"""   !"                       `UUUU        VUUUUUUUe   VUUUUUUUUUe VUUUe       !"""       !"""       !"""   !"""!"                       `UUUU        VUUUUUUUeff VUUUUUUUUUe VUUUe       !"""       !"""       !"""""""   !"""""                       `UUUU        VUUUefffVUe VUUUefffVUe VUUUe       !"""       !"""       !"""""""     !"""""                         `UUUU        VUUUe   VUe VUUUe   VUe VUUUe       !"""       !"""       !"""""""     !"""""                         `UUUU        VUUUe   VUe VUUUe   VUe VUUUe       !"""       !"""       !"""""""     !"""""                         `UUUU        VUUUe   VUe VUUUe   VUe VUUUe                                                   `ffff        fffff   fff fffff   fff fffff                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  ˆˆˆˆˆˆˆˆˆ      ˆˆˆˆˆˆˆ               ªªªªªªªªª   ªªªªªªªªª     ªªªªªªª   ªªªªªªªªªªª ªªªªªªªªªªª            ª           ˜™™™™™™™‰      ˜™™™™™‰               º»»»»»»»«   º»»»»»»»«     º»»»»»«   º»»»»»»»»»« º»»»»»»»»»«            º           ˜™™™™™™™‰      ˜™™™™™‰               º»»»»»»»«   º»»»»»»»«     º»»»»»«   º»»»»»»»»»« º»»»»»»»»»«            º           ˜™™™™™™™‰      ˜™™™™™‰               º»»»»»»»«   º»»»»»»»«     º»»»»»«   º»»»»»»»»»« º»»»»»»»»»«            º           ˜™™™™™™™‰    ˆˆ˜™™™™™‰ˆˆ             º»»»»»»»«   º»»»»»»»«ªª ªªº»»»»»«ªª º»»»»»»»»»« º»»»»»»»»»«            º           ˆˆ˜™™™‰ˆˆ    ˜™™™‰ˆˆˆ˜™‰             ªªº»»»«ªª   º»»»«ªªªº»« º»»»«ªªªº»« º»»»«ªªªªªª º»»»«ªªªªªª            ª             ˜™™™‰      ˜™™™‰   ˜™‰               º»»»«     º»»»«   º»« º»»»«   º»« º»»»«       º»»»«                                ˜™™™‰      ˜™™™‰   ˜™‰               º»»»«     º»»»«   º»« º»»»«   º»« º»»»«       º»»»«                                ˜™™™‰      ˜™™™‰   ˜™‰               º»»»«     º»»»«   º»« º»»»«   º»« º»»»«ªªªª   º»»»«ªªªª                            ˜™™™‰      ˜™™™‰   ˆˆˆ               º»»»«     º»»»«   º»« º»»»«   º»« º»»»»»»»«   º»»»»»»»«                            ˜™™™‰      ˜™™™‰                     º»»»«     º»»»«   º»« º»»»«   º»« º»»»»»»»«   º»»»»»»»«                            ˜™™™‰      ˜™™™‰                     º»»»«     º»»»«   º»« º»»»«   º»« º»»»»»»»«   º»»»»»»»«                            ˜™™™‰      ˜™™™‰   ˆˆˆ               º»»»«     º»»»«ªªªº»« º»»»«ªªªº»« º»»»»»»»«   º»»»»»»»«                            ˜™™™‰      ˜™™™‰   ˜™‰               º»»»«     º»»»»»»»«ªª º»»»»»»»»»« º»»»«ªªªª   º»»»«ªªªª                            ˜™™™‰      ˜™™™‰   ˜™‰               º»»»«     º»»»»»»»«   º»»»»»»»»»« º»»»«       º»»»«                                ˜™™™‰      ˜™™™‰   ˜™‰               º»»»«     º»»»»»»»«   º»»»»»»»»»« º»»»«       º»»»«                              ˆˆ˜™™™‰ˆˆ    ˜™™™‰ˆˆˆ˜™‰               º»»»«     º»»»»»»»«ªª º»»»»»»»»»« º»»»«       º»»»«                  ª           ˜™™™™™™™‰    ˆˆ˜™™™™™‰ˆˆ               º»»»«     º»»»«ªªªº»« º»»»«ªªªº»« º»»»«       º»»»«                  º           ˜™™™™™™™‰      ˜™™™™™‰                 º»»»«     º»»»«   º»« º»»»«   º»« º»»»«       º»»»«                  º           ˜™™™™™™™‰      ˜™™™™™‰                 º»»»«     º»»»«   º»« º»»»«   º»« º»»»«       º»»»«                  º           ˜™™™™™™™‰      ˜™™™™™‰                 º»»»«     º»»»«   º»« º»»»«   º»« º»»»«       º»»»«                  º           ˆˆˆˆˆˆˆˆˆ      ˆˆˆˆˆˆˆ                 ªªªªª     ªªªªª   ªªª ªªªªª   ªªª ªªªªª       ªªªªª                  ª -- title: traffic
-- author: potato imaginator
-- desc: Traffic Text Typography
-- script: lua

function BOOT()
 rnd=math.random
 v1={" ","T","R","A","F","F","I","C"}
 c1={2,3,4,9,10,11,5,6}
 c2={1,2,3,8,9,10,6,7}
 h={0,30,72,72+30}
 t=0
 tim={}
 a={}
 ind={}
 for r=1,4 do -- r is row number
  tim[r]=rnd(0,6)
	 z=rnd(0,5)
		a[r]={}
		ind[r]={}
	 for i=1,3 do
	  a[r][i]={}
	  ind[r][i]=1
	  z2=rnd(1,#c1)
	  for j=0,7 do
	   a[r][i][j]=
	   {x=24*j+24*9*(i-1)-24*z,y=7+h[r],
				 c=z2}
	  end
	 end
 end
end

function timer()
 t=t+1
end

function upd()
 for r=1,4 do
  if t>tim[r]*24 then
		 for i=1,3 do
		  a[r][i][ind[r][i]].x
				=a[r][i][ind[r][i]].x-1
		  if a[r][i][ind[r][i]].x
		  <a[r][i][ind[r][i]-1].x 
				and ind[r][i]==1 then
		   a[r][i][1].x=a[r][i][0].x
		   ind[r][i]=2
		  elseif a[r][i][ind[r][i]].x
		  <a[r][i][ind[r][i]-1].x+24
		  and ind[r][i]>1 then
		   a[r][i][ind[r][i]].x
		   =a[r][i][ind[r][i]-1].x+24
		   ind[r][i]=ind[r][i]+1
		  end
		  if ind[r][i]>7 then
		   a[r][i][0].x=a[r][i][0].x-24
		   if a[r][i][0].x<-24*7 then
		    a[r][i][0].x=a[r][i][0].x+24*28
		   end
		   ind[r][i]=1
		  end
		 end
		end
 end
end

function TIC()
 cls()
 timer()
 upd()
 for i=0,10 do
  rect(30*i+7,67,15,3,12)
 end
 for r=1,4 do
	 for i=1,3 do
	  for j=0,7 do
	   for l=-1,1 do
	    for m=-1,1 do
	     print
	     (v1[1+j%8],
	      a[r][i][j].x+l+1,a[r][i][j].y+m,
	      c2[a[r][i][j].c],false,4)
	    end
	   end
	   print
	   (v1[1+j%8],a[r][i][j].x+1,
				 a[r][i][j].y,
	    c1[a[r][i][j].c],false,4)
	  end
	 end
 end
end
