Changeset 7258c6a in buchla-68k for ram/sqdisp.c
- Timestamp:
- 07/09/2017 04:45:34 PM (7 years ago)
- Branches:
- master
- Children:
- 8618599
- Parents:
- 0292fbb
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ram/sqdisp.c
r0292fbb r7258c6a 25 25 extern void nokey(void); 26 26 27 extern char*(*BakLine)(void);28 extern char*(*FwdLine)(void);29 30 extern u nsigned*obj8, *obj9, *obj10, *obj11;31 extern u nsigned short *LineBuf, *ScObAdr, *OldLine;32 extern u nsigned short LineAtr;33 34 extern short CurLine, CurScan;35 extern short ScrlObj, SmScNsl;36 extern short PdScDnF, PdScUpF;37 extern short ctcsw, submenu;38 extern short stccol, stcrow;39 extern short cxval;40 41 extern int cg3[][256];42 43 extern charTheBuf[]; /* display build buffer */44 45 short curslin; /* current sequence line */46 47 /* 48 49 */ 50 51 charsqhead[] =27 extern int8_t *(*BakLine)(void); 28 extern int8_t *(*FwdLine)(void); 29 30 extern uint16_t *obj8, *obj9, *obj10, *obj11; 31 extern uint16_t *LineBuf, *ScObAdr, *OldLine; 32 extern uint16_t LineAtr; 33 34 extern int16_t CurLine, CurScan; 35 extern int16_t ScrlObj, SmScNsl; 36 extern int16_t PdScDnF, PdScUpF; 37 extern int16_t ctcsw, submenu; 38 extern int16_t stccol, stcrow; 39 extern int16_t cxval; 40 41 extern int16_t cg3[][256]; 42 43 extern int8_t TheBuf[]; /* display build buffer */ 44 45 int16_t curslin; /* current sequence line */ 46 47 /* 48 49 */ 50 51 int8_t sqhead[] = 52 52 53 53 "\260 Lin Time Action 1 Action 2 Action 3 \260 No Seq Rg T \260"; 54 54 55 char*sqmcon[] = {55 int8_t *sqmcon[] = { 56 56 57 57 "\260 Key transient Trigger on Stop Set reg Value \260", … … 62 62 }; 63 63 64 short seqpal[16][3] = { /* sequence display palette */64 int16_t seqpal[16][3] = { /* sequence display palette */ 65 65 66 66 {0, 0, 0}, /* 0 - black */ … … 86 86 */ 87 87 88 short sqatype[] = { /* sequence action types by box number */88 int16_t sqatype[] = { /* sequence action types by box number */ 89 89 90 90 SQ_NULL, /* " " 0 */ … … 112 112 */ 113 113 114 char*sqdsptb[] = { /* sequence action display strings by action */114 int8_t *sqdsptb[] = { /* sequence action display strings by action */ 115 115 116 116 " ", /* SQ_NULL 0x0000 null action */ … … 145 145 void initsq(void) 146 146 { 147 register short i;147 register int16_t i; 148 148 149 149 for (i = 0; i < 16; i++) { … … 170 170 */ 171 171 172 void dsact( char *buf, unsigned short act, unsigned short dat)173 { 174 u nsigned short sqa, sqd, sqf, sqr, sqt, t1, t2, val;175 u nsigned short chan, i, key, port;172 void dsact(int8_t *buf, uint16_t act, uint16_t dat) 173 { 174 uint16_t sqa, sqd, sqf, sqr, sqt, t1, t2, val; 175 uint16_t chan, i, key, port; 176 176 177 177 sqa = SQ_MACT & act; … … 287 287 */ 288 288 289 void dsqlin( char *buf, short slin)289 void dsqlin(int8_t *buf, int16_t slin) 290 290 { 291 291 register struct seqent *sp; 292 register short i, t1, t2;292 register int16_t i, t1, t2; 293 293 294 294 sp = &seqtab[slin]; … … 337 337 void dstw(void) 338 338 { 339 register short slin, srow;339 register int16_t slin, srow; 340 340 341 341 slin = curslin - 7; … … 367 367 */ 368 368 369 void sqwin( short n)370 { 371 register short i, j;372 short atrbuf[64];373 charlinbuf[66];369 void sqwin(int16_t n) 370 { 371 register int16_t i, j; 372 int16_t atrbuf[64]; 373 int8_t linbuf[66]; 374 374 375 375 if (v_regs[5] & 0x0180) … … 514 514 */ 515 515 516 char*SqBakLn(void)517 { 518 register short slin;516 int8_t *SqBakLn(void) 517 { 518 register int16_t slin; 519 519 520 520 if (--curslin < 0) … … 540 540 */ 541 541 542 char*SqFwdLn(void)543 { 544 register short slin;542 int8_t *SqFwdLn(void) 543 { 544 register int16_t slin; 545 545 546 546 if (++curslin GE NSLINES) … … 564 564 void sqwins(void) 565 565 { 566 register short i;566 register int16_t i; 567 567 568 568 for (i = 0; i < 4; i++) … … 602 602 ScObAdr = obj9; 603 603 LineBuf = obj9; 604 OldLine = (u nsigned short *)NULL;604 OldLine = (uint16_t *)NULL; 605 605 LineAtr = PTPATR; 606 606
Note:
See TracChangeset
for help on using the changeset viewer.