链表的创建和输出，可老输不出，不知哪儿错了
测试数据
输入：
6 g L1 = (ACDFHJM)
输出
ACDFHJM
以下自己代码：
#include <iostream>
#include <cstring>
using namespace std;
#define OK 1
#define ERROR 0
typedef char elemtype;
typedef struct lnode
{
    elemtype data;
    struct lnode *next;
}londe,*linklist;

void inlinklist(linklist &l)
{
    l=new londe;
    l->next=NULL;
}
void creatlist(linklist &l,elemtype elem)
{
    linklist r,p;
    r=l;
    p=new londe;
    p->data=elem;
    p->next=NULL;
    r->next=p;
    r=p;
}
void putout(linklist l)
{
    linklist p;
    p=l->next;
    while (p!=NULL)
    {
        cout<<p->data;
        p=p->next;
    }
}
int main()
{
    int k,i,j,len;
    char s1[10],s2,c,s[1000];
    linklist l;
    inlinklist(l);
    while (cin>>k)
    {
        cin>>c>>s1>>s2>>s;
        for (i=1;i<=strlen(s)-2;i++)
            creatlist(l,s[i]);
      putout(l);
    }
    return 0;
}

还木有回复。。。。都桑心了。。。。

已经知道哪儿错了。。。。r=l一直在重复赋值，所以最后只能输出最后个结点的位置