📄 demot.lst
字号:
240 3 b=0;
241 3 if(a==8)
242 3 {
243 4 return;
244 4 }
245 3 }
246 2 }
247 1 }
248 /*************************************/
249 /* 初始化函数 */
250 /*************************************/
C51 COMPILER V4.01, DEMOT 15/10/01 13:56:17 PAGE 5
251 INT_1()
252 {
253 1 com=start_line0;
254 1 PR1(); /* 显示起始行为0 */
255 1 PR4();
256 1 PR7();
*** WARNING 206 IN LINE 256 OF F:\C_SOFT\HD61202\VP19264\DEMOT.C: 'PR7': missing function-prototype
257 1
258 1 com=display_on; /* 开显示 */
259 1 PR1();
260 1 PR4();
261 1 PR7();
262 1 }
263
264
265 /*************************************/
266 /* 清屏函数 */
267 /*************************************/
268 CLEAR()
269 {
270 1 for(count1=0xb8;count1!=0xc0;count1++)
271 1 {
272 2 com=count1;
273 2 PR1();
274 2 PR4();
275 2 PR7();
276 2 com=0x40;
277 2 PR1();
278 2 PR4();
279 2 PR7();
280 2 com=64;
281 2 while(com!=0)
282 2 {
283 3 dat1=0x00;
284 3 PR2();
*** WARNING 206 IN LINE 284 OF F:\C_SOFT\HD61202\VP19264\DEMOT.C: 'PR2': missing function-prototype
285 3 PR5();
*** WARNING 206 IN LINE 285 OF F:\C_SOFT\HD61202\VP19264\DEMOT.C: 'PR5': missing function-prototype
286 3 PR8();
*** WARNING 206 IN LINE 286 OF F:\C_SOFT\HD61202\VP19264\DEMOT.C: 'PR8': missing function-prototype
287 3 com--;
288 3 }
289 2 }
290 1
291 1 }
292 /*************************************/
293 /* 直接访问方式的驱动函数 */
294 /*************************************/
295 BUSY1()
296 {
297 1 do
298 1 {
299 2 ACC=cradd1; /* 读状态字 */
300 2 }
301 1 while (ACC_7==1); /* 判“忙”标志 */
302 1 }
303 BUSY2()
304 {
305 1 do
306 1 {
307 2 ACC=cradd2; /* 读状态字 */
308 2 }
309 1 while (ACC_7==1); /* 判“忙”标志 */
310 1 }
311 BUSY3()
312 {
C51 COMPILER V4.01, DEMOT 15/10/01 13:56:17 PAGE 6
313 1 do
314 1 {
315 2 ACC=cradd3; /* 读状态字 */
316 2 }
317 1 while (ACC_7==1); /* 判“忙”标志 */
318 1 }
319 /*************************************/
320 /* 写指令函数 */
321 /*************************************/
322 PR1()
323 {
324 1 BUSY1(); /* 判忙 */
325 1 cwadd1=com; /* 写指令 */
326 1 }
327 PR4()
328 {
329 1 BUSY2(); /* 判忙 */
330 1 cwadd2=com; /* 写指令 */
331 1 }
332 PR7()
333 {
334 1 BUSY3(); /* 判忙 */
335 1 cwadd3=com; /* 写指令 */
336 1 }
337 /*************************************/
338 /* 写显示数据函数 */
339 /*************************************/
340 PR2()
341 {
342 1 BUSY1();
343 1 dwadd1=dat1; /* 写显示数据(右) */
344 1 }
345 PR5()
346 {
347 1 BUSY2();
348 1 dwadd2=dat1; /* 写显示数据(中) */
349 1 }
350 PR8()
351 {
352 1 BUSY3();
353 1 dwadd3=dat1; /* 写显示数据(左) */
354 1 }
355 /*************************************/
356 /* 读显示数据函数 */
357 /*************************************/
358 PR3()
359 {
360 1 BUSY1();
361 1 dat1=dradd1; /* 读显示数据(左) */
362 1 }
363 PR6()
364 {
365 1 BUSY2();
366 1 dat1=dradd2; /* 读显示数据(中) */
367 1 }
368 PR9()
369 {
370 1 BUSY3();
371 1 dat1=dradd3; /* 读显示数据(右) */
372 1 }
373 /*************************************/
374 /* 绘点函数 */
375 /*************************************/
376 W_DOT()
377 {
378 1 unsigned int j;
C51 COMPILER V4.01, DEMOT 15/10/01 13:56:17 PAGE 7
379 1 j=para1;
380 1 com=O_Y/8;
381 1 code_1=O_Y%8;
382 1 com=com|0xb8;
383 1 PR1();
384 1 PR4();
385 1 PR7();
386 1 O_Y=1;
387 1 for(;code_1!=0;)
388 1 {
389 2 O_Y=O_Y*2;
390 2 code_1--;
391 2 }
392 1 if(O_X<j)
393 1 {
394 2 com=O_X|0x40;
395 2 PR1();
396 2 PR3();
397 2 PR3();
398 2 PR1();
399 2 dat1=dat1|O_Y;
400 2 PR2();
401 2 }
402 1 else
403 1 {
404 2 if(O_X<=2*j)
405 2 {
406 3 com=O_X-j|0x40;
407 3 PR4();
408 3 PR6();
409 3 PR6();
410 3 PR4();
411 3 dat1=dat1|O_Y;
412 3 PR5();
413 3 }
414 2 else
415 2 {
416 3 com=O_X-2*j|0x40;
417 3 PR7();
418 3 PR9();
419 3 PR9();
420 3 PR7();
421 3 dat1=dat1|O_Y;
422 3 PR8();
423 3 }
424 2 }
425 1 }
426 /*************************************/
427 /* 中文写入函数 */
428 /*************************************/
429 CCW_PR()
430 {
431 1 unsigned char i,j,k;
432 1 i=0;
433 1 j=para1;
434 1 loop: com=O_Y|0xb8;
435 1 PR1();
436 1 PR4();
437 1 PR7();
438 1 if(O_X<j)
439 1 {
440 2 com=O_X|0x40;
441 2 PR1();
442 2 k='L';
443 2 }
444 1 else
C51 COMPILER V4.01, DEMOT 15/10/01 13:56:17 PAGE 8
445 1 {
446 2 if(O_X<2*j)
447 2 {
448 3 com=O_X-j|0x40;
449 3 PR4();
450 3 k='M';
451 3 }
452 2 else
453 2 {
454 3 com=(O_X-2*j)|0x40;
455 3 PR7();
456 3 k='R';
457 3 }
458 2 }
459 1 com=com&0x3f;
460 1 for(count1=i;count1<i+16;count1++)
461 1 {
462 2 dat1=CCTAB[code_1][count1];
463 2 if(k=='L')
464 2 {
465 3 PR2();
466 3 }
467 2 else
468 2 {
469 3 if(k=='M')
470 3 {
471 4 PR5();
472 4 }
473 3 else
474 3 {
475 4 PR8();
476 4 }
477 3 }
478 2 com++;
479 2
480 2 if(com==j)
481 2 {
482 3 if(k=='L')
483 3 {
484 4 com=0x40;
485 4 PR4();
486 4 k='M';
487 4 }
488 3 else
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -