6502
/
cc65
mirror of https://github.com/cc65/cc65.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Normalized coding style. 

git-svn-id: svn://svn.cc65.org/cc65/trunk@5516 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
ol.sc 2012-02-09 12:32:53 +00:00
parent 1ccfe46892
commit c3205877cd
12 changed files with 186 additions and 205 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
samples/geos/dialog.c
View File

@ -11,24 +11,22 @@ void opvecfunc (void);
void usrfunc (void);
static const dlgBoxStr myDialog = {
DB_SETPOS (1, 0,150,0,319),
DB_TXTSTR (10,20,"test"),
DB_VARSTR (10,20,&r0L),
DB_GETSTR (10,20,&r0L,9),
DB_SYSOPV (sysopvfunc),
DB_GRPHSTR (&r0L),
DB_GETFILES (10,10),
DB_OPVEC (opvecfunc),
DB_USRICON (0,0,&r0L),
DB_USRROUT (usrfunc),
DB_ICON (OK, DBI_X_0, DBI_Y_0 ),
DB_ICON (CANCEL, DBI_X_1, DBI_Y_1),
DB_END
};
DB_SETPOS (1, 0, 150, 0, 319),
DB_TXTSTR (10, 20, "test"),
DB_VARSTR (10, 20, &r0L),
DB_GETSTR (10, 20, &r0L, 9),
DB_SYSOPV (sysopvfunc),
DB_GRPHSTR (&r0L),
DB_GETFILES (10, 10),
DB_OPVEC (opvecfunc),
DB_USRICON (0, 0, &r0L),
DB_USRROUT (usrfunc),
DB_ICON (OK, DBI_X_0, DBI_Y_0 ),
DB_ICON (CANCEL, DBI_X_1, DBI_Y_1),
DB_END
};
void main (void)
{
DoDlgBox (&myDialog);
DoDlgBox (&myDialog);
}

11
samples/geos/filesel.c
View File

@ -1,6 +1,4 @@
/*
GEOSLib example
using DlgBoxFileSelect
@ -11,17 +9,16 @@
26.12.1999
*/
#include <geos.h>
char fName[17]="";
char fName[17] = "";
void main (void)
{
r0=(int)fName;
DlgBoxOk(CBOLDON "You now will be presented","with apps list" CPLAINTEXT);
DlgBoxFileSelect("",APPLICATION,fName);
DlgBoxOk(CBOLDON "You now will be presented", "with apps list" CPLAINTEXT);
DlgBoxFileSelect("", APPLICATION, fName);
DlgBoxOk("You've chosen:" CBOLDON, fName);
}

42
samples/geos/geosconio.c
View File

