Unknown Goboflower Firmware Mod

Posted on 10. März 2015 by Andre

Edit: Ich weiß immernoch nicht den Hersteller, noch das Modell. Könnte Eurolite sein, könnte Futurelight sein. Ich habe jedoch schon alle möglichen Eurolite Goboflower, Racer MK1 , Racer MK2, Racer Mk3 etc in der Hand gehabt, keine war wie die hier – falls jemand das Modell erkennt, bitte Nachricht an mich, oder hier was posten.

Diesen Effekt bekam ich quasi geschenkt, jedoch mit dem kleinen Nachteil, dass eine druchgebrannte CPU drin war. Da es keine Teile mehr gibt, musste ich wohl oder übel die Firmware von Grund auf neu machen. Anstelle des 89C51 von Atmel hatte ich einen STC89C52RC hier liegen. Gesamte Zeit bis der Code ging, ca 16 Stunden.

Jetzt strahlt Sie wieder, und hat 3 Kanäle, der Dritte ist für die Lampe an und aus, sowie zum auswählen von einem der drei Autoprogramme die Sie jetzt hat.
Die Flower besitzt nun einen Gobo-Shake, Rainboweffekt und einen Strobo-Effekt. Ausserdem schaltet der Effekt extrem kurz zwischen den einzelnen Gobos hin und her. Schneller als bei vergleichbaren Flowern mit solchen Steppern. Schneller als die mit AC-Motoren allemal…

Ein anderer riesen Vorteil ist die Cooldown-Funktion für die Lampe, so kann die Lampe abschalten während der Lüfter noch läuft.

Vorhang auf für die modded Goboflower von Eurolite/Futurelight/oder sonst eine. Firmware Version 1.5

Zum nachmachen: Hier die PIN-Belegung:

#define MOTOR_PORT P1

//Flowerrad
sbit motorPin1   = MOTOR_PORT^0      ;
sbit motorPin2   = MOTOR_PORT^1      ;
sbit motorPin3   = MOTOR_PORT^2      ;
sbit motorPin4   = MOTOR_PORT^3      ;

//goborad
sbit goboPin1 = MOTOR_PORT^4 ;
sbit goboPin2 = MOTOR_PORT^5 ;
sbit goboPin3 = MOTOR_PORT^6 ;
sbit goboPin4 = MOTOR_PORT^7 ;

//Lampe
sbit lampe = P2^7 ;

//Dipschalter
sbit dip1 = P0^0;
sbit dip2 = P0^1;
sbit dip3 = P0^2;
sbit dip4 = P0^3;
sbit dip5 = P0^4;
sbit dip6 = P0^5;
sbit dip7 = P0^6;
sbit dip8 = P0^7;
sbit dip9 = P2^0;
sbit dip10 = P2^1; // ALL DIPS OK !

//Microfon
sbit mic = P3^4; //Mic in // Mic an == 1 // Mic aus == 0
Nachteile
in der Software habe ich keinen automatischen Blackout mehr, sowie das Senden im Master/Slavemode fehlt. Den programmiere ich erst sollte ich ein 2. Gerät bekommen.

DER//CODE

Falls jemand eine hat und auch keinen Chip mehr dafür bekommt, hier der Code, müsste evtl mit leichten Modifikationen auch für andere Flowers gehen.

/*
Eurolite Goboflower Firmware 
Final Version 1.5 // 09.03.2015

(c) 2015 André Thomas
This Software may not be copied !
This Software must stay how it is !
Credit me , if you use it !

Made for Eurolite Goboflower with 10 Dichros + open, 
2 Steppers, Mirrorplate Ports P1.0 - P1.3 , Gobowheel P1.4-P1.8

Use a 8052 Cpu with 6/T !
Code will not work on a 8051 CPU or a CPU with 12/T

Program Size: data=51.4 xdata=0 code=1518
*/


// Includes
#include <REG52.h>
#include <stdlib.h>

// defines
#define MOTOR_PORT P1
#define TAKT 15000	
#define CHANNELS 3
#define MIC_DEBOUNCE 50

//Flowerrad
sbit motorPin1	 = MOTOR_PORT^0	  ;
sbit motorPin2	 = MOTOR_PORT^1	  ;
sbit motorPin3	 = MOTOR_PORT^2	  ;
sbit motorPin4	 = MOTOR_PORT^3	  ;

//goborad
sbit goboPin1 = MOTOR_PORT^4 ;
sbit goboPin2 = MOTOR_PORT^5 ;
sbit goboPin3 = MOTOR_PORT^6 ;
sbit goboPin4 = MOTOR_PORT^7 ;

//Lampe
sbit lampe = P2^7 ;

//Dipschalter
sbit dip1 = P0^0;
sbit dip2 = P0^1;
sbit dip3 = P0^2;
sbit dip4 = P0^3;
sbit dip5 = P0^4;
sbit dip6 = P0^5;
sbit dip7 = P0^6;
sbit dip8 = P0^7;	 
sbit dip9 = P2^0;
sbit dip10 = P2^1; // ALL DIPS OK !

//Microfon
sbit mic = P3^4;  //Mic in  // Mic an == 1 // Mic aus == 0

//DMX
sbit RxD = P3^0; // Recieve Data Port
sbit TxD = P3^1; // Transmit Data Port
sbit p32 = P3^2; // an aus für senden empfangen
bit dmxRx = 0;

//DMX EMPFANG
static unsigned char data dmx_data [3]  ; 				// Array mit Werten	der kanäle
volatile unsigned int addr  			;				// DMX Adresse	 
enum {IDLE, BREAK, STARTB, STARTADR};					//DMX states
volatile char gDmxState;



//Motor Sequenz														   
volatile unsigned char code motor_step[8] =  {0x01,0x03,0x02,0x06,0x04,0x0c,0x08,0x09} ;		
volatile unsigned char code motor_speeds[12] = {0,1,2,3,4,5,10,13,16,20,25,30}   ;		
volatile unsigned char code gobos [12] = {0,9,17,25,33,41,49,57,65,73,81,90} ;	   

//Motoren
volatile char data m1_current_step = 0 ;
volatile char data m2_current_step = 0 ;
volatile char data m2_pos = 0;
volatile char data m2_dir = 1;
volatile char data m1_dir = 1;
volatile char data gobo_shaker_dir = 1;

//Main
unsigned char data gobo = 0;
unsigned char data gobo_goto = 0;
volatile unsigned char data step = 0 ;

volatile unsigned char data speed = 12;
volatile unsigned char data counterStep = 0;

//Zähler
char c1; 
unsigned char mic_debounce = 1;

//Autoprg
volatile unsigned char dmx_ch1;
volatile unsigned char dmx_ch2;
unsigned char randomRepeats	;
unsigned char beat;
unsigned char autospeeds [9] = {125,0,255,125,15,245,125}	;

//Strobo-Effekt
volatile char gotopos;
volatile char strobe_speed = 116;
volatile bit strobe_go = 0;
volatile bit strobe_dir = 0 ;

//Reinbow Effekt
volatile bit rainbow_dir = 0 ;
volatile int rainbow_speed	 ;

/*-------------------------------------------------
	Interrupts 
-------------------------------------------------*/
 
//	Timer 0 als Taktgeber für Motoren   

void timer0_ISR (void) interrupt 1
{	
	TH0  	= (65536 - TAKT + 6)/256;				// Upper Byte
	TL0  	= (65536 - TAKT + 6)%256;				// Lower Byte
 	step	= 1;
}  	  


// *************** DMX Reception ISR ****************
// von hoelscher-hi.de 
 
void serial0 (void) interrupt 4
{
	static  unsigned int DmxCount;
			unsigned char  DmxByte   = SBUF;				//get data
			unsigned char  DmxState  = gDmxState;			//just load once from SRAM to increase speed
	 		RI = 0;		  									//Setze Recieve Interrupt zurück
	
	
	if(RB8==1) {
	
		if (DmxState == BREAK)
			{
			if (DmxByte == 0x00) gDmxState= STARTB;				//normal start code detected
			else			  gDmxState= IDLE;
			}
			
		else if (DmxState == STARTB)
			{
			if (--DmxCount == 0)								//start address reached?
				{ 
				ET0			= 0;
				DmxCount 	= 1;								//set up counter for required channels
				dmx_data[0]	= DmxByte;							//get 1st DMX channel of device
				gDmxState	= STARTADR;
				}
			
			}
		
		else if (DmxState == STARTADR)
			{
			dmx_data[DmxCount++]= DmxByte;						//get channel
			if (DmxCount >= CHANNELS 		) 					//all ch received?
				{
				gDmxState	= IDLE;								//wait for next break
				ET0			= 1;
				}
			}
										
		}	else{
		
			DmxCount 		=  addr;							//reset channel counter (count channels before start address)
			gDmxState		= BREAK;
		
		}	
}


// *********** Functions *************

//Starte DMX Empfänger
void dmxRxStart(void)  {
			PCON = 0x00;                     			// 0x80 = doublespeed
   			SCON = 0x98;                    			// Serial Port Mode 2 10011000
    		IE |= 0x90;                     			// Enable RX I
			dmxRx = 1;									// Starte Empfang		    
}


// Motor 1 
void m1_move_8 (char direction) {
	if(m1_current_step == -1 ) {m1_current_step = 7;}
	if(m1_current_step == 8 ) {m1_current_step = 0;}  
	MOTOR_PORT &= ~0x0F ;	  				 			// maske
	MOTOR_PORT |= motor_step[m1_current_step]	;
	m1_current_step +=  direction;
}

// Motor 2
void m2_move (char direction) {
	if(m2_current_step == -1 ) {m2_current_step = 7;}
	if(m2_current_step == 8 ) {m2_current_step = 0;}  
	MOTOR_PORT &= ~0xF0 ;	  							// maske
	MOTOR_PORT |= motor_step[m2_current_step] << 4	;
    m2_current_step += direction;
}

//Motor 2 gehe zu Farbe
void m2_goto (unsigned char pos) {
	if(pos == m2_pos) {return;}

	if(pos < m2_pos ) {
	 	m2_move(1);
		m2_pos -- ;	
	}
	if(pos > m2_pos) {
		m2_move(-1);
		m2_pos ++ ;																																	 
	}
}		

void m2_gobo_shaker (unsigned char pos, unsigned char intens) {
	 char i = pos + (intens*gobo_shaker_dir);
	 if(m2_pos == pos + intens )   {
	  	  gobo_shaker_dir = -1 ;
	 }
	 if(m2_pos == pos - intens )   {
	  	  gobo_shaker_dir = 1 ;
	 }
	 m2_goto (i);
}



void m2_gobo_strobe (void) {
	  if (strobe_dir == 1) {
		  if (m2_pos == 0) {
		  	 	gotopos = 9 ;
				strobe_dir = 0;
				strobe_go = 1;
		  }
	  }else{
	  	  if (m2_pos >= 9) {
		   		gotopos = 0 ;
				strobe_dir = 1;
				strobe_go = 1;
		  }else if (m2_pos == 0) {
		  	 strobe_dir = 1 ;
		  }

	  }
	  if(m2_pos>9) {
	  	gotopos=0; 
		strobe_dir=1;
	  }
			  
	  
	  m2_goto(gotopos);

}



void m2_rainbow (void) {
	  if (rainbow_dir == 1) {
		  if (m2_pos == 9) {
		   		gotopos = 90 ;
				rainbow_dir = 0;
				
		  }
	  }else{
		  if (m2_pos == 90) {
		   		gotopos = 9 ;
				rainbow_dir = 1;

		  }
	  }
	  if(m2_pos>90 || m2_pos<9) {
	  	gotopos=9;
		rainbow_speed = 0;
		rainbow_dir = 1;
		}
	  m2_goto(gotopos);
}


//Delay 
void delay (unsigned int n) {	 
		  unsigned int c = 0;
		  for(c=0;c<n;c++) {
			  TMOD =0x01;
			  TL0 = 0xCC;
			  TH0 = 0xFA;
			  TR0 = 1;
			  while(!TF0);
			  TR0 = 0;
			  TF0 = 0;			
		  }
}

void main(void)		 {
	/*INIT*/
	mic 	= 1; 									// Schalte mic auf input
	lampe 	= 0; 									// Lampe aus
	
	//reset Goborad	 
	for (c1=0;c1<96;c1++) {	   
	 	   m2_move (1);
		   delay(33);
	}
	
	m2_pos = 0;	 
	m2_current_step = 0; 
	//reset Goborad ende

  	//Setze timer 0 - Taktgeber	
	EA=0; 
	TMOD	= (TMOD & 0x0F) | 0x11;  				// Setzte T/C0 Mode 
	 
	TH0  	= (65536 - TAKT + 6)/256;				// Upper Byte	
	TL0  	= (65536 - TAKT + 6)%256;				// Lower Byte
	ET0		= 1;                     				// Starte Timer 0 Interrupts 
	TR0		= 1;                    				// Starte Timer 0 
		  
	EA		= 1;                     				// Global Interrupt Enable 
	IP 		= 0x02; 								// Interrupt Priorität auf Timer 0 0x02 // auf serial 0x10
		
	//Starte DMX Empfang wenn nocht nicht gestartet 
	if(	 dmxRx == 0 ) {
	 	  dmxRxStart();
		  ES = 1;
	} 

	/*SUPERLOOP*/
    for(;;) {
		//Goborad
		if(step==1) {
			//check addresse
			addr = P0 ;
			if(dip9==1) {
				addr += 256;
			}
			
			//Lampe == Channel 3
			if(dmx_data[2]>20 || dip10 == 1 ) {
				lampe = 1; // Lampe an
			}
			else{
				lampe = 0; // Lampe aus
			} 

			if ( dmx_data[2]>240 || dip10 == 1) {
			   // Automatisches Programm

			   if (mic == 1 && mic_debounce == 0) {
					
					if (beat > randomRepeats) {
						randomRepeats 	= (rand() % 3) + 1 ;
					   	dmx_ch2 		= autospeeds[(unsigned char) rand() % 9] ;
						

						dmx_ch1 		= (unsigned char) rand() % 255 ;
					   
					   	mic_debounce 	= MIC_DEBOUNCE ;
						beat 			= 0 ;
					}
					beat++ ;
			   }
			   
			   if(	mic_debounce != 0 ) {
				  	mic_debounce--;
			   }


			}else if(dmx_data[2]>230){
			   // Automatik Programm 2
			   c1 = rand() % 4 ;
			   
			   if (mic == 1 && mic_debounce == 0) {
			   		if(c1 == 1) {
					//rechtsrum schnell
					 	dmx_ch2 		= 0;
						
						dmx_ch1 = rand() % 108;
						if (dmx_ch1<9) dmx_ch1=9;
					
					}else if (c1 == 2){
					//linksrum schnell
					 	dmx_ch2 		= 255;

						dmx_ch1 = rand() % 108;
						if (dmx_ch1<9) dmx_ch1=9;

					}else if (c1 == 3){
					//Stillstand
						dmx_ch2 		= 125;
						dmx_ch1 = (rand() % 108 ) + 108;
					}else{
					//Strobo
						dmx_ch2 		= 125;
						dmx_ch1 = (rand() % 9)+108; 
					}



			   mic_debounce 	= MIC_DEBOUNCE ;
			   }

			   if(	mic_debounce != 0 ) {
				  	mic_debounce--;
			   }

			}else if(dmx_data[2]>210){
			   //Autoprogramm 3 nur Spiegelrichtung
			   c1 = rand() % 2 ;
			   if (mic == 1 && mic_debounce == 0) {
				  if(c1 == 1) {
					//rechtsrum schnell
					 	dmx_ch2 		= 0;
					}else {
					//linksrum schnell
					 	dmx_ch2 		= 255;
					}
			   }
			   if(	mic_debounce != 0 ) {
				  	mic_debounce--;
			   }
			   dmx_ch1 = dmx_data[0];

			}else{
			   dmx_ch1 = dmx_data[0];
			   dmx_ch2 = dmx_data[1];
			}

			// Goborad == channel 1
			if (dmx_ch1 < 216) {
			gobo_goto = (dmx_ch1 / 9) ; 	
			gobo = gobos[gobo_goto%12];
			if(gobo_goto < 12) { 
			 
			m2_goto (gobo) 	; }
			else if ( gobo_goto >= 13 ) {
					m2_gobo_shaker(gobo,(1))  ;		
			}
			else if (gobo_goto == 12) {
			 	//strobe me
				if ( strobe_go == 0 ) {
				 	m2_gobo_strobe();
				}

				if ((strobe_speed - dmx_ch1) <= 0) {
					strobe_go = 0;
					strobe_speed = 124;				
				}else{
				 	strobe_speed -- ;
				}

			

			}

			}else{
				 if ((rainbow_speed - dmx_ch1) <= 0) {
				   m2_rainbow () ;
				   rainbow_speed = 255 ;
				 }else{
				   rainbow_speed -- ;
				 }

			}
		
		// Spiegelrad
		speed = dmx_ch2 / 10;
		if (speed >= 13) { 
			  	m1_dir = 1 ; 
				speed = 25-speed;
			}else{
				m1_dir = -1 ; 
		}

		if ( counterStep == 0 ) {
				
			if(speed != 12){ 
					m1_move_8 (m1_dir);
				}
		    counterStep = motor_speeds[speed];
		}
		else{
		 	counterStep--;
		}
		step=0;

		}		
	}
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

214

215

216

217

218

219

220

221

222

223

224

225

226

227

228

229

230

231

232

233

234

235

236

237

238

239

240

241

242

243

244

245

246

247

248

249

250

251

252

253

254

255

256

257

258

259

260

261

262

263

264

265

266

267

268

269

270

271

272

273

274

275

276

277

278

279

280

281

282

283

284

285

286

287

288

289

290

291

292

293

294

295

296

297

298

299

300

301

302

303

304

305

306

307

308

309

310

311

312

313

314

315

316

317

318

319

320

321

322

323

324

325

326

327

328

329

330

331

332

333

334

335

336

337

338

339

340

341

342

343

344

345

346

347

348

349

350

351

352

353

354

355

356

357

358

359

360

361

362

363

364

365

366

367

368

369

370

371

372

373

374

375

376

377

378

379

380

381

382

383

384

385

386

387

388

389

390

391

392

393

394

395

396

397

398

399

400

401

402

403

404

405

406

407

408

409

410

411

412

413

414

415

416

417

418

419

420

421

422

423

424

425

426

427

428

429

430

431

432

433

434

435

436

437

438

439

440

441

442

443

444

445

446

447

448

449

450

451

452

453

454

455

456

457

458

459

460

461

462

463

464

465

466

467

468

469

470

471

472

473

474

475

476

477

478

479

480

481

482

483

484

485

486

487

488

489

490

491

492

493

494

495

496

Eurolite Goboflower Firmware

Final Version 1.5 // 09.03.2015

This Software may not be copied !

This Software must stay how it is !

Credit me , if you use it !

Made for Eurolite Goboflower with 10 Dichros + open,

2 Steppers, Mirrorplate Ports P1.0 - P1.3 , Gobowheel P1.4-P1.8

Use a 8052 Cpu with 6/T !

Code will not work on a 8051 CPU or a CPU with 12/T

Program Size: data=51.4 xdata=0 code=1518

// Includes

#include <REG52.h>

#include <stdlib.h>

// defines

#define MOTOR_PORT P1

#define TAKT 15000

#define CHANNELS 3

#define MIC_DEBOUNCE 50

//Flowerrad

sbit motorPin1 = MOTOR_PORT^0 ;

sbit motorPin2 = MOTOR_PORT^1 ;

sbit motorPin3 = MOTOR_PORT^2 ;

sbit motorPin4 = MOTOR_PORT^3 ;

//goborad

sbit goboPin1 = MOTOR_PORT^4 ;

sbit goboPin2 = MOTOR_PORT^5 ;

sbit goboPin3 = MOTOR_PORT^6 ;

sbit goboPin4 = MOTOR_PORT^7 ;

//Lampe

sbit lampe = P2^7 ;

//Dipschalter

sbit dip1 = P0^0;

sbit dip2 = P0^1;

sbit dip3 = P0^2;

sbit dip4 = P0^3;

sbit dip5 = P0^4;

sbit dip6 = P0^5;

sbit dip7 = P0^6;

sbit dip8 = P0^7;

sbit dip9 = P2^0;

sbit dip10 = P2^1; // ALL DIPS OK !

//Microfon

sbit mic = P3^4; //Mic in // Mic an == 1 // Mic aus == 0

//DMX

sbit RxD = P3^0; // Recieve Data Port

sbit TxD = P3^1; // Transmit Data Port

sbit p32 = P3^2; // an aus für senden empfangen

bit dmxRx = 0;

//DMX EMPFANG

static unsigned char data dmx_data [3] ; // Array mit Werten der kanäle

volatile unsigned int addr ; // DMX Adresse

enum {IDLE, BREAK, STARTB, STARTADR}; //DMX states

volatile char gDmxState;

//Motor Sequenz

volatile unsigned char code motor_step[8] = {0x01,0x03,0x02,0x06,0x04,0x0c,0x08,0x09} ;

volatile unsigned char code motor_speeds[12] = {0,1,2,3,4,5,10,13,16,20,25,30} ;

volatile unsigned char code gobos [12] = {0,9,17,25,33,41,49,57,65,73,81,90} ;

//Motoren

volatile char data m1_current_step = 0 ;

volatile char data m2_current_step = 0 ;

volatile char data m2_pos = 0;

volatile char data m2_dir = 1;

volatile char data m1_dir = 1;

volatile char data gobo_shaker_dir = 1;

//Main

unsigned char data gobo = 0;

unsigned char data gobo_goto = 0;

volatile unsigned char data step = 0 ;

volatile unsigned char data speed = 12;

volatile unsigned char data counterStep = 0;

//Zähler

char c1;

unsigned char mic_debounce = 1;

//Autoprg

volatile unsigned char dmx_ch1;

volatile unsigned char dmx_ch2;

unsigned char randomRepeats ;

unsigned char beat;

unsigned char autospeeds [9] = {125,0,255,125,15,245,125} ;

//Strobo-Effekt

volatile char gotopos;

volatile char strobe_speed = 116;

volatile bit strobe_go = 0;

volatile bit strobe_dir = 0 ;

//Reinbow Effekt

volatile bit rainbow_dir = 0 ;

volatile int rainbow_speed ;

/*-------------------------------------------------

Interrupts

-------------------------------------------------*/

// Timer 0 als Taktgeber für Motoren

void timer0_ISR (void) interrupt 1

{

TH0 = (65536 - TAKT + 6)/256; // Upper Byte

TL0 = (65536 - TAKT + 6)%256; // Lower Byte

step = 1;

}

// *************** DMX Reception ISR ****************

// von hoelscher-hi.de

void serial0 (void) interrupt 4

{

static unsigned int DmxCount;

unsigned char DmxByte = SBUF; //get data

unsigned char DmxState = gDmxState; //just load once from SRAM to increase speed

RI = 0; //Setze Recieve Interrupt zurück

if(RB8==1) {

if (DmxState == BREAK)

{

if (DmxByte == 0x00) gDmxState= STARTB; //normal start code detected

else gDmxState= IDLE;

}

else if (DmxState == STARTB)

{

if (--DmxCount == 0) //start address reached?

{

ET0 = 0;

DmxCount = 1; //set up counter for required channels

dmx_data[0] = DmxByte; //get 1st DMX channel of device

gDmxState = STARTADR;

}

else if (DmxState == STARTADR)

{

dmx_data[DmxCount++]= DmxByte; //get channel

if (DmxCount >= CHANNELS ) //all ch received?

{

gDmxState = IDLE; //wait for next break

ET0 = 1;

}

} else{

DmxCount = addr; //reset channel counter (count channels before start address)

gDmxState = BREAK;

}

// *********** Functions *************

//Starte DMX Empfänger

void dmxRxStart(void) {

PCON = 0x00; // 0x80 = doublespeed

SCON = 0x98; // Serial Port Mode 2 10011000

IE |= 0x90; // Enable RX I

dmxRx = 1; // Starte Empfang

}

// Motor 1

void m1_move_8 (char direction) {

if(m1_current_step == -1 ) {m1_current_step = 7;}

if(m1_current_step == 8 ) {m1_current_step = 0;}

MOTOR_PORT &= ~0x0F ; // maske

MOTOR_PORT |= motor_step[m1_current_step] ;

m1_current_step += direction;

}

// Motor 2

void m2_move (char direction) {

if(m2_current_step == -1 ) {m2_current_step = 7;}

if(m2_current_step == 8 ) {m2_current_step = 0;}

MOTOR_PORT &= ~0xF0 ; // maske

MOTOR_PORT |= motor_step[m2_current_step] << 4 ;

m2_current_step += direction;

}

//Motor 2 gehe zu Farbe

void m2_goto (unsigned char pos) {

if(pos == m2_pos) {return;}

if(pos < m2_pos ) {

m2_move(1);

m2_pos -- ;

}

if(pos > m2_pos) {

m2_move(-1);

m2_pos ++ ;

}

void m2_gobo_shaker (unsigned char pos, unsigned char intens) {

char i = pos + (intens*gobo_shaker_dir);

if(m2_pos == pos + intens ) {

gobo_shaker_dir = -1 ;

}

if(m2_pos == pos - intens ) {

gobo_shaker_dir = 1 ;

}

m2_goto (i);

}

void m2_gobo_strobe (void) {

if (strobe_dir == 1) {

if (m2_pos == 0) {

gotopos = 9 ;

strobe_dir = 0;

strobe_go = 1;

}

}else{

if (m2_pos >= 9) {

gotopos = 0 ;

strobe_dir = 1;

strobe_go = 1;

}else if (m2_pos == 0) {

strobe_dir = 1 ;

}

if(m2_pos>9) {

gotopos=0;

strobe_dir=1;

}

m2_goto(gotopos);

}

void m2_rainbow (void) {

if (rainbow_dir == 1) {

if (m2_pos == 9) {

gotopos = 90 ;

rainbow_dir = 0;

}

}else{

if (m2_pos == 90) {

gotopos = 9 ;

rainbow_dir = 1;

}

if(m2_pos>90 || m2_pos<9) {

gotopos=9;

rainbow_speed = 0;

rainbow_dir = 1;

}

m2_goto(gotopos);

}

//Delay

void delay (unsigned int n) {

unsigned int c = 0;

for(c=0;c<n;c++) {

TMOD =0x01;

TL0 = 0xCC;

TH0 = 0xFA;

TR0 = 1;

while(!TF0);

TR0 = 0;

TF0 = 0;

}

void main(void) {

/*INIT*/

mic = 1; // Schalte mic auf input

lampe = 0; // Lampe aus

//reset Goborad

for (c1=0;c1<96;c1++) {

m2_move (1);

delay(33);

}

m2_pos = 0;

m2_current_step = 0;

//reset Goborad ende

//Setze timer 0 - Taktgeber

EA=0;

TMOD = (TMOD & 0x0F) | 0x11; // Setzte T/C0 Mode

TH0 = (65536 - TAKT + 6)/256; // Upper Byte

TL0 = (65536 - TAKT + 6)%256; // Lower Byte

ET0 = 1; // Starte Timer 0 Interrupts

TR0 = 1; // Starte Timer 0

EA = 1; // Global Interrupt Enable

IP = 0x02; // Interrupt Priorität auf Timer 0 0x02 // auf serial 0x10

//Starte DMX Empfang wenn nocht nicht gestartet

if( dmxRx == 0 ) {

dmxRxStart();

ES = 1;

}

/*SUPERLOOP*/

for(;;) {

//Goborad

if(step==1) {

//check addresse

addr = P0 ;

if(dip9==1) {

addr += 256;

}

//Lampe == Channel 3

if(dmx_data[2]>20 || dip10 == 1 ) {

lampe = 1; // Lampe an

}

else{

lampe = 0; // Lampe aus

}

if ( dmx_data[2]>240 || dip10 == 1) {

// Automatisches Programm

if (mic == 1 && mic_debounce == 0) {

if (beat > randomRepeats) {

randomRepeats = (rand() % 3) + 1 ;

dmx_ch2 = autospeeds[(unsigned char) rand() % 9] ;

dmx_ch1 = (unsigned char) rand() % 255 ;

mic_debounce = MIC_DEBOUNCE ;

beat = 0 ;

}

beat++ ;

}

if( mic_debounce != 0 ) {

mic_debounce--;

}

}else if(dmx_data[2]>230){

// Automatik Programm 2

c1 = rand() % 4 ;

if (mic == 1 && mic_debounce == 0) {

if(c1 == 1) {

//rechtsrum schnell

dmx_ch2 = 0;

dmx_ch1 = rand() % 108;

if (dmx_ch1<9) dmx_ch1=9;

}else if (c1 == 2){

//linksrum schnell

dmx_ch2 = 255;

dmx_ch1 = rand() % 108;

if (dmx_ch1<9) dmx_ch1=9;

}else if (c1 == 3){

//Stillstand

dmx_ch2 = 125;

dmx_ch1 = (rand() % 108 ) + 108;

}else{

//Strobo

dmx_ch2 = 125;

dmx_ch1 = (rand() % 9)+108;

}

mic_debounce = MIC_DEBOUNCE ;

}

if( mic_debounce != 0 ) {

mic_debounce--;

}

}else if(dmx_data[2]>210){

//Autoprogramm 3 nur Spiegelrichtung

c1 = rand() % 2 ;

if (mic == 1 && mic_debounce == 0) {

if(c1 == 1) {

//rechtsrum schnell

dmx_ch2 = 0;

}else {

//linksrum schnell

dmx_ch2 = 255;

}

if( mic_debounce != 0 ) {

mic_debounce--;

}

dmx_ch1 = dmx_data[0];

}else{

dmx_ch1 = dmx_data[0];

dmx_ch2 = dmx_data[1];

}

// Goborad == channel 1

if (dmx_ch1 < 216) {

gobo_goto = (dmx_ch1 / 9) ;

gobo = gobos[gobo_goto%12];

if(gobo_goto < 12) {

m2_goto (gobo) ; }

else if ( gobo_goto >= 13 ) {

m2_gobo_shaker(gobo,(1)) ;

}

else if (gobo_goto == 12) {

//strobe me

if ( strobe_go == 0 ) {

m2_gobo_strobe();

}

if ((strobe_speed - dmx_ch1) <= 0) {

strobe_go = 0;

strobe_speed = 124;

}else{

strobe_speed -- ;

}

}else{

if ((rainbow_speed - dmx_ch1) <= 0) {

m2_rainbow () ;

rainbow_speed = 255 ;

}else{

rainbow_speed -- ;

}

// Spiegelrad

speed = dmx_ch2 / 10;

if (speed >= 13) {

m1_dir = 1 ;

speed = 25-speed;

}else{

m1_dir = -1 ;

}

if ( counterStep == 0 ) {

if(speed != 12){

m1_move_8 (m1_dir);

}

counterStep = motor_speeds[speed];

}

else{

counterStep--;

}

step=0;

}

Posted in 8051 / 8052 Microcontroller, Allgemein | Kommentare deaktiviert

Ecler SMAC 32 – Conductive Plastic Crossfader Umbau

Posted on 22. Mai 2014 by Andre

Ein schneller Tweak – Habe den Mixer gegen eine Flasche SKYVODKA erhalten und Ihn mal probiert. Alles ging, nur der Crossfader war derb, ging schwer und war irgendwie am Ende. Ein Ersatzfader ohne Platine kostet tatsächlich 79€ … 79 EURO !!! Für 129 bekommt man einen INNOFADER , LEUTE !!! Der originale ist ein ALPHA-Fader , ein mieser Dreck ! Und kostet in der Herstellung nicht mal 2€ !!! Bekommt man in China hinterhergeschmissen. An sowas bereichern sich die Lieferanten hierzulande – EK: €2 / VK: €79 … und dann muss man Ihn auch noch selber an die Platine löten, denn die ist nicht dabei, denn der Lieferant bestellt ja auch in China , und der Hersteller natürlich auch…

Genug – so weit, so gut.

Ich hatte noch einen Conductive Plastic Crossfader aus einem Vestax PMC rumliegen, und der ist 1000 mal besser als der originale. Man kann auch einen ProXFader (1.Serie) einbauen der sieht innen ziemlich gleich aus. Also , originale Platine abgelötet und an den anderen Crossfader angelötet. Getestet und geht !

Für alle die noch ein Ecler HAK, SMAC etc aus der alten Serie haben, hier quasi die Bestätigung, man kann einen HQ-Fader Einbauen.

Übrigens die Belegung des 5-Fach Steckers von Ecler:

1 CH1 Left

2 CH2 Left

3 Out

4 CH1 Right

5 CH2 Right

Posted in Modding and Tweaking Stuff | Kommentare deaktiviert

Drall DMX 03, Auna TMX2211, Ibiza, Pollin Mix800, DJ-211 Klon an 12V DC

Posted on 26. April 2014 by Andre

Hier beschreibe ich meine Erfahrung den 12V AC-China-3-Kanalmischer (Drall DMX 03, Auna, Ibiza, Pollin Mix800, DJ211, TMX2211) an 12V Gleichstrom / Autobatterie anzuschliessen.

Die Aufgabe war klar, wir brauchen ein Mischpult welches an/mit Autobatterie laufen kann. Im Internet wird man schnell fündig, jedoch was die wenigsten beachten ist das kleine ~ (TILDE) – Zeichen vor 12V… das heisst AC (Wechselspannung). Immer wieder witzig finde ich solche Sachen in den Artikelbeschreibungen: Möglichkeit zum 12V-Betrieb, Ideal für mobilen Einsatz etc. Nunja eine Autobatterie liefert 12V aber eben nur DC , das Mischpult braucht aber AC – der Chinamann hat Bauteile im Wert von ca. 3Euro gespart – und somit ist dieses Mischpult nicht an einer Batterie zu betreiben.

Natürlich kann man jetzt den üblichen Weg gehen und mittels Inverter/Spannungswandler das Mischpult über das original Netzteil an einen 230VAC/12VDC Wandler an einer Autobatterie betreiben – das ist aber sehr ineffizient und macht viel Strom einfach nur zu Wärme, und bei einer Batterie ist Laufzeit doch eben alles…

Im übrigen steht in manchen Foren man solle doch knallhart einfach mal die Dioden brücken bzw Bat+ und – an den Filterelko anklemmen… das geht , und es dauert mit einer Autobatterie ca. 5 sekunden bis der Elektrolyt aus einem der Elkos blubbert und der magische Rauch entweicht. (Selbst getestet!)

Das Mischpult (Drall DMX 03, Auna, Ibiza, Pollin Mix800, DJ211, TMX2211) läuft von Haus aus nicht an 12v Gleichstrom , bzw an einer Batterie!

Warum ist das so? Die eingebauten OperationsVerstärker (JRC4558L oder Klon) brauchen 12V+ und 12V- um zu arbeiten. Im Mischpult sieht man schön (da wo der “Stromanschluss” ist) 3 Dioden, die aus 12VDC eben diese 2 Spannungen machen. -12V geht an die Schaltkreise der Operationverstärker und der an/aus LED , +12v wird überall verteilt.

Wenn man das Mischpult nun an Gleichstrom anschliesst geht entweder die LED an, oder es passiert wenn man es umpolt rein gar nichts, da kein Sound kommt und die LED’s nichts anzeigen. Im Internet findet man leider auch nicht viel praktische Infos wie man das machen kann.

Die Lösung:
Was man machen muss, ist mit einer Autobatterie -12V erzeugen und an die richtige Stelle im Mischpult anklemmen. -12V aus 12V erzeugt man im kleinen Leistungsbereich (200mA) mit einer negativen Ladungspumpe. In diesem Fall reicht eine Schaltung mit einem NE555 IC völlig aus.

Schaltbild oben Quelle / Die Schaltung wird hier super erklärt: http://www.sprut.de/electronic/switch/minus.html.
Ich hatte leider nicht alle Bauteile passend, es geht auch mit 100uF Elkos und statt 3,3kohm einem 4,7kohm.

Ich habe die Schaltung auf eine Streifenplatine gelötet und zum testen hinter dem an/aus Schalter angeschlossen, an den Leiterbahnen die für -12V waren. Und siehe da, nun lief das Mischpult an 12V, jedoch ohne an/aus Schalter. Macht man bei dem Test übrigens den Schalter an , macht man einen schönen Kurzschluss.

Um das Mischpult so zu betreiben, als sei es original 12V DC, muss man es intern ein bisschen modifizieren. Ich entschloss mich die Modifikation so durchzuführen das es keinen Weg zurück gibt. Ich habe die entsprechenden Leiterbahnen mit einem Tapetenmesser vom Rest der Schaltung abgetrennt. Und ein paar neue Leitungen eingefügt. Im Prinzip habe ich den An/Aus Schalter abgeklemmt, die 2 Wege getrennt, und auf jeweils eine Seite +12 und -12 V angeklemmt.

So sah es am Ende aus

Die Inverterschaltung habe ich rechts von den Reglern und Eingängen fürs Mikrofon platziert, und mittels Heisskleber befestigt. Nun noch ein bisschen Isoliert, und siehe da , ein vollwertiges 12V DC Mischpult für die Autobatterie oder andere Einsätze.

UPDATE 2:

Achtung, die hier beschriebene Anschlussweise hat einen Fehler im Detail. Mann sollte den Ein/aus Schalter so modifizieren, dass er Masse wegnimmt, sonst besteht Gefahr das die Elkos im Mischpult nach dem Ausschalten sich in die Inverterschaltung entladen, hierbei geht an den Elkos im Inverter die Spannung auf bis zu 25Volt hoch, und zerstört Sie im ungünstigsten Fall, sowie den 555IC.

UPDATE 3:
Nachdem die erste Schaltung zertört wurde, IC+ 1xElko waren durch,ging ich auf Fehlersuche. Ich habe die unten aufgeführte Schaltung aufgebaut und mit 2 Voltmetern versehen. Dabei ist mir Aufgefallen das beim Ausschalten des Mischpults die negative Spannung bis 23V hochging und einer der Elkos zu kochen begann.

Dies ist eine bessere Schaltung aus dem Internet: Sie stammt von Dipl.-Ing Jörg Rehrmann, ich habe Sie hier gefunden: http://www.joretronik.de/Web_NT_Buch/Kap5/Kapitel5.html. Eine sehr interessante Seite, lesenswert! Ich erlaube mir einfach mal die Schaltung hier darzustellen. Sollte ich hier ein Copyright verletzen, werde ich sie nach einer Mitteilung sofort löschen.

Ich habe diese Schaltung zuerst mit einem einfach beschalteten Ausgang aufgebaut. Mit 2 x 4007Dioden und 2x100uF Elkos hatte ich -Ub = -6,8V bei +12,8V an einer Autobatterie.
Mit Shottkydioden waren es -9,6V, mit einer Kaskade wie abgebildet, mit 4 Elkos u 4 Dioden, waren es -13,5V. Diese Schaltung eignet sich besser für eine Leistung über 200mA.
Dieser Aufbau ist meiner Meinung nach der Beste für diesen Einsatzzweck.

Also: Lasst euch nicht reinlegen, das Mischpult gibts neu von 19 Euro bis tatsächlich 129 Euro – und man kann es so nicht einfach mal an 12V anschliessen.

Ich hatte meines für 3€ in der Bucht geschossen. Materialaufwand für die Inverterpumpe ca 2-3 € – Zeit für den Umbau ca. 7-8 Stunden

Tags: Umbau Drall DMX 03, Auna TMX2211, Ibiza DJ22B, Pollin Mix800, DJ-211 Klon an 12V DC, Mischpult an 12VDC, Mischpult für Auto, KFZ Mischpult

Pflegetipps:

Wer wie ich eines aus der Bucht schiesst, dem könnte es blühen das es wie meines so aussieht:

Schön mit Edding besudelt, Klebereste überall, abgekrabbelt und innen komplett mit Asche, Tabak und Staub voll.

Mein Tipp: Zerlegen, das Gehäuse und die Knöpfen ab in die Spühlmaschine … mit Druckluft die Potis und Regler ausblasen und sogenanntes

Faderspray reinsprühen, ein paar mal hoch-runter, nochmal sprayen – dann den Inverter basteln, bis alles fertig ist, ist die Spülmachine durchgelaufen und denn sieht es

so aus: Edding und Kleber weg, alles wie neu ! Für 3 € + 3€ Material ein Mischpult für die Autobatterie !

Und hier noch mein weltklasse Produktfoto des DRALL DMX-03 // DJ211 // TMX2211 // Mix800 :

Posted in Allgemein, Modding and Tweaking Stuff | 4 Comments

Conways Game of Life auf einem 8051und einer 8×8 LED Matrix in C

Posted on 25. Februar 2014 by Andre

Ich benötigte einen sehr schmales “Conway Game of Life”, im Internet gibt es tatsächlich eine 307b große Variante oder aber größere Varianten. Beide Versionen waren leider nichts für mein Projekt. Da bei meinem LED Matrix Projekt die Anzeige/Ausgabe sehr einfach ist -8b / Latch (8x)- jedoch mein freies ROM sehr begrenzt ist, habe ich eine eigene Variante geschrieben.

Hier sind die Routinen in C dafür:

/*Simple Game of life für 8x8 Matrix 
Andre Thomas 2014

*/
volatile unsigned int speed			= 30	;			    //Geschwindigkeit
unsigned int counterStep 			= 0		;			    //Schrittzähler
volatile unsigned char step 		= 0		;
//Register für Reihen
unsigned char row[8] =   {0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80}	;

//Game of life
unsigned char idata gol_u [8] = {0};
unsigned char idata gol_u_u	[8] = {0};
unsigned char idata gol_step = 0;
unsigned char idata nexStep = 0;

//Game of Life Start
void golStart(void) {

    for(step=0; step<8; step++) {
	 		//playPattern(1, 8,  musterRotor);
	   		gol_u[step] = rand()/128;	
			//if(step<7) {
			//	for(y=0;y<5000;y++) {;}
			//	}
			}
	gol_step++;

}

void golRun(char which) {
 			if(step>1)step=0;
			   if(gol_step==0){
			   	 prgGameoflife(which);

			   }else{	   			   
		   	   if(step == 1) {
			   		step=0;

					if(gol_step>120){
						gol_step=0;
						}
					else{
						gol_step++;
					}
					prgGameoflife(which);
				}
				}

}

//Game of Life 23/3 + 135/35
void prgGameoflife(char mode) {
	unsigned char i;	
	unsigned char j;		
	unsigned char cn;
	unsigned char gol_u_temp [8] = {0};
	unsigned char al = 0;
	unsigned char still = 0;

	if(gol_step==0) {
		   golStart();
           return;
	}else{ 
		//evolve
		for(i=0;i<8;i++) {
		  for(j=0;j<8;j++) {	//if (byte & (1 << 6)) true wenn 6th bit 1
		    cn=0;

			if(j!=7){
			if(gol_u[i] & (1 << j+1 )) cn++;	 //links  davon
			}

			if(j!=0){
			if(gol_u[i] & (1 << j-1 )) cn++;	 //rechts  davon
			}

			if(i!=0) {	 //darüber
			 	if(gol_u[i-1] & (1 << j+1 )) cn++;	 //links
				if(gol_u[i-1] & (1 << j )) cn++;	 //darüber
				if(gol_u[i-1] & (1 << j-1 )) cn++;	 //rechts
			}

			if(i!=7) {
				if(gol_u[i+1] & (1 << j+1 )) cn++;	 //links
				if(gol_u[i+1] & (1 << j )) cn++;	 //darüber
				if(gol_u[i+1] & (1 << j-1 )) cn++;	 //rechts
			}

			switch(mode) {

			case 1: // original Regeln
			//Leben lassen	 23/3
			if(gol_u[i] & (1 << j)) {
				if( cn == 2 || cn == 3) { gol_u_temp[i] |= (1 << j); al++; } 
			}else{
			 	if(cn == 3) {gol_u_temp[i] |= (1 << j); al++;}	 //Geburt
			}
			break;

			case 2:
			//extended 135/35
			if(gol_u[i] & (1 << j)) {
				if(cn == 1 ||cn == 3 || cn == 5) { gol_u_temp[i] |= (1 << j); al++; } 
			}else{
			 	if(cn == 3 || cn == 5 ) {gol_u_temp[i] |= (1 << j); al++;}	 //Geburt
			}
			break;

			}//mode

			}
		}

	}

	//Stillstand berechnen 
	for(i=0;i<8;i++) {
		if (gol_u_u[i] == gol_u[i]) still ++;
	}

	if(al<5 || still > 7 )
	{ 
		gol_step = 0; 
		still = 0;//erschaffe Welt
		//golStart();
	}else{
		//Anzeigen und kopieren
		for(i=0;i<8;i++) {
			gol_u_u[i] = gol_u[i];
			gol_u[i] = gol_u_temp[i];

			P0 = ~gol_u[i];
			P2 = row[i];
			P2 = 0x00;
		}

	}
}
void main(void) {
/*-------------------------------------------------
		SUPERLOOP 
	-------------------------------------------------*/
	for(;;){
           golRun(1);
                   y = 6000 / speed ;
			dmxstep ++;
			if ( counterStep > y ) {
				step++;  
				randomProgCounter ++ ;
				counterStep = 0;
			}

        }
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

/*Simple Game of life für 8x8 Matrix

Andre Thomas 2014

volatile unsigned int speed = 30 ; //Geschwindigkeit

unsigned int counterStep = 0 ; //Schrittzähler

volatile unsigned char step = 0 ;

//Register für Reihen

unsigned char row[8] = {0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80} ;

//Game of life

unsigned char idata gol_u [8] = {0};

unsigned char idata gol_u_u [8] = {0};

unsigned char idata gol_step = 0;

unsigned char idata nexStep = 0;

//Game of Life Start

void golStart(void) {

for(step=0; step<8; step++) {

//playPattern(1, 8, musterRotor);

gol_u[step] = rand()/128;

//if(step<7) {

// for(y=0;y<5000;y++) {;}

// }

}

gol_step++;

}

void golRun(char which) {

if(step>1)step=0;

if(gol_step==0){

prgGameoflife(which);

}else{

if(step == 1) {

step=0;

if(gol_step>120){

gol_step=0;

}

else{

gol_step++;

}

prgGameoflife(which);

}

//Game of Life 23/3 + 135/35

void prgGameoflife(char mode) {

unsigned char i;

unsigned char j;

unsigned char cn;

unsigned char gol_u_temp [8] = {0};

unsigned char al = 0;

unsigned char still = 0;

if(gol_step==0) {

golStart();

return;

}else{

//evolve

for(i=0;i<8;i++) {

for(j=0;j<8;j++) { //if (byte & (1 << 6)) true wenn 6th bit 1

cn=0;

if(j!=7){

if(gol_u[i] & (1 << j+1 )) cn++; //links davon

}

if(j!=0){

if(gol_u[i] & (1 << j-1 )) cn++; //rechts davon

}

if(i!=0) { //darüber

if(gol_u[i-1] & (1 << j+1 )) cn++; //links

if(gol_u[i-1] & (1 << j )) cn++; //darüber

if(gol_u[i-1] & (1 << j-1 )) cn++; //rechts

}

if(i!=7) {

if(gol_u[i+1] & (1 << j+1 )) cn++; //links

if(gol_u[i+1] & (1 << j )) cn++; //darüber

if(gol_u[i+1] & (1 << j-1 )) cn++; //rechts

}

switch(mode) {

case 1: // original Regeln

//Leben lassen 23/3

if(gol_u[i] & (1 << j)) {

if( cn == 2 || cn == 3) { gol_u_temp[i] |= (1 << j); al++; }

}else{

if(cn == 3) {gol_u_temp[i] |= (1 << j); al++;} //Geburt

}

break;

case 2:

//extended 135/35

if(gol_u[i] & (1 << j)) {

if(cn == 1 ||cn == 3 || cn == 5) { gol_u_temp[i] |= (1 << j); al++; }

}else{

if(cn == 3 || cn == 5 ) {gol_u_temp[i] |= (1 << j); al++;} //Geburt

}

break;

}//mode

}

//Stillstand berechnen

for(i=0;i<8;i++) {

if (gol_u_u[i] == gol_u[i]) still ++;

}

if(al<5 || still > 7 )

{

gol_step = 0;

still = 0;//erschaffe Welt

//golStart();

}else{

//Anzeigen und kopieren

for(i=0;i<8;i++) {

gol_u_u[i] = gol_u[i];

gol_u[i] = gol_u_temp[i];

P0 = ~gol_u[i];

P2 = row[i];

P2 = 0x00;

}

void main(void) {

/*-------------------------------------------------

SUPERLOOP

-------------------------------------------------*/

for(;;){

golRun(1);

y = 6000 / speed ;

dmxstep ++;

if ( counterStep > y ) {

step++;

randomProgCounter ++ ;

counterStep = 0;

}

Der Code wurde aus einem anderen Programm genommen, ich denke er sollte so lauffähig sein, ist jedoch nur ein Proof of Concept.

Hier ist ein Video das es in Aktion zeigt:

Posted in 8051 / 8052 Microcontroller, Allgemein | Kommentare deaktiviert

DMX Senden mit 8051/8082 Microcontroller

Posted on 25. Februar 2014 by Andre

Beim Reverse Engineering der Firmware des LED Effekts Eurolite LED MAT-64 bin ich über das Problem gestolpert DMX Senden zu müssen mit einem 8052 uC.

Da ich tatsächlich keine Anleitung im Internet fand musste ich mir selber helfen:

Für die Umsetzung eines eigenen 8052 DMX-Senders braucht man einen SN75176BP + einen 100 Ohm Widerstand + einen 100nF (104) Stützkondensator.

Hier ist mein Skript zum Senden:

/*--------------------------------------------------------------------
senderohneinterrupt.c 
Sende DMX für 8052 µC ohne Interrupt 
Aufbau mit einem SN75176BP / oder Max485

Version 0.2

Umgesetzt von André Thomas im Jahre 2014 nach dem Herrn.
Zu einer Zeit in der 32-Bit µController schon alt waren.

---------------------------------------------------------------------*/

#include <REG52.h>

volatile unsigned char dmxField[50]	;	//Array aus DMX Werten
char x = 0;

void delay (unsigned char n) {	 
		  unsigned int c = 0;
		  for(c=0;c<n;c++) {
			  TMOD =0x01;
			  TL0 = 0xCB;
			  TH0 = 0x00;
			  TR0 = 1;
			  while(!TF0);
			  TR0 = 0;
			  TF0 = 0;			
		  }
}

//Initialsiere DMX BAUDRATE mit Timer 2
void dmxStart (void) {
		    SCON   	 	=	0xCA  		;	// 11001010 
			RCAP2H 		= 	255   		;	// Setze Timer 2 HBit
			TCLK   	 	=	1    		;   // Timer2 Transmit Clock -> Serielle Schnittstelle 
		    TR2    		=	1   		;	// Starte Timer 2
		    IE    	 	|=	0x90 		;	// Enable RX I
}

//dmxSender 
void dmxSender (void)  {
 	unsigned int i = 0;

    // BREAK + Mark after Break 
	        SCON   	 	=	0xC0  		;	// 10000000 = 40 Mode 2 8bit // 11000000 = C0 Mode 3 9-bit -> letztes = 0
			RCAP2L		= 	250    		;   // Setze Timer 2 Lbit 83.333b
			SBUF  		= 	0x00   		;   // sende break 
			while(!TI);
	// STARTB(yte) 8n2
		    SCON   	 	=	0xC8  		;	// 11001000    
	        RCAP2L	 	=	254   		;	// Setze Timer 2 wieder auf 250.000b  
		    SBUF  	 	=	0x00   		;   // Sende Startbyte 0x00	   
			while(!TI);
	//Sende Kanäle
			for(i=0;i<sizeof(dmxField);i++) {
	        SBUF = dmxField[i] ;	// sende Daten
	        TI=0;
			while(!TI);
			}

}

//Main Function
void main(void) {

	for(x=0;x<sizeof(dmxField);x++) {
        dmxField[x]  = 0				;	// Fülle Array mit Werten
    }

    dmxStart();

	// Superloop
	for(;;){
	    dmxField[3] = 0;
		dmxField[1] = 254;
		dmxSender ();	
		delay	 (40);

		dmxField[1] = 0;
		dmxField[2] = 254;
		dmxSender ();	
		delay	 (40);

		dmxField[2] = 0;
		dmxField[3] = 254;
		dmxSender ();	
		delay	 (40);
	}  
}

/*--------------------------------------------------------------------

senderohneinterrupt.c

Sende DMX für 8052 µC ohne Interrupt

Aufbau mit einem SN75176BP / oder Max485

Version 0.2

Umgesetzt von André Thomas im Jahre 2014 nach dem Herrn.

Zu einer Zeit in der 32-Bit µController schon alt waren.

---------------------------------------------------------------------*/

#include <REG52.h>

volatile unsigned char dmxField[50] ; //Array aus DMX Werten

char x = 0;

void delay (unsigned char n) {

unsigned int c = 0;

for(c=0;c<n;c++) {

TMOD =0x01;

TL0 = 0xCB;

TH0 = 0x00;

TR0 = 1;

while(!TF0);

TR0 = 0;

TF0 = 0;

}

//Initialsiere DMX BAUDRATE mit Timer 2

void dmxStart (void) {

SCON = 0xCA ; // 11001010

RCAP2H = 255 ; // Setze Timer 2 HBit

TCLK = 1 ; // Timer2 Transmit Clock -> Serielle Schnittstelle

TR2 = 1 ; // Starte Timer 2

IE |= 0x90 ; // Enable RX I

}

//dmxSender

void dmxSender (void) {

unsigned int i = 0;

// BREAK + Mark after Break

SCON = 0xC0 ; // 10000000 = 40 Mode 2 8bit // 11000000 = C0 Mode 3 9-bit -> letztes = 0

RCAP2L = 250 ; // Setze Timer 2 Lbit 83.333b

SBUF = 0x00 ; // sende break

while(!TI);

// STARTB(yte) 8n2

SCON = 0xC8 ; // 11001000

RCAP2L = 254 ; // Setze Timer 2 wieder auf 250.000b

SBUF = 0x00 ; // Sende Startbyte 0x00

while(!TI);

//Sende Kanäle

for(i=0;i<sizeof(dmxField);i++) {

SBUF = dmxField[i] ; // sende Daten

TI=0;

while(!TI);

}

//Main Function

void main(void) {

for(x=0;x<sizeof(dmxField);x++) {

dmxField[x] = 0 ; // Fülle Array mit Werten

}

dmxStart();

// Superloop

for(;;){

dmxField[3] = 0;

dmxField[1] = 254;

dmxSender ();

delay (40);

dmxField[1] = 0;

dmxField[2] = 254;

dmxSender ();

delay (40);

dmxField[2] = 0;

dmxField[3] = 254;

dmxSender ();

delay (40);

}

Posted in 8051 / 8052 Microcontroller, Allgemein | Kommentare deaktiviert

Reverse Engineering und Custom Firmware einer Eurolite LED MAT-64

Posted on 25. Februar 2014 by Andre

Eigentlich wollte ich den alten LED-Effekt nur reparieren, doch daraus entstand

das Projekt: Firmware 1.2 für Eurolite LED MAT-64

Eine neue Firmware schreiben für einen älteren Lichteffekt. Das Opfer ist ein Eurolite LED MAT-64 an dem schonmal was durchgebrannt war und ein paar LED defekt waren. Die defekte Leiterbahn wurde repariert und die LEDs die nur noch glimmten getauscht. Hier kam mir die Idee den vorhandenen Microcontroller gegen einen anderen zu tauschen. Einen mit einer eigenhändig geschriebenen Firmware für das Effektgerät. Im Prinzip ist das nichts anderes als eine LED Matrix mit 64 LEDs die durch 8x (SN) 74HC573 Register angesteuert werden. Der DMX-Protkoll Empfang + Sendevorgang wird durch einen SN75176BP ermöglicht, die “Sound to light” Funktion durch eine Kondensator-Microfon Schaltung mit einem LM358 IC. Nun gibt es noch für die Adressierung ein paar DIP-Schalter und als Herz des ganzen einen STC89C52RC Microcontroller.

Kurz zum STC89C52RC : ein chinesisches 8052 Derivat – (8kb ROM, 256b RAM, 3 Timer) mit chinesischem Datenblatt und sehr minimalen Infos im Internetz. Erhältlich bei ebay für minimales Geld (1€/Stk). Wie man einen 89C52RC flasht kann man hier nachlesen: Programmieren/Flashen eines STC89C52 RC Tutorial.

Los geht das Reverse Engineering – zuerst mal das offenslichtliche – die Platine. Es ist heutzutage nicht allzu schwer herauszufinden was welches Bauteil macht und welcher PORT/Pin dafür zuständig ist.

Hier mal die ausgebaute Platine von oben:

Hier die Platine von unten mit den herausgefundenen Belegungen:

Nachdem nun das offensichtliche erkannt wurde, und natürlich auch die Feinheiten wie z.B. PORT 3.5 welcher den DMX-Recieve am IC schaltet, geht es ans programmieren. Hierzu dient der C-Compiler // Linker meiner Wahl. Wer einen sucht mit dem man für diese Microcontroller Programme in C schreiben und compilieren kann, der kann sich mit der Freeware SDCC versuchen. Diese findet man hier: http://sdcc.sourceforge.net/.

Als erstes wurde ein Testprogramm geschrieben, mit dem die verschiedenen Funktionen getestet werden. Hier wurde meinerseits absolut kein Wert auf Programmierer-Ethik oder schöner Code gelegt, es dient einzig und alleine dazu alles zu testen, bevor eine neue Firmware dafür gemacht wird.

Hier mal der Quelltext den ich zum Testen genommen habe:

/*LED MAT 64 Eurolite Firmware 0.1 von Andre

P0 = Ports (Leds) in one Latch

P2 = Latch enable

Alle Funktionen sind nun Reverse Engineered

DMX Empfang - ok
DMX Senden - ok
LED´s ansprechen - ok
Mic Sound to light - ok
DIP Schalter - ok

*/
#include <REG52.h>
//#include <stdio.h>

// defs
//typedef unsigned char uint8_t;
//typedef unsigned int  uint16_t;

//DMX
#define channels        8               // Kanäle
#define startadresse    1               // Startadresse
volatile unsigned char idata dmx_data[channels];      // Array mit Werten
volatile unsigned int addr;
//unsigned char a;                                // Testvar

//Setze Abkürzungen

sbit dip1 = P1^0;
sbit dip2 = P1^1;
sbit dip3 = P1^2;
sbit dip4 = P1^3;
sbit dip5 = P1^4;
sbit dip6 = P1^5;
sbit dip7 = P1^6;
sbit dip8 = P1^7;

sbit RxD = P3^0; // Recieve Data Port
sbit TxD = P3^1; // Transmit Data Port
sbit dip9 = P3^2;
sbit dip10 = P3^3; // ALL DIPS OK !

sbit test34 = P3^4;
sbit test35 = P3^5; // Leitung zu SN74-mX485 Port 2	  + Port 3 
sbit test36 = P3^6;

sbit mic = P3^7;  //Das müsste das Mic sein ?!?!

unsigned char a ;
unsigned char b ;
int x = 0;

volatile unsigned char buffer = 0x00;
volatile unsigned char dmxField[50]	;	//Array aus DMX Werten

unsigned char row[8] =   {0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80}		 ;	 //

//Funktionen

//dmxSender = Senderoutine auf Seriellen Interrupt (4) gelegt ^= 0x0023		  interrupt 4
void dmxSender (void)  {
 	unsigned int i = 0;

    // BREAK + Mark after Break 
	        SCON   	 	=	0xC0  		;	// 10000000 = 40 Mode 2 8bit // 11000000 = C0 Mode 3 9-bit -> letztes = 0
			RCAP2L		= 	250    		;   // Setze Timer 2 Lbit 83.333b
			SBUF  		= 	0x00   		;   // sende break 
			while(!TI);
	// STARTB(yte) 8n2
		    SCON   	 	=	0xC8  		;	// 11001000    
	        RCAP2L	 	=	254   		;	// Setze Timer 2 wieder auf 250.000b  
		    SBUF  	 	=	0x00   		;   // Sende Startbyte 0x00	   
			while(!TI);
	//Sende Kanäle
			for(i=0;i<sizeof(dmxField);i++) {
	        SBUF = dmxField[i] ;	// sende Daten
	        TI=0;
			while(!TI);
			}

}

//Delay - Warte 50 Millisekunden
void delay (unsigned char n) {	 
		  unsigned int c = 0;
		  for(c=0;c<n;c++) {
			  TMOD =0x01;
			  TL0 = 0xCB;
			  TH0 = 0x00;
			  TR0 = 1;
			  while(!TF0);
			  TR0 = 0;
			  TF0 = 0;			
		  }
}

//serial0 // LESE DMX
void serial0 (void) interrupt 4
{
    static signed int rx_count;                 	// signed!!!
    static bit dmx_valid;                       	// Startbit 
    static bit dmx_break;                       	// Break 
    static unsigned char temp;

    temp =  SBUF;
    RI = 0;                                     	// Interrupt Flag

    if (RB8 == 1){                               	// Brauchbare Daten empfangen
        if (dmx_break == 1){
            if (dmx_valid == 0){                   	// 1. Byte nach break
                if (temp == 0x00){					// Freigabe
					dmx_valid = 1;
				}  
                else {								// kein Startbit
					dmx_break = 0;
				}               
            }
            else{
                rx_count++;
                if (rx_count == channels){      	// alle Kanäle empfangen?
                    dmx_break = 0;                  // Pause
                }
                else if (rx_count >= 0){             // Startadresse erreicht?
                    dmx_data[rx_count] = temp;
                }
            }
        }
     }
    else{
        dmx_valid = 0;
        dmx_break = 1;
        rx_count = -addr;
    }    
}

//Initialsiere DMX BAUDRATE mit Timer 2
void dmxStart (void) {
		    SCON   	 	=	0xCA  		;	// 11001010 
			RCAP2H 		= 	255   		;	// Setze Timer 2 HBit
			TCLK   	 	=	1    		;   // Timer2 Transmit Clock -> Serielle Schnittstelle 
		    TR2    		=	1   		;	// Starte Timer 2
		    IE    	 	|=	0x90 		;	// Enable RX I
}

void main(void) {

			//TESTVARIABLEN UND PORTS ZUM RE
			buffer = 0x01;
			dip1 = 1;
			dip2 = 1;
			dip3 = 1;
			dip4 = 1;
			dip5 = 1;
			dip6 = 1;
			dip7 = 1;
			dip8 = 1;
			dip9 = 1;
			dip10 = 1;
			mic = 1;

			TxD = 1;
			test34 = 1;	
			test35 = 0;	// Muss 0 sein wenn DMX Empfang		
		   	test36 = 1;	

			while(1) {

				//alles an !
				P0 = 0x00;
				P2 = 0xFF;
				delay(20);

				//alles aus !
				P0 = 0xFF;
				P2 = 0xFF;
				delay(20);
				P2 = 0x00;

			//test mit den 2 unbelegten dips

				//testmuster
				buffer=0xFE;
				for(b=0;b<8;b++) {
				 P2 = row[b];
				 P0 = buffer;
				 buffer = buffer>>8	;
				 delay(1);
				 P2 = 0x00;	
				}

				while(dip2 == 1) {
					  if(dip4==1) {test34=1;}else{test34=0;}
					  if(dip5==1) {test35=1;}else{test35=0;}
				}

			//DMX Empfang VARIABLEN

			PCON = 0x00;                                    // 64tclk 250 Baud 16MHz
   			SCON = 0x98;                                    // Serial Port Mode 2 10011000
    		IE |= 0x90;                                     // Enable RX I

    		addr = startadresse;        

			test35 = 0;	// Muss 0 sein wenn DMX Empfang	

				delay(20);
				//Begin Reverse Engineering Tests
					//alles an !
				P0 = 0x00;
				P2 = 0xFF;
				delay(20);

				//alles aus !
				P0 = 0xFF;
				P2 = 0xFF;
				delay(20);
				P2 = 0x00;

				// DMX TEST	Empfang // OK !

				while(dip2 == 1) {
						 P2 = 0x01 ;
						 a  = 	 dmx_data[0] ;
						//for (b=0;b<8;b++) {
						 P0 = ~a ;
						 delay(1);
						 P2 = 0x00;
						 delay(1);
				} //while DMX-Input Test

				P0 = 0x00;
				P2 = 0xFF;
				delay(20);

				//alles aus !
				P0 = 0xFF;
				P2 = 0xFF;
				delay(20);
				P2 = 0x00;

				// DMX TEST SENDEN
			   	test35 = 1;	// Muss 0 sein wenn DMX Empfang	
				for(x=0;x<sizeof(dmxField);x++) {
        		dmxField[x]  = 0				;	// Fülle Array mit Werten
   				}

   				dmxStart();

				while(dip3 == 1) {

					dmxField[3] = 0;
					dmxField[1] = 254;
					dmxSender ();	
					delay	 (40);

					dmxField[1] = 0;
					dmxField[2] = 254;
					dmxSender ();	
					delay	 (40);

					dmxField[2] = 0;
					dmxField[3] = 254;
					dmxSender ();	
					delay	 (40);

				}

				//alles an !
				P0 = 0x00;
				P2 = 0xFF;
				delay(20);

				//alles aus !
				P0 = 0xFF;
				P2 = 0xFF;
				delay(20);
				P2 = 0x00;

				//Stroben der mittleren roten
				for (a=8;a>0;a=a-1) {
				P0 = 0xE7;	 // Invertiert nur die mittleren 2 xxx--xxx 
				P2 = 0x18;	 //	Mittlere 2 Latches ---xx---
				delay(a);
				P0 = 0xFF;
				delay(a) ;
				}

				//Lauflicht von LED1 bis LED64				
				for (a=0;a<8;a++) {
				P0 = 0xFF;
				P2 = 0xFF;
				delay(10) ;
				P2 = 0x00;
					for (b=0;b<8;b++) {

						P0 = buffer; // eine Led je Latch
						P0 = ~P0;	  // invertiere auf byte level (P0_1 = !P0_1 auf bit level !)
						P2 = row[a] ; // Latch enable auf Latch (a) setzen			
						P2 = 0x00 ; // LE schliessen

						if (buffer < 0x80){
						buffer = buffer<<1 ;
						}else{	
						buffer = 0x01;
						}

						delay(1);
					} //for

				}//for	

				//MicrophoneTesting	vermutlich P3_7 auf input 
				a=0;
				mic = 1;
				while ( a<3 ) {
					if(mic == 0){
					//ALLES AN
					P0 = 0x00;
					P2 = 0xFF;	
					delay(3);
					P2 = 0x00;
					a++;
					}else{
					//alles aus
					P0 = 0xFF;
					P2 = 0xFF;
					delay(3);
					P2 = 0x00;	
					mic = 1;
					}
				} // while mic testen	

				//DIPSCHALTER input testen	

				P2 = 0x00;
				while (dip1 == 1) {
					buffer = 0x00;

					if(dip2 == 0){	
				 		buffer =  buffer + 1;
					}	

					if(dip3 == 0){	
						 buffer =  buffer + 2;
					}

					if(dip4 == 0){	
						buffer =  buffer + 4;
					}	

					if(dip5 == 0){	
						buffer =  buffer + 8;
					}

					if(dip6 == 0){	
						 buffer =  buffer + 16;
					}

					if(dip7 == 0){	
						 buffer =  buffer + 32;
					}

					if(dip8 == 0){	
						buffer =  buffer + 64;
					}			

					if(dip9 == 0){	
						 buffer =  buffer + 128;
					}

				//	delay(100);	
					P0 = ~buffer ;
					P2 = row[0];
				   	delay(1);
					P2 = 0x00;

					P0=0xFF;
					P2=0xFE;
					delay(1);
					P2 = 0x00;

					if(dip10 == 0){	
						P0 = 0xE7;	 // Invertiert nur die mittleren 2 xxx--xxx 
						P2 = 0x18;	 //	Mittlere 2 Latches ---xx---
						delay(1);
						P2 = 0x00;
					}

				}//while (DIP TEST)

			}//while (SuperLoop)	 

} //Main

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

214

215

216

217

218

219

220

221

222

223

224

225

226

227

228

229

230

231

232

233

234

235

236

237

238

239

240

241

242

243

244

245

246

247

248

249

250

251

252

253

254

255

256

257

258

259

260

261

262

263

264

265

266

267

268

269

270

271

272

273

274

275

276

277

278

279

280

281

282

283

284

285

286

287

288

289

290

291

292

293

294

295

296

297

298

299

300

301

302

303

304

305

306

307

308

309

310

311

312

313

314

315

316

317

318

319

320

321

322

323

324

325

326

327

328

329

330

331

332

333

334

335

336

337

338

339

340

341

342

343

344

345

346

347

348

349

350

351

352

353

354

355

356

357

358

359

360

361

362

363

364

365

366

367

368

369

370

371

372

373

374

375

376

377

378

379

380

381

382

383

384

385

386

387

388

389

390

391

392

393

394

395

396

/*LED MAT 64 Eurolite Firmware 0.1 von Andre

P0 = Ports (Leds) in one Latch

P2 = Latch enable

Alle Funktionen sind nun Reverse Engineered

DMX Empfang - ok

DMX Senden - ok

LED´s ansprechen - ok

Mic Sound to light - ok

DIP Schalter - ok

#include <REG52.h>

//#include <stdio.h>

// defs

//typedef unsigned char uint8_t;

//typedef unsigned int uint16_t;

//DMX

#define channels 8 // Kanäle

#define startadresse 1 // Startadresse

volatile unsigned char idata dmx_data[channels]; // Array mit Werten

volatile unsigned int addr;

//unsigned char a; // Testvar

//Setze Abkürzungen

sbit dip1 = P1^0;

sbit dip2 = P1^1;

sbit dip3 = P1^2;

sbit dip4 = P1^3;

sbit dip5 = P1^4;

sbit dip6 = P1^5;

sbit dip7 = P1^6;

sbit dip8 = P1^7;

sbit RxD = P3^0; // Recieve Data Port

sbit TxD = P3^1; // Transmit Data Port

sbit dip9 = P3^2;

sbit dip10 = P3^3; // ALL DIPS OK !

sbit test34 = P3^4;

sbit test35 = P3^5; // Leitung zu SN74-mX485 Port 2 + Port 3

sbit test36 = P3^6;

sbit mic = P3^7; //Das müsste das Mic sein ?!?!

unsigned char a ;

unsigned char b ;

int x = 0;

volatile unsigned char buffer = 0x00;

volatile unsigned char dmxField[50] ; //Array aus DMX Werten

unsigned char row[8] = {0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80} ; //

//Funktionen

//dmxSender = Senderoutine auf Seriellen Interrupt (4) gelegt ^= 0x0023 interrupt 4

void dmxSender (void) {

unsigned int i = 0;

// BREAK + Mark after Break

SCON = 0xC0 ; // 10000000 = 40 Mode 2 8bit // 11000000 = C0 Mode 3 9-bit -> letztes = 0

RCAP2L = 250 ; // Setze Timer 2 Lbit 83.333b

SBUF = 0x00 ; // sende break

while(!TI);

// STARTB(yte) 8n2

SCON = 0xC8 ; // 11001000

RCAP2L = 254 ; // Setze Timer 2 wieder auf 250.000b

SBUF = 0x00 ; // Sende Startbyte 0x00

while(!TI);

//Sende Kanäle

for(i=0;i<sizeof(dmxField);i++) {

SBUF = dmxField[i] ; // sende Daten

TI=0;

while(!TI);

}

//Delay - Warte 50 Millisekunden

void delay (unsigned char n) {

unsigned int c = 0;

for(c=0;c<n;c++) {

TMOD =0x01;

TL0 = 0xCB;

TH0 = 0x00;

TR0 = 1;

while(!TF0);

TR0 = 0;

TF0 = 0;

}

//serial0 // LESE DMX

void serial0 (void) interrupt 4

{

static signed int rx_count; // signed!!!

static bit dmx_valid; // Startbit

static bit dmx_break; // Break

static unsigned char temp;

temp = SBUF;

RI = 0; // Interrupt Flag

if (RB8 == 1){ // Brauchbare Daten empfangen

if (dmx_break == 1){

if (dmx_valid == 0){ // 1. Byte nach break

if (temp == 0x00){ // Freigabe

dmx_valid = 1;

}

else { // kein Startbit

dmx_break = 0;

}

else{

rx_count++;

if (rx_count == channels){ // alle Kanäle empfangen?

dmx_break = 0; // Pause

}

else if (rx_count >= 0){ // Startadresse erreicht?

dmx_data[rx_count] = temp;

}

else{

dmx_valid = 0;

dmx_break = 1;

rx_count = -addr;

}

//Initialsiere DMX BAUDRATE mit Timer 2

void dmxStart (void) {

SCON = 0xCA ; // 11001010

RCAP2H = 255 ; // Setze Timer 2 HBit

TCLK = 1 ; // Timer2 Transmit Clock -> Serielle Schnittstelle

TR2 = 1 ; // Starte Timer 2

IE |= 0x90 ; // Enable RX I

}

void main(void) {

//TESTVARIABLEN UND PORTS ZUM RE

buffer = 0x01;

dip1 = 1;

dip2 = 1;

dip3 = 1;

dip4 = 1;

dip5 = 1;

dip6 = 1;

dip7 = 1;

dip8 = 1;

dip9 = 1;

dip10 = 1;

mic = 1;

TxD = 1;

test34 = 1;

test35 = 0; // Muss 0 sein wenn DMX Empfang

test36 = 1;

while(1) {

//alles an !

P0 = 0x00;

P2 = 0xFF;

delay(20);

//alles aus !

P0 = 0xFF;

P2 = 0xFF;

delay(20);

P2 = 0x00;

//test mit den 2 unbelegten dips

//testmuster

buffer=0xFE;

for(b=0;b<8;b++) {

P2 = row[b];

P0 = buffer;

buffer = buffer>>8 ;

delay(1);

P2 = 0x00;

}

while(dip2 == 1) {

if(dip4==1) {test34=1;}else{test34=0;}

if(dip5==1) {test35=1;}else{test35=0;}

}

//DMX Empfang VARIABLEN

PCON = 0x00; // 64tclk 250 Baud 16MHz

SCON = 0x98; // Serial Port Mode 2 10011000

IE |= 0x90; // Enable RX I

addr = startadresse;

test35 = 0; // Muss 0 sein wenn DMX Empfang

delay(20);

//Begin Reverse Engineering Tests

//alles an !

P0 = 0x00;

P2 = 0xFF;

delay(20);

//alles aus !

P0 = 0xFF;

P2 = 0xFF;

delay(20);

P2 = 0x00;

// DMX TEST Empfang // OK !

while(dip2 == 1) {

P2 = 0x01 ;

a = dmx_data[0] ;

//for (b=0;b<8;b++) {

P0 = ~a ;

delay(1);

P2 = 0x00;

delay(1);

} //while DMX-Input Test

P0 = 0x00;

P2 = 0xFF;

delay(20);

//alles aus !

P0 = 0xFF;

P2 = 0xFF;

delay(20);

P2 = 0x00;

// DMX TEST SENDEN

test35 = 1; // Muss 0 sein wenn DMX Empfang

for(x=0;x<sizeof(dmxField);x++) {

dmxField[x] = 0 ; // Fülle Array mit Werten

}

dmxStart();

while(dip3 == 1) {

dmxField[3] = 0;

dmxField[1] = 254;

dmxSender ();

delay (40);

dmxField[1] = 0;

dmxField[2] = 254;

dmxSender ();

delay (40);

dmxField[2] = 0;

dmxField[3] = 254;

dmxSender ();

delay (40);

}

//alles an !

P0 = 0x00;

P2 = 0xFF;

delay(20);

//alles aus !

P0 = 0xFF;

P2 = 0xFF;

delay(20);

P2 = 0x00;

//Stroben der mittleren roten

for (a=8;a>0;a=a-1) {

P0 = 0xE7; // Invertiert nur die mittleren 2 xxx--xxx

P2 = 0x18; // Mittlere 2 Latches ---xx---

delay(a);

P0 = 0xFF;

delay(a) ;

}

//Lauflicht von LED1 bis LED64

for (a=0;a<8;a++) {

P0 = 0xFF;

P2 = 0xFF;

delay(10) ;

P2 = 0x00;

for (b=0;b<8;b++) {

P0 = buffer; // eine Led je Latch

P0 = ~P0; // invertiere auf byte level (P0_1 = !P0_1 auf bit level !)

P2 = row[a] ; // Latch enable auf Latch (a) setzen

P2 = 0x00 ; // LE schliessen

if (buffer < 0x80){

buffer = buffer<<1 ;

}else{

buffer = 0x01;

}

delay(1);

} //for

}//for

//MicrophoneTesting vermutlich P3_7 auf input

a=0;

mic = 1;

while ( a<3 ) {

if(mic == 0){

//ALLES AN

P0 = 0x00;

P2 = 0xFF;

delay(3);

P2 = 0x00;

a++;

}else{

//alles aus

P0 = 0xFF;

P2 = 0xFF;

delay(3);

P2 = 0x00;

mic = 1;

}

} // while mic testen

//DIPSCHALTER input testen

P2 = 0x00;

while (dip1 == 1) {

buffer = 0x00;

if(dip2 == 0){

buffer = buffer + 1;

}

if(dip3 == 0){

buffer = buffer + 2;

}

if(dip4 == 0){

buffer = buffer + 4;

}

if(dip5 == 0){

buffer = buffer + 8;

}

if(dip6 == 0){

buffer = buffer + 16;

}

if(dip7 == 0){

buffer = buffer + 32;

}

if(dip8 == 0){

buffer = buffer + 64;

}

if(dip9 == 0){

buffer = buffer + 128;

}

// delay(100);

P0 = ~buffer ;

P2 = row[0];

delay(1);

P2 = 0x00;

P0=0xFF;

P2=0xFE;

delay(1);

P2 = 0x00;

if(dip10 == 0){

P0 = 0xE7; // Invertiert nur die mittleren 2 xxx--xxx

P2 = 0x18; // Mittlere 2 Latches ---xx---

delay(1);

P2 = 0x00;

}

}//while (DIP TEST)

}//while (SuperLoop)

} //Main

Nach flashen kam dieser Film dabei raus:

gelöste Probleme beim Projekt:

DMX Empfang mit 8052 Microcontrollern
DMX Senden mit 8052 Microcontrollern
Verschiedene Muster erzeugen
Laufschriften auf LED Matrixen.

Hier ist ein Video vom fertigen Projekt: es sind 2 LED MAT 64 mit geflashten uC´s bzw eigenen. Ich nenne die Firmware 1.2 da auf den Platinen von mir 1.1 stand.

Mittlerweile ist die Version 1.41 die finale Version geworden.

Sollte jemand etwas ähnliches probieren, hier mein Tool mit dem ich die Pattern errechnet habe, geht wohl für jedes Arduino oder 8052 Projekt wo mit Schieberegistern gearbeitet wird.

8×8 MATRIX Editor

Posted in 8051 / 8052 Microcontroller, Allgemein | 2 Comments

2 Stimmige Melodien auf Arduino spielen

Posted on 29. Oktober 2013 by Andre

Hier ist ein Ausschnitt aus einem meiner Projekte:

Mission Impossible Melodie mit 2 Stimmen auf einem Buzzer ausgeben. Die Idee mit den 2-Stimmen auf einem Lautspecher stammtnatürlich nicht von mir, sondern von der Tone Library von Rogue, download hier: http://code.google.com/p/rogue-code/wiki/ToneLibraryDocumentation . Die Melodie habe ich aber Note für Note übernommen.

Die Player-Routine stammte von hier: http://www.linuxcircle.com/2013/04/03/play-mario-bros-harmonies-on-arduino-and-2-speakers/

Ich habe die Funktion so geändert, das man noch andere Sachen in z.B. einer while-Schleife ausführen kann – Ihr könnt den Quelltext hier herunterladen: http://www.xlr8.at/downloads/Mission_Impossible.zip

Und hier ist dann noch der Quelltext:

/*MISSION IMPOSSIBLE

Done by: André Thomas
24.01.2014

Taken out from a poker program I have written last year
Idea for the 2-Tone same Speaker didn´t came from me.

"Mission Impossible" theme made for Arduino by me, note by note. 
------------------------------------------------------------------
For compiling you need Tone() from here
http://code.google.com/p/rogue-code/wiki/ToneLibraryDocumentation  

Go into the Tone Directory and change tone.cpp header (includes) to this:

#include <avr/interrupt.h>
//#include <avr/pgmspace.h>
//#include <wiring.h>
#include <Arduino.h>

so it will compile.
------------------------------------------------------------------

*/

#include <Tone.h>
#include "frequenzen.h"
#include <avr/pgmspace.h>

#define OUT1 7
#define OUT2 8

//Sound Vars
Tone notePlayer[2];
unsigned int Counts[] = { 0, 0};
unsigned long stopTimeNote1 = 0;
unsigned long stopTimeNote2 = 0;
int value;
int value2;
int dur;
int dur2;

//Mission Impossible // Game Finale Melodie
int mimp[]  PROGMEM = {
  NOTE_DS5,
  NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,
  NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,
  NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,
  NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,
  NOTE_D5,NOTE_DS5,NOTE_F5,NOTE_FS5,NOTE_G5, // Upswing 5

  NOTE_G2,0,NOTE_G2,0,NOTE_AS2,0,NOTE_C3,0,
  NOTE_G2,0,NOTE_G2,0,NOTE_F2,0,NOTE_FS2,0,

  NOTE_G2,0,NOTE_G2,0,NOTE_AS2,0,NOTE_C3,0,
  NOTE_G2,0,NOTE_G2,0,NOTE_F2,0,NOTE_FS2,0,

  NOTE_G2,0,NOTE_G2,0,NOTE_AS2,0,NOTE_C3,0,
  NOTE_G2,0,NOTE_G2,0,NOTE_F2,0,NOTE_FS2,0,

  NOTE_G2,0,NOTE_G2,0,NOTE_AS2,0,NOTE_C3,0,
  NOTE_G2,0,NOTE_G2,0,NOTE_F2,0,NOTE_FS2,0,

  NOTE_G2,0,NOTE_G2,0,NOTE_AS2,0,NOTE_C3,0,
  NOTE_G2,0,NOTE_G2,0,NOTE_F2,0,NOTE_FS2,0,

  NOTE_G2,0,NOTE_G2,0,NOTE_AS2,0,NOTE_C3,0,
  NOTE_G2,0,NOTE_G2,0,NOTE_F2,0,NOTE_FS2,0,

  NOTE_G2,0,NOTE_G2,0,NOTE_AS2,0,NOTE_C3,0,
  NOTE_G2,0,NOTE_G2,0,NOTE_F2,0,NOTE_FS2,0,

  NOTE_G2,0,NOTE_G2,0,NOTE_AS2,0,NOTE_C3,0,
  NOTE_G2,0,NOTE_G2,0,NOTE_F2,0,NOTE_FS2,0,

  NOTE_G2,0,NOTE_G2,0,NOTE_AS2,0,NOTE_C3,0,
  NOTE_G2,0,NOTE_G2,0,NOTE_F2,0,NOTE_FS2,0,

  NOTE_G2,0,NOTE_G2,0,NOTE_AS2,0,NOTE_C3,0,
  NOTE_G2,0,NOTE_G2,0,NOTE_F2,0,NOTE_FS2,0,

  NOTE_G2,0

  ,-1
};

int mimpDur [] PROGMEM = {

  50,50,50,50,50,50,50,50,50,50,
  50,50,50,50,50,50,50,50,50,50,
  50,50,50,50,50,50,50,50,50,50,
  50,50,50,50,
  50,50,50,50,50,50,

  200,400,200,400,200,200,200,200,              //2000  
  200,400,200,400,200,200,200,200,  

  200,400,200,400,200,200,200,200,              //2000 
  200,400,200,400,200,200,200,200,

  200,400,200,400,200,200,200,200,              
  200,400,200,400,200,200,200,200,  

  200,400,200,400,200,200,200,200,              
  200,400,200,400,200,200,200,200,

  200,400,200,400,200,200,200,200,           
  200,400,200,400,200,200,200,200,  

  200,400,200,400,200,200,200,200,       
  200,400,200,400,200,200,200,200,

  200,400,200,400,200,200,200,200,          
  200,400,200,400,200,200,200,200,  

  200,400,200,400,200,200,200,200,              
  200,400,200,400,200,200,200,200,

  400,-1
};

int mimp2 [] PROGMEM  = {
  NOTE_G3,

  NOTE_G3,0,NOTE_G3,0,NOTE_AS3,0,NOTE_C4,0,
  NOTE_G3,0,NOTE_G3,0,NOTE_F3,0,NOTE_FS3,0,

  NOTE_G3,0,NOTE_G3,0,NOTE_AS3,0,NOTE_C4,0,
  NOTE_G3,0,NOTE_G3,0,NOTE_F3,0,NOTE_FS3,0,

  NOTE_AS5,0,NOTE_G5,0,NOTE_D5,0,   
  NOTE_AS5,0,NOTE_G5,0,NOTE_CS5,0,
  NOTE_AS5,0,NOTE_G5,0,NOTE_C5,0,   
  NOTE_AS4,0,NOTE_C5,0,

  NOTE_AS4,NOTE_G4,NOTE_FS5,0,   
  NOTE_AS4,NOTE_G4,NOTE_F5,0,
  NOTE_AS4,NOTE_G4,NOTE_E5,0,    
  NOTE_DS5,NOTE_D5,0,

  NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,0,    
  NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,0    ,
  NOTE_CS5,NOTE_F5,NOTE_AS5,NOTE_CS5,NOTE_F5,NOTE_AS5,NOTE_CS5,NOTE_F5,0    ,
  NOTE_DS5,NOTE_G5,NOTE_C6,NOTE_DS5,NOTE_G5,NOTE_C6,NOTE_DS5,NOTE_G5,0,
  NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,0    ,
  NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,0    ,
  NOTE_GS4,NOTE_C5,NOTE_F5,NOTE_GS4,NOTE_C5,NOTE_F5,NOTE_GS4,NOTE_C5,0     ,
  NOTE_A4,NOTE_CS5,NOTE_FS5,NOTE_A4,NOTE_CS5,NOTE_FS5,NOTE_A4,NOTE_CS5,0,

  NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,0    ,
  NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,0    ,
  NOTE_CS5,NOTE_F5,NOTE_AS5,NOTE_CS5,NOTE_F5,NOTE_AS5,NOTE_CS5,NOTE_F5,0    ,
  NOTE_DS5,NOTE_G5,NOTE_C6,NOTE_DS5,NOTE_G5,NOTE_C6,NOTE_DS5,NOTE_G5,0,
  NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,0    ,
  NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,0    ,
  NOTE_GS4,NOTE_C5,NOTE_F5,NOTE_GS4,NOTE_C5,NOTE_F5,NOTE_GS4,NOTE_C5,0     ,
  NOTE_A4,NOTE_CS5,NOTE_FS5,NOTE_A4,NOTE_CS5,NOTE_FS5,NOTE_A4,NOTE_CS5,0,

  NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,NOTE_G5,NOTE_AS4,NOTE_D5,0,-1

};

int mimp2Dur [] PROGMEM  = {

  2025,    //+25 for the delayed melody

  200,400,200,400,200,200,200,200,            
  200,400,200,400,200,200,200,200,  

  200,400,200,400,200,200,200,200,              
  200,400,200,400,200,200,200,200,

  150,50,150,50,800,800,   
  150,50,150,50,800,800,
  150,50,150,50,800,800,   
  150,50,400,1400,

  200,200,600,1000,   
  200,200,600,1000,
  200,200,600,1000,   
  200,400,1400,

  25,25,25,25,25,25,25,25,391,    
  25,25,25,25,25,25,25,25,391,    
  25,25,25,25,25,25,25,25,191, 
  25,25,25,25,25,25,25,25,191,             
  25,25,25,25,25,25,25,25,391,    
  25,25,25,25,25,25,25,25,391,   
  25,25,25,25,25,25,25,25,191,   
  25,25,25,25,25,25,25,25,191,  

  25,25,25,25,25,25,25,25,391,    
  25,25,25,25,25,25,25,25,391,    
  25,25,25,25,25,25,25,25,191, 
  25,25,25,25,25,25,25,25,191,             
  25,25,25,25,25,25,25,25,391,    
  25,25,25,25,25,25,25,25,391,   
  25,25,25,25,25,25,25,25,191,   
  25,25,25,25,25,25,25,25,191,        

  25,25,25,25,25,25,25,25,300, 0
};

int led = 13;   //Just a LED

void setup()
{   
      pinMode(led, OUTPUT);                         // Set pinmode
      notePlayer[0].begin(OUT1);                    // Voice 1
      notePlayer[1].begin(OUT2);                    // Voice 2
      digitalWrite(led, LOW);                       // Turn off LED
}

void loop() {

        playTune(mimp, mimpDur, mimp2 , mimp2Dur ,0);  //Play the tune

}

void playTune(int melody[],  int melDurations[], int harmony[],  int harmDurations[], boolean repeat )
{   
    value    = pgm_read_word(&melody[Counts[0]]); 
    value2   = pgm_read_word(&harmony[Counts[1]]);  
    dur      = pgm_read_word(&melDurations[Counts[0]]);  
    dur2     = pgm_read_word(&harmDurations[Counts[1]]);

    if(value == -1 || value2 == -1) {
            notePlayer[0].stop();
            notePlayer[1].stop();
            digitalWrite(led, LOW); // Just a visual check if it´s doin something 
            if(repeat == 1) {
            value=0;value2=0;dur=0;dur2=0;Counts[0]=0;Counts[1]=0;
            }
            return;  
    }

    if ( millis()>stopTimeNote1 ) {
          if(value==0) { 
            if(notePlayer[0].isPlaying()) notePlayer[0].stop();  
            digitalWrite(led, LOW); // Just a visual check if it´s doin something  
            }
            else{
              notePlayer[0].play(value);
              digitalWrite(led, HIGH); // Just a visual check if it´s doin something
            }
              stopTimeNote1 = millis() + dur;
              if(value != -1 ) {Counts[0]++;}

    }

    if ( millis()>stopTimeNote2 ) {
        if(value2==0) { if(notePlayer[1].isPlaying()) notePlayer[1].stop();    }
        else{
          notePlayer[1].play(value2);
        }
          stopTimeNote2 = millis() + dur2;
          if(value2 != -1 ) {Counts[1]++;}

    }
    return;
}

void resetTone() {
    Counts[0] = 0;
    Counts[1] = 0;
    stopTimeNote1 = 0;
    stopTimeNote2 = 0;
    notePlayer[0].stop();
    notePlayer[1].stop();
    value=0;
    value2=0;
    dur=0;
    dur2=0;
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

214

215

216

217

218

219

220

221

222

223

224

225

226

227

228

229

230

231

232

233

234

235

236

237

238

239

240

241

242

243

244

245

246

247

248

249

250

251

252

253

254

255

256

257

258

259

260

261

262

263

264

265

266

267

268

269

270

271

272

273

274

/*MISSION IMPOSSIBLE

Done by: André Thomas

24.01.2014

Taken out from a poker program I have written last year

Idea for the 2-Tone same Speaker didn´t came from me.

"Mission Impossible" theme made for Arduino by me, note by note.

------------------------------------------------------------------

For compiling you need Tone() from here

http://code.google.com/p/rogue-code/wiki/ToneLibraryDocumentation

Go into the Tone Directory and change tone.cpp header (includes) to this:

#include <avr/interrupt.h>

//#include <avr/pgmspace.h>

//#include <wiring.h>

#include <Arduino.h>

so it will compile.

------------------------------------------------------------------

#include <Tone.h>

#include "frequenzen.h"

#include <avr/pgmspace.h>

#define OUT1 7

#define OUT2 8

//Sound Vars

Tone notePlayer[2];

unsigned int Counts[] = { 0, 0};

unsigned long stopTimeNote1 = 0;

unsigned long stopTimeNote2 = 0;

int value;

int value2;

int dur;

int dur2;

//Mission Impossible // Game Finale Melodie

int mimp[] PROGMEM = {

NOTE_DS5,

NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,

NOTE_D5,NOTE_DS5,NOTE_D5,NOTE_DS5,

NOTE_D5,NOTE_DS5,NOTE_F5,NOTE_FS5,NOTE_G5, // Upswing 5