📄 prn_edit.lst
字号:
+0 469 469 ;V3.00S_MAR equ 0xa1;0x19 ;M % margine %
+0 470 470 ;V3.00S_MU equ 0xa2;0x1a ;M _ mark up
+0 471 471 ;V3.00S_MUD equ 0x57;0x1b ;d * delta of mark up
+0 472 472 ;V3.00S_SET equ 0x27;0x1d ;_ * for rate,time set(* only)
+0 473 473 ;V3.00S_SHD equ 0x22;0x1c ;_ _ for #/D print(space)
+0 474 474 ;V3.00S_TLG equ 0x93;0x0a ;G + total key with GT position
+0 475 475 ;==============================================================================
+0 476 476 ;V3.00S_FED equ 0x00 ;fh+' '
+0 477 477 ;V3.00S_PWR equ 0x17 ;'C*'
+0 478 478 ;V3.00S_PLS equ 0x01 ;' +'
+0 479 479 ;V3.00S_MIN equ 0x02 ;' -'
+0 480 480 ;V3.00S_SPC equ 0x00 ;' '
+0 481 481 ;V3.00S_SHP equ 0x26 ;' <>'
+0 482 482 ;V3.00S_TL equ 0x22 ;' *'
+0 483 483 ;V3.00S_TLGT equ 0x3c ;'*+'
+0 484 484 ;V3.00S_TLMGT equ 0x3d ;'*+'
+0 485 485 ;V3.00S_ST equ 0x08 ;' <>'
+0 486 486 ;V3.00S_MUL equ 0x03 ;' X'
+0 487 487 ;V3.00S_DIV equ 0x04 ;' /'
+0 488 488 ;V3.00S_EQU equ 0x05 ;' ='
+0 489 489 ;V3.00S_AST equ 0x22 ;' *'
+0 490 490 ;V3.00S_CLR equ 0x07 ;'c '
+0 491 491 ;V3.00S_MTL equ 0x0e ;'M*'
+0 492 492 ;V3.00S_MST equ 0x0d ;'M<>'
+0 493 493 ;V3.00S_MPL equ 0x0b ;'M+'
+0 494 494 ;V3.00S_MMI equ 0x0c ;'M-'
+0 495 495 ;V3.00S_M2TL equ 0x10 ;'G*'
+0 496 496 ;V3.00S_STASTA equ 0x77 ;'**'
+0 497 497 ;V3.00S_M2ST equ 0x0f ;'G<>'
+0 498 498 ;V3.00S_STAS equ 0x76 ;'*S'
+0 499 499 ;V3.00S_M2PL equ 0x3e ;'G+'
+0 500 500 ;V3.00S_STAPL equ 0x73 ;'*+'
+0 501 501 ;V3.00S_PLSTA equ 0x37 ;'+*'
+0 502 502 ;V3.00S_M2MI equ 0x3f ;'G-'
+0 503 503 ;V3.00S_STAMN equ 0x70 ;'*-'
+0 504 504 ;V3.00S_M2TLV equ 0x97 ;'G*'
+0 505 505 ;V3.00S_M2STV equ 0x96 ;'G<>'
+0 506 506 ;V3.00S_M2PLV equ 0x3e ;'G+'
+0 507 507 ;V3.00S_M2MIV equ 0x3f ;'G-'
+0 508 508 ;V3.00S_PER equ 0x06 ;' %'
+0 509 509 ;V3.00S_STAPER equ 0x71 ;'*%'
+0 510 510 ;V3.00S_PRDS equ 0x01 ;'-%'
+0 511 511 ;V3.00S_PRAD equ 0x31 ;'+%'
+0 512 512 ;V3.00S_DLTAL equ 0x82 ;delta+' '
+0 513 513 ;V3.00S_DLTA equ 0x28 ;' "+delta V1.26
+0 514 514 ;V3.00S_PRDL equ 0x81 ;delta+'%'
+0 515 515 ;V3.00S_DLAS equ 0x87 ;delta+'*'
+0 516 516 ;V3.00S_PRMU equ 0x21 ;' %'
+0 517 517 ;V3.00S_MKUP equ 0xa2 ;'M '
+0 518 518 ;V3.00S_RVS equ 0x22 ;' '
+0 519 519 ;V3.00S_AVR equ 0x27 ;' *'
+0 520 520 ;V3.00S_ROOT equ 0x22 ;' '
+0 521 521 ;V3.00S_TAX equ 0x12 ;'% '
+0 522 522 ;V3.00S_PRN equ 0x62 ;'<> '
+0 523 523 ;V3.00S_EUR equ 0x22 ;' '
+0 524 524 ;V3.00S_EUEQ equ 0xc2 ;'= '
+0 525 525 ;V3.00S_COST equ 0x2b ;' C'
+0 526 526 ;V3.00S_SELL equ 0x26 ;' <>'
+0 527 527 ;V3.00S_M equ 0x2a ;' M'
+0 528 528 ;V3.00S_MARG equ 0xa1 ;'M%'
+0 529 529 ;V3.00S_PERMARG equ 0x1a ;'%M'
+0 530 530 ;V3.00S_TAXA equ 0x27 ;' *'
+0 531 531 ;V3.00S_ICG equ 0x29 ;' G'
+0 532 532 ;V3.00S_ICGV equ 0x29 ;' G'
+0 533 533 ;V3.00S_ICM equ 0x2a ;' M'
+0 534 534 ;V3.00S_ASM equ 0x7a ;'*M'
+0 535 535 ;V3.00S_ASC equ 0x7b ;'*C'
+0 536 536 ;V3.00S_ASDL equ 0x78 ;'*'+delta
+0 537 537 ;V3.00S_MIPL equ 0x03 ;'-+'
+0 538 538 ;V3.00S_MIMI equ 0x00 ;'--'
+0 539 539 ;V3.00S_MIST equ 0x06 ;'-S'
+0 540 540 ;V3.00S_MITL equ 0x07 ;'-T'
+0 541 541 ;V3.00S_EUROS equ 0x29 ;' euro'
+0 542 542 ;V3.00S_G equ 0x9f ;'G '
+0 543 543 ;V3.00S_GPL equ 0x93 ;'G+'
+0 544 544 ;V3.00S_GAST equ 0x97 ;'G*'
+0 545 545 ;==============================================================================
00000020 +0 546 546 P_SPC equ 0x20 ;for print " "
+0 547 547 ;-----------------------------------------------------------
+0 548 548 ;interrupt enable flag set:
+0 549 549
00000004 +0 550 550 EF4 equ 4;(EIRL).4 /INT0
00000005 +0 551 551 EF5 equ 5;(EIRL).5 INTTC1
00000006 +0 552 552 EF6 equ 6;(EIRL).6 INT1
00000007 +0 553 553 EF7 equ 7;(EIRL).7 INTTBT
00000000 +0 554 554 EF8 equ 0;(EIRH).0 INTTC3
00000001 +0 555 555 EF9 equ 1;(EIRH).1 INTSIO(High speed SIO interrupt)
00000002 +0 556 556 EF10 equ 2;(EIRH).2 INTTC4
00000003 +0 557 557 EF11 equ 3;(EIRH).3 INT3
00000004 +0 558 558 EF12 equ 4;(EIRH).4 INT4
00000005 +0 559 559 EF13 equ 5;(EIRH).5 INTTC2
00000006 +0 560 560 EF14 equ 6;(EIRH).6 /INT5
00000007 +0 561 561 EF15 equ 7;(EIRH).7 INTADC or INT2
+0 562 562 ;interrupt request flag set:
00000002 +0 563 563 IL2 equ 2;(ILL).2 INTSWI
00000003 +0 564 564 IL3 equ 3;(ILL).3 INTATRAP
00000004 +0 565 565 IL4 equ 4;(ILL).4 /INT0
00000005 +0 566 566 IL5 equ 5;(ILL).5 INTTC1
00000006 +0 567 567 IL6 equ 6;(ILL).6 INT1
00000007 +0 568 568 IL7 equ 7;(ILL).7 INTTB
00000000 +0 569 569 IL8 equ 0;(ILH).0 INTTC3
00000001 +0 570 570 IL9 equ 1;(ILH).1 INTSIO
00000002 +0 571 571 IL10 equ 2;(ILH).2 INTTC4
00000003 +0 572 572 IL11 equ 3;(ILH).3 INT3
00000004 +0 573 573 IL12 equ 4;(ILH).4 INT4
00000005 +0 574 574 IL13 equ 5;(ILH).5 INTTC2
00000006 +0 575 575 IL14 equ 6;(ILH).6 /INT5
00000007 +0 576 576 IL15 equ 7;(ILH).7 INTADC or /INT2
+0 577 577 ; DBR_LCD_RATE equ (0x0f33<<4)+5 ;LCD DBR matrix point for "RATE"
+0 578 578 ; DBR_LCD1235_RATE equ (0x0f33<<4)+3 ;LCD DBR matrix point for "RATE"
+0 579 579 ; DBR_LCD1297_RATE equ (0x0f33<<4)+4 ;LCD DBR matrix point for "RATE"
+0 580 580 ; DBR_LCD120_RATE equ (0x0f33<<4)+4 ;LCD DBR matrix point for "RATE"
+0 581 581 ; DBR_LCD1297_GT equ (0x0f32<<4)+2 ;LCD DBR matrix point for "GT"
+0 582 582 ; ;LCD_PRN equ (0x0f31<<4)+3 ;LCD DBR matrix point for "PRINT"
+0 583 583 ; ;LCD_FIN equ (0x0f30<<4)+3 ;LCD DEB matrix point for "FIN"
+0 584 584
00007A12 +0 585 585 AUTOOFFTIME equ 31250;1500
+0 586 586 $list
+0 587 587
+0 588 588 public wk_print,feed_1,kfeed_1,err_print,line_print,wkup_print,ic_print,sym_print_br,print_shpd,print_bk
+0 589 589 public set_symbol,edit_prn,wk_print91,ic_print00,ic_to_avr,wk_print9,wk_print_alws
+0 590 590 public test_prn,stg_print,stop_print
+0 591 591 public message_edit ;v4.04
+0 592 592 extern spc_prnbuf
+0 593 593 extern w1_clear,ten_clear,function_end,w2_clear,w4_clear,w1_to_ten
+0 594 594 extern ten_to_w1,prn_to_dt,dt_to_prn,stg_sfl49,spc_disp
+0 595 595 extern key_feed,print,hex_to_dec;,cmpl_bc
+0 596 596 extern RP_CT_P,F_REDBAK,RP_RPTR
+0 597 597
+0 598 598 ROM section code
+0 599 599
+0 600 600
+0 601 601 ;==============================================================================
+0 602 602 ; Test print (print all character)
+0 603 603 ;==============================================================================
00000000 +0 604 604 test_prn:
+0 605 605 ;V4.03 ld b,0x20
+0 606 606 ;V4.03test_prnx:
+0 607 607 ;V4.03 call spc_prnbuf
+0 608 608 ;V4.03 ld hl,PRN_BUF
+0 609 609 ;V4.03 ld c,0
+0 610 610 ;V4.03test_prn0:
+0 611 611 ;V4.03 ld (hl+c),b
+0 612 612 ;V4.03 inc b
+0 613 613 ;V4.03 cmp b,0
+0 614 614 ;V4.03 j eq,test_prn9
+0 615 615 ;V4.03 inc c
+0 616 616 ;V4.03 cmp c,16
+0 617 617 ;V4.03 j lt,test_prn0
+0 618 618 ;V4.03 push b
+0 619 619 ;V4.03 call wk_print91
+0 620 620 ;V4.03 pop b
+0 621 621 ;V4.03 j test_prnx
+0 622 622 ;V4.03test_prn9:
+0 623 623 ;V4.03 call wk_print91
00000000 FA +0 624 624 ret
+0 625 625
+0 626 626 ;==============================================================================
+0 627 627 ; Item counter print
+0 628 628 ;==============================================================================
+0 629 629 ;
+0 630 630 ; input: hl<- item counter address
+0 631 631 ;
00000001 +0 632 632 ic_print:
00000001 480000 R +0 633 633 ld wa,SW_IC
00000004 E10000FC R +0 634 634 test (SW_IC>>4).a ;bit -reverse-> jump status
00000008 DE38 +0 635 635 j t,ic_print99 ;if jump status is 1 -> branch
+0 636 636 ;GT logic..........................................................
0000000A +0 637 637 ic_print00:
0000000A 4C0000 R +0 638 638 ld ix,PRN_BUF_MSD_LTP
0000000D E1000058 R +0 639 639 test (FLG_MODE).0
00000011 A2 +0 640 640 j f,ic_print01
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -