contrib/ee/new_curse.c

1532 	char *Otemp;		/* temporary string pointer to parse output */
1546 	Otemp = string;
1547 	if ((*Otemp >= '0') && (*Otemp <= '9'))
1549 		delay = atoi(Otemp);
1550 		while ((*Otemp >= '0') && (*Otemp <= '9'))
1551 			Otemp++;
1552 		if (*Otemp == '*')
1553 			Otemp++;
1555 	while (*Otemp != (char)NULL)
1557 		if (*Otemp == '%')
1559 			Otemp++;
1560 			if ((*Otemp == 'd') || (*Otemp == '2') || (*Otemp == '3') || (*Otemp == '.') || (*Otemp == '+'))
1562 				if (*Otemp == 'd')
1564 				else if (*Otemp == '2')
1566 				else if (*Otemp == '3')
1568 				else if (*Otemp == '+')
1570 					Otemp++;
1571 					p1 += *Otemp;
1574 				else if (*Otemp == '.')
1579 			else if (*Otemp == '>')
1581 				Otemp++;
1582 				if (p1 > *Otemp)
1584 					Otemp++;
1585 					p1 += *Otemp;
1588 					Otemp++;
1590 			else if (*Otemp == 'r')
1596 			else if (*Otemp == 'i')
1601 			else if (*Otemp == '%')
1602 				putchar(*Otemp);
1603 			else if (*Otemp == 'n')
1608 			else if (*Otemp == 'B')
1613 			else if (*Otemp == 'D')
1620 			putchar (*Otemp);
1621 		Otemp++;
1637 	char *Otemp;		/* temporary string pointer to parse output */
1649 	if (*Otemp == 'd')
1651 		Otemp++;
1655 	else if (!strncmp(Otemp, "2d", 2))
1659 		Otemp++;
1660 		Otemp++;
1662 	else if (!strncmp(Otemp, "3d", 2))
1666 		Otemp++;
1667 		Otemp++;
1669 	else if (!strncmp(Otemp, "02d", 3))
1673 		Otemp++;
1674 		Otemp++;
1675 		Otemp++;
1677 	else if (!strncmp(Otemp, "03d", 3))
1681 		Otemp++;
1682 		Otemp++;
1683 		Otemp++;
1685 	else if (*Otemp == '+')
1687 		Otemp++;
1692 	else if (*Otemp == '-')
1694 		Otemp++;
1699 	else if (*Otemp == '*')
1701 		Otemp++;
1706 	else if (*Otemp == '/')
1708 		Otemp++;
1713 	else if (*Otemp == 'm')
1715 		Otemp++;
1720 	else if (*Otemp == '&')
1722 		Otemp++;
1727 	else if (*Otemp == '|')
1729 		Otemp++;
1734 	else if (*Otemp == '^')
1736 		Otemp++;
1741 	else if (*Otemp == '=')
1743 		Otemp++;
1748 	else if (*Otemp == '>')
1750 		Otemp++;
1755 	else if (*Otemp == '<')
1757 		Otemp++;
1762 	else if (*Otemp == 'c')
1764 		Otemp++;
1767 	else if (*Otemp == 'i')
1769 		Otemp++;
1773 	else if (*Otemp == '%')
1775 		putchar(*Otemp);
1776 		Otemp++;
1778 	else if (*Otemp == '!')
1782 		Otemp++;
1784 	else if (*Otemp == '~')
1788 		Otemp++;
1790 	else if (*Otemp == 'p')
1792 		Otemp++;
1793 		Temp_Stack[place++] = p[*Otemp - '0'];
1794 		Otemp++;
1796 	else if (*Otemp == 'P')
1798 		Otemp++;
1799 		Temp_Stack[place++] = variable[*Otemp - 'a'];
1800 		Otemp++;
1802 	else if (*Otemp == 'g')
1804 		Otemp++;
1805 		variable[*Otemp - 'a'] = Temp_Stack[--place];
1806 		Otemp++;
1808 	else if (*Otemp == '\'')
1810 		Otemp++;
1811 		Temp_Stack[place++] = *Otemp;
1812 		Otemp++;
1813 		Otemp++;
1815 	else if (*Otemp == '{')
1817 		Otemp++;
1818 		temp = atoi(Otemp);
1820 		while (*Otemp != '}')
1821 			Otemp++;
1822 		Otemp++;
1867 	Otemp = string;
1868 	while (*Otemp != '\0')
1870 		if (*Otemp == '%')
1872 			Otemp++;
1873 			if ((*Otemp == '?') || (*Otemp == 't') || (*Otemp == 'e') || (*Otemp == ';'))
1875 				if (*Otemp == '?')
1877 					Otemp++;
1886 						while ((strncmp(Otemp, "%t", 2)) && (*Otemp != '\0'))
1891 							Otemp++;
1905 							Otemp++;
1906 							Otemp++;
1914 							while ((strncmp(Otemp, "%e", 2)) && (strncmp(Otemp, "%;", 2)) && (*Otemp != '\0'))
1915 								Otemp++;
1919 							if ((*Otemp != '\0') && (!strncmp(Otemp, "%e", 2)))
1921 								Otemp++;
1922 								Otemp++;
1923 								tchar = Otemp;
1936 									Otemp = tchar;
1956 							else if ((*Otemp != '\0') && (!strncmp(Otemp, "%;", 2)))
1959 								Otemp++;
1960 								Otemp++;
1962 							else /* Otemp == NULL */
1972 					Otemp++;
1974 					if (*Otemp != ';')
1976 						while ((*Otemp != '\0') && (strncmp(Otemp, "%;", 2)))
1977 							Otemp++;
1978 						if (*Otemp != '\0')
1980 							Otemp++;
1981 							Otemp++;
1985 						Otemp++;
1993 		else if (!strncmp(Otemp, "$<", 2))
1995 			Otemp++;
1996 			Otemp++;
1997 			delay = atoi(Otemp);
1998 			while (*Otemp != '>')
1999 				Otemp++;
2000 			Otemp++;
2014 			putchar(*Otemp);
2015 			Otemp++;