R, 494 bytes, cracked by totallyhuman

#define/*+[--->++<]>+++.[->++++<]>+.+++++++++++.-[->+++++<]>+.------------.-[--->++<]>-.+++++++++++.+[--->+<]>.-[->+++<]>+.+[---->+<]>+++.+[->++<]>.---[----->+<]>-.+++[->+++<]>++.++++++++.+++++.--------.-[--->+<]>--.+[->+++<]>+.++++++++.[->++++++++++<]>.>++++++++++..[------>+<]>.++++++++++.++++++++.+++++++++++.[++>---<]>...>++++++++++..*/\
print =cat   ( c (  1  :  100  )  ) 
#define print(x)main(){for(auto i=.5;i++<sizeof('i')*101;printf("%d ",(char)i));}
#include<stdio.h>
print("1 "*100)

Shouldn't be too hard to crack.

R, 494 bytes, cracked by totallyhuman

#define/*+[--->++<]>+++.[->++++<]>+.+++++++++++.-[->+++++<]>+.------------.-[--->++<]>-.+++++++++++.+[--->+<]>.-[->+++<]>+.+[---->+<]>+++.+[->++<]>.---[----->+<]>-.+++[->+++<]>++.++++++++.+++++.--------.-[--->+<]>--.+[->+++<]>+.++++++++.[->++++++++++<]>.>++++++++++..[------>+<]>.++++++++++.++++++++.+++++++++++.[++>---<]>...>++++++++++..*/\
print =cat   ( c (  1  :  100  )  ) 
#define print(x)main(){for(auto i=.5;i++<sizeof('i')*101;printf("%d ",(char)i));}
#include<stdio.h>
print("1 "*100)

Without all the polyglot obfuscation:

cat(c(1:100))

???, 494 bytes

#define/*+[--->++<]>+++.[->++++<]>+.+++++++++++.-[->+++++<]>+.------------.-[--->++<]>-.+++++++++++.+[--->+<]>.-[->+++<]>+.+[---->+<]>+++.+[->++<]>.---[----->+<]>-.+++[->+++<]>++.++++++++.+++++.--------.-[--->+<]>--.+[->+++<]>+.++++++++.[->++++++++++<]>.>++++++++++..[------>+<]>.++++++++++.++++++++.+++++++++++.[++>---<]>...>++++++++++..*/\
print =cat   ( c (  1  :  100  )  ) 
#define print(x)main(){for(auto i=.5;i++<sizeof('i')*101;printf("%d ",(char)i));}
#include<stdio.h>
print("1 "*100)

Shouldn't be too hard to crack.

R, 494 bytes, cracked by totallyhuman

#define/*+[--->++<]>+++.[->++++<]>+.+++++++++++.-[->+++++<]>+.------------.-[--->++<]>-.+++++++++++.+[--->+<]>.-[->+++<]>+.+[---->+<]>+++.+[->++<]>.---[----->+<]>-.+++[->+++<]>++.++++++++.+++++.--------.-[--->+<]>--.+[->+++<]>+.++++++++.[->++++++++++<]>.>++++++++++..[------>+<]>.++++++++++.++++++++.+++++++++++.[++>---<]>...>++++++++++..*/\
print =cat   ( c (  1  :  100  )  ) 
#define print(x)main(){for(auto i=.5;i++<sizeof('i')*101;printf("%d ",(char)i));}
#include<stdio.h>
print("1 "*100)

Shouldn't be too hard to crack.