@ -3,10 +3,10 @@
#include <conio.h>
#include <mouse.h>
void main(void) {
struct mouse_info info;
char ch;
void main(void)
{
struct mouse_info info;
char ch;
DlgBoxOk("Now the screen will be", "cleared.");
@ -14,45 +14,45 @@ char ch;
DlgBoxOk("Now a character will be", "written at 20,20");
gotoxy(20,20);
gotoxy(20, 20);
cputc('A');
DlgBoxOk("Now a string will be", "written at 0,1");
cputsxy(0,1, CBOLDON "Just" COUTLINEON "a " CITALICON "string." CPLAINTEXT );
cputsxy(0, 1, CBOLDON "Just" COUTLINEON "a " CITALICON "string." CPLAINTEXT );
DlgBoxOk("Write text and finish it", "with a dot.");
cursor(1);
do {
ch = cgetc();
cputc(ch);
cputc(ch);
} while (ch!='.');
cursor(0);
DlgBoxOk("Seems that it is all for conio.", "Let's test mouse routines.");
mouse_init(1);
cputsxy(0,2,CBOLDON "Now you can't see mouse (press any key)" CPLAINTEXT);
cputsxy(0, 2, CBOLDON "Now you can't see mouse (press any key)" CPLAINTEXT);
mouse_hide();
while (!kbhit()) { };
cputc(cgetc());
cputsxy(0,3,CBOLDON "Now you see the mouse (press any key)" CPLAINTEXT);
cputsxy(0, 3, CBOLDON "Now you see the mouse (press any key)" CPLAINTEXT);
mouse_show();
while (!kbhit()) { };
cputc(cgetc());
/* Get the current mouse coordinates and button states and print them */
mouse_info (&info);
gotoxy (0, 4);
cprintf ("X = %3d", info.pos.x);
gotoxy (0, 5);
cprintf ("Y = %3d", info.pos.y);
gotoxy (0, 6);
cprintf ("LB = %c", (info.buttons & MOUSE_BTN_LEFT)? '1' : '0');
gotoxy (0, 7);
cprintf ("RB = %c", (info.buttons & MOUSE_BTN_RIGHT)? '1' : '0');
// Get the current mouse coordinates and button states and print them
mouse_info(&info);
gotoxy(0, 4);
cprintf("X = %3d", info.pos.x);
gotoxy(0, 5);
cprintf("Y = %3d", info.pos.y);
gotoxy(0, 6);
cprintf("LB = %c", (info.buttons & MOUSE_BTN_LEFT)? '1' : '0');
gotoxy(0, 7);
cprintf("RB = %c", (info.buttons & MOUSE_BTN_RIGHT)? '1' : '0');
DlgBoxOk("Bye,", "Bye.");
}

14
samples/geos/getid.c
View File

@ -1,4 +1,3 @@
/*
This is an example program for GEOS.
It reads GEOS serial number and prints it on the screen.
@ -7,14 +6,16 @@
05.03.2004
*/
#include <stdlib.h>
#include <geos.h>
#include <conio.h>
const graphicStr Table = {
NEWPATTERN(0), MOVEPENTO(0,0), RECTANGLETO(320,199), GSTR_END };
NEWPATTERN(0), MOVEPENTO(0, 0), RECTANGLETO(320, 199), GSTR_END };
void Exit(void) {
void Exit(void)
{
exit(0);
}
@ -22,16 +23,17 @@ void Menu = {
(char)0, (char)14, (int)0, (int)28, (char)(HORIZONTAL|1),
CBOLDON "quit", (char)MENU_ACTION, &Exit };
int main(void) {
int main(void)
{
dispBufferOn = ST_WR_FORE;
GraphicsString(&Table);
cputsxy(0,3,CBOLDON "Your Serial Number is:");
cputsxy(0, 3, CBOLDON "Your Serial Number is:");
cputhex16(GetSerialNumber());
DoMenu(&Menu);
MainLoop();
// will never reach this point...
return 0;
}

22
samples/geos/grphstr.c
View File

@ -7,21 +7,19 @@
#include <geos.h>
static const graphicStr myString = {
MOVEPENTO (0,0),
LINETO(100,100),
RECTANGLETO(50,50),
NEWPATTERN(3),
FRAME_RECTO(50,50),
PEN_X_DELTA(10),
PEN_Y_DELTA(10),
PEN_XY_DELTA(10,10),
GSTR_END
};
MOVEPENTO (0, 0),
LINETO(100, 100),
RECTANGLETO(50, 50),
NEWPATTERN(3),
FRAME_RECTO(50, 50),
PEN_X_DELTA(10),
PEN_Y_DELTA(10),
PEN_XY_DELTA(10, 10),
GSTR_END
};
int main (void)
{
GraphicsString(&myString);
}

26
samples/geos/hello1.c
View File

@ -1,6 +1,4 @@
/*
GEOSLib example
Hello, world example - with DBox
@ -11,25 +9,25 @@
26.12.1999
*/
#include <geos.h>
void main (void)
{
/* Let's show what we've got... */
// Let's show what we've got...
DlgBoxOk(CBOLDON "Hello, world" CPLAINTEXT,
"This is written in C!");
/* Normal apps exit from main into system's mainloop, and app finish
when user selects it from icons or menu, but here we want to exit
immediately.
So instead:
MainLoop();
we can do:
(nothing as this is the end of main function)
exit(0);
return;
*/
// Normal apps exit from main into system's mainloop, and app finish
// when user selects it from icons or menu, but here we want to exit
// immediately.
// So instead:
// MainLoop();
// we can do:
// (nothing as this is the end of main function)
// exit(0);
// return;
return;
}

43
samples/geos/hello2.c
View File

@ -1,6 +1,4 @@
/*
GEOSLib example
Hello, world example - using graphic functions
@ -11,46 +9,43 @@
26.12.1999
*/
#include <geos.h>
/* Let's define the window we're operating */
// Let's define the window we're operating
struct window wholeScreen = {0, 199, 0, 319};
void main (void)
{
// Let's show what we've got...
/* Let's show what we've got... */
/* Let's clear the screen - with different pattern, because apps have cleared screen upon
start */
// Let's clear the screen - with different pattern, because apps have cleared screen upon
// start
SetPattern(0);
InitDrawWindow(&wholeScreen);
Rectangle();
/* Now some texts */
// Now some texts
PutString(COUTLINEON "This is compiled using cc65!" CPLAINTEXT, 20, 10);
PutString(CBOLDON "This is bold", 30, 10);
PutString(CULINEON "and this is bold and underline!", 40, 10);
PutString(CPLAINTEXT "This is plain text", 50, 10);
/* Wait for 5 secs... */
/* Note that this is multitasking sleep, and if there are any icons/menus onscreen,
they would be usable, in this case you have only pointer usable */
// Wait for 5 secs...
// Note that this is multitasking sleep, and if there are any icons/menus onscreen,
// they would be usable, in this case you have only pointer usable
Sleep(5*50);
/* Normal apps exit from main into system's mainloop, and app finish
when user selects it from icons or menu, but here we want to exit
immediately.
So instead:
MainLoop();
we can do:
(nothing as this is the end of main function)
exit(0);
return;
*/
// Normal apps exit from main into system's mainloop, and app finish
// when user selects it from icons or menu, but here we want to exit
// immediately.
// So instead:
// MainLoop();
// we can do:
// (nothing as this is the end of main function)
// exit(0);
// return;
return;
}

14
samples/geos/inittab.c
View File

@ -8,17 +8,15 @@
static const void myTab = {
0xd020, (char)2,
(char)0, (char)2,
0x4000, (char)5,
(char)0, (char)1, (char)2, (char)3, (char)4,
0x0000
};
0xd020, (char)2,
(char)0, (char)2,
0x4000, (char)5,
(char)0, (char)1, (char)2, (char)3, (char)4,
0x0000
};
int main (void)
{
InitRam(&myTab);
}

28
samples/geos/menu.c
View File

@ -18,30 +18,28 @@ typedef void menuString;
/* you can declare a menu using cc65 non-ANSI extensions */
static const menuString subMenu1 = {
(char)0, (char)(3*15),
(unsigned)0, (unsigned)50,
(char)(3 | VERTICAL),
"subitem1", (char)MENU_ACTION, (unsigned)smenu1,
"subitem2", (char)MENU_ACTION, (unsigned)smenu2,
"subitem3", (char)MENU_ACTION, (unsigned)smenu3
(char)0, (char)(3*15),
(unsigned)0, (unsigned)50,
(char)(3 | VERTICAL),
"subitem1", (char)MENU_ACTION, (unsigned)smenu1,
"subitem2", (char)MENU_ACTION, (unsigned)smenu2,
"subitem3", (char)MENU_ACTION, (unsigned)smenu3
};
/* or by using initialized structures */
static struct menu subMenu2 = {
{ 0, 3*15, 0, 50 },
3 | VERTICAL,
{
{ "subitem1", MENU_ACTION, smenu1 },
{ "subitem2", MENU_ACTION, smenu2 },
{ "subitem3", MENU_ACTION, smenu3 },
}
{ 0, 3*15, 0, 50 },
3 | VERTICAL,
{
{ "subitem1", MENU_ACTION, smenu1 },
{ "subitem2", MENU_ACTION, smenu2 },
{ "subitem3", MENU_ACTION, smenu3 },
}
};
void main (void)
{
DoMenu(&subMenu1);
DoMenu(&subMenu2);
}

