ProjectBattleShip_FRA221 / WolfWarp
Committer:
Xantares
Date:
Sun Dec 04 11:58:33 2016 +0000
Revision:
2:777a5a5dadca
yo

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Xantares 2:777a5a5dadca 1 #include "mbed.h"
Xantares 2:777a5a5dadca 2 //************************ Complete to Interface ***************************
Xantares 2:777a5a5dadca 3 // configure library with this code ****************************************
Xantares 2:777a5a5dadca 4 SPI dot_matrix(D11,NC,D13); //mosi miso sclk
Xantares 2:777a5a5dadca 5 DigitalOut lat(PA_12); //6
Xantares 2:777a5a5dadca 6 DigitalOut sb(PA_11); //7
Xantares 2:777a5a5dadca 7 DigitalOut rst(D10);
Xantares 2:777a5a5dadca 8 BusOut open_line(D2,D3,D4,D5,D6,D7,D8,D9);
Xantares 2:777a5a5dadca 9 //c0 c1 c2 c3 c4 c5 c6 c7 dont foget d7
Xantares 2:777a5a5dadca 10 Serial pc(D1, D0);
Xantares 2:777a5a5dadca 11 Timer t;
Xantares 2:777a5a5dadca 12
Xantares 2:777a5a5dadca 13 int counter;
Xantares 2:777a5a5dadca 14 int click = 0;
Xantares 2:777a5a5dadca 15 int swap = 0;
Xantares 2:777a5a5dadca 16 int downter = 60;
Xantares 2:777a5a5dadca 17 uint8_t rgb[3] = {0,0,0};
Xantares 2:777a5a5dadca 18
Xantares 2:777a5a5dadca 19
Xantares 2:777a5a5dadca 20 int main(){
Xantares 2:777a5a5dadca 21
Xantares 2:777a5a5dadca 22 dot_matrix.frequency(1000000);
Xantares 2:777a5a5dadca 23 // dot_matrix.format(6,0);
Xantares 2:777a5a5dadca 24 uint8_t wb[3] = {255,255,255};
Xantares 2:777a5a5dadca 25 uint8_t pic[130][8] = {
Xantares 2:777a5a5dadca 26 {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 27 {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 28 {0x01,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 29 {0x01,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 30 {0x03,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 31 {0x03,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 32 {0x07,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 33 {0x07,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 34 {0x0f,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 35 {0x0f,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 36 {0x1f,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 37 {0x1f,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 38 {0x3f,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 39 {0x3f,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 40 {0x7f,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 41 {0x7f,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 42 {0xff,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 43 {0xff,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 44 {0xff,0x80,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 45 {0xff,0x80,0x00,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 46 {0xff,0x80,0x80,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 47 {0xff,0x80,0x80,0x00,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 48 {0xff,0x80,0x80,0x80,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 49 {0xff,0x80,0x80,0x80,0x00,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 50 {0xff,0x80,0x80,0x80,0x80,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 51 {0xff,0x80,0x80,0x80,0x80,0x00,0x00,0x00},
Xantares 2:777a5a5dadca 52 {0xff,0x80,0x80,0x80,0x80,0x80,0x00,0x00},
Xantares 2:777a5a5dadca 53 {0xff,0x80,0x80,0x80,0x80,0x80,0x00,0x00},
Xantares 2:777a5a5dadca 54 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0x00},
Xantares 2:777a5a5dadca 55 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0x00},
Xantares 2:777a5a5dadca 56 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0x80},
Xantares 2:777a5a5dadca 57 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0x80},
Xantares 2:777a5a5dadca 58 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xc0},
Xantares 2:777a5a5dadca 59 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xc0},
Xantares 2:777a5a5dadca 60 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xe0},
Xantares 2:777a5a5dadca 61 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xe0},
Xantares 2:777a5a5dadca 62 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xf0},
Xantares 2:777a5a5dadca 63 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xf0},
Xantares 2:777a5a5dadca 64 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xf8},
Xantares 2:777a5a5dadca 65 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xf8},
Xantares 2:777a5a5dadca 66 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xfc},
Xantares 2:777a5a5dadca 67 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xfc},
Xantares 2:777a5a5dadca 68 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xfe},
Xantares 2:777a5a5dadca 69 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xfe},
Xantares 2:777a5a5dadca 70 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xff},
Xantares 2:777a5a5dadca 71 {0xff,0x80,0x80,0x80,0x80,0x80,0x80,0xff},
Xantares 2:777a5a5dadca 72 {0xff,0x80,0x80,0x80,0x80,0x80,0x81,0xff},
Xantares 2:777a5a5dadca 73 {0xff,0x80,0x80,0x80,0x80,0x80,0x81,0xff},
Xantares 2:777a5a5dadca 74 {0xff,0x80,0x80,0x80,0x80,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 75 {0xff,0x80,0x80,0x80,0x80,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 76 {0xff,0x80,0x80,0x80,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 77 {0xff,0x80,0x80,0x80,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 78 {0xff,0x80,0x80,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 79 {0xff,0x80,0x80,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 80 {0xff,0x80,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 81 {0xff,0x80,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 82 {0xff,0x81,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 83 {0xff,0x81,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 84 {0xff,0x83,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 85 {0xff,0x83,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 86 {0xff,0x87,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 87 {0xff,0x87,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 88 {0xff,0x8f,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 89 {0xff,0x8f,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 90 {0xff,0x9f,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 91 {0xff,0x9f,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 92 {0xff,0xbf,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 93 {0xff,0xbf,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 94 {0xff,0xff,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 95 {0xff,0xff,0x81,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 96 {0xff,0xff,0xc1,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 97 {0xff,0xff,0xc1,0x81,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 98 {0xff,0xff,0xc1,0xc1,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 99 {0xff,0xff,0xc1,0xc1,0x81,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 100 {0xff,0xff,0xc1,0xc1,0xc1,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 101 {0xff,0xff,0xc1,0xc1,0xc1,0x81,0x81,0xff},
Xantares 2:777a5a5dadca 102 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0x81,0xff},
Xantares 2:777a5a5dadca 103 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0x81,0xff},
Xantares 2:777a5a5dadca 104 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0xc1,0xff},
Xantares 2:777a5a5dadca 105 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0xc1,0xff},
Xantares 2:777a5a5dadca 106 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0xe1,0xff},
Xantares 2:777a5a5dadca 107 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0xe1,0xff},
Xantares 2:777a5a5dadca 108 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0xf1,0xff},
Xantares 2:777a5a5dadca 109 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0xf1,0xff},
Xantares 2:777a5a5dadca 110 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0xf9,0xff},
Xantares 2:777a5a5dadca 111 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0xf9,0xff},
Xantares 2:777a5a5dadca 112 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0xfd,0xff},
Xantares 2:777a5a5dadca 113 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0xfd,0xff},
Xantares 2:777a5a5dadca 114 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0xff,0xff},
Xantares 2:777a5a5dadca 115 {0xff,0xff,0xc1,0xc1,0xc1,0xc1,0xff,0xff},
Xantares 2:777a5a5dadca 116 {0xff,0xff,0xc1,0xc1,0xc1,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 117 {0xff,0xff,0xc1,0xc1,0xc1,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 118 {0xff,0xff,0xc1,0xc1,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 119 {0xff,0xff,0xc1,0xc1,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 120 {0xff,0xff,0xc1,0xc3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 121 {0xff,0xff,0xc1,0xc3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 122 {0xff,0xff,0xc3,0xc3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 123 {0xff,0xff,0xc3,0xc3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 124 {0xff,0xff,0xc7,0xc3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 125 {0xff,0xff,0xc7,0xc3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 126 {0xff,0xff,0xcf,0xc3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 127 {0xff,0xff,0xcf,0xc3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 128 {0xff,0xff,0xdf,0xc3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 129 {0xff,0xff,0xdf,0xc3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 130 {0xff,0xff,0xff,0xc3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 131 {0xff,0xff,0xff,0xc3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 132 {0xff,0xff,0xff,0xe3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 133 {0xff,0xff,0xff,0xe3,0xc3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 134 {0xff,0xff,0xff,0xe3,0xe3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 135 {0xff,0xff,0xff,0xe3,0xe3,0xc3,0xff,0xff},
Xantares 2:777a5a5dadca 136 {0xff,0xff,0xff,0xe3,0xe3,0xe3,0xff,0xff},
Xantares 2:777a5a5dadca 137 {0xff,0xff,0xff,0xe3,0xe3,0xe3,0xff,0xff},
Xantares 2:777a5a5dadca 138 {0xff,0xff,0xff,0xe3,0xe3,0xf3,0xff,0xff},
Xantares 2:777a5a5dadca 139 {0xff,0xff,0xff,0xe3,0xe3,0xf3,0xff,0xff},
Xantares 2:777a5a5dadca 140 {0xff,0xff,0xff,0xe3,0xe3,0xfb,0xff,0xff},
Xantares 2:777a5a5dadca 141 {0xff,0xff,0xff,0xe3,0xe3,0xfb,0xff,0xff},
Xantares 2:777a5a5dadca 142 {0xff,0xff,0xff,0xe3,0xe3,0xff,0xff,0xff},
Xantares 2:777a5a5dadca 143 {0xff,0xff,0xff,0xe3,0xe3,0xff,0xff,0xff},
Xantares 2:777a5a5dadca 144 {0xff,0xff,0xff,0xe3,0xe7,0xff,0xff,0xff},
Xantares 2:777a5a5dadca 145 {0xff,0xff,0xff,0xe3,0xe7,0xff,0xff,0xff},
Xantares 2:777a5a5dadca 146 {0xff,0xff,0xff,0xe7,0xe7,0xff,0xff,0xff},
Xantares 2:777a5a5dadca 147 {0xff,0xff,0xff,0xe7,0xe7,0xff,0xff,0xff},
Xantares 2:777a5a5dadca 148 {0xff,0xff,0xff,0xef,0xe7,0xff,0xff,0xff},
Xantares 2:777a5a5dadca 149 {0xff,0xff,0xff,0xef,0xe7,0xff,0xff,0xff},
Xantares 2:777a5a5dadca 150 {0xff,0xff,0xff,0xff,0xe7,0xff,0xff,0xff},
Xantares 2:777a5a5dadca 151 {0xff,0xff,0xff,0xff,0xe7,0xff,0xff,0xff},
Xantares 2:777a5a5dadca 152 {0xff,0xff,0xff,0xff,0xf7,0xff,0xff,0xff},
Xantares 2:777a5a5dadca 153 {0xff,0xff,0xff,0xff,0xf7,0xff,0xff,0xff},
Xantares 2:777a5a5dadca 154 {0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff},
Xantares 2:777a5a5dadca 155 {0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff}
Xantares 2:777a5a5dadca 156 };
Xantares 2:777a5a5dadca 157 uint8_t temp;
Xantares 2:777a5a5dadca 158 int line[8] = {1,2,4,8,16,32,64,128};
Xantares 2:777a5a5dadca 159
Xantares 2:777a5a5dadca 160 rst = 1;
Xantares 2:777a5a5dadca 161 wait(0.5);
Xantares 2:777a5a5dadca 162 rst = 0;
Xantares 2:777a5a5dadca 163 wait(0.5);
Xantares 2:777a5a5dadca 164 rst = 1;
Xantares 2:777a5a5dadca 165 wait(0.5);
Xantares 2:777a5a5dadca 166
Xantares 2:777a5a5dadca 167 //dot_matrix.format(6,0);
Xantares 2:777a5a5dadca 168 sb = 0; // 6 bit
Xantares 2:777a5a5dadca 169 for(int i = 0; i<8; i++){
Xantares 2:777a5a5dadca 170 dot_matrix.write(wb[0]);
Xantares 2:777a5a5dadca 171 dot_matrix.write(wb[1]);
Xantares 2:777a5a5dadca 172 dot_matrix.write(wb[2]);
Xantares 2:777a5a5dadca 173
Xantares 2:777a5a5dadca 174 open_line = 0;
Xantares 2:777a5a5dadca 175 // dot_matrix.format(8,0);
Xantares 2:777a5a5dadca 176 sb = 1; // 8 bit
Xantares 2:777a5a5dadca 177 t.start();
Xantares 2:777a5a5dadca 178 while (1) {
Xantares 2:777a5a5dadca 179
Xantares 2:777a5a5dadca 180 for(int j=0;j<=130;j++){
Xantares 2:777a5a5dadca 181 swap = swap + 1;
Xantares 2:777a5a5dadca 182 for(int a=0;a<=8;a++){
Xantares 2:777a5a5dadca 183 temp = pic[j][a];
Xantares 2:777a5a5dadca 184 counter = counter+1;
Xantares 2:777a5a5dadca 185 if( counter == 60 ){
Xantares 2:777a5a5dadca 186 click = click+1;
Xantares 2:777a5a5dadca 187 counter=0;
Xantares 2:777a5a5dadca 188 }
Xantares 2:777a5a5dadca 189 if(click == 0){
Xantares 2:777a5a5dadca 190 rgb[0] = 0;
Xantares 2:777a5a5dadca 191 rgb[1] = 0;
Xantares 2:777a5a5dadca 192 rgb[2] = counter;
Xantares 2:777a5a5dadca 193 }
Xantares 2:777a5a5dadca 194 else if(click == 1){
Xantares 2:777a5a5dadca 195 rgb[0] = 0;
Xantares 2:777a5a5dadca 196 rgb[1] = counter;
Xantares 2:777a5a5dadca 197 rgb[2] = 60;
Xantares 2:777a5a5dadca 198 }
Xantares 2:777a5a5dadca 199 else if(click == 2){
Xantares 2:777a5a5dadca 200 rgb[0] = 0;
Xantares 2:777a5a5dadca 201 rgb[1] = 60;
Xantares 2:777a5a5dadca 202 rgb[2] = 60 - counter;
Xantares 2:777a5a5dadca 203 }
Xantares 2:777a5a5dadca 204 else if(click == 3){
Xantares 2:777a5a5dadca 205 rgb[0] = counter;
Xantares 2:777a5a5dadca 206 rgb[1] = 60;
Xantares 2:777a5a5dadca 207 rgb[2] = 0;
Xantares 2:777a5a5dadca 208 }
Xantares 2:777a5a5dadca 209 else if(click == 4){
Xantares 2:777a5a5dadca 210 rgb[0] = 60;
Xantares 2:777a5a5dadca 211 rgb[1] = 60 - counter;
Xantares 2:777a5a5dadca 212 rgb[2] = 0;
Xantares 2:777a5a5dadca 213 }
Xantares 2:777a5a5dadca 214 else if(click == 5){
Xantares 2:777a5a5dadca 215 rgb[0] = 60;
Xantares 2:777a5a5dadca 216 rgb[1] = 0;
Xantares 2:777a5a5dadca 217 rgb[2] = counter;
Xantares 2:777a5a5dadca 218 }
Xantares 2:777a5a5dadca 219 else if(click == 6){
Xantares 2:777a5a5dadca 220 rgb[0] = 60 - counter;
Xantares 2:777a5a5dadca 221 rgb[1] = 0;
Xantares 2:777a5a5dadca 222 rgb[2] = 60;
Xantares 2:777a5a5dadca 223 }
Xantares 2:777a5a5dadca 224 else if(click == 7){
Xantares 2:777a5a5dadca 225 rgb[0] = 0;
Xantares 2:777a5a5dadca 226 rgb[1] = 0;
Xantares 2:777a5a5dadca 227 rgb[2] = 60;
Xantares 2:777a5a5dadca 228 click = 1;
Xantares 2:777a5a5dadca 229 }
Xantares 2:777a5a5dadca 230 wait(0.001);
Xantares 2:777a5a5dadca 231 for(int i = 0; i<8; i++){
Xantares 2:777a5a5dadca 232
Xantares 2:777a5a5dadca 233 if(temp & 0x80){
Xantares 2:777a5a5dadca 234 dot_matrix.write(rgb[0]);
Xantares 2:777a5a5dadca 235 dot_matrix.write(rgb[1]);
Xantares 2:777a5a5dadca 236 dot_matrix.write(rgb[2]);
Xantares 2:777a5a5dadca 237 }
Xantares 2:777a5a5dadca 238 else{
Xantares 2:777a5a5dadca 239 dot_matrix.write(0);
Xantares 2:777a5a5dadca 240 dot_matrix.write(0);
Xantares 2:777a5a5dadca 241 dot_matrix.write(0);
Xantares 2:777a5a5dadca 242 }
Xantares 2:777a5a5dadca 243 temp = temp << 1;
Xantares 2:777a5a5dadca 244 }
Xantares 2:777a5a5dadca 245 lat = 1;
Xantares 2:777a5a5dadca 246 lat = 0;
Xantares 2:777a5a5dadca 247 open_line = line[a];
Xantares 2:777a5a5dadca 248 wait(0.001);
Xantares 2:777a5a5dadca 249 }
Xantares 2:777a5a5dadca 250 }
Xantares 2:777a5a5dadca 251
Xantares 2:777a5a5dadca 252 for(int j=129 ; j>=0;j--){
Xantares 2:777a5a5dadca 253 swap = swap + 1;
Xantares 2:777a5a5dadca 254 for(int a=0;a<=8;a++){
Xantares 2:777a5a5dadca 255 temp = pic[j][a];
Xantares 2:777a5a5dadca 256 counter = counter+1;
Xantares 2:777a5a5dadca 257 if( counter == 60 ){
Xantares 2:777a5a5dadca 258 click = click+1;
Xantares 2:777a5a5dadca 259 counter=0;
Xantares 2:777a5a5dadca 260 }
Xantares 2:777a5a5dadca 261 if(click == 0){
Xantares 2:777a5a5dadca 262 rgb[0] = 0;
Xantares 2:777a5a5dadca 263 rgb[1] = 0;
Xantares 2:777a5a5dadca 264 rgb[2] = counter;
Xantares 2:777a5a5dadca 265 }
Xantares 2:777a5a5dadca 266 else if(click == 1){
Xantares 2:777a5a5dadca 267 rgb[0] = 0;
Xantares 2:777a5a5dadca 268 rgb[1] = counter;
Xantares 2:777a5a5dadca 269 rgb[2] = 60;
Xantares 2:777a5a5dadca 270 }
Xantares 2:777a5a5dadca 271 else if(click == 2){
Xantares 2:777a5a5dadca 272 rgb[0] = 0;
Xantares 2:777a5a5dadca 273 rgb[1] = 60;
Xantares 2:777a5a5dadca 274 rgb[2] = 60 - counter;
Xantares 2:777a5a5dadca 275 }
Xantares 2:777a5a5dadca 276 else if(click == 3){
Xantares 2:777a5a5dadca 277 rgb[0] = counter;
Xantares 2:777a5a5dadca 278 rgb[1] = 60;
Xantares 2:777a5a5dadca 279 rgb[2] = 0;
Xantares 2:777a5a5dadca 280 }
Xantares 2:777a5a5dadca 281 else if(click == 4){
Xantares 2:777a5a5dadca 282 rgb[0] = 60;
Xantares 2:777a5a5dadca 283 rgb[1] = 60 - counter;
Xantares 2:777a5a5dadca 284 rgb[2] = 0;
Xantares 2:777a5a5dadca 285 }
Xantares 2:777a5a5dadca 286 else if(click == 5){
Xantares 2:777a5a5dadca 287 rgb[0] = 60;
Xantares 2:777a5a5dadca 288 rgb[1] = 0;
Xantares 2:777a5a5dadca 289 rgb[2] = counter;
Xantares 2:777a5a5dadca 290 }
Xantares 2:777a5a5dadca 291 else if(click == 6){
Xantares 2:777a5a5dadca 292 rgb[0] = 60 - counter;
Xantares 2:777a5a5dadca 293 rgb[1] = 0;
Xantares 2:777a5a5dadca 294 rgb[2] = 60;
Xantares 2:777a5a5dadca 295 }
Xantares 2:777a5a5dadca 296 else if(click == 7){
Xantares 2:777a5a5dadca 297 rgb[0] = 0;
Xantares 2:777a5a5dadca 298 rgb[1] = 0;
Xantares 2:777a5a5dadca 299 rgb[2] = 60;
Xantares 2:777a5a5dadca 300 click = 1;
Xantares 2:777a5a5dadca 301 }
Xantares 2:777a5a5dadca 302 wait(0.001);
Xantares 2:777a5a5dadca 303
Xantares 2:777a5a5dadca 304
Xantares 2:777a5a5dadca 305
Xantares 2:777a5a5dadca 306 for(int i = 0; i<8; i++){
Xantares 2:777a5a5dadca 307
Xantares 2:777a5a5dadca 308 if(temp & 0x80){
Xantares 2:777a5a5dadca 309 dot_matrix.write(rgb[0]);
Xantares 2:777a5a5dadca 310 dot_matrix.write(rgb[1]);
Xantares 2:777a5a5dadca 311 dot_matrix.write(rgb[2]);
Xantares 2:777a5a5dadca 312 }
Xantares 2:777a5a5dadca 313 else{
Xantares 2:777a5a5dadca 314 dot_matrix.write(0);
Xantares 2:777a5a5dadca 315 dot_matrix.write(0);
Xantares 2:777a5a5dadca 316 dot_matrix.write(0);
Xantares 2:777a5a5dadca 317 }
Xantares 2:777a5a5dadca 318 temp = temp << 1;
Xantares 2:777a5a5dadca 319 }
Xantares 2:777a5a5dadca 320 lat = 1;
Xantares 2:777a5a5dadca 321 lat = 0;
Xantares 2:777a5a5dadca 322 open_line = line[a];
Xantares 2:777a5a5dadca 323 wait(0.001);
Xantares 2:777a5a5dadca 324 }
Xantares 2:777a5a5dadca 325 }
Xantares 2:777a5a5dadca 326
Xantares 2:777a5a5dadca 327 //open_line = 0;
Xantares 2:777a5a5dadca 328
Xantares 2:777a5a5dadca 329 }
Xantares 2:777a5a5dadca 330 }
Xantares 2:777a5a5dadca 331 }