101
samples/geos/rmvprot.c
View File

@ -1,6 +1,4 @@
/*
GEOSLib example
This small application removes GEOS disk write protection tag.
@ -12,77 +10,78 @@
21.03.2000
*/
#include <geos.h>
char diskName[17] = "";
static const graphicStr clearScreen = {
MOVEPENTO(0, 0),
NEWPATTERN(2),
RECTANGLETO(319, 199),
GSTR_END
MOVEPENTO(0, 0),
NEWPATTERN(2),
RECTANGLETO(319, 199),
GSTR_END
};
static const dlgBoxStr mainDialog = {
DB_DEFPOS(1),
DB_TXTSTR(TXT_LN_X, TXT_LN_2_Y,
CBOLDON "Remove protection on:" CPLAINTEXT),
DB_TXTSTR(TXT_LN_X, TXT_LN_3_Y, diskName),
DB_ICON(OK, DBI_X_0, DBI_Y_2),
DB_ICON(DISK, DBI_X_1, DBI_Y_2),
DB_ICON(CANCEL, DBI_X_2, DBI_Y_2),
DB_END
DB_DEFPOS(1),
DB_TXTSTR(TXT_LN_X, TXT_LN_2_Y,
CBOLDON "Remove protection on:" CPLAINTEXT),
DB_TXTSTR(TXT_LN_X, TXT_LN_3_Y, diskName),
DB_ICON(OK, DBI_X_0, DBI_Y_2),
DB_ICON(DISK, DBI_X_1, DBI_Y_2),
DB_ICON(CANCEL, DBI_X_2, DBI_Y_2),
DB_END
};
static const dlgBoxStr changeDiskDlg = {
DB_DEFPOS(1),
DB_TXTSTR(TXT_LN_X, TXT_LN_2_Y, CBOLDON "Insert new disk"),
DB_TXTSTR(TXT_LN_X, TXT_LN_3_Y, "into drive." CPLAINTEXT),
DB_ICON(OK, DBI_X_0, DBI_Y_2),
DB_ICON(CANCEL, DBI_X_2, DBI_Y_2),
DB_END
DB_DEFPOS(1),
DB_TXTSTR(TXT_LN_X, TXT_LN_2_Y, CBOLDON "Insert new disk"),
DB_TXTSTR(TXT_LN_X, TXT_LN_3_Y, "into drive." CPLAINTEXT),
DB_ICON(OK, DBI_X_0, DBI_Y_2),
DB_ICON(CANCEL, DBI_X_2, DBI_Y_2),
DB_END
};
static const dlgBoxStr errorDialog = {
DB_DEFPOS(1),
DB_TXTSTR(TXT_LN_X, TXT_LN_2_Y, CBOLDON "Error happened..."),
DB_TXTSTR(TXT_LN_X, TXT_LN_3_Y, "exiting..." CPLAINTEXT),
DB_ICON(OK, DBI_X_0, DBI_Y_2),
DB_END
DB_DEFPOS(1),
DB_TXTSTR(TXT_LN_X, TXT_LN_2_Y, CBOLDON "Error happened..."),
DB_TXTSTR(TXT_LN_X, TXT_LN_3_Y, "exiting..." CPLAINTEXT),
DB_ICON(OK, DBI_X_0, DBI_Y_2),
DB_END
};
void Error(void)
{
DoDlgBox(&errorDialog);
EnterDeskTop();
DoDlgBox(&errorDialog);
EnterDeskTop();
}
void main(void)
{
// Here we clear the screen. Not really needed anyway...
GraphicsString(&clearScreen);
// Get the name of current disk to show it in dialog box
GetPtrCurDkNm(diskName);
/* Here we clear the screen. Not really needed anyway... */
GraphicsString(&clearScreen);
/* Get the name of current disk to show it in dialog box */
GetPtrCurDkNm(diskName);
while (1) {
switch (DoDlgBox(&mainDialog)) {
while (1) {
switch (DoDlgBox(&mainDialog)) {
/* What's the result of dialog box? which icon was pressed? */
case OK:
if (GetDirHead())
Error();
curDirHead[OFF_GS_DTYPE] = 0;
if (PutDirHead())
Error();
break;
case DISK:
DoDlgBox(&changeDiskDlg);
GetPtrCurDkNm(diskName);
break;
default: /* CANCEL is the third option */
return;
break;
}
}
// What's the result of dialog box? which icon was pressed?
case OK:
if (GetDirHead())
Error();
curDirHead[OFF_GS_DTYPE] = 0;
if (PutDirHead())
Error();
break;
case DISK:
DoDlgBox(&changeDiskDlg);
GetPtrCurDkNm(diskName);
break;
default: // CANCEL is the third option
return;
break;
}
}
}

40
samples/geos/vector-demo.c
View File

@ -1,4 +1,3 @@
#include <geos.h>
#include <conio.h>
#include <stdlib.h>
@ -7,25 +6,30 @@ unsigned char x,y;
void_func oldMouseVector, oldKeyVector;
void foo1 (void) {
void foo1 (void)
{
// do something on mouse press/release
gotoxy(x,y);
++x;
cputc('A');
// call previous routine
oldMouseVector();
}
void foo2 (void) {
void foo2 (void)
{
// do something on key press/release
gotoxy(x,y);
++y;
cputc('B');
// call previous routine
oldKeyVector();
}
void hook_into_system(void) {
void hook_into_system(void)
{
// hook into system vectors - preserve old value
oldMouseVector = mouseVector;
mouseVector = foo1;
@ -33,21 +37,20 @@ void hook_into_system(void) {
keyVector = foo2;
}
void remove_hooks(void) {
void remove_hooks(void)
{
mouseVector = oldMouseVector;
keyVector = oldKeyVector;
}
int main(void) {
int main(void)
{
x = 0;
y = 0;
/*
To make cc65 do something for you before exiting you might register
a function to be called using atexit call. #include <stdlib.h> then and
write:
*/
// To make cc65 do something for you before exiting you might register
// a function to be called using atexit call. #include <stdlib.h> then and
// write:
atexit(&remove_hooks);
clrscr();
@ -55,16 +58,13 @@ int main(void) {
hook_into_system();
/* This program will loop forever though */
// This program will loop forever though
MainLoop();
/*
If not using atexit() you have to remember about restoring system vectors
right before exiting your application. Otherwise the system will most
likely crash.
// If not using atexit() you have to remember about restoring system vectors
// right before exiting your application. Otherwise the system will most
// likely crash.
// remove_hooks();
remove_hooks();
*/
return 0;
}

18
samples/geos/yesno.c
View File

@ -1,6 +1,4 @@
/*
GEOSLib example
example of using DlgBoxYesNo, DlgBoxOkCancel and DlgBoxOk functions
@ -11,16 +9,16 @@
26.12.1999
*/
#include <geos.h>
void main(void)
{
do {
if (DlgBoxYesNo("Are you female?", "(don't lie ;-)") == YES) {
DlgBoxOk("You claim to be woman!", "You wanna dance?");
} else {
DlgBoxOk("Ergh, another man...", "Let's go for a beer.");
};
} while (DlgBoxOkCancel("Do you want to try again?", "") == OK);
do {
if (DlgBoxYesNo("Are you female?", "(don't lie ;-)") == YES) {
DlgBoxOk("You claim to be woman!", "You wanna dance?");
} else {
DlgBoxOk("Ergh, another man...", "Let's go for a beer.");
};
} while (DlgBoxOkCancel("Do you want to try again?", "") == OK);
}